?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
push 0f15bbd80d260bbd8adf052e820484a405c49375
[wine/hacks.git] / dlls / wininet / tests / http.c
blobec2df72d98838330bf812068b15e74a7dc9cc8a9
1 /*
2 * Wininet - Http tests
3 *
4 * Copyright 2002 Aric Stewart
5 * Copyright 2004 Mike McCormack
6 * Copyright 2005 Hans Leidekker
7 *
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
12 *
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
17 *
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 */
22
23 #include <stdarg.h>
24 #include <stdio.h>
25 #include <stdlib.h>
26
27 #include "windef.h"
28 #include "winbase.h"
29 #include "wininet.h"
30 #include "winsock.h"
31
32 #include "wine/test.h"
33
34 #define TEST_URL "http://www.winehq.org/site/about"
35
36 static BOOL first_connection_to_test_url = TRUE;
37
38 /* Adapted from dlls/urlmon/tests/protocol.c */
39
40 #define SET_EXPECT2(status, num) \
41 expect[status] = num
42
43 #define SET_EXPECT(status) \
44 SET_EXPECT2(status, 1)
45
46 /* SET_WINE_ALLOW's should be used with an appropriate
47 * todo_wine CHECK_NOTIFIED at a later point in the code */
48 #define SET_WINE_ALLOW2(status, num) \
49 wine_allow[status] = num
50
51 #define SET_WINE_ALLOW(status) \
52 SET_WINE_ALLOW2(status, 1)
53
54 #define CHECK_EXPECT(status) \
55 do { \
56 if (!expect[status] && wine_allow[status]) \
57 { \
58 todo_wine ok(expect[status], "unexpected status %d (%s)\n", status, \
59 status < MAX_INTERNET_STATUS && status_string[status][0] != 0 ? \
60 status_string[status] : "unknown"); \
61 wine_allow[status]--; \
62 } \
63 else \
64 { \
65 ok(expect[status], "unexpected status %d (%s)\n", status, \
66 status < MAX_INTERNET_STATUS && status_string[status][0] != 0 ? \
67 status_string[status] : "unknown"); \
68 expect[status]--; \
69 } \
70 notified[status]++; \
71 }while(0)
72
73 /* CLEAR_NOTIFIED used in cases when notification behavior
74 * differs between Windows versions */
75 #define CLEAR_NOTIFIED(status) \
76 expect[status] = wine_allow[status] = notified[status] = 0;
77
78 #define CHECK_NOTIFIED2(status, num) \
79 do { \
80 ok(notified[status] == (num), "expected status %d (%s) %d times, received %d times\n", \
81 status, status < MAX_INTERNET_STATUS && status_string[status][0] != 0 ? \
82 status_string[status] : "unknown", (num), notified[status]); \
83 CLEAR_NOTIFIED(status); \
84 }while(0)
85
86 #define CHECK_NOTIFIED(status) \
87 CHECK_NOTIFIED2(status, 1)
88
89 #define CHECK_NOT_NOTIFIED(status) \
90 CHECK_NOTIFIED2(status, 0)
91
92 #define MAX_INTERNET_STATUS (INTERNET_STATUS_COOKIE_HISTORY+1)
93 #define MAX_STATUS_NAME 50
94 static int expect[MAX_INTERNET_STATUS], wine_allow[MAX_INTERNET_STATUS],
95 notified[MAX_INTERNET_STATUS];
96 static CHAR status_string[MAX_INTERNET_STATUS][MAX_STATUS_NAME];
97
98 static HANDLE hCompleteEvent;
99
100 static INTERNET_STATUS_CALLBACK (WINAPI *pInternetSetStatusCallbackA)(HINTERNET ,INTERNET_STATUS_CALLBACK);
101 static BOOL (WINAPI *pInternetTimeFromSystemTimeA)(CONST SYSTEMTIME *,DWORD ,LPSTR ,DWORD);
102 static BOOL (WINAPI *pInternetTimeFromSystemTimeW)(CONST SYSTEMTIME *,DWORD ,LPWSTR ,DWORD);
103 static BOOL (WINAPI *pInternetTimeToSystemTimeA)(LPCSTR ,SYSTEMTIME *,DWORD);
104 static BOOL (WINAPI *pInternetTimeToSystemTimeW)(LPCWSTR ,SYSTEMTIME *,DWORD);
105
106
107 static VOID WINAPI callback(
108 HINTERNET hInternet,
109 DWORD_PTR dwContext,
110 DWORD dwInternetStatus,
111 LPVOID lpvStatusInformation,
112 DWORD dwStatusInformationLength
113 )
114 {
115 CHECK_EXPECT(dwInternetStatus);
116 switch (dwInternetStatus)
117 {
118 case INTERNET_STATUS_RESOLVING_NAME:
119 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RESOLVING_NAME \"%s\" %d\n",
120 GetCurrentThreadId(), hInternet, dwContext,
121 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
122 *(LPSTR)lpvStatusInformation = '\0';
123 break;
124 case INTERNET_STATUS_NAME_RESOLVED:
125 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_NAME_RESOLVED \"%s\" %d\n",
126 GetCurrentThreadId(), hInternet, dwContext,
127 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
128 *(LPSTR)lpvStatusInformation = '\0';
129 break;
130 case INTERNET_STATUS_CONNECTING_TO_SERVER:
131 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTING_TO_SERVER \"%s\" %d\n",
132 GetCurrentThreadId(), hInternet, dwContext,
133 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
134 *(LPSTR)lpvStatusInformation = '\0';
135 break;
136 case INTERNET_STATUS_CONNECTED_TO_SERVER:
137 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTED_TO_SERVER \"%s\" %d\n",
138 GetCurrentThreadId(), hInternet, dwContext,
139 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
140 *(LPSTR)lpvStatusInformation = '\0';
141 break;
142 case INTERNET_STATUS_SENDING_REQUEST:
143 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_SENDING_REQUEST %p %d\n",
144 GetCurrentThreadId(), hInternet, dwContext,
145 lpvStatusInformation,dwStatusInformationLength);
146 break;
147 case INTERNET_STATUS_REQUEST_SENT:
148 ok(dwStatusInformationLength == sizeof(DWORD),
149 "info length should be sizeof(DWORD) instead of %d\n",
150 dwStatusInformationLength);
151 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REQUEST_SENT 0x%x %d\n",
152 GetCurrentThreadId(), hInternet, dwContext,
153 *(DWORD *)lpvStatusInformation,dwStatusInformationLength);
154 break;
155 case INTERNET_STATUS_RECEIVING_RESPONSE:
156 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RECEIVING_RESPONSE %p %d\n",
157 GetCurrentThreadId(), hInternet, dwContext,
158 lpvStatusInformation,dwStatusInformationLength);
159 break;
160 case INTERNET_STATUS_RESPONSE_RECEIVED:
161 ok(dwStatusInformationLength == sizeof(DWORD),
162 "info length should be sizeof(DWORD) instead of %d\n",
163 dwStatusInformationLength);
164 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RESPONSE_RECEIVED 0x%x %d\n",
165 GetCurrentThreadId(), hInternet, dwContext,
166 *(DWORD *)lpvStatusInformation,dwStatusInformationLength);
167 break;
168 case INTERNET_STATUS_CTL_RESPONSE_RECEIVED:
169 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CTL_RESPONSE_RECEIVED %p %d\n",
170 GetCurrentThreadId(), hInternet,dwContext,
171 lpvStatusInformation,dwStatusInformationLength);
172 break;
173 case INTERNET_STATUS_PREFETCH:
174 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_PREFETCH %p %d\n",
175 GetCurrentThreadId(), hInternet, dwContext,
176 lpvStatusInformation,dwStatusInformationLength);
177 break;
178 case INTERNET_STATUS_CLOSING_CONNECTION:
179 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CLOSING_CONNECTION %p %d\n",
180 GetCurrentThreadId(), hInternet, dwContext,
181 lpvStatusInformation,dwStatusInformationLength);
182 break;
183 case INTERNET_STATUS_CONNECTION_CLOSED:
184 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTION_CLOSED %p %d\n",
185 GetCurrentThreadId(), hInternet, dwContext,
186 lpvStatusInformation,dwStatusInformationLength);
187 break;
188 case INTERNET_STATUS_HANDLE_CREATED:
189 ok(dwStatusInformationLength == sizeof(HINTERNET),
190 "info length should be sizeof(HINTERNET) instead of %d\n",
191 dwStatusInformationLength);
192 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_HANDLE_CREATED %p %d\n",
193 GetCurrentThreadId(), hInternet, dwContext,
194 *(HINTERNET *)lpvStatusInformation,dwStatusInformationLength);
195 break;
196 case INTERNET_STATUS_HANDLE_CLOSING:
197 ok(dwStatusInformationLength == sizeof(HINTERNET),
198 "info length should be sizeof(HINTERNET) instead of %d\n",
199 dwStatusInformationLength);
200 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_HANDLE_CLOSING %p %d\n",
201 GetCurrentThreadId(), hInternet, dwContext,
202 *(HINTERNET *)lpvStatusInformation, dwStatusInformationLength);
203 break;
204 case INTERNET_STATUS_REQUEST_COMPLETE:
205 {
206 INTERNET_ASYNC_RESULT *iar = (INTERNET_ASYNC_RESULT *)lpvStatusInformation;
207 ok(dwStatusInformationLength == sizeof(INTERNET_ASYNC_RESULT),
208 "info length should be sizeof(INTERNET_ASYNC_RESULT) instead of %d\n",
209 dwStatusInformationLength);
210 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REQUEST_COMPLETE {%ld,%d} %d\n",
211 GetCurrentThreadId(), hInternet, dwContext,
212 iar->dwResult,iar->dwError,dwStatusInformationLength);
213 SetEvent(hCompleteEvent);
214 break;
215 }
216 case INTERNET_STATUS_REDIRECT:
217 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REDIRECT \"%s\" %d\n",
218 GetCurrentThreadId(), hInternet, dwContext,
219 (LPCSTR)lpvStatusInformation, dwStatusInformationLength);
220 *(LPSTR)lpvStatusInformation = '\0';
221 break;
222 case INTERNET_STATUS_INTERMEDIATE_RESPONSE:
223 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_INTERMEDIATE_RESPONSE %p %d\n",
224 GetCurrentThreadId(), hInternet, dwContext,
225 lpvStatusInformation, dwStatusInformationLength);
226 break;
227 default:
228 trace("%04x:Callback %p 0x%lx %d %p %d\n",
229 GetCurrentThreadId(), hInternet, dwContext, dwInternetStatus,
230 lpvStatusInformation, dwStatusInformationLength);
231 }
232 }
233
234 static void InternetReadFile_test(int flags)
235 {
236 DWORD rc;
237 CHAR buffer[4000];
238 DWORD length;
239 DWORD out;
240 const char *types[2] = { "*", NULL };
241 HINTERNET hi, hic = 0, hor = 0;
242
243 hCompleteEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
244
245 trace("Starting InternetReadFile test with flags 0x%x\n",flags);
246
247 trace("InternetOpenA <--\n");
248 hi = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, flags);
249 ok((hi != 0x0),"InternetOpen failed with error %u\n", GetLastError());
250 trace("InternetOpenA -->\n");
251
252 if (hi == 0x0) goto abort;
253
254 pInternetSetStatusCallbackA(hi,&callback);
255
256 SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
257
258 trace("InternetConnectA <--\n");
259 hic=InternetConnectA(hi, "www.winehq.org", INTERNET_INVALID_PORT_NUMBER,
260 NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
261 ok((hic != 0x0),"InternetConnect failed with error %u\n", GetLastError());
262 trace("InternetConnectA -->\n");
263
264 if (hic == 0x0) goto abort;
265
266 CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
267 SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
268 SET_WINE_ALLOW(INTERNET_STATUS_RESOLVING_NAME);
269 SET_WINE_ALLOW(INTERNET_STATUS_NAME_RESOLVED);
270
271 trace("HttpOpenRequestA <--\n");
272 hor = HttpOpenRequestA(hic, "GET", "/about/", NULL, NULL, types,
273 INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
274 0xdeadbead);
275 if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
276 /*
277 * If the internet name can't be resolved we are probably behind
278 * a firewall or in some other way not directly connected to the
279 * Internet. Not enough reason to fail the test. Just ignore and
280 * abort.
281 */
282 } else {
283 ok((hor != 0x0),"HttpOpenRequest failed with error %u\n", GetLastError());
284 }
285 trace("HttpOpenRequestA -->\n");
286
287 if (hor == 0x0) goto abort;
288
289 CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
290 todo_wine
291 {
292 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
293 CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
294 }
295 if (first_connection_to_test_url)
296 {
297 SET_EXPECT(INTERNET_STATUS_RESOLVING_NAME);
298 SET_EXPECT(INTERNET_STATUS_NAME_RESOLVED);
299 }
300 else
301 {
302 SET_WINE_ALLOW(INTERNET_STATUS_RESOLVING_NAME);
303 SET_WINE_ALLOW(INTERNET_STATUS_NAME_RESOLVED);
304 }
305 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTING_TO_SERVER);
306 SET_EXPECT(INTERNET_STATUS_CONNECTING_TO_SERVER);
307 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTED_TO_SERVER);
308 SET_EXPECT(INTERNET_STATUS_CONNECTED_TO_SERVER);
309 SET_EXPECT2(INTERNET_STATUS_SENDING_REQUEST, 2);
310 SET_EXPECT2(INTERNET_STATUS_REQUEST_SENT, 2);
311 SET_EXPECT2(INTERNET_STATUS_RECEIVING_RESPONSE, 2);
312 SET_EXPECT2(INTERNET_STATUS_RESPONSE_RECEIVED, 2);
313 SET_EXPECT(INTERNET_STATUS_REDIRECT);
314 if (flags & INTERNET_FLAG_ASYNC)
315 SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
316 else
317 SET_WINE_ALLOW(INTERNET_STATUS_REQUEST_COMPLETE);
318
319 trace("HttpSendRequestA -->\n");
320 SetLastError(0xdeadbeef);
321 rc = HttpSendRequestA(hor, "", -1, NULL, 0);
322 if (flags & INTERNET_FLAG_ASYNC)
323 ok(((rc == 0)&&(GetLastError() == ERROR_IO_PENDING)),
324 "Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
325 else
326 ok((rc != 0) || GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED,
327 "Synchronous HttpSendRequest returning 0, error %u\n", GetLastError());
328 trace("HttpSendRequestA <--\n");
329
330 if (flags & INTERNET_FLAG_ASYNC)
331 WaitForSingleObject(hCompleteEvent, INFINITE);
332
333 if (first_connection_to_test_url)
334 {
335 CHECK_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
336 CHECK_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
337 }
338 else todo_wine
339 {
340 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
341 CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
342 }
343 CHECK_NOTIFIED2(INTERNET_STATUS_SENDING_REQUEST, 2);
344 CHECK_NOTIFIED2(INTERNET_STATUS_REQUEST_SENT, 2);
345 CHECK_NOTIFIED2(INTERNET_STATUS_RECEIVING_RESPONSE, 2);
346 CHECK_NOTIFIED2(INTERNET_STATUS_RESPONSE_RECEIVED, 2);
347 CHECK_NOTIFIED(INTERNET_STATUS_REDIRECT);
348 if (flags & INTERNET_FLAG_ASYNC)
349 CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
350 else
351 todo_wine CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
352 /* Sent on WinXP only if first_connection_to_test_url is TRUE, on Win98 always sent */
353 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTING_TO_SERVER);
354 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTED_TO_SERVER);
355
356 length = 4;
357 rc = InternetQueryOptionA(hor,INTERNET_OPTION_REQUEST_FLAGS,&out,&length);
358 trace("Option 0x17 -> %i %i\n",rc,out);
359
360 length = 100;
361 rc = InternetQueryOptionA(hor,INTERNET_OPTION_URL,buffer,&length);
362 trace("Option 0x22 -> %i %s\n",rc,buffer);
363
364 length = 4000;
365 rc = HttpQueryInfoA(hor,HTTP_QUERY_RAW_HEADERS,buffer,&length,0x0);
366 buffer[length]=0;
367 trace("Option 0x16 -> %i %s\n",rc,buffer);
368
369 length = 4000;
370 rc = InternetQueryOptionA(hor,INTERNET_OPTION_URL,buffer,&length);
371 buffer[length]=0;
372 trace("Option 0x22 -> %i %s\n",rc,buffer);
373
374 length = 16;
375 rc = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_LENGTH,&buffer,&length,0x0);
376 trace("Option 0x5 -> %i %s (%u)\n",rc,buffer,GetLastError());
377
378 length = 100;
379 rc = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_TYPE,buffer,&length,0x0);
380 buffer[length]=0;
381 trace("Option 0x1 -> %i %s\n",rc,buffer);
382
383 SetLastError(0xdeadbeef);
384 rc = InternetReadFile(NULL, buffer, 100, &length);
385 ok(!rc, "InternetReadFile should have failed\n");
386 ok(GetLastError() == ERROR_INVALID_HANDLE,
387 "InternetReadFile should have set last error to ERROR_INVALID_HANDLE instead of %u\n",
388 GetLastError());
389
390 length = 100;
391 trace("Entering Query loop\n");
392
393 SET_EXPECT(INTERNET_STATUS_CLOSING_CONNECTION);
394 SET_EXPECT(INTERNET_STATUS_CONNECTION_CLOSED);
395 while (TRUE)
396 {
397 if (flags & INTERNET_FLAG_ASYNC)
398 SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
399 rc = InternetQueryDataAvailable(hor,&length,0x0,0x0);
400 ok(!(rc == 0 && length != 0),"InternetQueryDataAvailable failed with non-zero length\n");
401 ok(rc != 0 || ((flags & INTERNET_FLAG_ASYNC) && GetLastError() == ERROR_IO_PENDING),
402 "InternetQueryDataAvailable failed, error %d\n", GetLastError());
403 if (flags & INTERNET_FLAG_ASYNC)
404 {
405 if (rc != 0)
406 {
407 CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
408 }
409 else if (GetLastError() == ERROR_IO_PENDING)
410 {
411 WaitForSingleObject(hCompleteEvent, INFINITE);
412 CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
413 continue;
414 }
415 }
416 if (length)
417 {
418 char *buffer;
419 buffer = HeapAlloc(GetProcessHeap(),0,length+1);
420
421 rc = InternetReadFile(hor,buffer,length,&length);
422
423 buffer[length]=0;
424
425 trace("ReadFile -> %i %i\n",rc,length);
426
427 HeapFree(GetProcessHeap(),0,buffer);
428 }
429 if (length == 0)
430 break;
431 }
432 /* WinXP does not send, but Win98 does */
433 CLEAR_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
434 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
435 abort:
436 SET_EXPECT2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
437 if (hor != 0x0) {
438 SET_WINE_ALLOW(INTERNET_STATUS_CLOSING_CONNECTION);
439 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTION_CLOSED);
440 SetLastError(0xdeadbeef);
441 rc = InternetCloseHandle(hor);
442 ok ((rc != 0), "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
443 SetLastError(0xdeadbeef);
444 rc = InternetCloseHandle(hor);
445 ok ((rc == 0), "Double close of handle opened by HttpOpenRequestA succeeded\n");
446 ok (GetLastError() == ERROR_INVALID_HANDLE,
447 "Double close of handle should have set ERROR_INVALID_HANDLE instead of %u\n",
448 GetLastError());
449 }
450 /* We intentionally do not close the handle opened by InternetConnectA as this
451 * tickles bug #9479: native closes child internet handles when the parent handles
452 * are closed. This is verified below by checking that the number of
453 * INTERNET_STATUS_HANDLE_CLOSING notifications matches the number expected. */
454 if (hi != 0x0) {
455 SET_WINE_ALLOW(INTERNET_STATUS_HANDLE_CLOSING);
456 rc = InternetCloseHandle(hi);
457 ok ((rc != 0), "InternetCloseHandle of handle opened by InternetOpenA failed\n");
458 if (flags & INTERNET_FLAG_ASYNC)
459 Sleep(100);
460 }
461 CHECK_NOTIFIED2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
462 if (hor != 0x0) todo_wine
463 {
464 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
465 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
466 }
467 else
468 {
469 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
470 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
471 }
472 CloseHandle(hCompleteEvent);
473 first_connection_to_test_url = FALSE;
474 }
475
476 static void InternetReadFileExA_test(int flags)
477 {
478 DWORD rc;
479 DWORD length;
480 const char *types[2] = { "*", NULL };
481 HINTERNET hi, hic = 0, hor = 0;
482 INTERNET_BUFFERS inetbuffers;
483
484 hCompleteEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
485
486 trace("Starting InternetReadFileExA test with flags 0x%x\n",flags);
487
488 trace("InternetOpenA <--\n");
489 hi = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, flags);
490 ok((hi != 0x0),"InternetOpen failed with error %u\n", GetLastError());
491 trace("InternetOpenA -->\n");
492
493 if (hi == 0x0) goto abort;
494
495 pInternetSetStatusCallbackA(hi,&callback);
496
497 SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
498
499 trace("InternetConnectA <--\n");
500 hic=InternetConnectA(hi, "www.winehq.org", INTERNET_INVALID_PORT_NUMBER,
501 NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
502 ok((hic != 0x0),"InternetConnect failed with error %u\n", GetLastError());
503 trace("InternetConnectA -->\n");
504
505 if (hic == 0x0) goto abort;
506
507 CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
508 SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
509 SET_WINE_ALLOW(INTERNET_STATUS_RESOLVING_NAME);
510 SET_WINE_ALLOW(INTERNET_STATUS_NAME_RESOLVED);
511
512 trace("HttpOpenRequestA <--\n");
513 hor = HttpOpenRequestA(hic, "GET", "/about/", NULL, NULL, types,
514 INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
515 0xdeadbead);
516 if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
517 /*
518 * If the internet name can't be resolved we are probably behind
519 * a firewall or in some other way not directly connected to the
520 * Internet. Not enough reason to fail the test. Just ignore and
521 * abort.
522 */
523 } else {
524 ok((hor != 0x0),"HttpOpenRequest failed with error %u\n", GetLastError());
525 }
526 trace("HttpOpenRequestA -->\n");
527
528 if (hor == 0x0) goto abort;
529
530 CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
531 todo_wine
532 {
533 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
534 CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
535 }
536 if (first_connection_to_test_url)
537 {
538 SET_EXPECT(INTERNET_STATUS_RESOLVING_NAME);
539 SET_EXPECT(INTERNET_STATUS_NAME_RESOLVED);
540 }
541 else
542 {
543 SET_WINE_ALLOW(INTERNET_STATUS_RESOLVING_NAME);
544 SET_WINE_ALLOW(INTERNET_STATUS_NAME_RESOLVED);
545 }
546 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTING_TO_SERVER);
547 SET_EXPECT(INTERNET_STATUS_CONNECTING_TO_SERVER);
548 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTED_TO_SERVER);
549 SET_EXPECT(INTERNET_STATUS_CONNECTED_TO_SERVER);
550 SET_EXPECT2(INTERNET_STATUS_SENDING_REQUEST, 2);
551 SET_EXPECT2(INTERNET_STATUS_REQUEST_SENT, 2);
552 SET_EXPECT2(INTERNET_STATUS_RECEIVING_RESPONSE, 2);
553 SET_EXPECT2(INTERNET_STATUS_RESPONSE_RECEIVED, 2);
554 SET_EXPECT(INTERNET_STATUS_REDIRECT);
555 if (flags & INTERNET_FLAG_ASYNC)
556 SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
557 else
558 SET_WINE_ALLOW(INTERNET_STATUS_REQUEST_COMPLETE);
559
560 trace("HttpSendRequestA -->\n");
561 SetLastError(0xdeadbeef);
562 rc = HttpSendRequestA(hor, "", -1, NULL, 0);
563 if (flags & INTERNET_FLAG_ASYNC)
564 ok(((rc == 0)&&(GetLastError() == ERROR_IO_PENDING)),
565 "Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
566 else
567 ok((rc != 0) || GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED,
568 "Synchronous HttpSendRequest returning 0, error %u\n", GetLastError());
569 trace("HttpSendRequestA <--\n");
570
571 if (!rc && (GetLastError() == ERROR_IO_PENDING))
572 WaitForSingleObject(hCompleteEvent, INFINITE);
573
574 if (first_connection_to_test_url)
575 {
576 CHECK_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
577 CHECK_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
578 }
579 else todo_wine
580 {
581 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
582 CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
583 }
584 CHECK_NOTIFIED2(INTERNET_STATUS_SENDING_REQUEST, 2);
585 CHECK_NOTIFIED2(INTERNET_STATUS_REQUEST_SENT, 2);
586 CHECK_NOTIFIED2(INTERNET_STATUS_RECEIVING_RESPONSE, 2);
587 CHECK_NOTIFIED2(INTERNET_STATUS_RESPONSE_RECEIVED, 2);
588 CHECK_NOTIFIED(INTERNET_STATUS_REDIRECT);
589 if (flags & INTERNET_FLAG_ASYNC)
590 CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
591 else
592 todo_wine CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
593 /* Sent on WinXP only if first_connection_to_test_url is TRUE, on Win98 always sent */
594 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTING_TO_SERVER);
595 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTED_TO_SERVER);
596
597 /* tests invalid dwStructSize */
598 inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS)+1;
599 inetbuffers.lpcszHeader = NULL;
600 inetbuffers.dwHeadersLength = 0;
601 inetbuffers.dwBufferLength = 10;
602 inetbuffers.lpvBuffer = HeapAlloc(GetProcessHeap(), 0, 10);
603 inetbuffers.dwOffsetHigh = 1234;
604 inetbuffers.dwOffsetLow = 5678;
605 rc = InternetReadFileEx(hor, &inetbuffers, 0, 0xdeadcafe);
606 ok(!rc && (GetLastError() == ERROR_INVALID_PARAMETER),
607 "InternetReadFileEx should have failed with ERROR_INVALID_PARAMETER instead of %s, %u\n",
608 rc ? "TRUE" : "FALSE", GetLastError());
609 HeapFree(GetProcessHeap(), 0, inetbuffers.lpvBuffer);
610
611 /* tests to see whether lpcszHeader is used - it isn't */
612 inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS);
613 inetbuffers.lpcszHeader = (LPCTSTR)0xdeadbeef;
614 inetbuffers.dwHeadersLength = 255;
615 inetbuffers.dwBufferLength = 0;
616 inetbuffers.lpvBuffer = NULL;
617 inetbuffers.dwOffsetHigh = 1234;
618 inetbuffers.dwOffsetLow = 5678;
619 SET_WINE_ALLOW(INTERNET_STATUS_RECEIVING_RESPONSE);
620 SET_WINE_ALLOW(INTERNET_STATUS_RESPONSE_RECEIVED);
621 rc = InternetReadFileEx(hor, &inetbuffers, 0, 0xdeadcafe);
622 ok(rc, "InternetReadFileEx failed with error %u\n", GetLastError());
623 todo_wine
624 {
625 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
626 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
627 }
628
629 rc = InternetReadFileEx(NULL, &inetbuffers, 0, 0xdeadcafe);
630 ok(!rc && (GetLastError() == ERROR_INVALID_HANDLE),
631 "InternetReadFileEx should have failed with ERROR_INVALID_HANDLE instead of %s, %u\n",
632 rc ? "TRUE" : "FALSE", GetLastError());
633
634 length = 0;
635 trace("Entering Query loop\n");
636
637 SET_EXPECT(INTERNET_STATUS_CLOSING_CONNECTION);
638 SET_EXPECT(INTERNET_STATUS_CONNECTION_CLOSED);
639 while (TRUE)
640 {
641 inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS);
642 inetbuffers.dwBufferLength = 1024;
643 inetbuffers.lpvBuffer = HeapAlloc(GetProcessHeap(), 0, inetbuffers.dwBufferLength+1);
644 inetbuffers.dwOffsetHigh = 1234;
645 inetbuffers.dwOffsetLow = 5678;
646
647 SET_EXPECT(INTERNET_STATUS_RECEIVING_RESPONSE);
648 SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
649 SET_EXPECT(INTERNET_STATUS_RESPONSE_RECEIVED);
650 rc = InternetReadFileExA(hor, &inetbuffers, IRF_ASYNC | IRF_USE_CONTEXT, 0xcafebabe);
651 if (!rc)
652 {
653 if (GetLastError() == ERROR_IO_PENDING)
654 {
655 trace("InternetReadFileEx -> PENDING\n");
656 CHECK_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
657 WaitForSingleObject(hCompleteEvent, INFINITE);
658 CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
659 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
660 }
661 else
662 {
663 trace("InternetReadFileEx -> FAILED %u\n", GetLastError());
664 break;
665 }
666 }
667 else
668 {
669 trace("InternetReadFileEx -> SUCCEEDED\n");
670 CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
671 if (inetbuffers.dwBufferLength)
672 {
673 CHECK_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
674 CHECK_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
675 }
676 else
677 {
678 /* Win98 still sends these when 0 bytes are read, WinXP does not */
679 CLEAR_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
680 CLEAR_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
681 }
682 }
683
684 trace("read %i bytes\n", inetbuffers.dwBufferLength);
685 ((char *)inetbuffers.lpvBuffer)[inetbuffers.dwBufferLength] = '\0';
686
687 ok(inetbuffers.dwOffsetHigh == 1234 && inetbuffers.dwOffsetLow == 5678,
688 "InternetReadFileEx sets offsets to 0x%x%08x\n",
689 inetbuffers.dwOffsetHigh, inetbuffers.dwOffsetLow);
690
691 HeapFree(GetProcessHeap(), 0, inetbuffers.lpvBuffer);
692
693 if (!inetbuffers.dwBufferLength)
694 break;
695
696 length += inetbuffers.dwBufferLength;
697 }
698 ok(length > 0, "failed to read any of the document\n");
699 trace("Finished. Read %d bytes\n", length);
700
701 /* WinXP does not send, but Win98 does */
702 CLEAR_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
703 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
704 abort:
705 SET_EXPECT2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
706 if (hor) {
707 SET_WINE_ALLOW(INTERNET_STATUS_CLOSING_CONNECTION);
708 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTION_CLOSED);
709 rc = InternetCloseHandle(hor);
710 ok ((rc != 0), "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
711 rc = InternetCloseHandle(hor);
712 ok ((rc == 0), "Double close of handle opened by HttpOpenRequestA succeeded\n");
713 }
714 if (hic) {
715 rc = InternetCloseHandle(hic);
716 ok ((rc != 0), "InternetCloseHandle of handle opened by InternetConnectA failed\n");
717 }
718 if (hi) {
719 SET_WINE_ALLOW(INTERNET_STATUS_HANDLE_CLOSING);
720 rc = InternetCloseHandle(hi);
721 ok ((rc != 0), "InternetCloseHandle of handle opened by InternetOpenA failed\n");
722 if (flags & INTERNET_FLAG_ASYNC)
723 Sleep(100);
724 CHECK_NOTIFIED2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
725 }
726 if (hor != 0x0) todo_wine
727 {
728 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
729 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
730 }
731 else
732 {
733 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
734 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
735 }
736 CloseHandle(hCompleteEvent);
737 first_connection_to_test_url = FALSE;
738 }
739
740 static void InternetOpenUrlA_test(void)
741 {
742 HINTERNET myhinternet, myhttp;
743 char buffer[0x400];
744 DWORD size, readbytes, totalbytes=0;
745 BOOL ret;
746
747 myhinternet = InternetOpen("Winetest",0,NULL,NULL,INTERNET_FLAG_NO_CACHE_WRITE);
748 ok((myhinternet != 0), "InternetOpen failed, error %u\n",GetLastError());
749 size = 0x400;
750 ret = InternetCanonicalizeUrl(TEST_URL, buffer, &size,ICU_BROWSER_MODE);
751 ok( ret, "InternetCanonicalizeUrl failed, error %u\n",GetLastError());
752
753 SetLastError(0);
754 myhttp = InternetOpenUrl(myhinternet, TEST_URL, 0, 0,
755 INTERNET_FLAG_RELOAD|INTERNET_FLAG_NO_CACHE_WRITE|INTERNET_FLAG_TRANSFER_BINARY,0);
756 if (GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
757 return; /* WinXP returns this when not connected to the net */
758 ok((myhttp != 0),"InternetOpenUrl failed, error %u\n",GetLastError());
759 ret = InternetReadFile(myhttp, buffer,0x400,&readbytes);
760 ok( ret, "InternetReadFile failed, error %u\n",GetLastError());
761 totalbytes += readbytes;
762 while (readbytes && InternetReadFile(myhttp, buffer,0x400,&readbytes))
763 totalbytes += readbytes;
764 trace("read 0x%08x bytes\n",totalbytes);
765
766 InternetCloseHandle(myhttp);
767 InternetCloseHandle(myhinternet);
768 }
769
770 static void InternetTimeFromSystemTimeA_test(void)
771 {
772 BOOL ret;
773 static const SYSTEMTIME time = { 2005, 1, 5, 7, 12, 6, 35, 0 };
774 char string[INTERNET_RFC1123_BUFSIZE];
775 static const char expect[] = "Fri, 07 Jan 2005 12:06:35 GMT";
776
777 ret = pInternetTimeFromSystemTimeA( &time, INTERNET_RFC1123_FORMAT, string, sizeof(string) );
778 ok( ret, "InternetTimeFromSystemTimeA failed (%u)\n", GetLastError() );
779
780 ok( !memcmp( string, expect, sizeof(expect) ),
781 "InternetTimeFromSystemTimeA failed (%u)\n", GetLastError() );
782 }
783
784 static void InternetTimeFromSystemTimeW_test(void)
785 {
786 BOOL ret;
787 static const SYSTEMTIME time = { 2005, 1, 5, 7, 12, 6, 35, 0 };
788 WCHAR string[INTERNET_RFC1123_BUFSIZE + 1];
789 static const WCHAR expect[] = { 'F','r','i',',',' ','0','7',' ','J','a','n',' ','2','0','0','5',' ',
790 '1','2',':','0','6',':','3','5',' ','G','M','T',0 };
791
792 ret = pInternetTimeFromSystemTimeW( &time, INTERNET_RFC1123_FORMAT, string, sizeof(string) );
793 ok( ret, "InternetTimeFromSystemTimeW failed (%u)\n", GetLastError() );
794
795 ok( !memcmp( string, expect, sizeof(expect) ),
796 "InternetTimeFromSystemTimeW failed (%u)\n", GetLastError() );
797 }
798
799 static void InternetTimeToSystemTimeA_test(void)
800 {
801 BOOL ret;
802 SYSTEMTIME time;
803 static const SYSTEMTIME expect = { 2005, 1, 5, 7, 12, 6, 35, 0 };
804 static const char string[] = "Fri, 07 Jan 2005 12:06:35 GMT";
805 static const char string2[] = " fri 7 jan 2005 12 06 35";
806
807 ret = pInternetTimeToSystemTimeA( string, &time, 0 );
808 ok( ret, "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
809 ok( !memcmp( &time, &expect, sizeof(expect) ),
810 "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
811
812 ret = pInternetTimeToSystemTimeA( string2, &time, 0 );
813 ok( ret, "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
814 ok( !memcmp( &time, &expect, sizeof(expect) ),
815 "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
816 }
817
818 static void InternetTimeToSystemTimeW_test(void)
819 {
820 BOOL ret;
821 SYSTEMTIME time;
822 static const SYSTEMTIME expect = { 2005, 1, 5, 7, 12, 6, 35, 0 };
823 static const WCHAR string[] = { 'F','r','i',',',' ','0','7',' ','J','a','n',' ','2','0','0','5',' ',
824 '1','2',':','0','6',':','3','5',' ','G','M','T',0 };
825 static const WCHAR string2[] = { ' ','f','r','i',' ','7',' ','j','a','n',' ','2','0','0','5',' ',
826 '1','2',' ','0','6',' ','3','5',0 };
827 static const WCHAR string3[] = { 'F','r',0 };
828
829 ret = pInternetTimeToSystemTimeW( NULL, NULL, 0 );
830 ok( !ret, "InternetTimeToSystemTimeW succeeded (%u)\n", GetLastError() );
831
832 ret = pInternetTimeToSystemTimeW( NULL, &time, 0 );
833 ok( !ret, "InternetTimeToSystemTimeW succeeded (%u)\n", GetLastError() );
834
835 ret = pInternetTimeToSystemTimeW( string, NULL, 0 );
836 ok( !ret, "InternetTimeToSystemTimeW succeeded (%u)\n", GetLastError() );
837
838 ret = pInternetTimeToSystemTimeW( string, &time, 0 );
839 ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
840
841 ret = pInternetTimeToSystemTimeW( string, &time, 0 );
842 ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
843 ok( !memcmp( &time, &expect, sizeof(expect) ),
844 "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
845
846 ret = pInternetTimeToSystemTimeW( string2, &time, 0 );
847 ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
848 ok( !memcmp( &time, &expect, sizeof(expect) ),
849 "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
850
851 ret = pInternetTimeToSystemTimeW( string3, &time, 0 );
852 ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
853 }
854
855 static void HttpSendRequestEx_test(void)
856 {
857 HINTERNET hSession;
858 HINTERNET hConnect;
859 HINTERNET hRequest;
860
861 INTERNET_BUFFERS BufferIn;
862 DWORD dwBytesWritten;
863 DWORD dwBytesRead;
864 CHAR szBuffer[256];
865 int i;
866 BOOL ret;
867
868 static char szPostData[] = "mode=Test";
869 static const char szContentType[] = "Content-Type: application/x-www-form-urlencoded";
870
871 hSession = InternetOpen("Wine Regression Test",
872 INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,0);
873 ok( hSession != NULL ,"Unable to open Internet session\n");
874 hConnect = InternetConnect(hSession, "crossover.codeweavers.com",
875 INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0,
876 0);
877 ok( hConnect != NULL, "Unable to connect to http://crossover.codeweavers.com\n");
878 hRequest = HttpOpenRequest(hConnect, "POST", "/posttest.php",
879 NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
880 if (!hRequest && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
881 {
882 trace( "Network unreachable, skipping test\n" );
883 goto done;
884 }
885 ok( hRequest != NULL, "Failed to open request handle err %u\n", GetLastError());
886
887
888 BufferIn.dwStructSize = sizeof( INTERNET_BUFFERS);
889 BufferIn.Next = (LPINTERNET_BUFFERS)0xdeadcab;
890 BufferIn.lpcszHeader = szContentType;
891 BufferIn.dwHeadersLength = sizeof(szContentType);
892 BufferIn.dwHeadersTotal = sizeof(szContentType);
893 BufferIn.lpvBuffer = szPostData;
894 BufferIn.dwBufferLength = 3;
895 BufferIn.dwBufferTotal = sizeof(szPostData)-1;
896 BufferIn.dwOffsetLow = 0;
897 BufferIn.dwOffsetHigh = 0;
898
899 ret = HttpSendRequestEx(hRequest, &BufferIn, NULL, 0 ,0);
900 ok(ret, "HttpSendRequestEx Failed with error %u\n", GetLastError());
901
902 for (i = 3; szPostData[i]; i++)
903 ok(InternetWriteFile(hRequest, &szPostData[i], 1, &dwBytesWritten),
904 "InternetWriteFile failed\n");
905
906 ok(HttpEndRequest(hRequest, NULL, 0, 0), "HttpEndRequest Failed\n");
907
908 ok(InternetReadFile(hRequest, szBuffer, 255, &dwBytesRead),
909 "Unable to read response\n");
910 szBuffer[dwBytesRead] = 0;
911
912 ok(dwBytesRead == 13,"Read %u bytes instead of 13\n",dwBytesRead);
913 ok(strncmp(szBuffer,"mode => Test\n",dwBytesRead)==0,"Got string %s\n",szBuffer);
914
915 ok(InternetCloseHandle(hRequest), "Close request handle failed\n");
916 done:
917 ok(InternetCloseHandle(hConnect), "Close connect handle failed\n");
918 ok(InternetCloseHandle(hSession), "Close session handle failed\n");
919 }
920
921 static void InternetOpenRequest_test(void)
922 {
923 HINTERNET session, connect, request;
924 static const char *types[] = { "*", "", NULL };
925 static const WCHAR slash[] = {'/', 0}, any[] = {'*', 0}, empty[] = {0};
926 static const WCHAR *typesW[] = { any, empty, NULL };
927 BOOL ret;
928
929 session = InternetOpenA("Wine Regression Test", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
930 ok(session != NULL ,"Unable to open Internet session\n");
931
932 connect = InternetConnectA(session, "winehq.org", INTERNET_DEFAULT_HTTP_PORT, NULL, NULL,
933 INTERNET_SERVICE_HTTP, 0, 0);
934 ok(connect != NULL, "Unable to connect to http://winehq.org\n");
935
936 request = HttpOpenRequestA(connect, NULL, "/", NULL, NULL, types, INTERNET_FLAG_NO_CACHE_WRITE, 0);
937 if (!request && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
938 {
939 trace( "Network unreachable, skipping test\n" );
940 goto done;
941 }
942 ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
943
944 ret = HttpSendRequest(request, NULL, 0, NULL, 0);
945 ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
946 ok(InternetCloseHandle(request), "Close request handle failed\n");
947
948 request = HttpOpenRequestW(connect, NULL, slash, NULL, NULL, typesW, INTERNET_FLAG_NO_CACHE_WRITE, 0);
949 ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
950
951 ret = HttpSendRequest(request, NULL, 0, NULL, 0);
952 ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
953 ok(InternetCloseHandle(request), "Close request handle failed\n");
954
955 done:
956 ok(InternetCloseHandle(connect), "Close connect handle failed\n");
957 ok(InternetCloseHandle(session), "Close session handle failed\n");
958 }
959
960 static void HttpHeaders_test(void)
961 {
962 HINTERNET hSession;
963 HINTERNET hConnect;
964 HINTERNET hRequest;
965 CHAR buffer[256];
966 DWORD len = 256;
967 DWORD index = 0;
968
969 hSession = InternetOpen("Wine Regression Test",
970 INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,0);
971 ok( hSession != NULL ,"Unable to open Internet session\n");
972 hConnect = InternetConnect(hSession, "crossover.codeweavers.com",
973 INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0,
974 0);
975 ok( hConnect != NULL, "Unable to connect to http://crossover.codeweavers.com\n");
976 hRequest = HttpOpenRequest(hConnect, "POST", "/posttest.php",
977 NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
978 if (!hRequest && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
979 {
980 trace( "Network unreachable, skipping test\n" );
981 goto done;
982 }
983 ok( hRequest != NULL, "Failed to open request handle\n");
984
985 index = 0;
986 len = sizeof(buffer);
987 strcpy(buffer,"Warning");
988 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
989 buffer,&len,&index)==0,"Warning hearder reported as Existing\n");
990
991 ok(HttpAddRequestHeaders(hRequest,"Warning:test1",-1,HTTP_ADDREQ_FLAG_ADD),
992 "Failed to add new header\n");
993
994 index = 0;
995 len = sizeof(buffer);
996 strcpy(buffer,"Warning");
997 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
998 buffer,&len,&index),"Unable to query header\n");
999 ok(index == 1, "Index was not incremented\n");
1000 ok(strcmp(buffer,"test1")==0, "incorrect string was returned(%s)\n",buffer);
1001 ok(len == 5, "Invalid length (exp. 5, got %d)\n", len);
1002 ok(buffer[len] == 0, "Buffer not NULL-terminated\n"); /* len show only 5 characters but the buffer is NULL-terminated*/
1003 len = sizeof(buffer);
1004 strcpy(buffer,"Warning");
1005 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1006 buffer,&len,&index)==0,"Second Index Should Not Exist\n");
1007
1008 index = 0;
1009 len = 5; /* could store the string but not the NULL terminator */
1010 strcpy(buffer,"Warning");
1011 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1012 buffer,&len,&index) == FALSE,"Query succeeded on a too small buffer\n");
1013 ok(strcmp(buffer,"Warning")==0, "incorrect string was returned(%s)\n",buffer); /* string not touched */
1014 ok(len == 6, "Invalid length (exp. 6, got %d)\n", len); /* unlike success, the length includes the NULL-terminator */
1015
1016 /* a call with NULL will fail but will return the length */
1017 index = 0;
1018 len = sizeof(buffer);
1019 SetLastError(0xdeadbeef);
1020 ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1021 NULL,&len,&index) == FALSE,"Query worked\n");
1022 ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1023 ok(len > 40, "Invalid length (exp. more than 40, got %d)\n", len);
1024 ok(index == 0, "Index was incremented\n");
1025
1026 /* even for a len that is too small */
1027 index = 0;
1028 len = 15;
1029 SetLastError(0xdeadbeef);
1030 ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1031 NULL,&len,&index) == FALSE,"Query worked\n");
1032 ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1033 ok(len > 40, "Invalid length (exp. more than 40, got %d)\n", len);
1034 ok(index == 0, "Index was incremented\n");
1035
1036 index = 0;
1037 len = 0;
1038 SetLastError(0xdeadbeef);
1039 ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1040 NULL,&len,&index) == FALSE,"Query worked\n");
1041 ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1042 ok(len > 40, "Invalid length (exp. more than 40, got %d)\n", len);
1043 ok(index == 0, "Index was incremented\n");
1044
1045
1046 /* a working query */
1047 index = 0;
1048 len = sizeof(buffer);
1049 ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1050 buffer,&len,&index),"Unable to query header\n");
1051 /* what's in the middle differs between Wine and Windows so currently we check only the beginning and the end */
1052 ok(strncmp(buffer, "POST /posttest.php HTTP/1", 25)==0, "Invalid beginning of headers string\n");
1053 ok(strcmp(buffer + strlen(buffer) - 4, "\r\n\r\n")==0, "Invalid end of headers string\n");
1054 ok(index == 0, "Index was incremented\n");
1055
1056
1057
1058 ok(HttpAddRequestHeaders(hRequest,"Warning:test2",-1,HTTP_ADDREQ_FLAG_ADD),
1059 "Failed to add duplicate header using HTTP_ADDREQ_FLAG_ADD\n");
1060
1061 index = 0;
1062 len = sizeof(buffer);
1063 strcpy(buffer,"Warning");
1064 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1065 buffer,&len,&index),"Unable to query header\n");
1066 ok(index == 1, "Index was not incremented\n");
1067 ok(strcmp(buffer,"test1")==0, "incorrect string was returned(%s)\n",buffer);
1068 len = sizeof(buffer);
1069 strcpy(buffer,"Warning");
1070 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1071 buffer,&len,&index),"Failed to get second header\n");
1072 ok(index == 2, "Index was not incremented\n");
1073 ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
1074 len = sizeof(buffer);
1075 strcpy(buffer,"Warning");
1076 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1077 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1078
1079 ok(HttpAddRequestHeaders(hRequest,"Warning:test3",-1,HTTP_ADDREQ_FLAG_REPLACE), "Failed to replace header using HTTP_ADDREQ_FLAG_REPLACE\n");
1080
1081 index = 0;
1082 len = sizeof(buffer);
1083 strcpy(buffer,"Warning");
1084 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1085 buffer,&len,&index),"Unable to query header\n");
1086 ok(index == 1, "Index was not incremented\n");
1087 ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
1088 len = sizeof(buffer);
1089 strcpy(buffer,"Warning");
1090 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1091 buffer,&len,&index),"Failed to get second header\n");
1092 ok(index == 2, "Index was not incremented\n");
1093 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1094 len = sizeof(buffer);
1095 strcpy(buffer,"Warning");
1096 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1097 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1098
1099 ok(HttpAddRequestHeaders(hRequest,"Warning:test4",-1,HTTP_ADDREQ_FLAG_ADD_IF_NEW)==0, "HTTP_ADDREQ_FLAG_ADD_IF_NEW replaced existing header\n");
1100
1101 index = 0;
1102 len = sizeof(buffer);
1103 strcpy(buffer,"Warning");
1104 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1105 buffer,&len,&index),"Unable to query header\n");
1106 ok(index == 1, "Index was not incremented\n");
1107 ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
1108 len = sizeof(buffer);
1109 strcpy(buffer,"Warning");
1110 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1111 buffer,&len,&index),"Failed to get second header\n");
1112 ok(index == 2, "Index was not incremented\n");
1113 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1114 len = sizeof(buffer);
1115 strcpy(buffer,"Warning");
1116 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1117 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1118
1119 ok(HttpAddRequestHeaders(hRequest,"Warning:test4",-1, HTTP_ADDREQ_FLAG_COALESCE), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
1120
1121 index = 0;
1122 len = sizeof(buffer);
1123 strcpy(buffer,"Warning");
1124 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1125 buffer,&len,&index),"Unable to query header\n");
1126 ok(index == 1, "Index was not incremented\n");
1127 ok(strcmp(buffer,"test2, test4")==0, "incorrect string was returned(%s)\n", buffer);
1128 len = sizeof(buffer);
1129 strcpy(buffer,"Warning");
1130 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1131 ok(index == 2, "Index was not incremented\n");
1132 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1133 len = sizeof(buffer);
1134 strcpy(buffer,"Warning");
1135 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1136
1137 ok(HttpAddRequestHeaders(hRequest,"Warning:test5",-1, HTTP_ADDREQ_FLAG_COALESCE_WITH_COMMA), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
1138
1139 index = 0;
1140 len = sizeof(buffer);
1141 strcpy(buffer,"Warning");
1142 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1143 ok(index == 1, "Index was not incremented\n");
1144 ok(strcmp(buffer,"test2, test4, test5")==0, "incorrect string was returned(%s)\n",buffer);
1145 len = sizeof(buffer);
1146 strcpy(buffer,"Warning");
1147 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1148 ok(index == 2, "Index was not incremented\n");
1149 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1150 len = sizeof(buffer);
1151 strcpy(buffer,"Warning");
1152 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1153
1154 ok(HttpAddRequestHeaders(hRequest,"Warning:test6",-1, HTTP_ADDREQ_FLAG_COALESCE_WITH_SEMICOLON), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
1155
1156 index = 0;
1157 len = sizeof(buffer);
1158 strcpy(buffer,"Warning");
1159 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1160 ok(index == 1, "Index was not incremented\n");
1161 ok(strcmp(buffer,"test2, test4, test5; test6")==0, "incorrect string was returned(%s)\n",buffer);
1162 len = sizeof(buffer);
1163 strcpy(buffer,"Warning");
1164 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1165 ok(index == 2, "Index was not incremented\n");
1166 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1167 len = sizeof(buffer);
1168 strcpy(buffer,"Warning");
1169 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1170
1171 ok(HttpAddRequestHeaders(hRequest,"Warning:test7",-1, HTTP_ADDREQ_FLAG_ADD|HTTP_ADDREQ_FLAG_REPLACE), "HTTP_ADDREQ_FLAG_ADD with HTTP_ADDREQ_FLAG_REPALCE Did not work\n");
1172
1173 index = 0;
1174 len = sizeof(buffer);
1175 strcpy(buffer,"Warning");
1176 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1177 ok(index == 1, "Index was not incremented\n");
1178 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1179 len = sizeof(buffer);
1180 strcpy(buffer,"Warning");
1181 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1182 ok(index == 2, "Index was not incremented\n");
1183 ok(strcmp(buffer,"test7")==0, "incorrect string was returned(%s)\n",buffer);
1184 len = sizeof(buffer);
1185 strcpy(buffer,"Warning");
1186 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1187
1188
1189 ok(InternetCloseHandle(hRequest), "Close request handle failed\n");
1190 done:
1191 ok(InternetCloseHandle(hConnect), "Close connect handle failed\n");
1192 ok(InternetCloseHandle(hSession), "Close session handle failed\n");
1193 }
1194
1195 static const char okmsg[] =
1196 "HTTP/1.0 200 OK\r\n"
1197 "Server: winetest\r\n"
1198 "\r\n";
1199
1200 static const char notokmsg[] =
1201 "HTTP/1.0 400 Bad Request\r\n"
1202 "Server: winetest\r\n"
1203 "\r\n";
1204
1205 static const char noauthmsg[] =
1206 "HTTP/1.0 401 Unauthorized\r\n"
1207 "Server: winetest\r\n"
1208 "\r\n";
1209
1210 static const char proxymsg[] =
1211 "HTTP/1.1 407 Proxy Authentication Required\r\n"
1212 "Server: winetest\r\n"
1213 "Proxy-Connection: close\r\n"
1214 "Proxy-Authenticate: Basic realm=\"placebo\"\r\n"
1215 "\r\n";
1216
1217 static const char page1[] =
1218 "<HTML>\r\n"
1219 "<HEAD><TITLE>wininet test page</TITLE></HEAD>\r\n"
1220 "<BODY>The quick brown fox jumped over the lazy dog<P></BODY>\r\n"
1221 "</HTML>\r\n\r\n";
1222
1223 struct server_info {
1224 HANDLE hEvent;
1225 int port;
1226 };
1227
1228 static DWORD CALLBACK server_thread(LPVOID param)
1229 {
1230 struct server_info *si = param;
1231 int r, c, i, on;
1232 SOCKET s;
1233 struct sockaddr_in sa;
1234 char buffer[0x100];
1235 WSADATA wsaData;
1236 int last_request = 0;
1237
1238 WSAStartup(MAKEWORD(1,1), &wsaData);
1239
1240 s = socket(AF_INET, SOCK_STREAM, 0);
1241 if (s == INVALID_SOCKET)
1242 return 1;
1243
1244 on = 1;
1245 setsockopt(s, SOL_SOCKET, SO_REUSEADDR, (char*)&on, sizeof on);
1246
1247 memset(&sa, 0, sizeof sa);
1248 sa.sin_family = AF_INET;
1249 sa.sin_port = htons(si->port);
1250 sa.sin_addr.S_un.S_addr = inet_addr("127.0.0.1");
1251
1252 r = bind(s, (struct sockaddr*) &sa, sizeof sa);
1253 if (r<0)
1254 return 1;
1255
1256 listen(s, 0);
1257
1258 SetEvent(si->hEvent);
1259
1260 do
1261 {
1262 c = accept(s, NULL, NULL);
1263
1264 memset(buffer, 0, sizeof buffer);
1265 for(i=0; i<(sizeof buffer-1); i++)
1266 {
1267 r = recv(c, &buffer[i], 1, 0);
1268 if (r != 1)
1269 break;
1270 if (i<4) continue;
1271 if (buffer[i-2] == '\n' && buffer[i] == '\n' &&
1272 buffer[i-3] == '\r' && buffer[i-1] == '\r')
1273 break;
1274 }
1275
1276 if (strstr(buffer, "GET /test1"))
1277 {
1278 send(c, okmsg, sizeof okmsg-1, 0);
1279 send(c, page1, sizeof page1-1, 0);
1280 }
1281
1282 if (strstr(buffer, "/test2"))
1283 {
1284 if (strstr(buffer, "Proxy-Authorization: Basic bWlrZToxMTAx"))
1285 {
1286 send(c, okmsg, sizeof okmsg-1, 0);
1287 send(c, page1, sizeof page1-1, 0);
1288 }
1289 else
1290 send(c, proxymsg, sizeof proxymsg-1, 0);
1291 }
1292
1293 if (strstr(buffer, "/test3"))
1294 {
1295 if (strstr(buffer, "Authorization: Basic dXNlcjpwd2Q="))
1296 send(c, okmsg, sizeof okmsg-1, 0);
1297 else
1298 send(c, noauthmsg, sizeof noauthmsg-1, 0);
1299 }
1300
1301 if (strstr(buffer, "/test4"))
1302 {
1303 if (strstr(buffer, "Connection: Close"))
1304 send(c, okmsg, sizeof okmsg-1, 0);
1305 else
1306 send(c, notokmsg, sizeof notokmsg-1, 0);
1307 }
1308
1309 if (strstr(buffer, "/test5"))
1310 {
1311 if (strstr(buffer, "Content-Length: 0"))
1312 {
1313 send(c, okmsg, sizeof okmsg-1, 0);
1314 send(c, page1, sizeof page1-1, 0);
1315 }
1316 else
1317 send(c, notokmsg, sizeof notokmsg-1, 0);
1318 }
1319
1320 if (strstr(buffer, "/quit"))
1321 {
1322 send(c, okmsg, sizeof okmsg-1, 0);
1323 send(c, page1, sizeof page1-1, 0);
1324 last_request = 1;
1325 }
1326
1327 shutdown(c, 2);
1328 closesocket(c);
1329 } while (!last_request);
1330
1331 closesocket(s);
1332
1333 return 0;
1334 }
1335
1336 static void test_basic_request(int port, const char *url)
1337 {
1338 HINTERNET hi, hc, hr;
1339 DWORD r, count;
1340 char buffer[0x100];
1341
1342 hi = InternetOpen(NULL, 0, NULL, NULL, 0);
1343 ok(hi != NULL, "open failed\n");
1344
1345 hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1346 ok(hc != NULL, "connect failed\n");
1347
1348 hr = HttpOpenRequest(hc, NULL, url, NULL, NULL, NULL, 0, 0);
1349 ok(hr != NULL, "HttpOpenRequest failed\n");
1350
1351 r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1352 ok(r, "HttpSendRequest failed\n");
1353
1354 count = 0;
1355 memset(buffer, 0, sizeof buffer);
1356 r = InternetReadFile(hr, buffer, sizeof buffer, &count);
1357 ok(r, "InternetReadFile failed\n");
1358 ok(count == sizeof page1 - 1, "count was wrong\n");
1359 ok(!memcmp(buffer, page1, sizeof page1), "http data wrong\n");
1360
1361 InternetCloseHandle(hr);
1362 InternetCloseHandle(hc);
1363 InternetCloseHandle(hi);
1364 }
1365
1366 static void test_proxy_indirect(int port)
1367 {
1368 HINTERNET hi, hc, hr;
1369 DWORD r, sz, val;
1370 char buffer[0x40];
1371
1372 hi = InternetOpen(NULL, 0, NULL, NULL, 0);
1373 ok(hi != NULL, "open failed\n");
1374
1375 hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1376 ok(hc != NULL, "connect failed\n");
1377
1378 hr = HttpOpenRequest(hc, NULL, "/test2", NULL, NULL, NULL, 0, 0);
1379 ok(hr != NULL, "HttpOpenRequest failed\n");
1380
1381 r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1382 ok(r, "HttpSendRequest failed\n");
1383
1384 sz = sizeof buffer;
1385 r = HttpQueryInfo(hr, HTTP_QUERY_PROXY_AUTHENTICATE, buffer, &sz, NULL);
1386 ok(r, "HttpQueryInfo failed\n");
1387 ok(!strcmp(buffer, "Basic realm=\"placebo\""), "proxy auth info wrong\n");
1388
1389 sz = sizeof buffer;
1390 r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1391 ok(r, "HttpQueryInfo failed\n");
1392 ok(!strcmp(buffer, "407"), "proxy code wrong\n");
1393
1394 sz = sizeof val;
1395 r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE|HTTP_QUERY_FLAG_NUMBER, &val, &sz, NULL);
1396 ok(r, "HttpQueryInfo failed\n");
1397 ok(val == 407, "proxy code wrong\n");
1398
1399 sz = sizeof buffer;
1400 r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_TEXT, buffer, &sz, NULL);
1401 ok(r, "HttpQueryInfo failed\n");
1402 ok(!strcmp(buffer, "Proxy Authentication Required"), "proxy text wrong\n");
1403
1404 sz = sizeof buffer;
1405 r = HttpQueryInfo(hr, HTTP_QUERY_VERSION, buffer, &sz, NULL);
1406 ok(r, "HttpQueryInfo failed\n");
1407 ok(!strcmp(buffer, "HTTP/1.1"), "http version wrong\n");
1408
1409 sz = sizeof buffer;
1410 r = HttpQueryInfo(hr, HTTP_QUERY_SERVER, buffer, &sz, NULL);
1411 ok(r, "HttpQueryInfo failed\n");
1412 ok(!strcmp(buffer, "winetest"), "http server wrong\n");
1413
1414 sz = sizeof buffer;
1415 r = HttpQueryInfo(hr, HTTP_QUERY_CONTENT_ENCODING, buffer, &sz, NULL);
1416 ok(GetLastError() == ERROR_HTTP_HEADER_NOT_FOUND, "HttpQueryInfo should fail\n");
1417 ok(r == FALSE, "HttpQueryInfo failed\n");
1418
1419 InternetCloseHandle(hr);
1420 InternetCloseHandle(hc);
1421 InternetCloseHandle(hi);
1422 }
1423
1424 static void test_proxy_direct(int port)
1425 {
1426 HINTERNET hi, hc, hr;
1427 DWORD r, sz;
1428 char buffer[0x40];
1429 static CHAR username[] = "mike",
1430 password[] = "1101";
1431
1432 sprintf(buffer, "localhost:%d\n", port);
1433 hi = InternetOpen(NULL, INTERNET_OPEN_TYPE_PROXY, buffer, NULL, 0);
1434 ok(hi != NULL, "open failed\n");
1435
1436 /* try connect without authorization */
1437 hc = InternetConnect(hi, "www.winehq.org/", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1438 ok(hc != NULL, "connect failed\n");
1439
1440 hr = HttpOpenRequest(hc, NULL, "/test2", NULL, NULL, NULL, 0, 0);
1441 ok(hr != NULL, "HttpOpenRequest failed\n");
1442
1443 r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1444 ok(r, "HttpSendRequest failed\n");
1445
1446 sz = sizeof buffer;
1447 r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1448 ok(r, "HttpQueryInfo failed\n");
1449 ok(!strcmp(buffer, "407"), "proxy code wrong\n");
1450
1451
1452 /* set the user + password then try again */
1453 todo_wine {
1454 r = InternetSetOption(hr, INTERNET_OPTION_PROXY_USERNAME, username, 4);
1455 ok(r, "failed to set user\n");
1456
1457 r = InternetSetOption(hr, INTERNET_OPTION_PROXY_PASSWORD, password, 4);
1458 ok(r, "failed to set password\n");
1459 }
1460
1461 r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1462 ok(r, "HttpSendRequest failed\n");
1463 sz = sizeof buffer;
1464 r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1465 ok(r, "HttpQueryInfo failed\n");
1466 todo_wine {
1467 ok(!strcmp(buffer, "200"), "proxy code wrong\n");
1468 }
1469
1470
1471 InternetCloseHandle(hr);
1472 InternetCloseHandle(hc);
1473 InternetCloseHandle(hi);
1474 }
1475
1476 static void test_header_handling_order(int port)
1477 {
1478 static char authorization[] = "Authorization: Basic dXNlcjpwd2Q=";
1479 static char connection[] = "Connection: Close";
1480
1481 static const char *types[2] = { "*", NULL };
1482 HINTERNET session, connect, request;
1483 DWORD size, status;
1484 BOOL ret;
1485
1486 session = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1487 ok(session != NULL, "InternetOpen failed\n");
1488
1489 connect = InternetConnect(session, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1490 ok(connect != NULL, "InternetConnect failed\n");
1491
1492 request = HttpOpenRequest(connect, NULL, "/test3", NULL, NULL, types, INTERNET_FLAG_KEEP_CONNECTION, 0);
1493 ok(request != NULL, "HttpOpenRequest failed\n");
1494
1495 ret = HttpSendRequest(request, authorization, ~0UL, NULL, 0);
1496 ok(ret, "HttpSendRequest failed\n");
1497
1498 status = 0;
1499 size = sizeof(status);
1500 ret = HttpQueryInfo( request, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
1501 ok(ret, "HttpQueryInfo failed\n");
1502 ok(status == 200, "request failed with status %u\n", status);
1503
1504 InternetCloseHandle(request);
1505
1506 request = HttpOpenRequest(connect, NULL, "/test4", NULL, NULL, types, INTERNET_FLAG_KEEP_CONNECTION, 0);
1507 ok(request != NULL, "HttpOpenRequest failed\n");
1508
1509 ret = HttpSendRequest(request, connection, ~0UL, NULL, 0);
1510 ok(ret, "HttpSendRequest failed\n");
1511
1512 status = 0;
1513 size = sizeof(status);
1514 ret = HttpQueryInfo( request, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
1515 ok(ret, "HttpQueryInfo failed\n");
1516 ok(status == 200, "request failed with status %u\n", status);
1517
1518 InternetCloseHandle(request);
1519 InternetCloseHandle(connect);
1520 InternetCloseHandle(session);
1521 }
1522
1523 static void test_http_connection(void)
1524 {
1525 struct server_info si;
1526 HANDLE hThread;
1527 DWORD id = 0, r;
1528
1529 si.hEvent = CreateEvent(NULL, 0, 0, NULL);
1530 si.port = 7531;
1531
1532 hThread = CreateThread(NULL, 0, server_thread, (LPVOID) &si, 0, &id);
1533 ok( hThread != NULL, "create thread failed\n");
1534
1535 r = WaitForSingleObject(si.hEvent, 10000);
1536 ok (r == WAIT_OBJECT_0, "failed to start wininet test server\n");
1537 if (r != WAIT_OBJECT_0)
1538 return;
1539
1540 test_basic_request(si.port, "/test1");
1541 test_proxy_indirect(si.port);
1542 test_proxy_direct(si.port);
1543 test_header_handling_order(si.port);
1544 test_basic_request(si.port, "/test5");
1545
1546 /* send the basic request again to shutdown the server thread */
1547 test_basic_request(si.port, "/quit");
1548
1549 r = WaitForSingleObject(hThread, 3000);
1550 ok( r == WAIT_OBJECT_0, "thread wait failed\n");
1551 CloseHandle(hThread);
1552 }
1553
1554 #define STATUS_STRING(status) \
1555 memcpy(status_string[status], #status, sizeof(CHAR) * \
1556 (strlen(#status) < MAX_STATUS_NAME ? \
1557 strlen(#status) : \
1558 MAX_STATUS_NAME - 1))
1559 static void init_status_tests(void)
1560 {
1561 memset(expect, 0, sizeof(expect));
1562 memset(wine_allow, 0, sizeof(wine_allow));
1563 memset(notified, 0, sizeof(notified));
1564 memset(status_string, 0, sizeof(status_string));
1565 STATUS_STRING(INTERNET_STATUS_RESOLVING_NAME);
1566 STATUS_STRING(INTERNET_STATUS_NAME_RESOLVED);
1567 STATUS_STRING(INTERNET_STATUS_CONNECTING_TO_SERVER);
1568 STATUS_STRING(INTERNET_STATUS_CONNECTED_TO_SERVER);
1569 STATUS_STRING(INTERNET_STATUS_SENDING_REQUEST);
1570 STATUS_STRING(INTERNET_STATUS_REQUEST_SENT);
1571 STATUS_STRING(INTERNET_STATUS_RECEIVING_RESPONSE);
1572 STATUS_STRING(INTERNET_STATUS_RESPONSE_RECEIVED);
1573 STATUS_STRING(INTERNET_STATUS_CTL_RESPONSE_RECEIVED);
1574 STATUS_STRING(INTERNET_STATUS_PREFETCH);
1575 STATUS_STRING(INTERNET_STATUS_CLOSING_CONNECTION);
1576 STATUS_STRING(INTERNET_STATUS_CONNECTION_CLOSED);
1577 STATUS_STRING(INTERNET_STATUS_HANDLE_CREATED);
1578 STATUS_STRING(INTERNET_STATUS_HANDLE_CLOSING);
1579 STATUS_STRING(INTERNET_STATUS_REQUEST_COMPLETE);
1580 STATUS_STRING(INTERNET_STATUS_REDIRECT);
1581 STATUS_STRING(INTERNET_STATUS_INTERMEDIATE_RESPONSE);
1582 STATUS_STRING(INTERNET_STATUS_USER_INPUT_REQUIRED);
1583 STATUS_STRING(INTERNET_STATUS_STATE_CHANGE);
1584 STATUS_STRING(INTERNET_STATUS_COOKIE_SENT);
1585 STATUS_STRING(INTERNET_STATUS_COOKIE_RECEIVED);
1586 STATUS_STRING(INTERNET_STATUS_PRIVACY_IMPACTED);
1587 STATUS_STRING(INTERNET_STATUS_P3P_HEADER);
1588 STATUS_STRING(INTERNET_STATUS_P3P_POLICYREF);
1589 STATUS_STRING(INTERNET_STATUS_COOKIE_HISTORY);
1590 }
1591 #undef STATUS_STRING
1592
1593 START_TEST(http)
1594 {
1595 HMODULE hdll;
1596 hdll = GetModuleHandleA("wininet.dll");
1597 pInternetSetStatusCallbackA = (void*)GetProcAddress(hdll, "InternetSetStatusCallbackA");
1598 pInternetTimeFromSystemTimeA = (void*)GetProcAddress(hdll, "InternetTimeFromSystemTimeA");
1599 pInternetTimeFromSystemTimeW = (void*)GetProcAddress(hdll, "InternetTimeFromSystemTimeW");
1600 pInternetTimeToSystemTimeA = (void*)GetProcAddress(hdll, "InternetTimeToSystemTimeA");
1601 pInternetTimeToSystemTimeW = (void*)GetProcAddress(hdll, "InternetTimeToSystemTimeW");
1602
1603 if (!pInternetSetStatusCallbackA)
1604 skip("skipping the InternetReadFile tests\n");
1605 else
1606 {
1607 init_status_tests();
1608 InternetReadFile_test(INTERNET_FLAG_ASYNC);
1609 InternetReadFile_test(0);
1610 InternetReadFileExA_test(INTERNET_FLAG_ASYNC);
1611 }
1612 InternetOpenRequest_test();
1613 InternetOpenUrlA_test();
1614 if (!pInternetTimeFromSystemTimeA)
1615 skip("skipping the InternetTime tests\n");
1616 else
1617 {
1618 InternetTimeFromSystemTimeA_test();
1619 InternetTimeFromSystemTimeW_test();
1620 InternetTimeToSystemTimeA_test();
1621 InternetTimeToSystemTimeW_test();
1622 }
1623 HttpSendRequestEx_test();
1624 HttpHeaders_test();
1625 test_http_connection();
1626 }
useful hacks and other patches not (yet) suitable for mainline