perl-test-commits mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From ic...@apache.org
Subject svn commit: r1845766 - /perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm
Date Mon, 05 Nov 2018 10:10:51 GMT
Author: icing
Date: Mon Nov  5 10:10:51 2018
New Revision: 1845766

URL: http://svn.apache.org/viewvc?rev=1845766&view=rev
Log:
Changed the openssl version detection to work with other *SSL libraries.
Version detection now FATALs hard rather than assume it's some 0.* fossil when version cannot
be determined.

Modified:
    perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm

Modified: perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm
URL: http://svn.apache.org/viewvc/perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm?rev=1845766&r1=1845765&r2=1845766&view=diff
==============================================================================
--- perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm (original)
+++ perl/Apache-Test/trunk/lib/Apache/TestSSLCA.pm Mon Nov  5 10:10:51 2018
@@ -573,8 +573,8 @@ sub gendir {
 
 sub version {
     my $version = qx($openssl version);
-    return $1 if $version =~ /^OpenSSL (\S+) /;
-    return 0;
+    return $1 if $version =~ /^\S+SSL (\S+)/;
+    die "FATAL: unable to determine openssl version via `$openssl version` from: $version";
 }
 
 sub dgst {



Mime
View raw message