Commit 835894d1 authored by Todd Short's avatar Todd Short Committed by Richard Levitte
Browse files

RT4272: Unit tests fail when DTLS disabled



Missing SKIP: block in SSL unit tests for DTLS and TLS version tests.

Reviewed-by: default avatarMatt Caswell <matt@openssl.org>
Reviewed-by: default avatarRichard Levitte <levitte@openssl.org>
parent aa50e2a3
Loading
Loading
Loading
Loading
+4 −2
Original line number Original line Diff line number Diff line
@@ -657,6 +657,7 @@ sub testssl {
        my $n = ((@protos+2) * (@protos+3))/2 - 2;
        my $n = ((@protos+2) * (@protos+3))/2 - 2;
        my $ntests = $n * $n;
        my $ntests = $n * $n;
	plan tests => $ntests;
	plan tests => $ntests;
      SKIP: {
        skip "TLS disabled", 1 if $ntests == 1;
        skip "TLS disabled", 1 if $ntests == 1;


        my $should;
        my $should;
@@ -690,7 +691,7 @@ sub testssl {
                print STDERR "\nFailed: @args\n";
                print STDERR "\nFailed: @args\n";
            }
            }
            ok($ok);
            ok($ok);
        }}}}
        }}}}}
    };
    };


    subtest 'DTLS Version min/max tests' => sub {
    subtest 'DTLS Version min/max tests' => sub {
@@ -703,6 +704,7 @@ sub testssl {
        my $n = ((@protos+2) * (@protos+3))/2 - 2;
        my $n = ((@protos+2) * (@protos+3))/2 - 2;
        my $ntests = $n * $n;
        my $ntests = $n * $n;
	plan tests => $ntests;
	plan tests => $ntests;
      SKIP: {
        skip "DTLS disabled", 1 if $ntests == 1;
        skip "DTLS disabled", 1 if $ntests == 1;


        my $should;
        my $should;
@@ -736,7 +738,7 @@ sub testssl {
                print STDERR "\nFailed: @args\n";
                print STDERR "\nFailed: @args\n";
            }
            }
            ok($ok);
            ok($ok);
        }}}}
        }}}}}
    };
    };
}
}