Mercurial > hg > nginx-tests
comparison http_host.t @ 1937:2a0a6035a1af
Tests: removed TODO and try_run() checks for legacy versions.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Fri, 25 Aug 2023 18:12:08 +0400 |
parents | c48b2b0b8c2a |
children |
comparison
equal
deleted
inserted
replaced
1936:716d7500317d | 1937:2a0a6035a1af |
---|---|
168 | 168 |
169 is(http_host_header('123.40.56.78:9000:80'), '123.40.56.78', | 169 is(http_host_header('123.40.56.78:9000:80'), '123.40.56.78', |
170 'double port hack'); | 170 'double port hack'); |
171 | 171 |
172 like(http_host_header("localhost\nHost: again", 1), qr/ 400 /, 'host repeat'); | 172 like(http_host_header("localhost\nHost: again", 1), qr/ 400 /, 'host repeat'); |
173 | |
174 TODO: { | |
175 local $TODO = 'not yet' unless $t->has_version('1.21.1'); | |
176 | |
177 like(http_host_header("localhost\x02", 1), qr/ 400 /, 'control'); | 173 like(http_host_header("localhost\x02", 1), qr/ 400 /, 'control'); |
178 | |
179 } | |
180 | 174 |
181 ############################################################################### | 175 ############################################################################### |
182 | 176 |
183 sub http_host_header { | 177 sub http_host_header { |
184 my ($host, $all) = @_; | 178 my ($host, $all) = @_; |