Attachment #459246 for bug #605134

View | Details | Raw Unified | Return to bug 605134
Collapse All | Expand All




#include <openssl/pem.h>
#include <openssl/dsa.h>
#include <openssl/ssl.h>
#include <openssl/opensslv.h>

#ifdef __cplusplus
}

PROTOTYPES: DISABLE

BOOT:
#if OPENSSL_VERSION_NUMBER < 0x10100000L
    ERR_load_crypto_strings();
#endif

DSA *
new(CLASS)

        if (seed) {
          seedpv = SvPV(seed, seed_len);
        }
#if OPENSSL_VERSION_NUMBER < 0x10100000L
        dsa = DSA_generate_parameters(bits, seedpv, (int)seed_len, NULL, NULL, NULL, NULL);
        if (!dsa) {
#else
	dsa = DSA_new();
	if (!DSA_generate_parameters_ex(dsa, bits, seedpv, (int)seed_len, NULL, NULL, NULL)) {
#endif
          err = ERR_get_error();
          if (err == 0) {
            croak("DSA_generate_parameters() returned NULL");
- 

Return to bug 605134

Lines 13-18 extern "C" { Link Here

(-)a/DSA.xs (-1 / +8 lines)
13	#include <openssl/pem.h>	13	#include <openssl/pem.h>
14	#include <openssl/dsa.h>	14	#include <openssl/dsa.h>
15	#include <openssl/ssl.h>	15	#include <openssl/ssl.h>
		16	#include <openssl/opensslv.h>
16		17
17	#ifdef __cplusplus	18	#ifdef __cplusplus
18	}	19	}
Lines 112-118 MODULE = Crypt::OpenSSL::DSA PACKAGE = Crypt::OpenSSL::DSA Link Here
112	PROTOTYPES: DISABLE	113	PROTOTYPES: DISABLE
113		114
114	BOOT:	115	BOOT:
		116	#if OPENSSL_VERSION_NUMBER < 0x10100000L
115	ERR_load_crypto_strings();	117	ERR_load_crypto_strings();
		118	#endif
116		119
117	DSA *	120	DSA *
118	new(CLASS)	121	new(CLASS)
Lines 142-149 generate_parameters(CLASS, bits, seed = NULL) Link Here
142	if (seed) {	145	if (seed) {
143	seedpv = SvPV(seed, seed_len);	146	seedpv = SvPV(seed, seed_len);
144	}	147	}
		148	#if OPENSSL_VERSION_NUMBER < 0x10100000L
145	dsa = DSA_generate_parameters(bits, seedpv, (int)seed_len, NULL, NULL, NULL, NULL);	149	dsa = DSA_generate_parameters(bits, seedpv, (int)seed_len, NULL, NULL, NULL, NULL);
146	if (!dsa) {	150	if (!dsa) {
		151	#else
		152	dsa = DSA_new();
		153	if (!DSA_generate_parameters_ex(dsa, bits, seedpv, (int)seed_len, NULL, NULL, NULL)) {
		154	#endif
147	err = ERR_get_error();	155	err = ERR_get_error();
148	if (err == 0) {	156	if (err == 0) {
149	croak("DSA_generate_parameters() returned NULL");	157	croak("DSA_generate_parameters() returned NULL");
150	-