1<testcase> 2# Similar to test 253 3<info> 4<keywords> 5FTP-ipv6 6IPv6 7EPRT 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"> 16total 20 17drwxr-xr-x 8 98 98 512 Oct 22 13:06 . 18drwxr-xr-x 8 98 98 512 Oct 22 13:06 .. 19drwxr-xr-x 2 98 98 512 May 2 1996 .NeXT 20-r--r--r-- 1 0 1 35 Jul 16 1996 README 21lrwxrwxrwx 1 0 1 7 Dec 9 1999 bin -> usr/bin 22dr-xr-xr-x 2 0 1 512 Oct 1 1997 dev 23drwxrwxrwx 2 98 98 512 May 29 16:04 download.html 24dr-xr-xr-x 2 0 1 512 Nov 30 1995 etc 25drwxrwxrwx 2 98 1 512 Oct 30 14:33 pub 26dr-xr-xr-x 5 0 1 512 Oct 1 1997 usr 27</datacheck> 28</reply> 29 30# Client-side 31<client> 32<features> 33ipv6 34</features> 35<server> 36ftp-ipv6 37</server> 38<name> 39FTP-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> 46perl -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> 54s/^(EPRT \|2\|::1\|)(.*)/$1/ 55</strippart> 56<protocol> 57USER anonymous 58PASS ftp@example.com 59PWD 60EPRT |2|::1| 61TYPE A 62LIST 63QUIT 64</protocol> 65</verify> 66</testcase> 67