Commit 0050ab2a authored by Daniel Stenberg's avatar Daniel Stenberg
Browse files

support tests that requires 'OpenSSL' specificly

parent 60e66c6c

tests/runtests.pl

+21 −2
Original line number Diff line number Diff line
@@ -116,6 +116,8 @@ my $has_ipv6; # set if libcurl is built with IPv6 support 
my $has_libz;    # set if libcurl is built with libz support

my $has_getrlimit;  # set if system has getrlimit()

my $has_ntlm;    # set if libcurl is built with NTLM support

my $has_openssl; # set if libcurl is built with OpenSSL

my $has_gnutls;  # set if libcurl is built with GnuTLS



my $skipped=0;  # number of tests skipped; reported in main loop

my %skipped;    # skipped{reason}=counter, reasons for skip
@@ -774,8 +776,7 @@ sub checkcurl { 
                }

                $pwd =~ s#\\#/#g;

            }

            elsif ($curl =~ /win32/)

            {

            elsif ($curl =~ /win32/) {

               # Native Windows builds don't understand the

               # output of cygwin's pwd.  It will be

               # something like /cygdrive/c/<some path>.
@@ -789,6 +790,14 @@ sub checkcurl { 
               # through a shell.

               chomp($pwd = `cygpath -m $pwd`);

           }

           elsif ($curl =~ /openssl/i) {

               # OpenSSL in use

               $has_openssl=1;

           }

           elsif ($curl =~ /gnutls/i) {

               # GnuTLS in use

               $has_gnutls=1;

           }

        }

        elsif($_ =~ /^Protocols: (.*)/i) {

            # these are the supported protocols, we don't use this knowledge
@@ -943,6 +952,16 @@ sub singletest { 
                next;

            }

        }

        elsif($f eq "OpenSSL") {

            if($has_openssl) {

                next;

            }

        }

        elsif($f eq "GnuTLS") {

            if($has_gnutls) {

                next;

            }

        }

        elsif($f eq "netrc_debug") {

            if($curl_debug) {

                next;