perl-IO-Socket-SSL/IO-Socket-SSL-1.980-ecdhe-test.patch

16 lines
473 B
Diff
Raw Normal View History

--- t/ecdhe.t
+++ t/ecdhe.t
@@ -13,7 +13,11 @@
exit
}
-if ( ! defined &Net::SSLeay::CTX_set_tmp_ecdh ) {
+if ( ! defined &Net::SSLeay::CTX_set_tmp_ecdh || !
+ # There is a regression with elliptic curves on 1.0.1d with 64bit
+ # http://rt.openssl.org/Ticket/Display.html?id=2975
+ ( Net::SSLeay::OPENSSL_VERSION_NUMBER() != 0x1000105f
+ || length(pack("P",0)) == 4 )) {
print "1..0 # Skipped: no support for ecdh with this openssl/Net::SSLeay\n";
exit
}