[PATCH] Tests: removed TODO and try_run() checks for legacy versions

Maxim Dounin mdounin at mdounin.ru
Tue Jun 4 15:38:24 UTC 2024


# HG changeset patch
# User Maxim Dounin <mdounin at mdounin.ru>
# Date 1717515481 -10800
#      Tue Jun 04 18:38:01 2024 +0300
# Node ID a095b971fbcc99a77206173f6130d5ff2681c389
# Parent  11463d3795703442f320ef21a58733e74408cd7c
Tests: removed TODO and try_run() checks for legacy versions.

For h2_http2.t, try_run() is preserved to ensure that deprecation
warnings for "listen ... http2" are suppressed, yet plan() is reported
before try_run(), so failure to start will be properly reported.

diff --git a/auth_request.t b/auth_request.t
--- a/auth_request.t
+++ b/auth_request.t
@@ -203,14 +203,9 @@ like(http_post_big('/proxy-double'), qr/
 
 # Multiple WWW-Authenticate headers (ticket #485).
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(http_get('/proxy-multi-auth'), qr/WWW-Authenticate: foo.*bar/s,
 	'multiple www-authenticate headers');
 
-}
-
 SKIP: {
 	eval { require FCGI; };
 	skip 'FCGI not installed', 2 if $@;
diff --git a/autoindex_win32.t b/autoindex_win32.t
--- a/autoindex_win32.t
+++ b/autoindex_win32.t
@@ -76,9 +76,6 @@ my $r = http_get('/');
 like($r, qr!href="test-file"!ms, 'file');
 like($r, qr!href="test-dir/"!ms, 'directory');
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.4');
-
 like($r, qr!href="test-file-(%d0%bc%d0%b8){3}"!msi, 'utf file link');
 like($r, qr!test-file-(\xd0\xbc\xd0\xb8){3}</a>!ms, 'utf file name');
 
@@ -92,8 +89,6 @@ like($r, qr!Index of /test-dir-(\xd0\xbc
 like($r, qr!href="test-subfile-(%d0%bc%d0%b8){3}"!msi, 'utf subdir link');
 like($r, qr!test-subfile-(\xd0\xbc\xd0\xb8){3}</a>!msi, 'utf subdir name');
 
-}
-
 ###############################################################################
 
 sub win32_mkdir {
diff --git a/body_chunked.t b/body_chunked.t
--- a/body_chunked.t
+++ b/body_chunked.t
@@ -179,9 +179,6 @@ like(
 	qr/ 200 /, 'chunk extensions'
 );
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.25.5');
-
 like(
 	http(
 		'GET /large HTTP/1.1' . CRLF
@@ -194,8 +191,6 @@ like(
 	qr/ 413 /, 'too many chunk extensions'
 );
 
-}
-
 like(
 	http(
 		'GET /large HTTP/1.1' . CRLF
@@ -208,9 +203,6 @@ like(
 	qr/ 200 /, 'trailers'
 );
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.25.5');
-
 like(
 	http(
 		'GET /large HTTP/1.1' . CRLF
@@ -223,8 +215,6 @@ like(
 	qr/ 413 /, 'too many trailers'
 );
 
-}
-
 # proxy_next_upstream
 
 like(http_get_body('/next', '0123456789'),
diff --git a/dav_utf8.t b/dav_utf8.t
--- a/dav_utf8.t
+++ b/dav_utf8.t
@@ -57,8 +57,6 @@ EOF
 
 ###############################################################################
 
-local $TODO = 'not yet' if $^O eq 'MSWin32' and !$t->has_version('1.23.4');
-
 my $d = $t->testdir();
 my $r;
 
diff --git a/fastcgi_header_params.t b/fastcgi_header_params.t
--- a/fastcgi_header_params.t
+++ b/fastcgi_header_params.t
@@ -59,9 +59,6 @@ EOF
 like(http_get_headers('/'), qr/SEE-THIS/,
 	'fastcgi request with many ignored headers');
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 my $r;
 
 $r = http(<<EOF);
@@ -88,8 +85,6 @@ like($r, qr/X-Cookie: foo; bar; bazz/,
 like($r, qr/X-Foo: foo, bar, bazz/,
 	'fastcgi with multiple unknown headers');
 
-}
-
 ###############################################################################
 
 sub http_get_headers {
diff --git a/h2.t b/h2.t
--- a/h2.t
+++ b/h2.t
@@ -1014,15 +1014,10 @@ is($frame->{headers}->{':status'}, 200, 
 
 # invalid connection preface
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.25.1');
-
 like(http('x' x 16), qr/400 Bad Request/, 'invalid preface');
 like(http('PRI * HTTP/2.0' . CRLF . CRLF . 'x' x 8), qr/400 Bad Request/,
 	'invalid preface 2');
 
-}
-
 # GOAWAY on SYN_STREAM with even StreamID
 
 $s = Test::Nginx::HTTP2->new();
diff --git a/h2_error_page.t b/h2_error_page.t
--- a/h2_error_page.t
+++ b/h2_error_page.t
@@ -85,19 +85,13 @@ my $s2 = Test::Nginx::HTTP2->new();
 $sid = $s2->new_stream({ method => 'foo' });
 $frames = $s2->read(all => [{ type => 'RST_STREAM' }]);
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.4');
-
 ($frame) = grep { $_->{type} eq "RST_STREAM" } @$frames;
 is($frame->{sid}, $sid, 'error 400 return 444 - invalid header');
 
-}
-
 # while keeping $s1 and $s2, stop nginx; this should result in
 # "open socket ... left in connection ..." alerts if any of these
 # sockets are still open
 
 $t->stop();
-$t->todo_alerts() unless $t->has_version('1.23.4');
 
 ###############################################################################
diff --git a/h2_headers.t b/h2_headers.t
--- a/h2_headers.t
+++ b/h2_headers.t
@@ -959,13 +959,8 @@ ok($frame, 'HPACK table boundary - heade
 
 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames;
 isnt($frame->{headers}->{'x-referer'}, 'see-this', 'newline in request header');
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.4');
-
-is($frame->{headers}->{':status'}, 400, 'newline in request header - bad request');
-
-}
+is($frame->{headers}->{':status'}, 400,
+	'newline in request header - bad request');
 
 # invalid header name as seen with underscore should not lead to ignoring rest
 
@@ -984,9 +979,6 @@ is($frame->{headers}->{'x-referer'}, 'se
 
 # other invalid header name characters as seen with ':'
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.4');
-
 $s = Test::Nginx::HTTP2->new();
 $sid = $s->new_stream({ headers => [
 	{ name => ':method', value => 'GET', mode => 0 },
@@ -1024,8 +1016,6 @@ is($frame->{headers}->{':status'}, 400, 
 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames;
 is($frame->{headers}->{':status'}, 400, 'control in header name');
 
-}
-
 # header name with underscore - underscores_in_headers on
 
 $s = Test::Nginx::HTTP2->new(port(8086));
diff --git a/h2_http2.t b/h2_http2.t
--- a/h2_http2.t
+++ b/h2_http2.t
@@ -24,7 +24,8 @@ select STDERR; $| = 1;
 select STDOUT; $| = 1;
 
 my $t = Test::Nginx->new()->has(qw/http http_ssl http_v2 socket_ssl_alpn/)
-	->has_daemon('openssl');
+	->has_daemon('openssl')
+	->plan(11);
 
 $t->write_file_expand('nginx.conf', <<'EOF');
 
@@ -108,7 +109,7 @@ foreach my $name ('localhost') {
 }
 
 $t->write_file('index.html', '');
-$t->try_run('no http2')->plan(11);
+$t->try_run();
 
 ###############################################################################
 
diff --git a/h2_proxy_protocol.t b/h2_proxy_protocol.t
--- a/h2_proxy_protocol.t
+++ b/h2_proxy_protocol.t
@@ -71,12 +71,7 @@ is($frame->{headers}->{'x-pp'}, '192.0.2
 
 # invalid PROXY protocol string
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.25.1');
-
 $proxy = 'BOGUS TCP4 192.0.2.1 192.0.2.2 1234 5678' . CRLF;
 ok(!http($proxy), 'PROXY invalid protocol');
 
-}
-
 ###############################################################################
diff --git a/http_headers_multi.t b/http_headers_multi.t
--- a/http_headers_multi.t
+++ b/http_headers_multi.t
@@ -144,15 +144,9 @@ like(get('/', map { "X-Forwarded-For: $_
 	qr/X-Forwarded-For: foo, bar, bazz/, 'multi $http_x_forwarded_for');
 like(get('/', 'Cookie: foo=1', 'Cookie: bar=2', 'Cookie: bazz=3'),
 	qr/X-Cookie: foo=1; bar=2; bazz=3/, 'multi $http_cookie');
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(get('/', 'Foo: foo', 'Foo: bar', 'Foo: bazz'),
 	qr/X-Foo: foo, bar, bazz/, 'multi $http_foo');
 
-}
-
 # request cookies, $cookie_*
 
 my $r = get('/', 'Cookie: foo=1', 'Cookie: bar=2', 'Cookie: bazz=3');
@@ -167,27 +161,16 @@ like($r, qr/X-Cookie-Bazz: 3/, '$cookie_
 
 like($r, qr/X-Sent-CC: foo, bar, bazz/, 'multi $sent_http_cache_control');
 like($r, qr/X-Sent-Link: foo, bar, bazz/, 'multi $sent_http_link');
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like($r, qr/X-Sent-Foo: foo, bar, bazz/, 'multi $sent_http_foo');
 
-}
-
 # upstream response headers, $upstream_http_*
 
 $r = get('/u');
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like($r, qr/X-Upstream-Set-Cookie: foo=1, bar=2, bazz=3/,
 	'multi $upstream_http_set_cookie');
 like($r, qr/X-Upstream-Bar: foo, bar, bazz/, 'multi $upstream_http_bar');
 
-}
-
 # upstream response cookies, $upstream_cookie_*
 
 like($r, qr/X-Upstream-Cookie-Foo: 1/, '$upstream_cookie_foo');
@@ -196,14 +179,9 @@ like($r, qr/X-Upstream-Cookie-Bazz: 3/, 
 
 # response trailers, $sent_trailer_*
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(get('/t'), qr/X-Sent-Trailer-Foo: foo, bar, bazz/,
 	'multi $sent_trailer_foo');
 
-}
-
 # various variables for request headers:
 #
 # $http_host, $http_user_agent, $http_referer
@@ -216,19 +194,12 @@ like(get('/t'), qr/X-Sent-Trailer-Foo: f
 like(get('/v'), qr/X-HTTP-Host: localhost/, '$http_host');
 like(get('/v', 'Host: foo', 'Host: bar'),
 	qr/400 Bad/, 'duplicate host rejected');
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(get('/v', 'User-Agent: foo', 'User-Agent: bar'),
 	qr/X-User-Agent: foo, bar/, 'multi $http_user_agent (invalid)');
 like(get('/v', 'Referer: foo', 'Referer: bar'),
 	qr/X-Referer: foo, bar/, 'multi $http_referer (invalid)');
 like(get('/v', 'Via: foo', 'Via: bar', 'Via: bazz'),
 	qr/X-Via: foo, bar, bazz/, 'multi $http_via');
-
-}
-
 like(get('/v', 'Cookie: foo', 'Cookie: bar', 'Cookie: bazz'),
 	qr/X-Cookie: foo; bar; bazz/, 'multi $http_cookie');
 like(get('/v', 'X-Forwarded-For: foo', 'X-Forwarded-For: bar',
@@ -246,15 +217,9 @@ like(get('/v', 'Content-Length: 0', 'Con
 
 like(get('/v', 'Content-Type: foo'),
 	qr/X-Content-Type: foo/, '$content_type');
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(get('/v', 'Content-Type: foo', 'Content-Type: bar'),
 	qr/X-Content-Type: foo, bar/, 'multi $content_type (invalid)');
 
-}
-
 like(http("GET /v HTTP/1.0" . CRLF . CRLF),
 	qr/X-Host: localhost/, '$host from server_name');
 like(http("GET /v HTTP/1.0" . CRLF . "Host: foo" . CRLF . CRLF),
diff --git a/http_request.t b/http_request.t
--- a/http_request.t
+++ b/http_request.t
@@ -91,10 +91,6 @@ like(http(CRLF . "GET / HTTP/1.0" . CRLF
 	'empty line ignored');
 like(http(LF . "GET / HTTP/1.0" . CRLF . CRLF), qr/ 200 /,
 	'empty line with just LF ignored');
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.25.5');
-
 like(http(CR . "GET / HTTP/1.0" . CRLF . CRLF), qr/ 400 /,
 	'empty line with just CR rejected');
 like(http(CRLF . CRLF . "GET / HTTP/1.0" . CRLF . CRLF), qr/ 400 /,
@@ -104,8 +100,6 @@ like(http(LF . LF . "GET / HTTP/1.0" . C
 like(http(CR . CR . "GET / HTTP/1.0" . CRLF . CRLF), qr/ 400 /,
 	'multiple CRs rejected');
 
-}
-
 # method
 
 like(http("FOO / HTTP/1.0" . CRLF . CRLF), qr/ 200 /, 'method');
diff --git a/image_filter_finalize.t b/image_filter_finalize.t
--- a/image_filter_finalize.t
+++ b/image_filter_finalize.t
@@ -142,10 +142,4 @@ http_get('/slow');
 http_get('/t3');
 like(http_get('/time.log'), qr!/t3:.*, [1-9]\.!, 'upstream response time');
 
-# "aio_write" is used to produce the following alert on some platforms:
-# "readv() failed (9: Bad file descriptor) while reading upstream"
-
-$t->todo_alerts() if $t->read_file('nginx.conf') =~ /aio_write on/
-	and $t->read_file('nginx.conf') =~ /aio threads/;
-
 ###############################################################################
diff --git a/mail_max_commands.t b/mail_max_commands.t
--- a/mail_max_commands.t
+++ b/mail_max_commands.t
@@ -60,7 +60,7 @@ mail {
 
 EOF
 
-$t->try_run('no max_commands')->plan(18);
+$t->run()->plan(18);
 
 ###############################################################################
 
diff --git a/mail_smtp.t b/mail_smtp.t
--- a/mail_smtp.t
+++ b/mail_smtp.t
@@ -297,15 +297,9 @@ my $s = Test::Nginx::SMTP->new();
 	. 'RSET');
 
 $s->read();
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.25.5');
-
 $s->ok('pipelined long rcpt to');
 $s->ok('pipelined long rset');
 
-}
-
 # Connection must stay even if error returned to rcpt to command
 
 $s = Test::Nginx::SMTP->new();
diff --git a/perl.t b/perl.t
--- a/perl.t
+++ b/perl.t
@@ -153,9 +153,6 @@ like(http(
 	. 'Host: localhost' . CRLF . CRLF
 ), qr/xfoo: foo/, 'perl header_in unknown');
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(http(
 	'GET / HTTP/1.0' . CRLF
 	. 'X-Foo: foo' . CRLF
@@ -163,8 +160,6 @@ like(http(
 	. 'Host: localhost' . CRLF . CRLF
 ), qr/xfoo: foo, bar/, 'perl header_in unknown2');
 
-}
-
 like(http(
 	'GET / HTTP/1.0' . CRLF
 	. 'Cookie: foo' . CRLF
@@ -191,9 +186,6 @@ like(http(
 	. 'Host: localhost' . CRLF . CRLF
 ), qr/xff: foo1, foo2/, 'perl header_in xff2');
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(http(
 	'GET / HTTP/1.0' . CRLF
 	. 'Connection: close' . CRLF
@@ -207,8 +199,6 @@ like(http(
 	. 'Host: localhost' . CRLF . CRLF
 ), qr/connection: close, foo/, 'perl header_in connection2');
 
-}
-
 # headers_out content-length tests with range filter
 
 like(http_get('/range'), qr/Content-Length: 42.*^x{42}$/ms,
diff --git a/proxy_available.t b/proxy_available.t
--- a/proxy_available.t
+++ b/proxy_available.t
@@ -76,13 +76,8 @@ IO::Select->new($s)->can_read(3);
 
 $t->reload();
 
-TODO: {
-local $TODO = 'not yet' if $^O eq 'linux' and !$t->has_version('1.23.1');
-
 like(http_end($s), qr/AND-THIS/, 'zero available - buffered');
 
-}
-
 $s = http_get('/unbuffered', start => 1);
 IO::Select->new($s)->can_read(3);
 
@@ -90,8 +85,6 @@ IO::Select->new($s)->can_read(3);
 
 like(http_end($s), qr/AND-THIS/, 'zero available - unbuffered');
 
-$t->todo_alerts() if $^O eq 'linux' and !$t->has_version('1.23.1');
-
 ###############################################################################
 
 sub http_daemon {
diff --git a/proxy_cache_control.t b/proxy_cache_control.t
--- a/proxy_cache_control.t
+++ b/proxy_cache_control.t
@@ -194,15 +194,10 @@ like(get('/cache-control'), qr/HIT/, 'ca
 like(get('/x-accel-expires'), qr/HIT/, 'x-accel-expires');
 like(get('/x-accel-expires-at'), qr/EXPIRED/, 'x-accel-expires at');
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 # the second header to disable cache is duplicate and ignored
 
 like(get('/x-accel-expires-duplicate'), qr/HIT/, 'x-accel-expires duplicate');
 
-}
-
 # with cache headers ignored, the response will be fresh
 
 like(get('/ignore'), qr/MISS/, 'cache headers ignored');
@@ -211,15 +206,8 @@ like(get('/ignore'), qr/MISS/, 'cache he
 
 like(get('/cache-control-before-expires'), qr/HIT/,
 	'cache-control before expires');
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(get('/cache-control-after-expires'), qr/HIT/,
 	'cache-control after expires');
-
-}
-
 like(get('/cache-control-no-cache-before-expires'), qr/MISS/,
 	'cache-control no-cache before expires');
 like(get('/cache-control-no-cache-after-expires'), qr/MISS/,
@@ -228,14 +216,7 @@ like(get('/cache-control-no-cache-after-
 # X-Accel-Expires is preferred over both Cache-Control and Expires
 
 like(get('/x-accel-expires-before'), qr/HIT/, 'x-accel-expires before');
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(get('/x-accel-expires-after'), qr/HIT/, 'x-accel-expires after');
-
-}
-
 like(get('/x-accel-expires-0-before'), qr/MISS/, 'x-accel-expires 0 before');
 like(get('/x-accel-expires-0-after'), qr/MISS/, 'x-accel-expires 0 after');
 
@@ -250,15 +231,9 @@ like(get('/cache-control-no-cache-multi'
 
 like(get('/extension-before-x-accel-expires'),
 	qr/STALE/, 'cache-control extensions before x-accel-expires');
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(get('/extension-after-x-accel-expires'),
 	qr/STALE/, 'cache-control extensions after x-accel-expires');
 
-}
-
 # Set-Cookie is considered when caching with Cache-Control
 
 like(get('/set-cookie'), qr/MISS/, 'set-cookie not cached');
diff --git a/proxy_cache_use_stale.t b/proxy_cache_use_stale.t
--- a/proxy_cache_use_stale.t
+++ b/proxy_cache_use_stale.t
@@ -247,11 +247,6 @@ like($r, qr/STALE.*^(SEE-THIS){1024}$/ms
 $r = read_all(http_get('/ssi.html', start => 1));
 like($r, qr/^xxx (SEE-THIS){1024} xxx$/ms, 's-w-r - not blocked in subrequest');
 
-# "aio_write" is used to produce "open socket ... left in connection" alerts.
-
-$t->todo_alerts() if $t->read_file('nginx.conf') =~ /aio_write on/
-        and $t->read_file('nginx.conf') =~ /aio threads/ and $^O eq 'freebsd';
-
 # due to the missing content_handler inheritance in a cloned subrequest,
 # this used to access a static file in the update request
 
diff --git a/proxy_cache_vary.t b/proxy_cache_vary.t
--- a/proxy_cache_vary.t
+++ b/proxy_cache_vary.t
@@ -266,14 +266,8 @@ like(get('/', 'bar,foo'), qr/HIT/ms, 'no
 
 like(get('/multi', 'foo'), qr/MISS/ms, 'multi first');
 like(get('/multi', 'foo'), qr/HIT/ms, 'multi second');
-
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(get('/multi', 'bar'), qr/MISS/ms, 'multi other');
 
-}
-
 # keep c->body_start when Vary changes (ticket #2029)
 
 # before 1.19.3, this prevented updating c->body_start of a main key
diff --git a/proxy_duplicate_headers.t b/proxy_duplicate_headers.t
--- a/proxy_duplicate_headers.t
+++ b/proxy_duplicate_headers.t
@@ -57,9 +57,6 @@ EOF
 
 like(http_get('/'), qr/200 OK/, 'normal');
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(http_get('/invalid-length'), qr/502 Bad/, 'invalid length');
 like(http_get('/duplicate-length'), qr/502 Bad/, 'duplicate length');
 like(http_get('/unknown-transfer-encoding'), qr/502 Bad/,
@@ -74,8 +71,6 @@ like(http_get('/transfer-encoding-and-le
 like(http_get('/duplicate-expires'), qr/Expires: foo(?!.*bar)/s,
 	'duplicate expires ignored');
 
-}
-
 ###############################################################################
 
 sub http_daemon {
diff --git a/proxy_intercept_errors.t b/proxy_intercept_errors.t
--- a/proxy_intercept_errors.t
+++ b/proxy_intercept_errors.t
@@ -94,12 +94,7 @@ like(http_get('/auth'), qr/401.*WWW-Auth
 # make sure multiple WWW-Authenticate headers are returned
 # along with intercepted response (ticket #485)
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 like(http_get('/auth-multi'), qr/401.*WWW-Authenticate: foo.*bar.*intercept/s,
 	'intercepted 401 multi');
 
-}
-
 ###############################################################################
diff --git a/proxy_protocol2_tlv.t b/proxy_protocol2_tlv.t
--- a/proxy_protocol2_tlv.t
+++ b/proxy_protocol2_tlv.t
@@ -23,7 +23,7 @@ use Test::Nginx;
 select STDERR; $| = 1;
 select STDOUT; $| = 1;
 
-my $t = Test::Nginx->new()->has(qw/http map/)
+my $t = Test::Nginx->new()->has(qw/http map/)->plan(14)
 	->write_file_expand('nginx.conf', <<'EOF');
 
 %%TEST_GLOBALS%%
@@ -80,7 +80,7 @@ http {
 EOF
 
 $t->write_file('t1', 'SEE-THIS');
-$t->try_run('no proxy_protocol tlv')->plan(14);
+$t->run();
 
 ###############################################################################
 
diff --git a/quic_retry.t b/quic_retry.t
--- a/quic_retry.t
+++ b/quic_retry.t
@@ -110,9 +110,6 @@ is($frame->{error}, 11, 'retry token inv
 
 # connection with retry token, corrupted
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.25.2');
-
 substr($retry_token, 32) ^= "\xff";
 $s = Test::Nginx::HTTP3->new(8980, token => $retry_token, probe => 1);
 $frames = $s->read(all => [{ type => 'CONNECTION_CLOSE' }]);
@@ -120,16 +117,11 @@ substr($retry_token, 32) ^= "\xff";
 ($frame) = grep { $_->{type} eq "CONNECTION_CLOSE" } @$frames;
 is($frame->{error}, 11, 'retry token decrypt error');
 
-}
-
 # resending client Initial packets after receiving a Retry packet
 # to simulate server Initial packet loss triggering its retransmit,
 # used to create extra nginx connections before 8f7e6d8c061e,
 # caught by CRYPTO stream mismatch among server Initial packets
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.25.3');
-
 $s = new_connection_resend();
 $sid = $s->new_stream();
 
@@ -141,8 +133,6 @@ eval {
 ($frame) = grep { $_->{type} eq "HEADERS" } @$frames;
 is($frame->{headers}->{':status'}, 403, 'resend initial');
 
-}
-
 ###############################################################################
 
 # expanded handshake version to send repetitive Initial packets
diff --git a/range_clearing.t b/range_clearing.t
--- a/range_clearing.t
+++ b/range_clearing.t
@@ -62,8 +62,6 @@ EOF
 
 ###############################################################################
 
-local $TODO = 'not yet' unless $t->has_version('1.23.1');
-
 like(http_get_range('/', 'Range: bytes=0-4'),
 	qr/ 206 (?!.*stub)/s, 'content range cleared - range request');
 like(http_get_range('/', 'Range: bytes=0-2,4-'),
diff --git a/scgi.t b/scgi.t
--- a/scgi.t
+++ b/scgi.t
@@ -81,9 +81,6 @@ like(http_get('/var?b=127.0.0.1:' . port
 	'scgi with variables');
 like(http_get('/var?b=u'), qr/SEE-THIS/, 'scgi with variables to upstream');
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 my $r = http(<<EOF);
 GET / HTTP/1.0
 Host: localhost
@@ -106,8 +103,6 @@ like($r, qr/X-Cookie: foo; bar; bazz/,
 like($r, qr/X-Foo: foo, bar, bazz/,
 	'scgi with multiple unknown headers');
 
-}
-
 ###############################################################################
 
 sub http_get_headers {
diff --git a/ssl_certificate.t b/ssl_certificate.t
--- a/ssl_certificate.t
+++ b/ssl_certificate.t
@@ -179,7 +179,6 @@ like(get('default', 8080, $s), qr/defaul
 
 TODO: {
 # ticket key name mismatch prevents session resumption
-local $TODO = 'not yet' unless $t->has_version('1.23.2');
 local $TODO = 'no SSL_session_key, old IO::Socket::SSL'
 	if $IO::Socket::SSL::VERSION < 1.965;
 
diff --git a/ssl_session_ticket_key.t b/ssl_session_ticket_key.t
--- a/ssl_session_ticket_key.t
+++ b/ssl_session_ticket_key.t
@@ -90,8 +90,6 @@ foreach my $name ('localhost') {
 #
 # with a single worker process it is only the 2nd test that fails
 
-local $TODO = 'not yet' unless $t->has_version('1.23.2');
-
 my $key = get_ticket_key_name();
 
 select undef, undef, undef, 0.5;
diff --git a/stream_proxy_protocol2_tlv.t b/stream_proxy_protocol2_tlv.t
--- a/stream_proxy_protocol2_tlv.t
+++ b/stream_proxy_protocol2_tlv.t
@@ -24,7 +24,7 @@ use Test::Nginx::Stream qw/ stream /;
 select STDERR; $| = 1;
 select STDOUT; $| = 1;
 
-my $t = Test::Nginx->new()->has(qw/stream stream_return map/)
+my $t = Test::Nginx->new()->has(qw/stream stream_return map/)->plan(14)
 	->write_file_expand('nginx.conf', <<'EOF');
 
 %%TEST_GLOBALS%%
@@ -63,7 +63,7 @@ stream {
 
 EOF
 
-$t->try_run('no proxy_protocol tlv')->plan(14);
+$t->run();
 
 ###############################################################################
 
@@ -86,9 +86,6 @@ like($r, qr/x:\x0d?$/m, 'non-existent');
 
 # big proxy protocol header with TLVs
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.3');
-
 my $sub = pp2_create_tlv(0x21, "TLSv1.2");
 $sub .= pp2_create_tlv(0x22, "example.com");
 $sub .= pp2_create_tlv(0x23, "AES256-SHA");
@@ -107,8 +104,6 @@ like($r, qr/ssl-sig-alg:SHA1\x0d?$/m, 'S
 like($r, qr/ssl-key-alg:RSA512\x0d?$/m, 'SSL_KEY_ALG');
 like($r, qr/ssl-binary:true/, 'SSL_BINARY');
 
-}
-
 ###############################################################################
 
 sub pp_get {
diff --git a/stream_ssl_certificate.t b/stream_ssl_certificate.t
--- a/stream_ssl_certificate.t
+++ b/stream_ssl_certificate.t
@@ -156,7 +156,6 @@ like(get('default', 8080, $s), qr/defaul
 
 TODO: {
 # ticket key name mismatch prevents session resumption
-local $TODO = 'not yet' unless $t->has_version('1.23.2');
 local $TODO = 'no SSL_session_key, old IO::Socket::SSL'
 	if $IO::Socket::SSL::VERSION < 1.965;
 
diff --git a/uwsgi.t b/uwsgi.t
--- a/uwsgi.t
+++ b/uwsgi.t
@@ -102,9 +102,6 @@ like(http_get('/var?b=127.0.0.1:' . port
 	'uwsgi with variables');
 like(http_get('/var?b=u'), qr/SEE-THIS/, 'uwsgi with variables to upstream');
 
-TODO: {
-local $TODO = 'not yet' unless $t->has_version('1.23.0');
-
 my $r = http(<<EOF);
 GET / HTTP/1.0
 Host: localhost
@@ -127,8 +124,6 @@ like($r, qr/X-Cookie: foo; bar; bazz/,
 like($r, qr/X-Foo: foo, bar, bazz/,
 	'uwsgi with multiple unknown headers');
 
-}
-
 ###############################################################################
 
 sub http_get_headers {




More information about the nginx-devel mailing list