tests/data/test1050

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