projects / packages / perl-Crypt-SSLeay.git / blame
| Commit | Line | Data |
|---|---|---|
| fab7cecd AM |
1 | --- Crypt-SSLeay-0.72/SSLeay.xs~ 2014-04-24 00:36:24.000000000 +0200 |
| 2 | +++ Crypt-SSLeay-0.72/SSLeay.xs 2018-09-20 14:58:57.648701785 +0200 | |
| 3 | @@ -46,11 +46,7 @@ extern "C" { | |
| 4 | #endif | |
| 5 | ||
| 6 | ||
| 7 | -#if SSLEAY_VERSION_NUMBER >= 0x0900 | |
| 8 | -#define CRYPT_SSL_CLIENT_METHOD SSLv3_client_method() | |
| 9 | -#else | |
| 10 | -#define CRYPT_SSL_CLIENT_METHOD SSLv2_client_method() | |
| 11 | -#endif | |
| 12 | +#define CRYPT_SSL_CLIENT_METHOD SSLv23_client_method() | |
| 13 | ||
| 14 | static void InfoCallback(const SSL *s,int where,int ret) | |
| 15 | { | |
| 16 | @@ -145,21 +141,8 @@ SSL_CTX_new(packname, ssl_version) | |
| 17 | RAND_seed(buf, CRYPT_SSLEAY_RAND_BUFSIZE); | |
| 18 | } | |
| 19 | ||
| 20 | - if(ssl_version == 23) { | |
| 21 | - ctx = SSL_CTX_new(SSLv23_client_method()); | |
| 22 | - } | |
| 23 | - else if(ssl_version == 3) { | |
| 24 | - ctx = SSL_CTX_new(SSLv3_client_method()); | |
| 25 | - } | |
| 26 | - else { | |
| 27 | -#ifndef OPENSSL_NO_SSL2 | |
| 28 | - /* v2 is the default */ | |
| 29 | - ctx = SSL_CTX_new(SSLv2_client_method()); | |
| 30 | -#else | |
| 31 | - /* v3 is the default */ | |
| 32 | - ctx = SSL_CTX_new(SSLv3_client_method()); | |
| 33 | -#endif | |
| 34 | - } | |
| 35 | + /* v23 is the default */ | |
| 36 | + ctx = SSL_CTX_new(SSLv23_client_method()); | |
| 37 | ||
| 38 | SSL_CTX_set_options(ctx,SSL_OP_ALL|0); | |
| 39 | SSL_CTX_set_default_verify_paths(ctx); |