# HG changeset patch # User Sergey Kandaurov # Date 1687353489 -14400 # Node ID 6ab08c255dd3b000346b77f33b754c6b9ed82c39 # Parent 15131dd931a09b9afb43e82ace8de13be7d72aa2 Tests: removed quic_ciphers.t TODO, CCM cipher now supported. While here, refined test comments. diff --git a/quic_ciphers.t b/quic_ciphers.t --- a/quic_ciphers.t +++ b/quic_ciphers.t @@ -86,25 +86,17 @@ is(get("\x13\x03"), 'TLS_CHACHA20_POLY13 is(get("\x13\x02\x13\x01"), 'TLS_AES_256_GCM_SHA384', 'ciphers many'); -# prefer TLS_AES_128_CCM_SHA256 and fail gracefully as we are not there yet, -# the cipher might be patched to be enabled by default in certain distributions - -my $s = Test::Nginx::HTTP3->new(8980, ciphers => "\x13\x04\x13\x01"); +# prefer TLS_AES_128_CCM_SHA256 with fallback to GCM, +# the cipher is enabled by default in some distributions -TODO: { -todo_skip 'not yet', 1 unless $s; - -like(get("\x13\x04\x13\x01", $s), qr/TLS_AES_128_[GC]CM_SHA256/, +like(get("\x13\x04\x13\x01"), qr/TLS_AES_128_[GC]CM_SHA256/, 'TLS_AES_128_CCM_SHA256'); -} - ############################################################################### sub get { - my ($ciphers, $sock) = @_; - my $s = Test::Nginx::HTTP3->new(8980, ciphers => $ciphers, - socket => $sock) or return; + my ($ciphers) = @_; + my $s = Test::Nginx::HTTP3->new(8980, ciphers => $ciphers); my $frames = $s->read(all => [{ sid => $s->new_stream(), fin => 1 }]); my ($frame) = grep { $_->{type} eq "HEADERS" } @$frames;