| xf.li | 6c8fc1e | 2023-08-12 00:11:09 -0700 | [diff] [blame] | 1 | <testcase> |
| 2 | # Similar to test 253 |
| 3 | <info> |
| 4 | <keywords> |
| 5 | FTP-ipv6 |
| 6 | IPv6 |
| 7 | EPRT |
| 8 | </keywords> |
| 9 | </info> |
| 10 | |
| 11 | # Server-side |
| 12 | <reply> |
| 13 | # When doing LIST, we get the default list output hard-coded in the test |
| 14 | # FTP server |
| 15 | <datacheck mode="text"> |
| 16 | total 20 |
| 17 | drwxr-xr-x 8 98 98 512 Oct 22 13:06 . |
| 18 | drwxr-xr-x 8 98 98 512 Oct 22 13:06 .. |
| 19 | drwxr-xr-x 2 98 98 512 May 2 1996 .NeXT |
| 20 | -r--r--r-- 1 0 1 35 Jul 16 1996 README |
| 21 | lrwxrwxrwx 1 0 1 7 Dec 9 1999 bin -> usr/bin |
| 22 | dr-xr-xr-x 2 0 1 512 Oct 1 1997 dev |
| 23 | drwxrwxrwx 2 98 98 512 May 29 16:04 download.html |
| 24 | dr-xr-xr-x 2 0 1 512 Nov 30 1995 etc |
| 25 | drwxrwxrwx 2 98 1 512 Oct 30 14:33 pub |
| 26 | dr-xr-xr-x 5 0 1 512 Oct 1 1997 usr |
| 27 | </datacheck> |
| 28 | </reply> |
| 29 | |
| 30 | # Client-side |
| 31 | <client> |
| 32 | <features> |
| 33 | ipv6 |
| 34 | </features> |
| 35 | <server> |
| 36 | ftp-ipv6 |
| 37 | </server> |
| 38 | <name> |
| 39 | FTP-IPv6 dir list, EPRT with specified IP |
| 40 | </name> |
| 41 | <command> |
| 42 | -g "ftp://%HOST6IP:%FTP6PORT/" -P ::1 |
| 43 | </command> |
| 44 | # --interface doesn't accept an address surrounded by [] so %CLIENT6IP is out |
| 45 | <precheck> |
| 46 | perl -e "print 'Test requires default test client host address' if ( '%CLIENT6IP' ne '[::1]' );" |
| 47 | </precheck> |
| 48 | </client> |
| 49 | |
| 50 | # Verify data after the test has been "shot" |
| 51 | <verify> |
| 52 | # Strip all valid kinds of EPRT that curl can send |
| 53 | <strippart> |
| 54 | s/^(EPRT \|2\|::1\|)(.*)/$1/ |
| 55 | </strippart> |
| 56 | <protocol> |
| 57 | USER anonymous
|
| 58 | PASS ftp@example.com
|
| 59 | PWD
|
| 60 | EPRT |2|::1| |
| 61 | TYPE A
|
| 62 | LIST
|
| 63 | QUIT
|
| 64 | </protocol> |
| 65 | </verify> |
| 66 | </testcase> |