test1048 1.4 KB

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