diff options
author | Richard Levitte <levitte@openssl.org> | 2016-01-26 02:09:33 +0100 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2016-01-26 09:53:36 +0100 |
commit | 96d2d7bc71a8413f23ff9fc88f600acc4c340a9b (patch) | |
tree | 82a623cdee2ea7a063b785c0d6f51ac8ed1a01aa /Configure | |
parent | 36b82b346454b4d0d0c4c19e0e9ca9e888f23a3e (diff) |
Use Configure's @disablables and %disabled through configdata.pm
Enhances the routines in OpenSSL::Test::Utils for checking disabled
stuff to get their information directly from Configure instead of
'openssl list -disabled'.
Reviewed-by: Viktor Dukhovni <viktor@openssl.org>
Diffstat (limited to 'Configure')
-rwxr-xr-x | Configure | 15 |
1 files changed, 15 insertions, 0 deletions
@@ -1311,6 +1311,21 @@ print OUT <<"EOF"; ); EOF +print OUT "our \%available_protocols = (\n"; +print OUT " tls => [ ", join(", ", map { quotify("perl", $_) } @tls), " ],\n"; +print OUT " dtls => [ ", join(", ", map { quotify("perl", $_) } @dtls), " ],\n"; +print OUT <<"EOF"; +); + +EOF +print OUT "our \%disabled = (\n"; +foreach (sort keys %disabled) { + print OUT " ", quotify("perl", $_), " => ", quotify("perl", $disabled{$_}), ",\n"; +} +print OUT <<"EOF"; +); + +EOF print OUT "our %withargs = (\n"; foreach (sort keys %withargs) { if (ref($withargs{$_}) eq "ARRAY") { |