Mercurial > hg > nginx-tests
changeset 456:858e93175802
Tests: headers module tests.
author | Sergey Kandaurov <pluknet@nginx.com> |
---|---|
date | Thu, 28 Aug 2014 14:09:46 +0400 |
parents | a65cb9330c91 |
children | 4ceb2d12b7d2 |
files | headers.t |
diffstat | 1 files changed, 75 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/headers.t Thu Aug 28 14:09:46 2014 +0400 @@ -0,0 +1,75 @@ +#!/usr/bin/perl + +# (C) Sergey Kandaurov +# (C) Nginx, Inc. + +# Tests for headers module. + +############################################################################### + +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/) + ->write_file_expand('nginx.conf', <<'EOF'); + +%%TEST_GLOBALS%% + +daemon off; + +events { +} + +http { + %%TEST_GLOBALS_HTTP%% + + server { + listen 127.0.0.1:8080; + server_name localhost; + + add_header X-URI $uri; + add_header X-Always $uri always; + expires epoch; + + location /t1 { + } + + location /nx { + } + } +} + +EOF + +$t->write_file('t1', ''); +$t->try_run('no add_header always')->plan(6); + +############################################################################### + +my $r; + +# test for header field presence + +$r = http_get('/t1'); +like($r, qr/Cache-Control/, 'good expires'); +like($r, qr/X-URI/, 'good add_header'); +like($r, qr/X-Always/, 'good add_header always'); + +$r = http_get('/nx'); +unlike($r, qr/Cache-Control/, 'bad expires'); +unlike($r, qr/X-URI/, 'bad add_header'); +like($r, qr/X-Always/, 'bad add_header always'); + +###############################################################################