<testcase> # Similar to test 253 <info> <keywords> FTP-ipv6 IPv6 EPRT </keywords> </info> # Server-side <reply> # When doing LIST, we get the default list output hard-coded in the test # FTP server <datacheck> total 20 drwxr-xr-x 8 98 98 512 Oct 22 13:06 . drwxr-xr-x 8 98 98 512 Oct 22 13:06 .. drwxr-xr-x 2 98 98 512 May 2 1996 .NeXT -r--r--r-- 1 0 1 35 Jul 16 1996 README lrwxrwxrwx 1 0 1 7 Dec 9 1999 bin -> usr/bin dr-xr-xr-x 2 0 1 512 Oct 1 1997 dev drwxrwxrwx 2 98 98 512 May 29 16:04 download.html dr-xr-xr-x 2 0 1 512 Nov 30 1995 etc drwxrwxrwx 2 98 1 512 Oct 30 14:33 pub dr-xr-xr-x 5 0 1 512 Oct 1 1997 usr </datacheck> </reply> # Client-side <client> <features> ipv6 </features> <server> ftp-ipv6 </server> <name> FTP-IPv6 dir list, EPRT with specified IP </name> <command> -g "ftp://%HOST6IP:%FTP6PORT/" -P ::1 </command> # --interface doesn't accept an address surrounded by [] so %CLIENT6IP is out <precheck> perl -e "print 'Test requires default test server host address' if ( '%CLIENT6IP' ne '[::1]' );" </precheck> </client> # Verify data after the test has been "shot" <verify> # Strip all valid kinds of EPRT that curl can send <strippart> s/^(EPRT \|2\|::1\|)(.*)/$1/ </strippart> <protocol> USER anonymous PASS ftp@example.com PWD EPRT |2|::1| TYPE A LIST QUIT </protocol> </verify> </testcase>