1 /* 2 * Copyright 2002-2016 The OpenSSL Project Authors. All Rights Reserved. 3 * 4 * Licensed under the OpenSSL license (the "License"). You may not use 5 * this file except in compliance with the License. You can obtain a copy 6 * in the file LICENSE in the source distribution or at 7 * https://www.openssl.org/source/license.html 8 */ 9 10 /* 11 * NB: This file contains deprecated functions (compatibility wrappers to the 12 * "new" versions). 13 */ 14 15 #include <openssl/opensslconf.h> 16 #if OPENSSL_API_COMPAT >= 0x00908000L 17 NON_EMPTY_TRANSLATION_UNIT 18 19 #else 20 21 # include <stdio.h> 22 # include <time.h> 23 # include "internal/cryptlib.h" 24 # include <openssl/bn.h> 25 # include <openssl/rsa.h> 26 27 RSA *RSA_generate_key(int bits, unsigned long e_value, 28 void (*callback) (int, int, void *), void *cb_arg) 29 { 30 int i; 31 BN_GENCB *cb = BN_GENCB_new(); 32 RSA *rsa = RSA_new(); 33 BIGNUM *e = BN_new(); 34 35 if (cb == NULL || rsa == NULL || e == NULL) 36 goto err; 37 38 /* 39 * The problem is when building with 8, 16, or 32 BN_ULONG, unsigned long 40 * can be larger 41 */ 42 for (i = 0; i < (int)sizeof(unsigned long) * 8; i++) { 43 if (e_value & (1UL << i)) 44 if (BN_set_bit(e, i) == 0) 45 goto err; 46 } 47 48 BN_GENCB_set_old(cb, callback, cb_arg); 49 50 if (RSA_generate_key_ex(rsa, bits, e, cb)) { 51 BN_free(e); 52 BN_GENCB_free(cb); 53 return rsa; 54 } 55 err: 56 BN_free(e); 57 RSA_free(rsa); 58 BN_GENCB_free(cb); 59 return 0; 60 } 61 #endif 62