blob: 913f25afe724f3903b99f1e0345ed6a97e99f220 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
|
<testcase>
<info>
<keywords>
FTP
RETR
</keywords>
</info>
# Server-side
<reply>
# file1391 contents...
<data nocheck="yes">
HTTP/1.1 200 OK
Date: Thu, 09 Nov 2010 14:49:00 GMT
Server: test-server/fake
Content-Length: 6
Connection: close
Content-Type: text/html
Content-Disposition: filename=name1391; charset=funny; option=strange
MOOOO
</data>
</reply>
# Client-side
<client>
<server>
ftp
</server>
<name>
FTP DL, file with C-D inside, using -o fname -i -D file
</name>
<command option="no-output,no-include">
ftp://%HOSTIP:%FTPPORT/path/file1391 -o log/download1391 -i -D log/heads1391
</command>
<postcheck>
perl %SRCDIR/libtest/notexists.pl log/file1391 log/name1391
</postcheck>
</client>
# Verify data after the test has been "shot"
<verify>
<protocol>
USER anonymous
PASS ftp@example.com
PWD
CWD path
EPSV
TYPE I
SIZE file1391
RETR file1391
QUIT
</protocol>
<file1 name="log/download1391">
HTTP/1.1 200 OK
Date: Thu, 09 Nov 2010 14:49:00 GMT
Server: test-server/fake
Content-Length: 6
Connection: close
Content-Type: text/html
Content-Disposition: filename=name1391; charset=funny; option=strange
MOOOO
</file1>
<file2 name="log/heads1391">
220- _ _ ____ _
220- ___| | | | _ \| |
220- / __| | | | |_) | |
220- | (__| |_| | _ <| |___
220 \___|\___/|_| \_\_____|
331 We are happy you popped in!
230 Welcome you silly person
257 "/" is current directory
250 CWD command successful.
229 Entering Passive Mode (stripped)
200 I modify TYPE as you wanted
213 214
150 Binary data connection for 1391 () (214 bytes).
226 File transfer complete
</file2>
<stripfile2>
s/^(229 Entering Passive Mode \().*(\).*)/${1}stripped${2}/
</stripfile2>
<file3 name="log/stdout1391">
</file3>
</verify>
</testcase>
|