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