1 /*
2 * Wininet - ftp tests
3 *
4 * Copyright 2007 Paul Vriens
5 * Copyright 2007 Hans Leidekker
6 *
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2.1 of the License, or (at your option) any later version.
11 *
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
16 *
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20 */
21
22 /*
23 * FIXME:
24 * Use InternetGetLastResponseInfo when the last error is set to ERROR_INTERNET_EXTENDED_ERROR.
25 * TODO:
26 * Add W-function tests.
27 * Add missing function tests:
28 * FtpFindFirstFile
29 * FtpGetFileSize
30 * FtpSetCurrentDirectory
31 */
32
33 #include <stdarg.h>
34 #include <stdio.h>
35 #include <stdlib.h>
36
37 #include "windef.h"
38 #include "winbase.h"
39 #include "wininet.h"
40 #include "winsock.h"
41
42 #include "wine/test.h"
43
44
45 static BOOL (WINAPI *pFtpCommandA)(HINTERNET,BOOL,DWORD,LPCSTR,DWORD_PTR,HINTERNET*);
46
47
48 static void test_getfile_no_open(void)
49 {
50 BOOL bRet;
51
52 /* Invalid internet handle, the others are valid parameters */
53 SetLastError(0xdeadbeef);
54 bRet = FtpGetFileA(NULL, "welcome.msg", "should_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
55 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
56 ok ( GetLastError() == ERROR_INTERNET_NOT_INITIALIZED ||
57 GetLastError() == ERROR_INVALID_HANDLE,
58 "Expected ERROR_INTERNET_NOT_INITIALIZED or ERROR_INVALID_HANDLE (win98), got %d\n", GetLastError());
59 }
60
61 static void test_connect(HINTERNET hInternet)
62 {
63 HINTERNET hFtp;
64
65 /* Try a few username/password combinations:
66 * anonymous : NULL
67 * NULL : IEUser@
68 * NULL : NULL
69 */
70
71 SetLastError(0xdeadbeef);
72 hFtp = InternetConnect(hInternet, "ftp.winehq.org", INTERNET_DEFAULT_FTP_PORT, "anonymous", NULL, INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0);
73 if (hFtp) /* some servers accept an empty password */
74 {
75 ok ( GetLastError() == ERROR_SUCCESS, "ERROR_SUCCESS, got %d\n", GetLastError());
76 InternetCloseHandle(hFtp);
77 }
78 else
79 ok ( GetLastError() == ERROR_INTERNET_LOGIN_FAILURE,
80 "Expected ERROR_INTERNET_LOGIN_FAILURE, got %d\n", GetLastError());
81
82 SetLastError(0xdeadbeef);
83 hFtp = InternetConnect(hInternet, "ftp.winehq.org", INTERNET_DEFAULT_FTP_PORT, NULL, "IEUser@", INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0);
84 ok ( hFtp == NULL, "Expected InternetConnect to fail\n");
85 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
86 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
87
88 /* Using a NULL username and password will be interpreted as anonymous ftp. The username will be 'anonymous' the password
89 * is created via some simple heuristics (see dlls/wininet/ftp.c).
90 * On Wine this registry key is not set by default so (NULL, NULL) will result in anonymous ftp with an (most likely) not
91 * accepted password (the username).
92 * If the first call fails because we get an ERROR_INTERNET_LOGIN_FAILURE, we try again with a (more) correct password.
93 */
94
95 SetLastError(0xdeadbeef);
96 hFtp = InternetConnect(hInternet, "ftp.winehq.org", INTERNET_DEFAULT_FTP_PORT, NULL, NULL, INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0);
97 if (!hFtp && (GetLastError() == ERROR_INTERNET_LOGIN_FAILURE))
98 {
99 /* We are most likely running on a clean Wine install or a Windows install where the registry key is removed */
100 SetLastError(0xdeadbeef);
101 hFtp = InternetConnect(hInternet, "ftp.winehq.org", INTERNET_DEFAULT_FTP_PORT, "anonymous", "IEUser@", INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0);
102 }
103 ok ( hFtp != NULL, "InternetConnect failed : %d\n", GetLastError());
104 ok ( GetLastError() == ERROR_SUCCESS,
105 "ERROR_SUCCESS, got %d\n", GetLastError());
106 }
107
108 static void test_createdir(HINTERNET hFtp, HINTERNET hConnect)
109 {
110 BOOL bRet;
111
112 /* Invalid internet handle, the other is a valid parameter */
113 SetLastError(0xdeadbeef);
114 bRet = FtpCreateDirectoryA(NULL, "new_directory_deadbeef");
115 ok ( bRet == FALSE, "Expected FtpCreateDirectoryA to fail\n");
116 ok ( GetLastError() == ERROR_INVALID_HANDLE,
117 "Expected ERROR_INVALID_HANDLE, got %d\n", GetLastError());
118
119 /* No directory-name */
120 SetLastError(0xdeadbeef);
121 bRet = FtpCreateDirectoryA(hFtp, NULL);
122 ok ( bRet == FALSE, "Expected FtpCreateDirectoryA to fail\n");
123 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
124 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
125
126 /* Parameters are OK, but we shouldn't be allowed to create the directory */
127 SetLastError(0xdeadbeef);
128 bRet = FtpCreateDirectoryA(hFtp, "new_directory_deadbeef");
129 ok ( bRet == FALSE, "Expected FtpCreateDirectoryA to fail\n");
130 ok ( GetLastError() == ERROR_INTERNET_EXTENDED_ERROR,
131 "Expected ERROR_INTERNET_EXTENDED_ERROR, got %d\n", GetLastError());
132
133 /* One small test to show that handle type is checked before parameters */
134 SetLastError(0xdeadbeef);
135 bRet = FtpCreateDirectoryA(hConnect, NULL);
136 ok ( bRet == FALSE, "Expected FtpCreateDirectoryA to fail\n");
137 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
138 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
139
140 SetLastError(0xdeadbeef);
141 bRet = FtpCreateDirectoryA(hConnect, "new_directory_deadbeef");
142 ok ( bRet == FALSE, "Expected FtpCreateDirectoryA to fail\n");
143 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
144 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
145 }
146
147 static void test_deletefile(HINTERNET hFtp, HINTERNET hConnect)
148 {
149 BOOL bRet;
150
151 /* Invalid internet handle, the other is a valid parameter */
152 SetLastError(0xdeadbeef);
153 bRet = FtpDeleteFileA(NULL, "non_existent_file_deadbeef");
154 ok ( bRet == FALSE, "Expected FtpDeleteFileA to fail\n");
155 ok ( GetLastError() == ERROR_INVALID_HANDLE,
156 "Expected ERROR_INVALID_HANDLE, got %d\n", GetLastError());
157
158 /* No filename */
159 SetLastError(0xdeadbeef);
160 bRet = FtpDeleteFileA(hFtp, NULL);
161 ok ( bRet == FALSE, "Expected FtpDeleteFileA to fail\n");
162 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
163 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
164
165 /* Parameters are OK but remote file should not be there */
166 SetLastError(0xdeadbeef);
167 bRet = FtpDeleteFileA(hFtp, "non_existent_file_deadbeef");
168 ok ( bRet == FALSE, "Expected FtpDeleteFileA to fail\n");
169 ok ( GetLastError() == ERROR_INTERNET_EXTENDED_ERROR,
170 "Expected ERROR_INTERNET_EXTENDED_ERROR, got %d\n", GetLastError());
171
172 /* One small test to show that handle type is checked before parameters */
173 SetLastError(0xdeadbeef);
174 bRet = FtpDeleteFileA(hConnect, NULL);
175 ok ( bRet == FALSE, "Expected FtpDeleteFileA to fail\n");
176 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
177 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
178
179 SetLastError(0xdeadbeef);
180 bRet = FtpDeleteFileA(hConnect, "non_existent_file_deadbeef");
181 ok ( bRet == FALSE, "Expected FtpCreateDirectoryA to fail\n");
182 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
183 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
184 }
185
186 static void test_getfile(HINTERNET hFtp, HINTERNET hConnect)
187 {
188 BOOL bRet;
189 HANDLE hFile;
190
191 /* The order of checking is:
192 *
193 * All parameters except 'session handle' and 'condition flags'
194 * Session handle
195 * Session handle type
196 * Condition flags
197 */
198
199 /* Test to show the parameter checking order depends on the Windows version */
200 SetLastError(0xdeadbeef);
201 bRet = FtpGetFileA(NULL, NULL, "should_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
202 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
203 ok ( GetLastError() == ERROR_INVALID_HANDLE ||
204 GetLastError() == ERROR_INVALID_PARAMETER,
205 "Expected ERROR_INVALID_HANDLE (win98) or ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
206
207 /* Test to show session handle is checked before 'condition flags' */
208 SetLastError(0xdeadbeef);
209 bRet = FtpGetFileA(NULL, "welcome.msg", "should_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, 5, 0);
210 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
211 ok ( GetLastError() == ERROR_INVALID_HANDLE,
212 "Expected ERROR_INVALID_HANDLE, got %d\n", GetLastError());
213
214 /* Make sure we start clean */
215
216 DeleteFileA("should_be_non_existing_deadbeef");
217 DeleteFileA("should_also_be_non_existing_deadbeef");
218
219 /* No remote file */
220 SetLastError(0xdeadbeef);
221 bRet = FtpGetFileA(hFtp, NULL, "should_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
222 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
223 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
224 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
225 ok (GetFileAttributesA("should_be_non_existing_deadbeef") == INVALID_FILE_ATTRIBUTES,
226 "Local file should not have been created\n");
227 DeleteFileA("should_be_non_existing_deadbeef");
228
229 /* No local file */
230 SetLastError(0xdeadbeef);
231 bRet = FtpGetFileA(hFtp, "welcome.msg", NULL, FALSE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
232 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
233 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
234 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
235
236 /* Zero attributes */
237 SetLastError(0xdeadbeef);
238 bRet = FtpGetFileA(hFtp, "welcome.msg", "should_be_existing_non_deadbeef", FALSE, 0, FTP_TRANSFER_TYPE_UNKNOWN, 0);
239 ok ( bRet == TRUE, "Expected FtpGetFileA to succeed\n");
240 ok (GetLastError() == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", GetLastError());
241 ok (GetFileAttributesA("should_be_existing_non_deadbeef") != INVALID_FILE_ATTRIBUTES,
242 "Local file should have been created\n");
243 DeleteFileA("should_be_existing_non_deadbeef");
244
245 /* Illegal condition flags */
246 SetLastError(0xdeadbeef);
247 bRet = FtpGetFileA(hFtp, "welcome.msg", "should_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, 0xffffffff, 0);
248 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
249 ok ( GetLastError() == ERROR_INTERNET_EXTENDED_ERROR || GetLastError() == ERROR_INVALID_PARAMETER,
250 "Expected ERROR_INTERNET_EXTENDED_ERROR or ERROR_INVALID_PARAMETER (win98), got %d\n", GetLastError());
251 ok (GetFileAttributesA("should_be_non_existing_deadbeef") == INVALID_FILE_ATTRIBUTES,
252 "Local file should not have been created\n");
253 DeleteFileA("should_be_non_existing_deadbeef");
254
255 /* Remote file doesn't exist (and local doesn't exist as well) */
256 SetLastError(0xdeadbeef);
257 bRet = FtpGetFileA(hFtp, "should_be_non_existing_deadbeef", "should_also_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
258 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
259 ok ( GetLastError() == ERROR_INTERNET_EXTENDED_ERROR,
260 "Expected ERROR_INTERNET_EXTENDED_ERROR, got %d\n", GetLastError());
261 /* Currently Wine always creates the local file (even on failure) which is not correct, hence the test */
262 ok (GetFileAttributesA("should_also_be_non_existing_deadbeef") == INVALID_FILE_ATTRIBUTES,
263 "Local file should not have been created\n");
264
265 DeleteFileA("should_also_be_non_existing_deadbeef");
266
267 /* Same call as the previous but now the local file does exists. Windows just removes the file if the call fails
268 * even if the local existed before!
269 */
270
271 /* Create a temporary local file */
272 SetLastError(0xdeadbeef);
273 hFile = CreateFileA("should_also_be_non_existing_deadbeef", GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL);
274 ok ( hFile != NULL, "Error creating a local file : %d\n", GetLastError());
275 CloseHandle(hFile);
276 SetLastError(0xdeadbeef);
277 bRet = FtpGetFileA(hFtp, "should_be_non_existing_deadbeef", "should_also_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
278 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
279 ok ( GetLastError() == ERROR_INTERNET_EXTENDED_ERROR,
280 "Expected ERROR_INTERNET_EXTENDED_ERROR, got %d\n", GetLastError());
281 /* Currently Wine always creates the local file (even on failure) which is not correct, hence the test */
282 ok (GetFileAttributesA("should_also_be_non_existing_deadbeef") == INVALID_FILE_ATTRIBUTES,
283 "Local file should not have been created\n");
284
285 DeleteFileA("should_also_be_non_existing_deadbeef");
286
287 /* This one should succeed */
288 SetLastError(0xdeadbeef);
289 bRet = FtpGetFileA(hFtp, "welcome.msg", "should_be_existing_non_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
290 ok ( bRet == TRUE, "Expected FtpGetFileA to fail\n");
291 ok ( GetLastError() == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %d\n", GetLastError());
292
293 if (GetFileAttributesA("should_be_existing_non_deadbeef") != INVALID_FILE_ATTRIBUTES)
294 {
295 /* Should succeed as fFailIfExists is set to FALSE (meaning don't fail if local file exists) */
296 SetLastError(0xdeadbeef);
297 bRet = FtpGetFileA(hFtp, "welcome.msg", "should_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
298 ok ( bRet == TRUE, "Expected FtpGetFileA to succeed\n");
299 ok ( GetLastError() == ERROR_SUCCESS,
300 "Expected ERROR_SUCCESS, got %d\n", GetLastError());
301
302 /* Should fail as fFailIfExists is set to TRUE */
303 SetLastError(0xdeadbeef);
304 bRet = FtpGetFileA(hFtp, "welcome.msg", "should_be_non_existing_deadbeef", TRUE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
305 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
306 ok ( GetLastError() == ERROR_FILE_EXISTS,
307 "Expected ERROR_FILE_EXISTS, got %d\n", GetLastError());
308
309 /* Prove that the existence of the local file is checked first (or at least reported last) */
310 SetLastError(0xdeadbeef);
311 bRet = FtpGetFileA(hFtp, "should_be_non_existing_deadbeef", "should_be_non_existing_deadbeef", TRUE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
312 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
313 ok ( GetLastError() == ERROR_FILE_EXISTS,
314 "Expected ERROR_FILE_EXISTS, got %d\n", GetLastError());
315
316 DeleteFileA("should_be_existing_non_deadbeef");
317 }
318
319 /* Test to show the parameter checking order depends on the Windows version */
320 SetLastError(0xdeadbeef);
321 bRet = FtpGetFileA(hConnect, NULL, "should_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
322 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
323 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE ||
324 GetLastError() == ERROR_INVALID_PARAMETER,
325 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE (win98) or ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
326
327 /* Test to show that 'session handle type' is checked before 'condition flags' */
328 SetLastError(0xdeadbeef);
329 bRet = FtpGetFileA(hConnect, "welcome.msg", "should_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, 5, 0);
330 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
331 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
332 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
333
334 SetLastError(0xdeadbeef);
335 bRet = FtpGetFileA(hConnect, "should_be_non_existing_deadbeef", "should_be_non_existing_deadbeef", TRUE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
336 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
337 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
338 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
339 }
340
341 static void test_openfile(HINTERNET hFtp, HINTERNET hConnect)
342 {
343 HINTERNET hOpenFile;
344
345 /* Invalid internet handle, the rest are valid parameters */
346 SetLastError(0xdeadbeef);
347 hOpenFile = FtpOpenFileA(NULL, "welcome.msg", GENERIC_READ, FTP_TRANSFER_TYPE_ASCII, 0);
348 ok ( !hOpenFile, "Expected FtpOpenFileA to fail\n");
349 ok ( GetLastError() == ERROR_INVALID_HANDLE,
350 "Expected ERROR_INVALID_HANDLE, got %d\n", GetLastError());
351 InternetCloseHandle(hOpenFile); /* Just in case */
352
353 /* No filename */
354 SetLastError(0xdeadbeef);
355 hOpenFile = FtpOpenFileA(hFtp, NULL, GENERIC_READ, FTP_TRANSFER_TYPE_ASCII, 0);
356 ok ( !hOpenFile, "Expected FtpOpenFileA to fail\n");
357 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
358 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
359 InternetCloseHandle(hOpenFile); /* Just in case */
360
361 /* Illegal access flags */
362 SetLastError(0xdeadbeef);
363 hOpenFile = FtpOpenFileA(hFtp, "welcome.msg", 0, FTP_TRANSFER_TYPE_ASCII, 0);
364 ok ( !hOpenFile, "Expected FtpOpenFileA to fail\n");
365 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
366 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
367 InternetCloseHandle(hOpenFile); /* Just in case */
368
369 /* Illegal combination of access flags */
370 SetLastError(0xdeadbeef);
371 hOpenFile = FtpOpenFileA(hFtp, "welcome.msg", GENERIC_READ|GENERIC_WRITE, FTP_TRANSFER_TYPE_ASCII, 0);
372 ok ( !hOpenFile, "Expected FtpOpenFileA to fail\n");
373 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
374 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
375 InternetCloseHandle(hOpenFile); /* Just in case */
376
377 /* Illegal condition flags */
378 SetLastError(0xdeadbeef);
379 hOpenFile = FtpOpenFileA(hFtp, "welcome.msg", GENERIC_READ, 0xffffffff, 0);
380 ok ( !hOpenFile, "Expected FtpOpenFileA to fail\n");
381 ok ( GetLastError() == ERROR_INTERNET_EXTENDED_ERROR || GetLastError() == ERROR_INVALID_PARAMETER,
382 "Expected ERROR_INTERNET_EXTENDED_ERROR or ERROR_INVALID_PARAMETER (win98), got %d\n", GetLastError());
383 InternetCloseHandle(hOpenFile); /* Just in case */
384
385 SetLastError(0xdeadbeef);
386 hOpenFile = FtpOpenFileA(hFtp, "welcome.msg", GENERIC_READ, FTP_TRANSFER_TYPE_ASCII, 0);
387 ok ( hOpenFile != NULL, "Expected FtpOpenFileA to succeed\n");
388 ok ( GetLastError() == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", GetLastError());
389
390 if (hOpenFile)
391 {
392 BOOL bRet;
393 HINTERNET hOpenFile2;
394 HANDLE hFile;
395
396 /* We have a handle so all ftp calls should fail (TODO: Put all ftp-calls in here) */
397 SetLastError(0xdeadbeef);
398 bRet = FtpCreateDirectoryA(hFtp, "new_directory_deadbeef");
399 ok ( bRet == FALSE, "Expected FtpCreateDirectoryA to fail\n");
400 ok ( GetLastError() == ERROR_FTP_TRANSFER_IN_PROGRESS,
401 "Expected ERROR_FTP_TRANSFER_IN_PROGRESS, got %d\n", GetLastError());
402
403 SetLastError(0xdeadbeef);
404 bRet = FtpDeleteFileA(hFtp, "non_existent_file_deadbeef");
405 ok ( bRet == FALSE, "Expected FtpDeleteFileA to fail\n");
406 ok ( GetLastError() == ERROR_FTP_TRANSFER_IN_PROGRESS,
407 "Expected ERROR_FTP_TRANSFER_IN_PROGRESS, got %d\n", GetLastError());
408
409 SetLastError(0xdeadbeef);
410 bRet = FtpGetFileA(hFtp, "welcome.msg", "should_be_non_existing_deadbeef", FALSE, FILE_ATTRIBUTE_NORMAL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
411 ok ( bRet == FALSE, "Expected FtpGetFileA to fail\n");
412 ok ( GetLastError() == ERROR_FTP_TRANSFER_IN_PROGRESS,
413 "Expected ERROR_FTP_TRANSFER_IN_PROGRESS, got %d\n", GetLastError());
414 DeleteFileA("should_be_non_existing_deadbeef"); /* Just in case */
415
416 SetLastError(0xdeadbeef);
417 hOpenFile2 = FtpOpenFileA(hFtp, "welcome.msg", GENERIC_READ, FTP_TRANSFER_TYPE_ASCII, 0);
418 ok ( bRet == FALSE, "Expected FtpOpenFileA to fail\n");
419 ok ( GetLastError() == ERROR_FTP_TRANSFER_IN_PROGRESS,
420 "Expected ERROR_FTP_TRANSFER_IN_PROGRESS, got %d\n", GetLastError());
421 InternetCloseHandle(hOpenFile2); /* Just in case */
422
423 /* Create a temporary local file */
424 SetLastError(0xdeadbeef);
425 hFile = CreateFileA("now_existing_local", GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL);
426 ok ( hFile != NULL, "Error creating a local file : %d\n", GetLastError());
427 CloseHandle(hFile);
428 SetLastError(0xdeadbeef);
429 bRet = FtpPutFileA(hFtp, "now_existing_local", "non_existing_remote", FTP_TRANSFER_TYPE_UNKNOWN, 0);
430 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
431 ok ( GetLastError() == ERROR_FTP_TRANSFER_IN_PROGRESS,
432 "Expected ERROR_FTP_TRANSFER_IN_PROGRESS, got %d\n", GetLastError());
433 DeleteFileA("now_existing_local");
434
435 SetLastError(0xdeadbeef);
436 bRet = FtpRemoveDirectoryA(hFtp, "should_be_non_existing_deadbeef_dir");
437 ok ( bRet == FALSE, "Expected FtpRemoveDirectoryA to fail\n");
438 ok ( GetLastError() == ERROR_FTP_TRANSFER_IN_PROGRESS,
439 "Expected ERROR_FTP_TRANSFER_IN_PROGRESS, got %d\n", GetLastError());
440
441 SetLastError(0xdeadbeef);
442 bRet = FtpRenameFileA(hFtp , "should_be_non_existing_deadbeef", "new");
443 ok ( bRet == FALSE, "Expected FtpRenameFileA to fail\n");
444 ok ( GetLastError() == ERROR_FTP_TRANSFER_IN_PROGRESS,
445 "Expected ERROR_FTP_TRANSFER_IN_PROGRESS, got %d\n", GetLastError());
446 }
447
448 InternetCloseHandle(hOpenFile);
449
450 /* One small test to show that handle type is checked before parameters */
451 SetLastError(0xdeadbeef);
452 hOpenFile = FtpOpenFileA(hConnect, "welcome.msg", GENERIC_READ, 5, 0);
453 ok ( !hOpenFile, "Expected FtpOpenFileA to fail\n");
454 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
455 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
456 InternetCloseHandle(hOpenFile); /* Just in case */
457
458 SetLastError(0xdeadbeef);
459 hOpenFile = FtpOpenFileA(hConnect, "welcome.msg", GENERIC_READ, FTP_TRANSFER_TYPE_ASCII, 0);
460 ok ( hOpenFile == NULL, "Expected FtpOpenFileA to fail\n");
461 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
462 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
463
464 InternetCloseHandle(hOpenFile); /* Just in case */
465 }
466
467 static void test_putfile(HINTERNET hFtp, HINTERNET hConnect)
468 {
469 BOOL bRet;
470 HANDLE hFile;
471
472 /* The order of checking is:
473 *
474 * All parameters except 'session handle' and 'condition flags'
475 * Session handle
476 * Session handle type
477 * Condition flags
478 */
479
480 /* Test to show the parameter checking order depends on the Windows version */
481 SetLastError(0xdeadbeef);
482 bRet = FtpPutFileA(NULL, NULL, "non_existing_remote", FTP_TRANSFER_TYPE_UNKNOWN, 0);
483 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
484 ok ( GetLastError() == ERROR_INVALID_HANDLE ||
485 GetLastError() == ERROR_INVALID_PARAMETER,
486 "Expected ERROR_INVALID_HANDLE (win98) or ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
487
488 /* Test to show session handle is checked before 'condition flags' */
489 SetLastError(0xdeadbeef);
490 bRet = FtpPutFileA(NULL, "non_existing_local", "non_existing_remote", 5, 0);
491 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
492 ok ( GetLastError() == ERROR_INVALID_HANDLE,
493 "Expected ERROR_INVALID_HANDLE, got %d\n", GetLastError());
494
495 /* Start clean */
496 DeleteFileA("non_existing_local");
497
498 /* No local file given */
499 SetLastError(0xdeadbeef);
500 bRet = FtpPutFileA(hFtp, NULL, "non_existing_remote", FTP_TRANSFER_TYPE_UNKNOWN, 0);
501 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
502 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
503 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
504
505 /* No remote file given */
506 SetLastError(0xdeadbeef);
507 bRet = FtpPutFileA(hFtp, "non_existing_local", NULL, FTP_TRANSFER_TYPE_UNKNOWN, 0);
508 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
509 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
510 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
511
512 /* Illegal condition flags */
513 SetLastError(0xdeadbeef);
514 bRet = FtpPutFileA(hFtp, "non_existing_local", "non_existing_remote", 5, 0);
515 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
516 ok ( GetLastError() == ERROR_FILE_NOT_FOUND || GetLastError() == ERROR_INVALID_PARAMETER,
517 "Expected ERROR_FILE_NOT_FOUND or ERROR_INVALID_PARAMETER (win98), got %d\n", GetLastError());
518
519 /* Parameters are OK but local file doesn't exist */
520 SetLastError(0xdeadbeef);
521 bRet = FtpPutFileA(hFtp, "non_existing_local", "non_existing_remote", FTP_TRANSFER_TYPE_UNKNOWN, 0);
522 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
523 ok ( GetLastError() == ERROR_FILE_NOT_FOUND,
524 "Expected ERROR_FILE_NOT_FOUND, got %d\n", GetLastError());
525
526 /* Create a temporary local file */
527 SetLastError(0xdeadbeef);
528 hFile = CreateFileA("now_existing_local", GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL);
529 ok ( hFile != NULL, "Error creating a local file : %d\n", GetLastError());
530 CloseHandle(hFile);
531
532 /* Local file exists but we shouldn't be allowed to 'put' the file */
533 SetLastError(0xdeadbeef);
534 bRet = FtpPutFileA(hFtp, "now_existing_local", "non_existing_remote", FTP_TRANSFER_TYPE_UNKNOWN, 0);
535 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
536 ok ( GetLastError() == ERROR_INTERNET_EXTENDED_ERROR,
537 "Expected ERROR_INTERNET_EXTENDED_ERROR, got %d\n", GetLastError());
538
539 DeleteFileA("now_existing_local");
540
541 /* Test to show the parameter checking order depends on the Windows version */
542 SetLastError(0xdeadbeef);
543 bRet = FtpPutFileA(hConnect, NULL, "non_existing_remote", FTP_TRANSFER_TYPE_UNKNOWN, 0);
544 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
545 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE ||
546 GetLastError() == ERROR_INVALID_PARAMETER,
547 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE (win98) or ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
548
549 /* Test to show that 'session handle type' is checked before 'condition flags' */
550 SetLastError(0xdeadbeef);
551 bRet = FtpPutFileA(hConnect, "non_existing_local", "non_existing_remote", 5, 0);
552 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
553 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
554 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
555
556 SetLastError(0xdeadbeef);
557 bRet = FtpPutFileA(hConnect, "non_existing_local", "non_existing_remote", FTP_TRANSFER_TYPE_UNKNOWN, 0);
558 ok ( bRet == FALSE, "Expected FtpPutFileA to fail\n");
559 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
560 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
561 }
562
563 static void test_removedir(HINTERNET hFtp, HINTERNET hConnect)
564 {
565 BOOL bRet;
566
567 /* Invalid internet handle, the other is a valid parameter */
568 SetLastError(0xdeadbeef);
569 bRet = FtpRemoveDirectoryA(NULL, "should_be_non_existing_deadbeef_dir");
570 ok ( bRet == FALSE, "Expected FtpRemoveDirectoryA to fail\n");
571 ok ( GetLastError() == ERROR_INVALID_HANDLE,
572 "Expected ERROR_INVALID_HANDLE, got %d\n", GetLastError());
573
574 /* No remote directory given */
575 SetLastError(0xdeadbeef);
576 bRet = FtpRemoveDirectoryA(hFtp, NULL);
577 ok ( bRet == FALSE, "Expected FtpRemoveDirectoryA to fail\n");
578 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
579 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
580
581 /* Remote directory doesn't exist */
582 SetLastError(0xdeadbeef);
583 bRet = FtpRemoveDirectoryA(hFtp, "should_be_non_existing_deadbeef_dir");
584 ok ( bRet == FALSE, "Expected FtpRemoveDirectoryA to fail\n");
585 ok ( GetLastError() == ERROR_INTERNET_EXTENDED_ERROR,
586 "Expected ERROR_INTERNET_EXTENDED_ERROR, got %d\n", GetLastError());
587
588 /* We shouldn't be allowed to remove that directory */
589 SetLastError(0xdeadbeef);
590 bRet = FtpRemoveDirectoryA(hFtp, "pub");
591 ok ( bRet == FALSE, "Expected FtpRemoveDirectoryA to fail\n");
592 ok ( GetLastError() == ERROR_INTERNET_EXTENDED_ERROR,
593 "Expected ERROR_INTERNET_EXTENDED_ERROR, got %d\n", GetLastError());
594
595 /* One small test to show that handle type is checked before parameters */
596 SetLastError(0xdeadbeef);
597 bRet = FtpRemoveDirectoryA(hConnect, NULL);
598 ok ( bRet == FALSE, "Expected FtpRemoveDirectoryA to fail\n");
599 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
600 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
601
602 SetLastError(0xdeadbeef);
603 bRet = FtpRemoveDirectoryA(hConnect, "should_be_non_existing_deadbeef_dir");
604 ok ( bRet == FALSE, "Expected FtpRemoveDirectoryA to fail\n");
605 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
606 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
607 }
608
609 static void test_renamefile(HINTERNET hFtp, HINTERNET hConnect)
610 {
611 BOOL bRet;
612
613 /* Invalid internet handle, the rest are valid parameters */
614 SetLastError(0xdeadbeef);
615 bRet = FtpRenameFileA(NULL , "should_be_non_existing_deadbeef", "new");
616 ok ( bRet == FALSE, "Expected FtpRenameFileA to fail\n");
617 ok ( GetLastError() == ERROR_INVALID_HANDLE,
618 "Expected ERROR_INVALID_HANDLE, got %d\n", GetLastError());
619
620 /* No 'existing' file */
621 SetLastError(0xdeadbeef);
622 bRet = FtpRenameFileA(hFtp , NULL, "new");
623 ok ( bRet == FALSE, "Expected FtpRenameFileA to fail\n");
624 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
625 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
626
627 /* No new file */
628 SetLastError(0xdeadbeef);
629 bRet = FtpRenameFileA(hFtp , "should_be_non_existing_deadbeef", NULL);
630 ok ( bRet == FALSE, "Expected FtpRenameFileA to fail\n");
631 ok ( GetLastError() == ERROR_INVALID_PARAMETER,
632 "Expected ERROR_INVALID_PARAMETER, got %d\n", GetLastError());
633
634 /* Existing file shouldn't be there */
635 SetLastError(0xdeadbeef);
636 bRet = FtpRenameFileA(hFtp , "should_be_non_existing_deadbeef", "new");
637 ok ( bRet == FALSE, "Expected FtpRenameFileA to fail\n");
638 ok ( GetLastError() == ERROR_INTERNET_EXTENDED_ERROR,
639 "Expected ERROR_INTERNET_EXTENDED_ERROR, got %d\n", GetLastError());
640
641 /* One small test to show that handle type is checked before parameters */
642 SetLastError(0xdeadbeef);
643 bRet = FtpRenameFileA(hConnect , "should_be_non_existing_deadbeef", NULL);
644 ok ( bRet == FALSE, "Expected FtpRenameFileA to fail\n");
645 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
646 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
647
648 SetLastError(0xdeadbeef);
649 bRet = FtpRenameFileA(hConnect , "should_be_non_existing_deadbeef", "new");
650 ok ( bRet == FALSE, "Expected FtpRenameFileA to fail\n");
651 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
652 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %d\n", GetLastError());
653 }
654
655 static void test_command(HINTERNET hFtp, HINTERNET hConnect)
656 {
657 BOOL ret;
658 DWORD error;
659 unsigned int i;
660 static const struct
661 {
662 BOOL ret;
663 DWORD error;
664 const char *cmd;
665 }
666 command_test[] =
667 {
668 { FALSE, ERROR_INVALID_PARAMETER, NULL },
669 { FALSE, ERROR_INVALID_PARAMETER, "" },
670 { FALSE, ERROR_INTERNET_EXTENDED_ERROR, "HELO" },
671 { FALSE, ERROR_INTERNET_EXTENDED_ERROR, "SIZE " },
672 { FALSE, ERROR_INTERNET_EXTENDED_ERROR, " SIZE" },
673 { FALSE, ERROR_INTERNET_EXTENDED_ERROR, "SIZE " },
674 { FALSE, ERROR_INTERNET_EXTENDED_ERROR, "SIZE /welcome.msg /welcome.msg" },
675 { FALSE, ERROR_INTERNET_EXTENDED_ERROR, "SIZE /welcome.msg" },
676 { FALSE, ERROR_INTERNET_EXTENDED_ERROR, "SIZE /welcome.msg " },
677 { TRUE, ERROR_SUCCESS, "SIZE\t/welcome.msg" },
678 { TRUE, ERROR_SUCCESS, "SIZE /welcome.msg" },
679 { FALSE, ERROR_INTERNET_EXTENDED_ERROR, "PWD /welcome.msg" },
680 { TRUE, ERROR_SUCCESS, "PWD" },
681 { TRUE, ERROR_SUCCESS, "PWD\r\n" }
682 };
683
684 if (!pFtpCommandA)
685 {
686 skip("FtpCommandA() is not available. Skipping the Ftp command tests\n");
687 return;
688 }
689
690 for (i = 0; i < sizeof(command_test) / sizeof(command_test[0]); i++)
691 {
692 SetLastError(0xdeadbeef);
693 ret = pFtpCommandA(hFtp, FALSE, FTP_TRANSFER_TYPE_ASCII, command_test[i].cmd, 0, NULL);
694 error = GetLastError();
695
696 ok(ret == command_test[i].ret, "%d: expected FtpCommandA to %s\n", i, command_test[i].ret ? "succeed" : "fail");
697 ok(error == command_test[i].error, "%d: expected error %u, got %u\n", i, command_test[i].error, error);
698 }
699 }
700
701 static void test_get_current_dir(HINTERNET hFtp, HINTERNET hConnect)
702 {
703 BOOL bRet;
704 DWORD dwCurrentDirectoryLen = MAX_PATH;
705 CHAR lpszCurrentDirectory[MAX_PATH];
706
707 if (!pFtpCommandA)
708 {
709 skip("FtpCommandA() is not available. Skipping the Ftp get_current_dir tests\n");
710 return;
711 }
712
713 /* change directories to get a more interesting pwd */
714 bRet = pFtpCommandA(hFtp, FALSE, FTP_TRANSFER_TYPE_ASCII, "CWD pub/", 0, NULL);
715 if(bRet == FALSE)
716 {
717 skip("Failed to change directories in test_get_current_dir(HINTERNET hFtp).\n");
718 return;
719 }
720
721 /* test with all NULL arguments */
722 SetLastError(0xdeadbeef);
723 bRet = FtpGetCurrentDirectoryA( NULL, NULL, 0 );
724 ok ( bRet == FALSE, "Expected FtpGetCurrentDirectoryA to fail\n" );
725 ok ( GetLastError() == ERROR_INVALID_HANDLE, "Expected ERROR_INVALID_HANDLE, got: %d\n", GetLastError());
726
727 /* test with NULL parameters instead of expected LPSTR/LPDWORD */
728 SetLastError(0xdeadbeef);
729 bRet = FtpGetCurrentDirectoryA( hFtp, NULL, 0 );
730 ok ( bRet == FALSE, "Expected FtpGetCurrentDirectoryA to fail\n" );
731 ok ( GetLastError() == ERROR_INVALID_PARAMETER, "Expected ERROR_INVALID_PARAMETER, got: %d\n", GetLastError());
732
733 /* test with no valid handle and valid parameters */
734 SetLastError(0xdeadbeef);
735 bRet = FtpGetCurrentDirectoryA( NULL, lpszCurrentDirectory, &dwCurrentDirectoryLen );
736 ok ( bRet == FALSE, "Expected FtpGetCurrentDirectoryA to fail\n" );
737 ok ( GetLastError() == ERROR_INVALID_HANDLE, "Expected ERROR_INVALID_HANDLE, got: %d\n", GetLastError());
738
739 /* test with invalid dwCurrentDirectory and all other parameters correct */
740 SetLastError(0xdeadbeef);
741 bRet = FtpGetCurrentDirectoryA( hFtp, lpszCurrentDirectory, 0 );
742 ok ( bRet == FALSE, "Expected FtpGetCurrentDirectoryA to fail\n" );
743 ok ( GetLastError() == ERROR_INVALID_PARAMETER, "Expected ERROR_INVALID_PARAMETER, got: %d\n", GetLastError());
744
745 /* test with invalid lpszCurrentDirectory and all other parameters correct */
746 SetLastError(0xdeadbeef);
747 bRet = FtpGetCurrentDirectoryA( hFtp, NULL, &dwCurrentDirectoryLen );
748 ok ( bRet == FALSE, "Expected FtpGetCurrentDirectoryA to fail\n" );
749 ok ( GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Expected ERROR_INSUFFICIENT_BUFFER, got: %d\n", GetLastError());
750
751 /* test to show it checks the handle type */
752 SetLastError(0xdeadbeef);
753 bRet = FtpGetCurrentDirectoryA( hConnect, lpszCurrentDirectory, &dwCurrentDirectoryLen );
754 ok ( bRet == FALSE, "Expected FtpGetCurrentDirectoryA to fail\n" );
755 ok ( GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE,
756 "Expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got: %d\n", GetLastError());
757
758 /* test for the current directory with legitimate values */
759 SetLastError(0xdeadbeef);
760 bRet = FtpGetCurrentDirectoryA( hFtp, lpszCurrentDirectory, &dwCurrentDirectoryLen );
761 ok ( bRet == TRUE, "Expected FtpGetCurrentDirectoryA to pass\n" );
762 ok ( !strcmp(lpszCurrentDirectory, "/pub"), "Expected returned value \"%s\" to match \"/pub\"\n", lpszCurrentDirectory);
763 ok ( GetLastError() == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got: %d\n", GetLastError());
764
765 /* test for the current directory with a size only large enough to
766 * fit the string and not the null terminating character */
767 SetLastError(0xdeadbeef);
768 dwCurrentDirectoryLen = 4;
769 lpszCurrentDirectory[4] = 'a'; /* set position 4 of the array to something else to make sure a leftover \0 isn't fooling the test */
770 bRet = FtpGetCurrentDirectoryA( hFtp, lpszCurrentDirectory, &dwCurrentDirectoryLen );
771 ok ( bRet == FALSE, "Expected FtpGetCurrentDirectoryA to fail\n");
772 ok ( strcmp(lpszCurrentDirectory, "/pub"), "Expected returned value \"%s\" to not match \"/pub\"\n", lpszCurrentDirectory);
773 ok ( GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Expected ERROR_INSUFFICIENT_BUFFER, got: %d\n", GetLastError());
774
775 /* test for the current directory with a size large enough to store
776 * the expected string as well as the null terminating character */
777 SetLastError(0xdeadbeef);
778 dwCurrentDirectoryLen = 5;
779 bRet = FtpGetCurrentDirectoryA( hFtp, lpszCurrentDirectory, &dwCurrentDirectoryLen );
780 ok ( bRet == TRUE, "Expected FtpGetCurrentDirectoryA to pass\n");
781 ok ( !strcmp(lpszCurrentDirectory, "/pub"), "Expected returned value \"%s\" to match \"/pub\"\n", lpszCurrentDirectory);
782 ok ( GetLastError() == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got: %d\n", GetLastError());
783 }
784
785 START_TEST(ftp)
786 {
787 HMODULE hWininet;
788 HANDLE hInternet, hFtp, hHttp;
789
790 hWininet = GetModuleHandleA("wininet.dll");
791 pFtpCommandA = (void*)GetProcAddress(hWininet, "FtpCommandA");
792
793 SetLastError(0xdeadbeef);
794 hInternet = InternetOpen("winetest", 0, NULL, NULL, 0);
795 ok(hInternet != NULL, "InternetOpen failed: %u\n", GetLastError());
796
797 hFtp = InternetConnect(hInternet, "ftp.winehq.org", INTERNET_DEFAULT_FTP_PORT, "anonymous", NULL, INTERNET_SERVICE_FTP, INTERNET_FLAG_PASSIVE, 0);
798 if (!hFtp)
799 {
800 InternetCloseHandle(hInternet);
801 skip("No ftp connection could be made to ftp.winehq.org\n");
802 return;
803 }
804 hHttp = InternetConnect(hInternet, "www.winehq.org", INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
805 if (!hHttp)
806 {
807 InternetCloseHandle(hFtp);
808 InternetCloseHandle(hInternet);
809 skip("No http connection could be made to www.winehq.org\n");
810 return;
811 }
812
813 /* The first call should always be a proper InternetOpen, if not
814 * several calls will return ERROR_INTERNET_NOT_INITIALIZED when
815 * all parameters are correct but no session handle is given. Whereas
816 * the same call will return ERROR_INVALID_HANDLE if an InternetOpen
817 * is done before.
818 * The following test will show that behaviour, where the tests inside
819 * the other sub-tests will show the other situation.
820 */
821 test_getfile_no_open();
822 test_connect(hInternet);
823 test_createdir(hFtp, hHttp);
824 test_deletefile(hFtp, hHttp);
825 test_getfile(hFtp, hHttp);
826 test_openfile(hFtp, hHttp);
827 test_putfile(hFtp, hHttp);
828 test_removedir(hFtp, hHttp);
829 test_renamefile(hFtp, hHttp);
830 test_command(hFtp, hHttp);
831 test_get_current_dir(hFtp, hHttp);
832
833 InternetCloseHandle(hHttp);
834 InternetCloseHandle(hFtp);
835 InternetCloseHandle(hInternet);
836 }
837
This page was automatically generated by the
LXR engine.
Visit the LXR main site for more
information.