| /* | 
 |  * Copyright 2002-2020 The OpenSSL Project Authors. All Rights Reserved. | 
 |  * | 
 |  * Licensed under the Apache License 2.0 (the "License").  You may not use | 
 |  * this file except in compliance with the License.  You can obtain a copy | 
 |  * in the file LICENSE in the source distribution or at | 
 |  * https://www.openssl.org/source/license.html | 
 |  */ | 
 |  | 
 | /* | 
 |  * Support for deprecated functions goes here - static linkage will only | 
 |  * slurp this code if applications are using them directly. | 
 |  */ | 
 |  | 
 | #include <openssl/opensslconf.h> | 
 |  | 
 | #include <stdio.h> | 
 | #include <time.h> | 
 | #include "internal/cryptlib.h" | 
 | #include "bn_local.h" | 
 |  | 
 | BIGNUM *BN_generate_prime(BIGNUM *ret, int bits, int safe, | 
 |                           const BIGNUM *add, const BIGNUM *rem, | 
 |                           void (*callback) (int, int, void *), void *cb_arg) | 
 | { | 
 |     BN_GENCB cb; | 
 |     BIGNUM *rnd = NULL; | 
 |  | 
 |     BN_GENCB_set_old(&cb, callback, cb_arg); | 
 |  | 
 |     if (ret == NULL) { | 
 |         if ((rnd = BN_new()) == NULL) | 
 |             goto err; | 
 |     } else | 
 |         rnd = ret; | 
 |     if (!BN_generate_prime_ex(rnd, bits, safe, add, rem, &cb)) | 
 |         goto err; | 
 |  | 
 |     /* we have a prime :-) */ | 
 |     return rnd; | 
 |  err: | 
 |     BN_free(rnd); | 
 |     return NULL; | 
 | } | 
 |  | 
 | int BN_is_prime(const BIGNUM *a, int checks, | 
 |                 void (*callback) (int, int, void *), BN_CTX *ctx_passed, | 
 |                 void *cb_arg) | 
 | { | 
 |     BN_GENCB cb; | 
 |     BN_GENCB_set_old(&cb, callback, cb_arg); | 
 |     return bn_check_prime_int(a, checks, ctx_passed, 0, &cb); | 
 | } | 
 |  | 
 | int BN_is_prime_fasttest(const BIGNUM *a, int checks, | 
 |                          void (*callback) (int, int, void *), | 
 |                          BN_CTX *ctx_passed, void *cb_arg, | 
 |                          int do_trial_division) | 
 | { | 
 |     BN_GENCB cb; | 
 |     BN_GENCB_set_old(&cb, callback, cb_arg); | 
 |     return bn_check_prime_int(a, checks, ctx_passed, do_trial_division, &cb); | 
 | } |