diff options
Diffstat (limited to 'tests/data/test1056')
-rw-r--r-- | tests/data/test1056 | 81 |
1 files changed, 81 insertions, 0 deletions
diff --git a/tests/data/test1056 b/tests/data/test1056 new file mode 100644 index 000000000..52b013614 --- /dev/null +++ b/tests/data/test1056 @@ -0,0 +1,81 @@ +<testcase> +<info> +<keywords> +HTTP +HTTP GET +followlocation +IPv6 +</keywords> +</info> + +# +# Server-side +<reply> +<data> +HTTP/1.1 302 OK swsclose
+Location: http://[::1%259999]:8994/moo/10560002
+Date: Thu, 31 Jul 2008 14:49:00 GMT
+Connection: close
+
+</data> +<data2> +HTTP/1.1 200 OK swsclose
+Date: Thu, 31 Jul 2008 14:49:00 GMT
+Connection: close
+
+body +</data2> +<datacheck> +HTTP/1.1 302 OK swsclose
+Location: http://[::1%259999]:8994/moo/10560002
+Date: Thu, 31 Jul 2008 14:49:00 GMT
+Connection: close
+
+HTTP/1.1 200 OK swsclose
+Date: Thu, 31 Jul 2008 14:49:00 GMT
+Connection: close
+
+body +</datacheck> +</reply> + +# +# Client-side +<client> +<features> +ipv6 +</features> +<server> +http +http-ipv6 +</server> + <name> +HTTP follow redirect from IPv4 to IPv6 with scope + </name> + <command> +http://%HOSTIP:%HTTPPORT/we/are/all/twits/1056 -L +</command> +# The data section doesn't do variable substitution, so we must assert this +<precheck> +perl -e "print 'Test requires default test server host and port' if ( '%HOST6IP' ne '[::1]' || '%HTTP6PORT' ne '8994' );" +</precheck> +</client> + +# +# Verify data after the test has been "shot" +<verify> +<strip> +^User-Agent:.* +</strip> +<protocol> +GET /we/are/all/twits/1056 HTTP/1.1
+Host: %HOSTIP:%HTTPPORT
+Accept: */*
+
+GET /moo/10560002 HTTP/1.1
+Host: %HOST6IP:%HTTP6PORT
+Accept: */*
+
+</protocol> +</verify> +</testcase> |