diff options
| author | Natanael Copa <ncopa@alpinelinux.org> | 2016-10-06 14:22:06 +0000 |
|---|---|---|
| committer | Natanael Copa <ncopa@alpinelinux.org> | 2016-10-10 12:04:23 +0000 |
| commit | 8e01ecb6edf467377653728cf270878761d052ae (patch) | |
| tree | 1dab198ab9c0a2fdf727863d7086b6b559f8bbc6 /main/perl-crypt-ssleay/libressl.patch | |
| parent | 018c212ac1fca1705e52c6bf6df3a309ffbc0743 (diff) | |
| download | aports-8e01ecb6edf467377653728cf270878761d052ae.tar.bz2 aports-8e01ecb6edf467377653728cf270878761d052ae.tar.xz | |
main/perl-crypt-ssleay: rebuild agasint libressl
Diffstat (limited to 'main/perl-crypt-ssleay/libressl.patch')
| -rw-r--r-- | main/perl-crypt-ssleay/libressl.patch | 49 |
1 files changed, 49 insertions, 0 deletions
diff --git a/main/perl-crypt-ssleay/libressl.patch b/main/perl-crypt-ssleay/libressl.patch new file mode 100644 index 0000000000..663fd9bc99 --- /dev/null +++ b/main/perl-crypt-ssleay/libressl.patch @@ -0,0 +1,49 @@ +diff --git a/SSLeay.xs b/SSLeay.xs +index 1560604..c9c143a 100644 +--- a/SSLeay.xs ++++ b/SSLeay.xs +@@ -46,11 +46,7 @@ extern "C" { + #endif + + +-#if SSLEAY_VERSION_NUMBER >= 0x0900 +-#define CRYPT_SSL_CLIENT_METHOD SSLv3_client_method() +-#else +-#define CRYPT_SSL_CLIENT_METHOD SSLv2_client_method() +-#endif ++#define CRYPT_SSL_CLIENT_METHOD TLS_client_method() + + static void InfoCallback(const SSL *s,int where,int ret) + { +@@ -148,17 +144,8 @@ SSL_CTX_new(packname, ssl_version) + if(ssl_version == 23) { + ctx = SSL_CTX_new(SSLv23_client_method()); + } +- else if(ssl_version == 3) { +- ctx = SSL_CTX_new(SSLv3_client_method()); +- } + else { +-#ifndef OPENSSL_NO_SSL2 +- /* v2 is the default */ +- ctx = SSL_CTX_new(SSLv2_client_method()); +-#else +- /* v3 is the default */ +- ctx = SSL_CTX_new(SSLv3_client_method()); +-#endif ++ ctx = SSL_CTX_new(TLS_client_method()); + } + + SSL_CTX_set_options(ctx,SSL_OP_ALL|0); +diff --git a/t/03-version.t b/t/03-version.t +index fa6a38f..e6eb954 100644 +--- a/t/03-version.t ++++ b/t/03-version.t +@@ -63,7 +63,7 @@ use Crypt::SSLeay::Version qw( + note $version; + like( + $version, +- qr/\AOpenSSL/, ++ qr/\A(Open|Libre)SSL/, + 'openssl_version return value looks valid', + ); + } |