67 lines
1.5 KiB
Plaintext
67 lines
1.5 KiB
Plaintext
<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>
|