diff options
Diffstat (limited to 'tests')
-rwxr-xr-x | tests/core-request.t | 9 | ||||
-rwxr-xr-x | tests/core-response.t | 9 | ||||
-rwxr-xr-x | tests/request.t | 28 |
3 files changed, 3 insertions, 43 deletions
diff --git a/tests/core-request.t b/tests/core-request.t index 1418fb25..8d982fc8 100755 --- a/tests/core-request.t +++ b/tests/core-request.t @@ -8,7 +8,7 @@ BEGIN { use strict; use IO::Socket; -use Test::More tests => 12; +use Test::More tests => 11; use LightyTest; my $tf = LightyTest->new(); @@ -44,13 +44,6 @@ ok($tf->handle_http($t) == 0, 'OPTIONS'); ## Low-Level Request-Header Parsing - URI $t->{REQUEST} = ( <<EOF -GET /index%2ehtml HTTP/1.0 -EOF - ); -$t->{RESPONSE} = [ { 'HTTP-Protocol' => 'HTTP/1.0', 'HTTP-Status' => 200 } ]; -ok($tf->handle_http($t) == 0, 'URL-encoding'); - -$t->{REQUEST} = ( <<EOF GET /index.html%00 HTTP/1.0 EOF ); diff --git a/tests/core-response.t b/tests/core-response.t index 93d17ade..d9ea023e 100755 --- a/tests/core-response.t +++ b/tests/core-response.t @@ -8,7 +8,7 @@ BEGIN { use strict; use IO::Socket; -use Test::More tests => 14; +use Test::More tests => 13; use LightyTest; my $tf = LightyTest->new(); @@ -28,13 +28,6 @@ $t->{RESPONSE} = [ { 'HTTP-Protocol' => 'HTTP/1.1', 'HTTP-Status' => 200, '+Date ok($tf->handle_http($t) == 0, 'Date header'); $t->{REQUEST} = ( <<EOF -GET / HTTP/1.1 -EOF - ); -$t->{RESPONSE} = [ { 'HTTP-Protocol' => 'HTTP/1.1', 'HTTP-Status' => 400, 'Connection' => 'close' } ]; -ok($tf->handle_http($t) == 0, 'Host missing'); - -$t->{REQUEST} = ( <<EOF GET / HTTP/1.0 EOF ); diff --git a/tests/request.t b/tests/request.t index ea4b1fb7..ea8852d6 100755 --- a/tests/request.t +++ b/tests/request.t @@ -8,7 +8,7 @@ BEGIN { use strict; use IO::Socket; -use Test::More tests => 54; +use Test::More tests => 52; use LightyTest; my $tf = LightyTest->new(); @@ -394,23 +394,6 @@ ok($tf->handle_http($t) == 0, 'GET, Range start out of range'); $t->{REQUEST} = ( <<EOF -GET / HTTP/1.0 -Hsgfsdjf: asdfhdf -hdhd: shdfhfdasd -hfhr: jfghsdfg -jfuuehdmn: sfdgjfdg -jvcbzufdg: sgfdfg -hrnvcnd: jfjdfg -jfusfdngmd: gfjgfdusdfg -nfj: jgfdjdfg -jfue: jfdfdg -EOF - ); -$t->{RESPONSE} = [ { 'HTTP-Protocol' => 'HTTP/1.0', 'HTTP-Status' => 200 } ]; -ok($tf->handle_http($t) == 0, 'larger headers'); - - -$t->{REQUEST} = ( <<EOF GET /range.pdf HTTP/1.1 Host: 123.example.org Range: bytes=0- @@ -462,15 +445,6 @@ ok($tf->handle_http($t) == 0, 'OPTIONS for RTSP'); my $nextyr = (gmtime(time()))[5] + 1900 + 1; -$t->{REQUEST} = ( <<EOF -GET /index.html HTTP/1.0 -If-Modified-Since: Sun, 01 Jan $nextyr 00:00:02 GMT -If-Modified-Since: Sun, 01 Jan $nextyr 00:00:02 GMT -EOF - ); -$t->{RESPONSE} = [ { 'HTTP-Protocol' => 'HTTP/1.0', 'HTTP-Status' => 304 } ]; -ok($tf->handle_http($t) == 0, 'Duplicate If-Mod-Since, with equal timestamps'); - $t->{REQUEST} = ( "GET / HTTP/1.0\r\nIf-Modified-Since: \r\n\r\n" ); $t->{RESPONSE} = [ { 'HTTP-Protocol' => 'HTTP/1.0', 'HTTP-Status' => 200 } ]; ok($tf->handle_http($t) == 0, 'empty If-Modified-Since'); |