X-Git-Url: https://git.openssl.org/gitweb/?p=openssl.git;a=blobdiff_plain;f=test%2Frecipes%2F70-test_sslcbcpadding.t;h=8d3d6fc4b9718e304ea525114a634c2c98f79b86;hp=e2df24e8d1715c9c0e878a48bb7756a91e84c207;hb=9b579777c5f84453940700fbd6f99abc09fe997e;hpb=3058b742664287a30be77488c2ce3d8103bffd64 diff --git a/test/recipes/70-test_sslcbcpadding.t b/test/recipes/70-test_sslcbcpadding.t index e2df24e8d1..8d3d6fc4b9 100644 --- a/test/recipes/70-test_sslcbcpadding.t +++ b/test/recipes/70-test_sslcbcpadding.t @@ -23,8 +23,8 @@ plan skip_all => "$test_name needs the dynamic engine feature enabled" plan skip_all => "$test_name needs the sock feature enabled" if disabled("sock"); -plan skip_all => "$test_name needs TLSv1.1 enabled" - if disabled("tls1_1"); +plan skip_all => "$test_name needs TLSv1.2 enabled" + if disabled("tls1_2"); $ENV{OPENSSL_ia32cap} = '~0x200000200000000'; my $proxy = TLSProxy::Proxy->new( @@ -40,6 +40,7 @@ my @test_offsets = (0, 128, 254, 255); # Test that maximally-padded records are accepted. my $bad_padding_offset = -1; +$proxy->serverflags("-tls1_2"); $proxy->start() or plan skip_all => "Unable to start up Proxy for tests"; plan tests => 1 + scalar(@test_offsets); ok(TLSProxy::Message->success(), "Maximally-padded record test"); @@ -47,6 +48,7 @@ ok(TLSProxy::Message->success(), "Maximally-padded record test"); # Test that invalid padding is rejected. foreach my $offset (@test_offsets) { $proxy->clear(); + $proxy->serverflags("-tls1_2"); $bad_padding_offset = $offset; $proxy->start(); ok(TLSProxy::Message->fail(), "Invalid padding byte $bad_padding_offset"); @@ -97,6 +99,7 @@ sub add_maximal_padding_filter TLSProxy::Record::RT_APPLICATION_DATA, TLSProxy::Record::VERS_TLS_1_2, length($data), + 0, length($data), $plaintext_len, $data,