1<testcase>
2<info>
3<keywords>
4HTTP
5HTTP GET
6followlocation
7IPv6
8</keywords>
9</info>
10
11#
12# Server-side
13<reply>
14<data>
15HTTP/1.1 302 OK swsclose
16Location: http://[::1%259999]:8994/moo/10560002
17Date: Thu, 31 Jul 2008 14:49:00 GMT
18Connection: close
19
20</data>
21<data2>
22HTTP/1.1 200 OK swsclose
23Date: Thu, 31 Jul 2008 14:49:00 GMT
24Connection: close
25
26body
27</data2>
28<datacheck>
29HTTP/1.1 302 OK swsclose
30Location: http://[::1%259999]:8994/moo/10560002
31Date: Thu, 31 Jul 2008 14:49:00 GMT
32Connection: close
33
34HTTP/1.1 200 OK swsclose
35Date: Thu, 31 Jul 2008 14:49:00 GMT
36Connection: close
37
38body
39</datacheck>
40</reply>
41
42#
43# Client-side
44<client>
45<features>
46ipv6
47</features>
48<server>
49http
50http-ipv6
51</server>
52 <name>
53HTTP follow redirect from IPv4 to IPv6 with scope
54 </name>
55 <command>
56http://%HOSTIP:%HTTPPORT/we/are/all/twits/1056 -L
57</command>
58# The data section doesn't do variable substitution, so we must assert this
59<precheck>
60perl -e "print 'Test requires default test server host and port' if ( '%HOST6IP' ne '[::1]' || '%HTTP6PORT' ne '8994' );"
61</precheck>
62</client>
63
64#
65# Verify data after the test has been "shot"
66<verify>
67<strip>
68^User-Agent:.*
69</strip>
70<protocol>
71GET /we/are/all/twits/1056 HTTP/1.1
72Host: %HOSTIP:%HTTPPORT
73Accept: */*
74
75GET /moo/10560002 HTTP/1.1
76Host: %HOST6IP:%HTTP6PORT
77Accept: */*
78
79</protocol>
80</verify>
81</testcase>
82