| lh | 9ed821d | 2023-04-07 01:36:19 -0700 | [diff] [blame^] | 1 | <testcase> |
| 2 | <info> |
| 3 | <keywords> |
| 4 | HTTP |
| 5 | HTTP GET |
| 6 | --interface |
| 7 | IPv6 |
| 8 | </keywords> |
| 9 | </info> |
| 10 | |
| 11 | # |
| 12 | # Server-side |
| 13 | <reply> |
| 14 | <data> |
| 15 | HTTP/1.1 200 OK
|
| 16 | Date: Mon, 28 Jul 2008 14:49:00 GMT
|
| 17 | Server: test-server/fake
|
| 18 | Content-Length: 6
|
| 19 | Connection: close
|
| 20 | Content-Type: text/plain
|
| 21 |
|
| 22 | -foo- |
| 23 | </data> |
| 24 | </reply> |
| 25 | |
| 26 | # |
| 27 | # Client-side |
| 28 | <client> |
| 29 | <features> |
| 30 | ipv6 |
| 31 | </features> |
| 32 | <server> |
| 33 | http-ipv6 |
| 34 | </server> |
| 35 | <name> |
| 36 | HTTP-IPv6 GET with numeric localhost --interface |
| 37 | </name> |
| 38 | <command> |
| 39 | -g "http://%HOST6IP:%HTTP6PORT/1046" --interface ::1 |
| 40 | </command> |
| 41 | # --interface doesn't accept an address surrounded by [] so %CLIENT6IP is out |
| 42 | <precheck> |
| 43 | perl -e "print 'Test requires default test server host address' if ( '%CLIENT6IP' ne '[::1]' );" |
| 44 | </precheck> |
| 45 | </client> |
| 46 | |
| 47 | # |
| 48 | # Verify data after the test has been "shot" |
| 49 | <verify> |
| 50 | <strip> |
| 51 | ^User-Agent:.* |
| 52 | </strip> |
| 53 | <protocol> |
| 54 | GET /1046 HTTP/1.1
|
| 55 | Host: %HOST6IP:%HTTP6PORT
|
| 56 | Accept: */*
|
| 57 |
|
| 58 | </protocol> |
| 59 | </verify> |
| 60 | </testcase> |