Mercurial > hg > nginx-tests
view slice.t @ 1990:85d88cd5091c
Tests: SSI include stub tests.
author | Maxim Dounin <mdounin@mdounin.ru> |
---|---|
date | Thu, 04 Jul 2024 17:42:55 +0300 |
parents | 5ac6efbe5552 |
children |
line wrap: on
line source
#!/usr/bin/perl # (C) Sergey Kandaurov # (C) Nginx, Inc. # Tests for slice filter. ############################################################################### use warnings; use strict; use Test::More; BEGIN { use FindBin; chdir($FindBin::Bin); } use lib 'lib'; use Test::Nginx; ############################################################################### select STDERR; $| = 1; select STDOUT; $| = 1; my $t = Test::Nginx->new()->has(qw/http proxy cache fastcgi slice rewrite/) ->plan(79); $t->write_file_expand('nginx.conf', <<'EOF'); %%TEST_GLOBALS%% daemon off; events { } http { %%TEST_GLOBALS_HTTP%% proxy_cache_path %%TESTDIR%%/cache keys_zone=NAME:1m; proxy_cache_path %%TESTDIR%%/cach3 keys_zone=NAME3:1m; proxy_cache_key $uri$is_args$args$slice_range; fastcgi_cache_path %%TESTDIR%%/cache2 keys_zone=NAME2:1m; fastcgi_cache_key $uri$is_args$args$slice_range; server { listen 127.0.0.1:8080; server_name localhost; location / { } location /proxy/ { slice 2; proxy_pass http://127.0.0.1:8081/; proxy_set_header Range $slice_range; } location /cache/ { slice 2; proxy_pass http://127.0.0.1:8081/; proxy_cache NAME; proxy_set_header Range $slice_range; proxy_cache_valid 200 206 1h; add_header X-Cache-Status $upstream_cache_status; } location /fastcgi { slice 2; fastcgi_pass 127.0.0.1:8082; fastcgi_cache NAME2; fastcgi_param Range $slice_range; fastcgi_cache_valid 200 206 1h; fastcgi_force_ranges on; add_header X-Cache-Status $upstream_cache_status; } location /cache-redirect { error_page 404 = @fallback; } location @fallback { slice 2; proxy_pass http://127.0.0.1:8081/t$is_args$args; proxy_cache NAME3; proxy_set_header Range $slice_range; proxy_cache_valid 200 206 1h; } } server { listen 127.0.0.1:8081; server_name localhost; add_header Accept-Ranges bytes; location / { if ($http_range = "") { set $limit_rate 100; } } } } EOF $t->write_file('t', '0123456789abcdef'); $t->run(); ############################################################################### my $r; like(http_get('/cache/nx'), qr/ 404 /, 'not found'); like(http_get('/cache/t'), qr/ 200 .*0123456789abcdef$/ms, 'no range'); $r = get('/proxy/t', 'Range: bytes=3-4'); like($r, qr/ 206 /, 'proxy - 206 partial reply'); like($r, qr/^34$/m, 'proxy - correct content'); unlike($r, qr/Accept-Ranges/, 'proxy - no original accept-ranges'); $r = get('/cache/t?single', "Range: bytes=0-0"); like($r, qr/ 206 /, 'single - 206 partial reply'); like($r, qr/^0$/m, 'single - correct content'); like($r, qr/Status: MISS/m, 'single - cache status'); $r = get('/cache/t?single', "Range: bytes=0-0"); like($r, qr/ 206 /, 'single cached - 206 partial reply'); like($r, qr/^0$/m, 'single cached - correct content'); like($r, qr/Status: HIT/m, 'single cached - cache status'); $r = get('/cache/t?single', "Range: bytes=1-1"); like($r, qr/ 206 /, 'single next - 206 partial reply'); like($r, qr/^1$/m, 'single next - correct content'); like($r, qr/Status: HIT/m, 'single next - cache status'); $r = get('/cache/t?single', "Range: bytes=2-2"); like($r, qr/ 206 /, 'slice next - 206 partial reply'); like($r, qr/^2$/m, 'slice next - correct content'); like($r, qr/Status: MISS/m, 'slice next - cache status'); $r = get('/cache/t?single', "Range: bytes=2-2"); like($r, qr/ 206 /, 'slice next cached - 206 partial reply'); like($r, qr/^2$/m, 'slice next cached - correct content'); like($r, qr/Status: HIT/m, 'slice next cached - cache status'); $r = get('/cache/t?median', "Range: bytes=2-2"); like($r, qr/ 206 /, 'slice median - 206 partial reply'); like($r, qr/^2$/m, 'slice median - correct content'); like($r, qr/Status: MISS/m, 'slice median - cache status'); $r = get('/cache/t?median', "Range: bytes=0-0"); like($r, qr/ 206 /, 'before median - 206 partial reply'); like($r, qr/^0$/m, 'before median - correct content'); like($r, qr/Status: MISS/m, 'before median - cache status'); # range span to multiple slices $r = get('/cache/t?range', "Range: bytes=1-2"); like($r, qr/ 206 /, 'slice range - 206 partial reply'); like($r, qr/^12$/m, 'slice range - correct content'); like($r, qr/Status: MISS/m, 'slice range - cache status'); $r = get('/cache/t?range', "Range: bytes=0-0"); like($r, qr/ 206 /, 'slice 1st - 206 partial reply'); like($r, qr/^0$/m, 'slice 1st - correct content'); like($r, qr/Status: HIT/m, 'slice 1st - cache status'); $r = get('/cache/t?range', "Range: bytes=2-2"); like($r, qr/ 206 /, 'slice 2nd - 206 partial reply'); like($r, qr/^2$/m, 'slice 2nd - correct content'); like($r, qr/Status: HIT/m, 'slice 2nd - cache status'); $r = get('/cache/t?mrange', "Range: bytes=3-4"); like($r, qr/ 206 /, 'range median - 206 partial reply'); like($r, qr/^34$/m, 'range median - correct content'); like($r, qr/Status: MISS/m, 'range median - cache status'); $r = get('/cache/t?mrange', "Range: bytes=2-3"); like($r, qr/ 206 /, 'range prev - 206 partial reply'); like($r, qr/^23$/m, 'range prev - correct content'); like($r, qr/Status: HIT/m, 'range prev - cache status'); $r = get('/cache/t?mrange', "Range: bytes=4-5"); like($r, qr/ 206 /, 'range next - 206 partial reply'); like($r, qr/^45$/m, 'range next - correct content'); like($r, qr/Status: HIT/m, 'range next - cache status'); $r = get('/cache/t?first', "Range: bytes=2-"); like($r, qr/ 206 /, 'first bytes - 206 partial reply'); like($r, qr/^23456789abcdef$/m, 'first bytes - correct content'); like($r, qr/Status: MISS/m, 'first bytes - cache status'); $r = get('/cache/t?first', "Range: bytes=4-"); like($r, qr/ 206 /, 'first bytes cached - 206 partial reply'); like($r, qr/^456789abcdef$/m, 'first bytes cached - correct content'); like($r, qr/Status: HIT/m, 'first bytes cached - cache status'); # multiple ranges # we want 206, but 200 is also fine $r = get('/cache/t?many', "Range: bytes=3-3,4-4"); like($r, qr/200 OK/, 'many - 206 partial reply'); like($r, qr/^0123456789abcdef$/m, 'many - correct content'); $r = get('/cache/t?last', "Range: bytes=-10"); like($r, qr/206 /, 'last bytes - 206 partial reply'); like($r, qr/^6789abcdef$/m, 'last bytes - correct content'); # respect not modified and range filters my ($etag) = http_get('/t') =~ /ETag: (.*)/; like(get('/cache/t?inm', "If-None-Match: $etag"), qr/ 304 /, 'inm'); like(get('/cache/t?inm', "If-None-Match: bad"), qr/ 200 /, 'inm bad'); like(get('/cache/t?im', "If-Match: $etag"), qr/ 200 /, 'im'); like(get('/cache/t?im', "If-Match: bad"), qr/ 412 /, 'im bad'); $r = get('/cache/t?if', "Range: bytes=3-4\nIf-Range: $etag"); like($r, qr/ 206 /, 'if-range - 206 partial reply'); like($r, qr/^34$/m, 'if-range - correct content'); # respect Last-Modified from non-cacheable response with If-Range my ($lm) = http_get('/t') =~ /Last-Modified: (.*)/; $r = get('/proxy/t', "Range: bytes=3-4\nIf-Range: $lm"); like($r, qr/ 206 /, 'if-range last-modified proxy - 206 partial reply'); like($r, qr/^34$/m, 'if-range last-modified proxy - correct content'); $r = get('/cache/t?ifb', "Range: bytes=3-4\nIf-Range: bad"); like($r, qr/ 200 /, 'if-range bad - 200 ok'); like($r, qr/^0123456789abcdef$/m, 'if-range bad - correct content'); # first slice isn't known $r = get('/cache/t?skip', "Range: bytes=6-7\nIf-Range: $etag"); like($r, qr/ 206 /, 'if-range skip slice - 206 partial reply'); like($r, qr/^67$/m, 'if-range skip slice - correct content'); $r = get('/cache/t?skip', "Range: bytes=6-7\nIf-Range: $etag"); like($r, qr/ 206 /, 'if-range skip slice - cached - 206 partial reply'); like($r, qr/^67$/m, 'if-range skip slice - cached - correct content'); like($r, qr/HIT/, 'if-range skip bytes - cached - cache status'); $r = get('/cache/t?skip', "Range: bytes=2-3"); like($r, qr/ 206 /, 'if-range skip slice - skipped - 206 partial reply'); like($r, qr/^23$/m, 'if-range skip slice - skipped - correct content'); like($r, qr/MISS/, 'if-range skip bytes - skipped - cache status'); SKIP: { eval { require FCGI; }; skip 'FCGI not installed', 5 if $@; skip 'win32', 5 if $^O eq 'MSWin32'; $t->run_daemon(\&fastcgi_daemon); $t->waitforsocket('127.0.0.1:' . port(8082)); like(http_get('/fastcgi'), qr/200 OK.*MISS.*^012345678$/ms, 'fastcgi'); like(http_get('/fastcgi'), qr/200 OK.*HIT.*^012345678$/ms, 'fastcgi cached'); like(get("/fastcgi?1", "Range: bytes=0-0"), qr/ 206 .*MISS.*^0$/ms, 'fastcgi slice'); like(get("/fastcgi?1", "Range: bytes=1-1"), qr/ 206 .*HIT.*^1$/ms, 'fastcgi slice cached'); like(get("/fastcgi?1", "Range: bytes=2-2"), qr/ 206 .*MISS.*^2$/ms, 'fastcgi slice next'); } # slicing in named location $r = http_get('/cache-redirect'); like($r, qr/ 200 .*^0123456789abcdef$/ms, 'in named location'); is(scalar @{[ glob $t->testdir() . '/cach3/*' ]}, 8, 'in named location - cache entries'); ############################################################################### sub get { my ($url, $extra) = @_; return http(<<EOF); GET $url HTTP/1.1 Host: localhost Connection: close $extra EOF } ############################################################################### sub fastcgi_daemon { my $socket = FCGI::OpenSocket('127.0.0.1:' . port(8082), 5); my $request = FCGI::Request(\*STDIN, \*STDOUT, \*STDERR, \%ENV, $socket); my $body = '012345678'; my $len = length($body); while ($request->Accept() >= 0) { my ($start, $stop) = $ENV{Range} =~ /bytes=(\d+)-(\d+)/; my $body = substr($body, $start, ($stop - $start) + 1); $stop = $len - 1 if $stop > $len - 1; print <<EOF; Status: 206 Content-Type: text/html Content-Range: bytes $start-$stop/$len EOF print $body; } FCGI::CloseSocket($socket); } ###############################################################################