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>
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 server 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