Mercurial > hg > nginx-tests

comparison proxy_duplicate_headers.t @ 1987:a095b971fbcc default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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.
author Maxim Dounin <mdounin@mdounin.ru>
date Tue, 04 Jun 2024 18:38:01 +0300
parents 735226e4c7fe
children
comparison
equal deleted inserted replaced
1986:11463d379570 1987:a095b971fbcc
55 55
56 ############################################################################### 56 ###############################################################################
57 57
58 like(http_get('/'), qr/200 OK/, 'normal'); 58 like(http_get('/'), qr/200 OK/, 'normal');
59 59
60 TODO: {
61 local $TODO = 'not yet' unless $t->has_version('1.23.0');
62
63 like(http_get('/invalid-length'), qr/502 Bad/, 'invalid length'); 60 like(http_get('/invalid-length'), qr/502 Bad/, 'invalid length');
64 like(http_get('/duplicate-length'), qr/502 Bad/, 'duplicate length'); 61 like(http_get('/duplicate-length'), qr/502 Bad/, 'duplicate length');
65 like(http_get('/unknown-transfer-encoding'), qr/502 Bad/, 62 like(http_get('/unknown-transfer-encoding'), qr/502 Bad/,
66 'unknown transfer encoding'); 63 'unknown transfer encoding');
67 like(http_get('/duplicate-transfer-encoding'), qr/502 Bad/, 64 like(http_get('/duplicate-transfer-encoding'), qr/502 Bad/,
71 like(http_get('/transfer-encoding-and-length'), qr/502 Bad/, 68 like(http_get('/transfer-encoding-and-length'), qr/502 Bad/,
72 'transfer encoding and length'); 69 'transfer encoding and length');
73 70
74 like(http_get('/duplicate-expires'), qr/Expires: foo(?!.*bar)/s, 71 like(http_get('/duplicate-expires'), qr/Expires: foo(?!.*bar)/s,
75 'duplicate expires ignored'); 72 'duplicate expires ignored');
76
77 }
78 73
79 ############################################################################### 74 ###############################################################################
80 75
81 sub http_daemon { 76 sub http_daemon {
82 my $server = IO::Socket::INET->new( 77 my $server = IO::Socket::INET->new(