include wrappers for deprecated openssl functions in openssl_missing.g

Author: tux-mind

ext/openssl/extconf.rb

@@ -71,6 +71,12 @@
 have_func("BN_mod_sub")
 have_func("BN_pseudo_rand_range")
 have_func("BN_rand_range")
+have_func("BN_generate_prime")
+have_func("BN_generate_prime_ex")
+have_func("BN_is_prime")
+have_func("BN_is_prime_ex")
+have_func("BN_is_prime_fasttest")
+have_func("BN_is_prime_fasttest_ex")
 have_func("CONF_get1_default_config_file")
 have_func("EVP_CIPHER_CTX_copy")
 have_func("EVP_CIPHER_CTX_set_padding")
@@ -88,6 +94,8 @@
 have_func("PEM_def_callback")
 have_func("PKCS5_PBKDF2_HMAC")
 have_func("PKCS5_PBKDF2_HMAC_SHA1")
+have_func("RSA_generate_key")
+have_func("RSA_generate_key_ex")
 have_func("X509V3_set_nconf")
 have_func("X509V3_EXT_nconf_nid")
 have_func("X509_CRL_add0_revoked")

ext/openssl/openssl_missing.c

@@ -354,3 +354,86 @@ ASN1_put_eoc(unsigned char **pp)
 }
 #endif
 
+#if !defined(HAVE_BN_GENERATE_PRIME) && defined(HAVE_BN_GENERATE_PRIME_EX)
+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;
+	int found = 0;
+
+	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 :-) */
+	found = 1;
+err:
+	if (!found && (ret == NULL) && (rnd != NULL)) BN_free(rnd);
+	return(found ? rnd : NULL);
+	}
+#endif
+
+#if !defined(HAVE_BN_IS_PRIME) && defined(HAVE_BN_IS_PRIME_EX)
+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_is_prime_ex(a, checks, ctx_passed, &cb);
+	}
+#endif
+
+#if !defined(HAVE_BN_IS_PRIME_FASTTEST) && defined(HAVE_BN_IS_PRIME_FASTTEST_EX)
+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_is_prime_fasttest_ex(a, checks, ctx_passed,
+				do_trial_division, &cb);
+	}
+#endif
+
+#if !defined(HAVE_RSA_GENERATE_KEY) && defined(HAVE_RSA_GENERATE_KEY_EX)
+RSA *RSA_generate_key(int bits, unsigned long e_value,
+	     void (*callback)(int,int,void *), void *cb_arg)
+	{
+	BN_GENCB cb;
+	int i;
+	RSA *rsa = RSA_new();
+	BIGNUM *e = BN_new();
+
+	if(!rsa || !e) goto err;
+
+	/* The problem is when building with 8, 16, or 32 BN_ULONG,
+	 * unsigned long can be larger */
+	for (i=0; i<(int)sizeof(unsigned long)*8; i++)
+		{
+		if (e_value & (1UL<<i))
+			if (BN_set_bit(e,i) == 0)
+				goto err;
+		}
+
+	BN_GENCB_set_old(&cb, callback, cb_arg);
+
+	if(RSA_generate_key_ex(rsa, bits, e, &cb)) {
+		BN_free(e);
+		return rsa;
+	}
+err:
+	if(e) BN_free(e);
+	if(rsa) RSA_free(rsa);
+	return 0;
+	}
+#endif