blob: 7bd0dcc38748daa0ea2c36a176f77c1379fbc65c [file] [log] [blame]
#!/usr/bin/perl
# (C) Maxim Dounin
# (C) Valentin Bartenev
# Tests for host parsing in requests.
###############################################################################
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 rewrite/)->plan(36);
$t->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;
location / {
return 200 $host;
}
}
}
EOF
$t->run();
###############################################################################
is(http_host_header('www.abcd-ef.g02.xyz'), 'www.abcd-ef.g02.xyz',
'domain w/o port (host header)');
is(http_host_header('abcd-ef.g02.xyz:' . port(8080)), 'abcd-ef.g02.xyz',
'domain w/port (host header)');
is(http_absolute_path('abcd-ef.g02.xyz'), 'abcd-ef.g02.xyz',
'domain w/o port (absolute request)');
is(http_absolute_path('www.abcd-ef.g02.xyz:10'), 'www.abcd-ef.g02.xyz',
'domain w/port (absolute request)');
is(http_host_header('www.abcd-ef.g02.xyz.'), 'www.abcd-ef.g02.xyz',
'domain w/ ending dot w/o port (host header)');
is(http_host_header('abcd-ef.g02.xyz.:88'), 'abcd-ef.g02.xyz',
'domain w/ ending dot w/port (host header)');
is(http_absolute_path('www.abcd-ef.g02.xyz.'), 'www.abcd-ef.g02.xyz',
'domain w/ ending dot w/o port (absolute request)');
is(http_absolute_path('abcd-ef.g02.xyz.:2'), 'abcd-ef.g02.xyz',
'domain w/ ending dot w/port (absolute request)');
is(http_absolute_path('AbC-d93.0.34ZhGt-s.nk.Ru'), 'abc-d93.0.34zhgt-s.nk.ru',
'mixed case domain w/o port (absolute request)');
is(http_host_header('AbC-d93.0.34ZhGt-s.nk.Ru:88'), 'abc-d93.0.34zhgt-s.nk.ru',
'mixed case domain w/port (host header)');
is(http_host_header('123.40.56.78'), '123.40.56.78',
'ipv4 w/o port (host header)');
is(http_host_header('123.49.0.78:987'), '123.49.0.78',
'ipv4 w/port (host header)');
is(http_absolute_path('123.49.0.78'), '123.49.0.78',
'ipv4 w/o port (absolute request)');
is(http_absolute_path('123.40.56.78:123'), '123.40.56.78',
'ipv4 w/port (absolute request)');
is(http_host_header('[abcd::ef98:0:7654:321]'), '[abcd::ef98:0:7654:321]',
'ipv6 literal w/o port (host header)');
is(http_host_header('[abcd::ef98:0:7654:321]:80'), '[abcd::ef98:0:7654:321]',
'ipv6 literal w/port (host header)');
is(http_absolute_path('[abcd::ef98:0:7654:321]'), '[abcd::ef98:0:7654:321]',
'ipv6 literal w/o port (absolute request)');
is(http_absolute_path('[abcd::ef98:0:7654:321]:5'), '[abcd::ef98:0:7654:321]',
'ipv6 literal w/port (absolute request)');
is(http_host_header('[::ffff:12.30.67.89]'), '[::ffff:12.30.67.89]',
'ipv4-mapped ipv6 w/o port (host header)');
is(http_host_header('[::123.45.67.89]:4321'), '[::123.45.67.89]',
'ipv4-mapped ipv6 w/port (host header)');
is(http_absolute_path('[::123.45.67.89]'), '[::123.45.67.89]',
'ipv4-mapped ipv6 w/o port (absolute request)');
is(http_absolute_path('[::ffff:12.30.67.89]:4321'), '[::ffff:12.30.67.89]',
'ipv4-mapped ipv6 w/port (absolute request)');
like(http_host_header('example.com/\:552', 1), qr/ 400 /,
'domain w/ path separators (host header)');
like(http_absolute_path('\e/xample.com', 1), qr/ 400 /,
'domain w/ path separators (absolute request)');
like(http_host_header('..examp-LE.com', 1), qr/ 400 /,
'domain w/ double dot (host header)');
like(http_absolute_path('com.exa-m.45..:', 1), qr/ 400 /,
'domain w/ double dot (absolute request)');
like(http_host_header('[abcd::e\f98:0/:7654:321]', 1), qr/ 400 /,
'ipv6 literal w/ path separators (host header)');
like(http_absolute_path('[abcd\::ef98:0:7654:321/]:12', 1), qr/ 400 /,
'ipv6 literal w/ path separators (absolute request)');
like(http_host_header('[abcd::ef98:0:7654:321]..:98', 1), qr/ 400 /,
'ipv6 literal w/ double dot (host header)');
like(http_absolute_path('[ab..cd::ef98:0:7654:321]', 1), qr/ 400 /,
'ipv6 literal w/ double dot (absolute request)');
like(http_host_header('[abcd::ef98:0:7654:321]..:98', 1), qr/ 400 /,
'ipv6 literal w/ double dot (host header)');
like(http_absolute_path('[ab..cd::ef98:0:7654:321]', 1), qr/ 400 /,
'ipv6 literal w/ double dot (absolute request)');
# As per RFC 3986,
# http://tools.ietf.org/html/rfc3986#section-3.2.2
#
# IP-literal = "[" ( IPv6address / IPvFuture ) "]"
#
# IPvFuture = "v" 1*HEXDIG "." 1*( unreserved / sub-delims / ":" )
#
# sub-delims = "!" / "$" / "&" / "'" / "(" / ")"
# / "*" / "+" / "," / ";" / "="
#
# unreserved = ALPHA / DIGIT / "-" / "." / "_" / "~"
#
is(http_host_header(
'[v0123456789aBcDeF.!$&\'()*+,;=-._~AbCdEfGhIjKlMnOpQrStUvWxYz'
. '0123456789:]'),
'[v0123456789abcdef.!$&\'()*+,;=-._~abcdefghijklmnopqrstuvwxyz'
. '0123456789:]',
'IPvFuture all symbols (host header)');
is(http_absolute_path(
'[v0123456789aBcDeF.!$&\'()*+,;=-._~AbCdEfGhIjKlMnOpQrStUvWxYz'
. '0123456789:]'),
'[v0123456789abcdef.!$&\'()*+,;=-._~abcdefghijklmnopqrstuvwxyz'
. '0123456789:]',
'IPvFuture all symbols (absolute request)');
is(http_host_header('123.40.56.78:9000:80'), '123.40.56.78',
'double port hack');
TODO: {
local $TODO = 'not yet' unless $t->has_version('1.17.9');
like(http_host_header("localhost\nHost: again", 1), qr/ 400 /, 'host repeat');
}
###############################################################################
sub http_host_header {
my ($host, $all) = @_;
my ($r) = http(<<EOF);
GET / HTTP/1.0
Host: $host
EOF
return ($all ? $r : Test::Nginx::http_content($r));
}
sub http_absolute_path {
my ($host, $all) = @_;
my ($r) = http(<<EOF);
GET http://$host/ HTTP/1.0
Host: localhost
EOF
return ($all ? $r : Test::Nginx::http_content($r));
}
###############################################################################