@@ -17,7 +17,7 @@ use Data::Dumper;
1717
1818my $tests = 0;
1919my $prg =" ./testssl.sh" ;
20- my $check2run_smtp =" --protocols --standard --fs --server-preference --headers --vulnerable --each-cipher - q --ip=one --color 0" ;
20+ my $check2run_smtp =" --protocols --standard --fs --server-preference --headers --vulnerable -q --ip=one --color 0" ;
2121my $check2run =" -q --ip=one --color 0" ;
2222my $uri =" " ;
2323my $socket_out =" " ;
@@ -60,12 +60,14 @@ $socket_out = `./testssl.sh $check2run -t pop3 $uri 2>&1`;
6060unlike($socket_out , qr /$socket_regex_bl / , " " );
6161$tests ++;
6262
63+ # commented out, bc of travis' limits
64+ #
65+ # printf "\n%s\n", "STARTTLS POP3 unit tests via OpenSSL --> $uri ...";
6366# unlink "tmp.json";
64- printf " \n %s \n " , " STARTTLS POP3 unit tests via OpenSSL --> $uri ..." ;
65- $openssl_out = ` ./testssl.sh --ssl-native $check2run -t pop3 $uri 2>&1` ;
67+ # $openssl_out = `./testssl.sh --ssl-native $check2run -t pop3 $uri 2>&1`;
6668# $openssl_json = json('tmp.json');
67- unlike($openssl_out , qr /$openssl_regex_bl / , " " );
68- $tests ++;
69+ # unlike($openssl_out, qr/$openssl_regex_bl/, "");
70+ # $tests++;
6971
7072
7173$uri =" imap.gmx.net:143" ;
@@ -93,11 +95,13 @@ $socket_out = `./testssl.sh $check2run -t xmpp $uri 2>&1`;
9395unlike($openssl_out , qr /$openssl_regex_bl / , " " );
9496$tests ++;
9597
96- printf " \n %s \n " , " STARTTLS XMPP unit tests via OpenSSL --> $uri ..." ;
97- $openssl_out = ` ./testssl.sh --ssl-native $check2run -t xmpp $uri 2>&1` ;
98+ # commented out, bc of travis' limits
99+ #
100+ # printf "\n%s\n", "STARTTLS XMPP unit tests via OpenSSL --> $uri ...";
101+ # $openssl_out = `./testssl.sh --ssl-native $check2run -t xmpp $uri 2>&1`;
98102# $openssl_json = json('tmp.json');
99- unlike($openssl_out , qr /$openssl_regex_bl / , " " );
100- $tests ++;
103+ # unlike($openssl_out, qr/$openssl_regex_bl/, "");
104+ # $tests++;
101105
102106# $uri="jabber.ccc.de:5269";
103107# printf "\n%s\n", "Quick STARTTLS XMPP S2S unit tests via sockets --> $uri ...";
@@ -118,13 +122,15 @@ $socket_out =~ s/ error querying OCSP responder .*\n//g;
118122unlike($socket_out , qr /$socket_regex_bl / , " " );
119123$tests ++;
120124
121- printf " \n %s \n " , " STARTTLS FTP unit tests via OpenSSL --> $uri ..." ;
122- $openssl_out = ` ./testssl.sh --ssl-native $check2run -t ftp $uri 2>&1` ;
125+ # commented out, bc of travis' limits
126+ #
127+ # printf "\n%s\n", "STARTTLS FTP unit tests via OpenSSL --> $uri ...";
128+ # $openssl_out = `./testssl.sh --ssl-native $check2run -t ftp $uri 2>&1`;
123129# $openssl_json = json('tmp.json');
124130# OCSP stapling fails sometimes with: 'offered, error querying OCSP responder (ERROR: No Status found)'
125- $openssl_out =~ s / error querying OCSP responder .*\n // g ;
126- unlike($openssl_out , qr /$openssl_regex_bl / , " " );
127- $tests ++;
131+ # $openssl_out =~ s/ error querying OCSP responder .*\n//g;
132+ # unlike($openssl_out, qr/$openssl_regex_bl/, "");
133+ # $tests++;
128134
129135
130136# https://ldapwiki.com/wiki/Public%20LDAP%20Servers
@@ -146,11 +152,13 @@ $socket_out = `./testssl.sh $check2run -t nntp $uri 2>&1`;
146152unlike($socket_out , qr /$socket_regex_bl / , " " );
147153$tests ++;
148154
149- printf " \n %s \n " , " STARTTLS NNTP unit tests via OpenSSL --> $uri ..." ;
150- $openssl_out = ` ./testssl.sh --ssl-native $check2run -t nntp $uri 2>&1` ;
155+ # commented out, bc of travis' limits
156+ #
157+ # printf "\n%s\n", "STARTTLS NNTP unit tests via OpenSSL --> $uri ...";
158+ # $openssl_out = `./testssl.sh --ssl-native $check2run -t nntp $uri 2>&1`;
151159# $openssl_json = json('tmp.json');
152- unlike($openssl_out , qr /$openssl_regex_bl / , " " );
153- $tests ++;
160+ # unlike($openssl_out, qr/$openssl_regex_bl/, "");
161+ # $tests++;
154162
155163
156164# IRC: missing
0 commit comments