From 59a175cba30148183d87d84623b1e58e2896600a Mon Sep 17 00:00:00 2001 From: Dirk Date: Mon, 15 May 2017 20:53:09 +0200 Subject: [PATCH] changed to Linux --- utils/parse_client_ciphers.pl | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/utils/parse_client_ciphers.pl b/utils/parse_client_ciphers.pl index c17e8dd..6bd7674 100755 --- a/utils/parse_client_ciphers.pl +++ b/utils/parse_client_ciphers.pl @@ -6,11 +6,10 @@ use Data::Dumper; my @spec; my %ciphers; -# Turn cipher section of page like this https://www.ssllabs.com/ssltest/viewClient.html?name=Android&version=4.0.4 +# Turn cipher section of page like this https://www.ssllabs.com/ssltest/viewClient.html?name=Android&version=4.0.4 # into an openssl cipher spec -# Get all ciphers first (sorry only works on 64 bit mac atm) -foreach my $line ( split /\n/, `bin/openssl.Darwin.x86_64 ciphers -V 'ALL:COMPLEMENTOFALL:\@STRENGTH'`) { +foreach my $line ( split /\n/, `../bin/openssl.Linux.x86_64 ciphers -V 'ALL:COMPLEMENTOFALL:\@STRENGTH'`) { my @fields = split /\s+/, $line; my $hex = ""; foreach my $byte ( split /,/, $fields[1] ) { @@ -36,7 +35,7 @@ while (<>) { print "** $_\n"; } } - } + } } print join ":", @spec; print "\n";