comparison h2_server_tokens.t @ 1948:78452573505c

Tests: improved server tokens tests to accept alternative names.
author Maxim Dounin <mdounin@mdounin.ru>
date Tue, 20 Feb 2024 20:10:15 +0300
parents 236d038dc04a
children
comparison
equal deleted inserted replaced
1947:1d980c5013dc 1948:78452573505c
94 $t->run(); 94 $t->run();
95 open STDERR, ">&", \*OLDERR; 95 open STDERR, ">&", \*OLDERR;
96 96
97 ############################################################################### 97 ###############################################################################
98 98
99 my $re = qr/nginx\/\d+\.\d+\.\d+/; 99 my $re = qr/\w+\/\d+\.\d+\.\d+/;
100 100
101 like(header_server('/200'), qr/^$re$/, 'http2 tokens default 200'); 101 like(header_server('/200'), qr/^$re$/, 'http2 tokens default 200');
102 like(header_server('/404'), qr/^$re$/, 'http2 tokens default 404'); 102 like(header_server('/404'), qr/^$re$/, 'http2 tokens default 404');
103 like(body('/404'), qr/$re/, 'http2 tokens default 404 body'); 103 like(body('/404'), qr/$re/, 'http2 tokens default 404 body');
104 104
105 is(header_server('/off/200'), 'nginx', 'http2 tokens off 200'); 105 like(header_server('/off/200'), qr/^\w+$/, 'http2 tokens off 200');
106 is(header_server('/off/404'), 'nginx', 'http2 tokens off 404'); 106 like(header_server('/off/404'), qr/^\w+$/, 'http2 tokens off 404');
107 like(body('/off/404'), qr/nginx(?!\/)/, 'http2 tokens off 404 body'); 107 unlike(body('/off/404'), $re, 'http2 tokens off 404 body');
108 108
109 like(header_server('/on/200'), qr/^$re$/, 'http2 tokens on 200'); 109 like(header_server('/on/200'), qr/^$re$/, 'http2 tokens on 200');
110 like(header_server('/on/404'), qr/^$re$/, 'http2 tokens on 404'); 110 like(header_server('/on/404'), qr/^$re$/, 'http2 tokens on 404');
111 like(body('/on/404'), $re, 'http2 tokens on 404 body'); 111 like(body('/on/404'), $re, 'http2 tokens on 404 body');
112 112