?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
push ac8730bd9057ca84ecf262ddc5d43fb7b5849da7
[wine/hacks.git] / dlls / wininet / tests / http.c
blob93752bd1e91ec00a14a91ee556d7ba6443ac4dea
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 #define SET_OPTIONAL2(status, num) \
47 optional[status] = num
48
49 #define SET_OPTIONAL(status) \
50 SET_OPTIONAL2(status, 1)
51
52 /* SET_WINE_ALLOW's should be used with an appropriate
53 * todo_wine CHECK_NOTIFIED at a later point in the code */
54 #define SET_WINE_ALLOW2(status, num) \
55 wine_allow[status] = num
56
57 #define SET_WINE_ALLOW(status) \
58 SET_WINE_ALLOW2(status, 1)
59
60 #define CHECK_EXPECT(status) \
61 do { \
62 if (!expect[status] && !optional[status] && wine_allow[status]) \
63 { \
64 todo_wine ok(expect[status], "unexpected status %d (%s)\n", status, \
65 status < MAX_INTERNET_STATUS && status_string[status][0] != 0 ? \
66 status_string[status] : "unknown"); \
67 wine_allow[status]--; \
68 } \
69 else \
70 { \
71 ok(expect[status] || optional[status], "unexpected status %d (%s)\n", status, \
72 status < MAX_INTERNET_STATUS && status_string[status][0] != 0 ? \
73 status_string[status] : "unknown"); \
74 if (expect[status]) expect[status]--; \
75 else optional[status]--; \
76 } \
77 notified[status]++; \
78 }while(0)
79
80 /* CLEAR_NOTIFIED used in cases when notification behavior
81 * differs between Windows versions */
82 #define CLEAR_NOTIFIED(status) \
83 expect[status] = optional[status] = wine_allow[status] = notified[status] = 0;
84
85 #define CHECK_NOTIFIED2(status, num) \
86 do { \
87 ok(notified[status] == (num), "expected status %d (%s) %d times, received %d times\n", \
88 status, status < MAX_INTERNET_STATUS && status_string[status][0] != 0 ? \
89 status_string[status] : "unknown", (num), notified[status]); \
90 CLEAR_NOTIFIED(status); \
91 }while(0)
92
93 #define CHECK_NOTIFIED(status) \
94 CHECK_NOTIFIED2(status, 1)
95
96 #define CHECK_NOT_NOTIFIED(status) \
97 CHECK_NOTIFIED2(status, 0)
98
99 #define MAX_INTERNET_STATUS (INTERNET_STATUS_COOKIE_HISTORY+1)
100 #define MAX_STATUS_NAME 50
101 static int expect[MAX_INTERNET_STATUS], optional[MAX_INTERNET_STATUS],
102 wine_allow[MAX_INTERNET_STATUS], notified[MAX_INTERNET_STATUS];
103 static CHAR status_string[MAX_INTERNET_STATUS][MAX_STATUS_NAME];
104
105 static HANDLE hCompleteEvent;
106
107 static INTERNET_STATUS_CALLBACK (WINAPI *pInternetSetStatusCallbackA)(HINTERNET ,INTERNET_STATUS_CALLBACK);
108
109
110 static VOID WINAPI callback(
111 HINTERNET hInternet,
112 DWORD_PTR dwContext,
113 DWORD dwInternetStatus,
114 LPVOID lpvStatusInformation,
115 DWORD dwStatusInformationLength
116 )
117 {
118 CHECK_EXPECT(dwInternetStatus);
119 switch (dwInternetStatus)
120 {
121 case INTERNET_STATUS_RESOLVING_NAME:
122 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RESOLVING_NAME \"%s\" %d\n",
123 GetCurrentThreadId(), hInternet, dwContext,
124 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
125 *(LPSTR)lpvStatusInformation = '\0';
126 break;
127 case INTERNET_STATUS_NAME_RESOLVED:
128 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_NAME_RESOLVED \"%s\" %d\n",
129 GetCurrentThreadId(), hInternet, dwContext,
130 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
131 *(LPSTR)lpvStatusInformation = '\0';
132 break;
133 case INTERNET_STATUS_CONNECTING_TO_SERVER:
134 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTING_TO_SERVER \"%s\" %d\n",
135 GetCurrentThreadId(), hInternet, dwContext,
136 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
137 *(LPSTR)lpvStatusInformation = '\0';
138 break;
139 case INTERNET_STATUS_CONNECTED_TO_SERVER:
140 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTED_TO_SERVER \"%s\" %d\n",
141 GetCurrentThreadId(), hInternet, dwContext,
142 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
143 *(LPSTR)lpvStatusInformation = '\0';
144 break;
145 case INTERNET_STATUS_SENDING_REQUEST:
146 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_SENDING_REQUEST %p %d\n",
147 GetCurrentThreadId(), hInternet, dwContext,
148 lpvStatusInformation,dwStatusInformationLength);
149 break;
150 case INTERNET_STATUS_REQUEST_SENT:
151 ok(dwStatusInformationLength == sizeof(DWORD),
152 "info length should be sizeof(DWORD) instead of %d\n",
153 dwStatusInformationLength);
154 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REQUEST_SENT 0x%x %d\n",
155 GetCurrentThreadId(), hInternet, dwContext,
156 *(DWORD *)lpvStatusInformation,dwStatusInformationLength);
157 break;
158 case INTERNET_STATUS_RECEIVING_RESPONSE:
159 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RECEIVING_RESPONSE %p %d\n",
160 GetCurrentThreadId(), hInternet, dwContext,
161 lpvStatusInformation,dwStatusInformationLength);
162 break;
163 case INTERNET_STATUS_RESPONSE_RECEIVED:
164 ok(dwStatusInformationLength == sizeof(DWORD),
165 "info length should be sizeof(DWORD) instead of %d\n",
166 dwStatusInformationLength);
167 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RESPONSE_RECEIVED 0x%x %d\n",
168 GetCurrentThreadId(), hInternet, dwContext,
169 *(DWORD *)lpvStatusInformation,dwStatusInformationLength);
170 break;
171 case INTERNET_STATUS_CTL_RESPONSE_RECEIVED:
172 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CTL_RESPONSE_RECEIVED %p %d\n",
173 GetCurrentThreadId(), hInternet,dwContext,
174 lpvStatusInformation,dwStatusInformationLength);
175 break;
176 case INTERNET_STATUS_PREFETCH:
177 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_PREFETCH %p %d\n",
178 GetCurrentThreadId(), hInternet, dwContext,
179 lpvStatusInformation,dwStatusInformationLength);
180 break;
181 case INTERNET_STATUS_CLOSING_CONNECTION:
182 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CLOSING_CONNECTION %p %d\n",
183 GetCurrentThreadId(), hInternet, dwContext,
184 lpvStatusInformation,dwStatusInformationLength);
185 break;
186 case INTERNET_STATUS_CONNECTION_CLOSED:
187 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTION_CLOSED %p %d\n",
188 GetCurrentThreadId(), hInternet, dwContext,
189 lpvStatusInformation,dwStatusInformationLength);
190 break;
191 case INTERNET_STATUS_HANDLE_CREATED:
192 ok(dwStatusInformationLength == sizeof(HINTERNET),
193 "info length should be sizeof(HINTERNET) instead of %d\n",
194 dwStatusInformationLength);
195 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_HANDLE_CREATED %p %d\n",
196 GetCurrentThreadId(), hInternet, dwContext,
197 *(HINTERNET *)lpvStatusInformation,dwStatusInformationLength);
198 CLEAR_NOTIFIED(INTERNET_STATUS_DETECTING_PROXY);
199 SET_EXPECT(INTERNET_STATUS_DETECTING_PROXY);
200 break;
201 case INTERNET_STATUS_HANDLE_CLOSING:
202 ok(dwStatusInformationLength == sizeof(HINTERNET),
203 "info length should be sizeof(HINTERNET) instead of %d\n",
204 dwStatusInformationLength);
205 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_HANDLE_CLOSING %p %d\n",
206 GetCurrentThreadId(), hInternet, dwContext,
207 *(HINTERNET *)lpvStatusInformation, dwStatusInformationLength);
208 break;
209 case INTERNET_STATUS_REQUEST_COMPLETE:
210 {
211 INTERNET_ASYNC_RESULT *iar = (INTERNET_ASYNC_RESULT *)lpvStatusInformation;
212 ok(dwStatusInformationLength == sizeof(INTERNET_ASYNC_RESULT),
213 "info length should be sizeof(INTERNET_ASYNC_RESULT) instead of %d\n",
214 dwStatusInformationLength);
215 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REQUEST_COMPLETE {%ld,%d} %d\n",
216 GetCurrentThreadId(), hInternet, dwContext,
217 iar->dwResult,iar->dwError,dwStatusInformationLength);
218 SetEvent(hCompleteEvent);
219 break;
220 }
221 case INTERNET_STATUS_REDIRECT:
222 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REDIRECT \"%s\" %d\n",
223 GetCurrentThreadId(), hInternet, dwContext,
224 (LPCSTR)lpvStatusInformation, dwStatusInformationLength);
225 *(LPSTR)lpvStatusInformation = '\0';
226 CLEAR_NOTIFIED(INTERNET_STATUS_DETECTING_PROXY);
227 SET_EXPECT(INTERNET_STATUS_DETECTING_PROXY);
228 break;
229 case INTERNET_STATUS_INTERMEDIATE_RESPONSE:
230 trace("%04x:Callback %p 0x%lx INTERNET_STATUS_INTERMEDIATE_RESPONSE %p %d\n",
231 GetCurrentThreadId(), hInternet, dwContext,
232 lpvStatusInformation, dwStatusInformationLength);
233 break;
234 default:
235 trace("%04x:Callback %p 0x%lx %d %p %d\n",
236 GetCurrentThreadId(), hInternet, dwContext, dwInternetStatus,
237 lpvStatusInformation, dwStatusInformationLength);
238 }
239 }
240
241 static void InternetReadFile_test(int flags)
242 {
243 BOOL res;
244 CHAR buffer[4000];
245 DWORD length;
246 DWORD out;
247 const char *types[2] = { "*", NULL };
248 HINTERNET hi, hic = 0, hor = 0;
249
250 hCompleteEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
251
252 trace("Starting InternetReadFile test with flags 0x%x\n",flags);
253
254 trace("InternetOpenA <--\n");
255 hi = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, flags);
256 ok((hi != 0x0),"InternetOpen failed with error %u\n", GetLastError());
257 trace("InternetOpenA -->\n");
258
259 if (hi == 0x0) goto abort;
260
261 pInternetSetStatusCallbackA(hi,&callback);
262
263 SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
264
265 trace("InternetConnectA <--\n");
266 hic=InternetConnectA(hi, "www.winehq.org", INTERNET_INVALID_PORT_NUMBER,
267 NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
268 ok((hic != 0x0),"InternetConnect failed with error %u\n", GetLastError());
269 trace("InternetConnectA -->\n");
270
271 if (hic == 0x0) goto abort;
272
273 CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
274 SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
275
276 trace("HttpOpenRequestA <--\n");
277 hor = HttpOpenRequestA(hic, "GET", "/about/", NULL, NULL, types,
278 INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
279 0xdeadbead);
280 if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
281 /*
282 * If the internet name can't be resolved we are probably behind
283 * a firewall or in some other way not directly connected to the
284 * Internet. Not enough reason to fail the test. Just ignore and
285 * abort.
286 */
287 } else {
288 ok((hor != 0x0),"HttpOpenRequest failed with error %u\n", GetLastError());
289 }
290 trace("HttpOpenRequestA -->\n");
291
292 if (hor == 0x0) goto abort;
293
294 length = sizeof(buffer);
295 res = InternetQueryOptionA(hor, INTERNET_OPTION_URL, buffer, &length);
296 ok(res, "InternetQueryOptionA(INTERNET_OPTION_URL) failed: %u\n", GetLastError());
297 ok(!strcmp(buffer, "http://www.winehq.org/about/"), "Wrong URL %s\n", buffer);
298
299 length = sizeof(buffer);
300 res = HttpQueryInfoA(hor, HTTP_QUERY_RAW_HEADERS, buffer, &length, 0x0);
301 ok(res, "HttpQueryInfoA(HTTP_QUERY_RAW_HEADERS) failed with error %d\n", GetLastError());
302 ok(length == 0, "HTTP_QUERY_RAW_HEADERS: expected length 0, but got %d\n", length);
303 ok(!strcmp(buffer, ""), "HTTP_QUERY_RAW_HEADERS: expected string \"\", but got \"%s\"\n", buffer);
304
305 CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
306 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
307 CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
308 if (first_connection_to_test_url)
309 {
310 SET_EXPECT(INTERNET_STATUS_RESOLVING_NAME);
311 SET_EXPECT(INTERNET_STATUS_NAME_RESOLVED);
312 SET_WINE_ALLOW(INTERNET_STATUS_RESOLVING_NAME);
313 SET_WINE_ALLOW(INTERNET_STATUS_NAME_RESOLVED);
314 }
315 else
316 {
317 SET_WINE_ALLOW2(INTERNET_STATUS_RESOLVING_NAME,2);
318 SET_WINE_ALLOW2(INTERNET_STATUS_NAME_RESOLVED,2);
319 }
320 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTING_TO_SERVER);
321 SET_EXPECT(INTERNET_STATUS_CONNECTING_TO_SERVER);
322 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTED_TO_SERVER);
323 SET_EXPECT(INTERNET_STATUS_CONNECTED_TO_SERVER);
324 SET_EXPECT2(INTERNET_STATUS_SENDING_REQUEST, 2);
325 SET_EXPECT2(INTERNET_STATUS_REQUEST_SENT, 2);
326 SET_EXPECT2(INTERNET_STATUS_RECEIVING_RESPONSE, 2);
327 SET_EXPECT2(INTERNET_STATUS_RESPONSE_RECEIVED, 2);
328 SET_OPTIONAL(INTERNET_STATUS_CLOSING_CONNECTION);
329 SET_OPTIONAL(INTERNET_STATUS_CONNECTION_CLOSED);
330 SET_EXPECT(INTERNET_STATUS_REDIRECT);
331 SET_OPTIONAL(INTERNET_STATUS_CONNECTING_TO_SERVER);
332 SET_OPTIONAL(INTERNET_STATUS_CONNECTED_TO_SERVER);
333 if (flags & INTERNET_FLAG_ASYNC)
334 SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
335 else
336 SET_WINE_ALLOW(INTERNET_STATUS_REQUEST_COMPLETE);
337
338 trace("HttpSendRequestA -->\n");
339 SetLastError(0xdeadbeef);
340 res = HttpSendRequestA(hor, "", -1, NULL, 0);
341 if (flags & INTERNET_FLAG_ASYNC)
342 ok(!res && (GetLastError() == ERROR_IO_PENDING),
343 "Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
344 else
345 ok(res || (GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED),
346 "Synchronous HttpSendRequest returning 0, error %u\n", GetLastError());
347 trace("HttpSendRequestA <--\n");
348
349 if (flags & INTERNET_FLAG_ASYNC)
350 WaitForSingleObject(hCompleteEvent, INFINITE);
351
352 todo_wine if (first_connection_to_test_url)
353 {
354 CHECK_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
355 CHECK_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
356 }
357 else
358 {
359 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
360 CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
361 }
362 CHECK_NOTIFIED2(INTERNET_STATUS_SENDING_REQUEST, 2);
363 CHECK_NOTIFIED2(INTERNET_STATUS_REQUEST_SENT, 2);
364 CHECK_NOTIFIED2(INTERNET_STATUS_RECEIVING_RESPONSE, 2);
365 CHECK_NOTIFIED2(INTERNET_STATUS_RESPONSE_RECEIVED, 2);
366 CHECK_NOTIFIED(INTERNET_STATUS_REDIRECT);
367 if (flags & INTERNET_FLAG_ASYNC)
368 CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
369 else
370 todo_wine CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
371 /* Sent on WinXP only if first_connection_to_test_url is TRUE, on Win98 always sent */
372 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTING_TO_SERVER);
373 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTED_TO_SERVER);
374
375 length = 4;
376 res = InternetQueryOptionA(hor,INTERNET_OPTION_REQUEST_FLAGS,&out,&length);
377 ok(res, "InternetQueryOptionA(INTERNET_OPTION_REQUEST) failed with error %d\n", GetLastError());
378
379 length = 100;
380 res = InternetQueryOptionA(hor,INTERNET_OPTION_URL,buffer,&length);
381 ok(res, "InternetQueryOptionA(INTERNET_OPTION_URL) failed with error %d\n", GetLastError());
382
383 length = sizeof(buffer);
384 res = HttpQueryInfoA(hor,HTTP_QUERY_RAW_HEADERS,buffer,&length,0x0);
385 ok(res, "HttpQueryInfoA(HTTP_QUERY_RAW_HEADERS) failed with error %d\n", GetLastError());
386 buffer[length]=0;
387
388 length = sizeof(buffer);
389 res = InternetQueryOptionA(hor, INTERNET_OPTION_URL, buffer, &length);
390 ok(res, "InternetQueryOptionA(INTERNET_OPTION_URL) failed: %u\n", GetLastError());
391 ok(!strcmp(buffer, "http://www.winehq.org/site/about"), "Wrong URL %s\n", buffer);
392
393 length = 16;
394 res = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_LENGTH,&buffer,&length,0x0);
395 trace("Option 0x5 -> %i %s (%u)\n",res,buffer,GetLastError());
396
397 length = 100;
398 res = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_TYPE,buffer,&length,0x0);
399 buffer[length]=0;
400 trace("Option 0x1 -> %i %s\n",res,buffer);
401
402 SetLastError(0xdeadbeef);
403 res = InternetReadFile(NULL, buffer, 100, &length);
404 ok(!res, "InternetReadFile should have failed\n");
405 ok(GetLastError() == ERROR_INVALID_HANDLE,
406 "InternetReadFile should have set last error to ERROR_INVALID_HANDLE instead of %u\n",
407 GetLastError());
408
409 length = 100;
410 trace("Entering Query loop\n");
411
412 SET_EXPECT(INTERNET_STATUS_CLOSING_CONNECTION);
413 SET_EXPECT(INTERNET_STATUS_CONNECTION_CLOSED);
414 while (TRUE)
415 {
416 if (flags & INTERNET_FLAG_ASYNC)
417 SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
418 res = InternetQueryDataAvailable(hor,&length,0x0,0x0);
419 ok(!(!res && length != 0),"InternetQueryDataAvailable failed with non-zero length\n");
420 ok(res || ((flags & INTERNET_FLAG_ASYNC) && GetLastError() == ERROR_IO_PENDING),
421 "InternetQueryDataAvailable failed, error %d\n", GetLastError());
422 if (flags & INTERNET_FLAG_ASYNC)
423 {
424 if (res)
425 {
426 CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
427 }
428 else if (GetLastError() == ERROR_IO_PENDING)
429 {
430 WaitForSingleObject(hCompleteEvent, INFINITE);
431 CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
432 continue;
433 }
434 }
435 if (length)
436 {
437 char *buffer;
438 buffer = HeapAlloc(GetProcessHeap(),0,length+1);
439
440 res = InternetReadFile(hor,buffer,length,&length);
441
442 buffer[length]=0;
443
444 trace("ReadFile -> %s %i\n",res?"TRUE":"FALSE",length);
445
446 HeapFree(GetProcessHeap(),0,buffer);
447 }
448 if (length == 0)
449 break;
450 }
451 /* WinXP does not send, but Win98 does */
452 CLEAR_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
453 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
454 abort:
455 SET_EXPECT2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
456 if (hor != 0x0) {
457 SET_WINE_ALLOW(INTERNET_STATUS_CLOSING_CONNECTION);
458 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTION_CLOSED);
459 SetLastError(0xdeadbeef);
460 res = InternetCloseHandle(hor);
461 ok (res, "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
462 SetLastError(0xdeadbeef);
463 res = InternetCloseHandle(hor);
464 ok (!res, "Double close of handle opened by HttpOpenRequestA succeeded\n");
465 ok (GetLastError() == ERROR_INVALID_HANDLE,
466 "Double close of handle should have set ERROR_INVALID_HANDLE instead of %u\n",
467 GetLastError());
468 }
469 /* We intentionally do not close the handle opened by InternetConnectA as this
470 * tickles bug #9479: native closes child internet handles when the parent handles
471 * are closed. This is verified below by checking that the number of
472 * INTERNET_STATUS_HANDLE_CLOSING notifications matches the number expected. */
473 if (hi != 0x0) {
474 SET_WINE_ALLOW(INTERNET_STATUS_HANDLE_CLOSING);
475 res = InternetCloseHandle(hi);
476 ok (res, "InternetCloseHandle of handle opened by InternetOpenA failed\n");
477 if (flags & INTERNET_FLAG_ASYNC)
478 Sleep(100);
479 }
480 CHECK_NOTIFIED2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
481 if (hor != 0x0 && (flags & INTERNET_FLAG_ASYNC)) todo_wine
482 {
483 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
484 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
485 }
486 else
487 {
488 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
489 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
490 }
491 CloseHandle(hCompleteEvent);
492 first_connection_to_test_url = FALSE;
493 }
494
495 static void InternetReadFileExA_test(int flags)
496 {
497 DWORD rc;
498 DWORD length;
499 const char *types[2] = { "*", NULL };
500 HINTERNET hi, hic = 0, hor = 0;
501 INTERNET_BUFFERS inetbuffers;
502
503 hCompleteEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
504
505 trace("Starting InternetReadFileExA test with flags 0x%x\n",flags);
506
507 trace("InternetOpenA <--\n");
508 hi = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, flags);
509 ok((hi != 0x0),"InternetOpen failed with error %u\n", GetLastError());
510 trace("InternetOpenA -->\n");
511
512 if (hi == 0x0) goto abort;
513
514 pInternetSetStatusCallbackA(hi,&callback);
515
516 SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
517
518 trace("InternetConnectA <--\n");
519 hic=InternetConnectA(hi, "www.winehq.org", INTERNET_INVALID_PORT_NUMBER,
520 NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
521 ok((hic != 0x0),"InternetConnect failed with error %u\n", GetLastError());
522 trace("InternetConnectA -->\n");
523
524 if (hic == 0x0) goto abort;
525
526 CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
527 SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
528
529 trace("HttpOpenRequestA <--\n");
530 hor = HttpOpenRequestA(hic, "GET", "/about/", NULL, NULL, types,
531 INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
532 0xdeadbead);
533 if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
534 /*
535 * If the internet name can't be resolved we are probably behind
536 * a firewall or in some other way not directly connected to the
537 * Internet. Not enough reason to fail the test. Just ignore and
538 * abort.
539 */
540 } else {
541 ok((hor != 0x0),"HttpOpenRequest failed with error %u\n", GetLastError());
542 }
543 trace("HttpOpenRequestA -->\n");
544
545 if (hor == 0x0) goto abort;
546
547 CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
548 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
549 CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
550 if (first_connection_to_test_url)
551 {
552 SET_EXPECT(INTERNET_STATUS_RESOLVING_NAME);
553 SET_EXPECT(INTERNET_STATUS_NAME_RESOLVED);
554 SET_WINE_ALLOW(INTERNET_STATUS_RESOLVING_NAME);
555 SET_WINE_ALLOW(INTERNET_STATUS_NAME_RESOLVED);
556 }
557 else
558 {
559 SET_WINE_ALLOW2(INTERNET_STATUS_RESOLVING_NAME,2);
560 SET_WINE_ALLOW2(INTERNET_STATUS_NAME_RESOLVED,2);
561 }
562 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTING_TO_SERVER);
563 SET_EXPECT(INTERNET_STATUS_CONNECTING_TO_SERVER);
564 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTED_TO_SERVER);
565 SET_EXPECT(INTERNET_STATUS_CONNECTED_TO_SERVER);
566 SET_EXPECT2(INTERNET_STATUS_SENDING_REQUEST, 2);
567 SET_EXPECT2(INTERNET_STATUS_REQUEST_SENT, 2);
568 SET_EXPECT2(INTERNET_STATUS_RECEIVING_RESPONSE, 2);
569 SET_EXPECT2(INTERNET_STATUS_RESPONSE_RECEIVED, 2);
570 SET_OPTIONAL(INTERNET_STATUS_CLOSING_CONNECTION);
571 SET_OPTIONAL(INTERNET_STATUS_CONNECTION_CLOSED);
572 SET_EXPECT(INTERNET_STATUS_REDIRECT);
573 SET_OPTIONAL(INTERNET_STATUS_CONNECTING_TO_SERVER);
574 SET_OPTIONAL(INTERNET_STATUS_CONNECTED_TO_SERVER);
575 if (flags & INTERNET_FLAG_ASYNC)
576 SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
577 else
578 SET_WINE_ALLOW(INTERNET_STATUS_REQUEST_COMPLETE);
579
580 trace("HttpSendRequestA -->\n");
581 SetLastError(0xdeadbeef);
582 rc = HttpSendRequestA(hor, "", -1, NULL, 0);
583 if (flags & INTERNET_FLAG_ASYNC)
584 ok(((rc == 0)&&(GetLastError() == ERROR_IO_PENDING)),
585 "Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
586 else
587 ok((rc != 0) || GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED,
588 "Synchronous HttpSendRequest returning 0, error %u\n", GetLastError());
589 trace("HttpSendRequestA <--\n");
590
591 if (!rc && (GetLastError() == ERROR_IO_PENDING))
592 WaitForSingleObject(hCompleteEvent, INFINITE);
593
594 if (first_connection_to_test_url)
595 {
596 CHECK_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
597 CHECK_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
598 }
599 else todo_wine
600 {
601 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
602 CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
603 }
604 CHECK_NOTIFIED2(INTERNET_STATUS_SENDING_REQUEST, 2);
605 CHECK_NOTIFIED2(INTERNET_STATUS_REQUEST_SENT, 2);
606 CHECK_NOTIFIED2(INTERNET_STATUS_RECEIVING_RESPONSE, 2);
607 CHECK_NOTIFIED2(INTERNET_STATUS_RESPONSE_RECEIVED, 2);
608 CHECK_NOTIFIED(INTERNET_STATUS_REDIRECT);
609 if (flags & INTERNET_FLAG_ASYNC)
610 CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
611 else
612 todo_wine CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
613 /* Sent on WinXP only if first_connection_to_test_url is TRUE, on Win98 always sent */
614 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTING_TO_SERVER);
615 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTED_TO_SERVER);
616
617 /* tests invalid dwStructSize */
618 inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS)+1;
619 inetbuffers.lpcszHeader = NULL;
620 inetbuffers.dwHeadersLength = 0;
621 inetbuffers.dwBufferLength = 10;
622 inetbuffers.lpvBuffer = HeapAlloc(GetProcessHeap(), 0, 10);
623 inetbuffers.dwOffsetHigh = 1234;
624 inetbuffers.dwOffsetLow = 5678;
625 rc = InternetReadFileEx(hor, &inetbuffers, 0, 0xdeadcafe);
626 ok(!rc && (GetLastError() == ERROR_INVALID_PARAMETER),
627 "InternetReadFileEx should have failed with ERROR_INVALID_PARAMETER instead of %s, %u\n",
628 rc ? "TRUE" : "FALSE", GetLastError());
629 HeapFree(GetProcessHeap(), 0, inetbuffers.lpvBuffer);
630
631 /* tests to see whether lpcszHeader is used - it isn't */
632 inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS);
633 inetbuffers.lpcszHeader = (LPCTSTR)0xdeadbeef;
634 inetbuffers.dwHeadersLength = 255;
635 inetbuffers.dwBufferLength = 0;
636 inetbuffers.lpvBuffer = NULL;
637 inetbuffers.dwOffsetHigh = 1234;
638 inetbuffers.dwOffsetLow = 5678;
639 SET_WINE_ALLOW(INTERNET_STATUS_RECEIVING_RESPONSE);
640 SET_WINE_ALLOW(INTERNET_STATUS_RESPONSE_RECEIVED);
641 SET_WINE_ALLOW(INTERNET_STATUS_CLOSING_CONNECTION);
642 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTION_CLOSED);
643 rc = InternetReadFileEx(hor, &inetbuffers, 0, 0xdeadcafe);
644 ok(rc, "InternetReadFileEx failed with error %u\n", GetLastError());
645 trace("read %i bytes\n", inetbuffers.dwBufferLength);
646 todo_wine
647 {
648 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
649 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
650 }
651
652 rc = InternetReadFileEx(NULL, &inetbuffers, 0, 0xdeadcafe);
653 ok(!rc && (GetLastError() == ERROR_INVALID_HANDLE),
654 "InternetReadFileEx should have failed with ERROR_INVALID_HANDLE instead of %s, %u\n",
655 rc ? "TRUE" : "FALSE", GetLastError());
656
657 length = 0;
658 trace("Entering Query loop\n");
659
660 SET_EXPECT(INTERNET_STATUS_CLOSING_CONNECTION);
661 SET_EXPECT(INTERNET_STATUS_CONNECTION_CLOSED);
662 while (TRUE)
663 {
664 inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS);
665 inetbuffers.dwBufferLength = 1024;
666 inetbuffers.lpvBuffer = HeapAlloc(GetProcessHeap(), 0, inetbuffers.dwBufferLength+1);
667 inetbuffers.dwOffsetHigh = 1234;
668 inetbuffers.dwOffsetLow = 5678;
669
670 SET_EXPECT(INTERNET_STATUS_RECEIVING_RESPONSE);
671 SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
672 SET_EXPECT(INTERNET_STATUS_RESPONSE_RECEIVED);
673 rc = InternetReadFileExA(hor, &inetbuffers, IRF_ASYNC | IRF_USE_CONTEXT, 0xcafebabe);
674 if (!rc)
675 {
676 if (GetLastError() == ERROR_IO_PENDING)
677 {
678 trace("InternetReadFileEx -> PENDING\n");
679 ok(flags & INTERNET_FLAG_ASYNC,
680 "Should not get ERROR_IO_PENDING without INTERNET_FLAG_ASYNC\n");
681 CHECK_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
682 WaitForSingleObject(hCompleteEvent, INFINITE);
683 CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
684 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
685 }
686 else
687 {
688 trace("InternetReadFileEx -> FAILED %u\n", GetLastError());
689 break;
690 }
691 }
692 else
693 {
694 trace("InternetReadFileEx -> SUCCEEDED\n");
695 CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
696 if (inetbuffers.dwBufferLength)
697 {
698 CHECK_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
699 CHECK_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
700 }
701 else
702 {
703 /* Win98 still sends these when 0 bytes are read, WinXP does not */
704 CLEAR_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
705 CLEAR_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
706 }
707 }
708
709 trace("read %i bytes\n", inetbuffers.dwBufferLength);
710 ((char *)inetbuffers.lpvBuffer)[inetbuffers.dwBufferLength] = '\0';
711
712 ok(inetbuffers.dwOffsetHigh == 1234 && inetbuffers.dwOffsetLow == 5678,
713 "InternetReadFileEx sets offsets to 0x%x%08x\n",
714 inetbuffers.dwOffsetHigh, inetbuffers.dwOffsetLow);
715
716 HeapFree(GetProcessHeap(), 0, inetbuffers.lpvBuffer);
717
718 if (!inetbuffers.dwBufferLength)
719 break;
720
721 length += inetbuffers.dwBufferLength;
722 }
723 todo_wine ok(length > 0, "failed to read any of the document\n");
724 trace("Finished. Read %d bytes\n", length);
725
726 /* WinXP does not send, but Win98 does */
727 CLEAR_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
728 CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
729 abort:
730 SET_EXPECT2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
731 if (hor) {
732 SET_WINE_ALLOW(INTERNET_STATUS_CLOSING_CONNECTION);
733 SET_WINE_ALLOW(INTERNET_STATUS_CONNECTION_CLOSED);
734 rc = InternetCloseHandle(hor);
735 ok ((rc != 0), "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
736 rc = InternetCloseHandle(hor);
737 ok ((rc == 0), "Double close of handle opened by HttpOpenRequestA succeeded\n");
738 }
739 if (hic) {
740 rc = InternetCloseHandle(hic);
741 ok ((rc != 0), "InternetCloseHandle of handle opened by InternetConnectA failed\n");
742 }
743 if (hi) {
744 SET_WINE_ALLOW(INTERNET_STATUS_HANDLE_CLOSING);
745 rc = InternetCloseHandle(hi);
746 ok ((rc != 0), "InternetCloseHandle of handle opened by InternetOpenA failed\n");
747 if (flags & INTERNET_FLAG_ASYNC)
748 Sleep(100);
749 CHECK_NOTIFIED2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
750 }
751 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
752 CHECK_NOT_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
753 CloseHandle(hCompleteEvent);
754 first_connection_to_test_url = FALSE;
755 }
756
757 static void InternetOpenUrlA_test(void)
758 {
759 HINTERNET myhinternet, myhttp;
760 char buffer[0x400];
761 DWORD size, readbytes, totalbytes=0;
762 BOOL ret;
763
764 myhinternet = InternetOpen("Winetest",0,NULL,NULL,INTERNET_FLAG_NO_CACHE_WRITE);
765 ok((myhinternet != 0), "InternetOpen failed, error %u\n",GetLastError());
766 size = 0x400;
767 ret = InternetCanonicalizeUrl(TEST_URL, buffer, &size,ICU_BROWSER_MODE);
768 ok( ret, "InternetCanonicalizeUrl failed, error %u\n",GetLastError());
769
770 SetLastError(0);
771 myhttp = InternetOpenUrl(myhinternet, TEST_URL, 0, 0,
772 INTERNET_FLAG_RELOAD|INTERNET_FLAG_NO_CACHE_WRITE|INTERNET_FLAG_TRANSFER_BINARY,0);
773 if (GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
774 return; /* WinXP returns this when not connected to the net */
775 ok((myhttp != 0),"InternetOpenUrl failed, error %u\n",GetLastError());
776 ret = InternetReadFile(myhttp, buffer,0x400,&readbytes);
777 ok( ret, "InternetReadFile failed, error %u\n",GetLastError());
778 totalbytes += readbytes;
779 while (readbytes && InternetReadFile(myhttp, buffer,0x400,&readbytes))
780 totalbytes += readbytes;
781 trace("read 0x%08x bytes\n",totalbytes);
782
783 InternetCloseHandle(myhttp);
784 InternetCloseHandle(myhinternet);
785 }
786
787 static void HttpSendRequestEx_test(void)
788 {
789 HINTERNET hSession;
790 HINTERNET hConnect;
791 HINTERNET hRequest;
792
793 INTERNET_BUFFERS BufferIn;
794 DWORD dwBytesWritten;
795 DWORD dwBytesRead;
796 CHAR szBuffer[256];
797 int i;
798 BOOL ret;
799
800 static char szPostData[] = "mode=Test";
801 static const char szContentType[] = "Content-Type: application/x-www-form-urlencoded";
802
803 hSession = InternetOpen("Wine Regression Test",
804 INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,0);
805 ok( hSession != NULL ,"Unable to open Internet session\n");
806 hConnect = InternetConnect(hSession, "crossover.codeweavers.com",
807 INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0,
808 0);
809 ok( hConnect != NULL, "Unable to connect to http://crossover.codeweavers.com\n");
810 hRequest = HttpOpenRequest(hConnect, "POST", "/posttest.php",
811 NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
812 if (!hRequest && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
813 {
814 skip( "Network unreachable, skipping test\n" );
815 goto done;
816 }
817 ok( hRequest != NULL, "Failed to open request handle err %u\n", GetLastError());
818
819
820 BufferIn.dwStructSize = sizeof( INTERNET_BUFFERS);
821 BufferIn.Next = (LPINTERNET_BUFFERS)0xdeadcab;
822 BufferIn.lpcszHeader = szContentType;
823 BufferIn.dwHeadersLength = sizeof(szContentType)-1;
824 BufferIn.dwHeadersTotal = sizeof(szContentType)-1;
825 BufferIn.lpvBuffer = szPostData;
826 BufferIn.dwBufferLength = 3;
827 BufferIn.dwBufferTotal = sizeof(szPostData)-1;
828 BufferIn.dwOffsetLow = 0;
829 BufferIn.dwOffsetHigh = 0;
830
831 ret = HttpSendRequestEx(hRequest, &BufferIn, NULL, 0 ,0);
832 ok(ret, "HttpSendRequestEx Failed with error %u\n", GetLastError());
833
834 for (i = 3; szPostData[i]; i++)
835 ok(InternetWriteFile(hRequest, &szPostData[i], 1, &dwBytesWritten),
836 "InternetWriteFile failed\n");
837
838 ok(HttpEndRequest(hRequest, NULL, 0, 0), "HttpEndRequest Failed\n");
839
840 ok(InternetReadFile(hRequest, szBuffer, 255, &dwBytesRead),
841 "Unable to read response\n");
842 szBuffer[dwBytesRead] = 0;
843
844 ok(dwBytesRead == 13,"Read %u bytes instead of 13\n",dwBytesRead);
845 ok(strncmp(szBuffer,"mode => Test\n",dwBytesRead)==0,"Got string %s\n",szBuffer);
846
847 ok(InternetCloseHandle(hRequest), "Close request handle failed\n");
848 done:
849 ok(InternetCloseHandle(hConnect), "Close connect handle failed\n");
850 ok(InternetCloseHandle(hSession), "Close session handle failed\n");
851 }
852
853 static void InternetOpenRequest_test(void)
854 {
855 HINTERNET session, connect, request;
856 static const char *types[] = { "*", "", NULL };
857 static const WCHAR slash[] = {'/', 0}, any[] = {'*', 0}, empty[] = {0};
858 static const WCHAR *typesW[] = { any, empty, NULL };
859 BOOL ret;
860
861 session = InternetOpenA("Wine Regression Test", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
862 ok(session != NULL ,"Unable to open Internet session\n");
863
864 connect = InternetConnectA(session, NULL, INTERNET_DEFAULT_HTTP_PORT, NULL, NULL,
865 INTERNET_SERVICE_HTTP, 0, 0);
866 ok(connect == NULL, "InternetConnectA should have failed\n");
867 ok(GetLastError() == ERROR_INVALID_PARAMETER, "InternetConnectA with NULL server named should have failed with ERROR_INVALID_PARAMETER instead of %d\n", GetLastError());
868
869 connect = InternetConnectA(session, "", INTERNET_DEFAULT_HTTP_PORT, NULL, NULL,
870 INTERNET_SERVICE_HTTP, 0, 0);
871 ok(connect == NULL, "InternetConnectA should have failed\n");
872 ok(GetLastError() == ERROR_INVALID_PARAMETER, "InternetConnectA with blank server named should have failed with ERROR_INVALID_PARAMETER instead of %d\n", GetLastError());
873
874 connect = InternetConnectA(session, "winehq.org", INTERNET_DEFAULT_HTTP_PORT, NULL, NULL,
875 INTERNET_SERVICE_HTTP, 0, 0);
876 ok(connect != NULL, "Unable to connect to http://winehq.org with error %d\n", GetLastError());
877
878 request = HttpOpenRequestA(connect, NULL, "/", NULL, NULL, types, INTERNET_FLAG_NO_CACHE_WRITE, 0);
879 if (!request && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
880 {
881 skip( "Network unreachable, skipping test\n" );
882 goto done;
883 }
884 ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
885
886 ret = HttpSendRequest(request, NULL, 0, NULL, 0);
887 ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
888 ok(InternetCloseHandle(request), "Close request handle failed\n");
889
890 request = HttpOpenRequestW(connect, NULL, slash, NULL, NULL, typesW, INTERNET_FLAG_NO_CACHE_WRITE, 0);
891 ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
892
893 ret = HttpSendRequest(request, NULL, 0, NULL, 0);
894 ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
895 ok(InternetCloseHandle(request), "Close request handle failed\n");
896
897 done:
898 ok(InternetCloseHandle(connect), "Close connect handle failed\n");
899 ok(InternetCloseHandle(session), "Close session handle failed\n");
900 }
901
902 static void test_http_cache(void)
903 {
904 HINTERNET session, connect, request;
905 char file_name[MAX_PATH], url[INTERNET_MAX_URL_LENGTH];
906 DWORD size, file_size;
907 BYTE buf[100];
908 HANDLE file;
909 BOOL ret;
910
911 static const char *types[] = { "*", "", NULL };
912
913 session = InternetOpenA("Wine Regression Test", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
914 ok(session != NULL ,"Unable to open Internet session\n");
915
916 connect = InternetConnectA(session, "www.winehq.org", INTERNET_DEFAULT_HTTP_PORT, NULL, NULL,
917 INTERNET_SERVICE_HTTP, 0, 0);
918 ok(connect != NULL, "Unable to connect to http://winehq.org with error %d\n", GetLastError());
919
920 request = HttpOpenRequestA(connect, NULL, "/site/about", NULL, NULL, types, INTERNET_FLAG_NEED_FILE, 0);
921 if (!request && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
922 {
923 skip( "Network unreachable, skipping test\n" );
924
925 ok(InternetCloseHandle(connect), "Close connect handle failed\n");
926 ok(InternetCloseHandle(session), "Close session handle failed\n");
927
928 return;
929 }
930 ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
931
932 size = sizeof(url);
933 ret = InternetQueryOptionA(request, INTERNET_OPTION_URL, url, &size);
934 ok(ret, "InternetQueryOptionA(INTERNET_OPTION_url) failed: %u\n", GetLastError());
935 ok(!strcmp(url, "http://www.winehq.org/site/about"), "Wrong URL %s\n", url);
936
937 size = sizeof(file_name);
938 ret = InternetQueryOptionA(request, INTERNET_OPTION_DATAFILE_NAME, file_name, &size);
939 ok(!ret, "InternetQueryOptionA(INTERNET_OPTION_DATAFILE_NAME) succeeded\n");
940 ok(GetLastError() == ERROR_INTERNET_ITEM_NOT_FOUND, "GetLastError()=%u\n", GetLastError());
941 ok(!size, "size = %d\n", size);
942
943 ret = HttpSendRequest(request, NULL, 0, NULL, 0);
944 ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
945
946 size = sizeof(file_name);
947 ret = InternetQueryOptionA(request, INTERNET_OPTION_DATAFILE_NAME, file_name, &size);
948 ok(ret, "InternetQueryOptionA(INTERNET_OPTION_DATAFILE_NAME) failed: %u\n", GetLastError());
949
950 file = CreateFile(file_name, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
951 FILE_ATTRIBUTE_NORMAL, NULL);
952 ok(file != INVALID_HANDLE_VALUE, "Could not create file: %u\n", GetLastError());
953 file_size = GetFileSize(file, NULL);
954 ok(file_size == 0, "file size=%d\n", file_size);
955
956 ret = InternetReadFile(request, buf, sizeof(buf), &size);
957 ok(ret, "InternetReadFile failed: %u\n", GetLastError());
958 ok(size == sizeof(buf), "size=%d\n", size);
959
960 file_size = GetFileSize(file, NULL);
961 ok(file_size == sizeof(buf), "file size=%d\n", file_size);
962 CloseHandle(file);
963
964 ok(InternetCloseHandle(request), "Close request handle failed\n");
965
966 file = CreateFile(file_name, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
967 FILE_ATTRIBUTE_NORMAL, NULL);
968 ok(file == INVALID_HANDLE_VALUE, "CreateFile succeeded\n");
969 ok(GetLastError() == ERROR_FILE_NOT_FOUND, "GetLastError()=%u, expected ERROR_FILE_NOT_FOUND\n", GetLastError());
970
971 request = HttpOpenRequestA(connect, NULL, "/", NULL, NULL, types, INTERNET_FLAG_NO_CACHE_WRITE, 0);
972 ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
973
974 ret = InternetQueryOptionA(request, INTERNET_OPTION_DATAFILE_NAME, file_name, &size);
975 ok(!ret, "InternetQueryOptionA(INTERNET_OPTION_DATAFILE_NAME) succeeded\n");
976 ok(GetLastError() == ERROR_INTERNET_ITEM_NOT_FOUND, "GetLastError()=%u\n", GetLastError());
977 ok(!size, "size = %d\n", size);
978
979 ret = HttpSendRequest(request, NULL, 0, NULL, 0);
980 ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
981
982 size = sizeof(file_name);
983 ret = InternetQueryOptionA(request, INTERNET_OPTION_DATAFILE_NAME, file_name, &size);
984 ok(!ret, "InternetQueryOptionA(INTERNET_OPTION_DATAFILE_NAME) succeeded\n");
985 ok(GetLastError() == ERROR_INTERNET_ITEM_NOT_FOUND, "GetLastError()=%u\n", GetLastError());
986 ok(!size, "size = %d\n", size);
987
988 file = CreateFile(file_name, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
989 FILE_ATTRIBUTE_NORMAL, NULL);
990 ok(file == INVALID_HANDLE_VALUE, "CreateFile succeeded\n");
991 ok(GetLastError() == ERROR_FILE_NOT_FOUND, "GetLastError()=%u, expected ERROR_FILE_NOT_FOUND\n", GetLastError());
992
993 ok(InternetCloseHandle(request), "Close request handle failed\n");
994
995 ok(InternetCloseHandle(connect), "Close connect handle failed\n");
996 ok(InternetCloseHandle(session), "Close session handle failed\n");
997 }
998
999 static void HttpHeaders_test(void)
1000 {
1001 HINTERNET hSession;
1002 HINTERNET hConnect;
1003 HINTERNET hRequest;
1004 CHAR buffer[256];
1005 WCHAR wbuffer[256];
1006 DWORD len = 256;
1007 DWORD oldlen;
1008 DWORD index = 0;
1009
1010 hSession = InternetOpen("Wine Regression Test",
1011 INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,0);
1012 ok( hSession != NULL ,"Unable to open Internet session\n");
1013 hConnect = InternetConnect(hSession, "crossover.codeweavers.com",
1014 INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0,
1015 0);
1016 ok( hConnect != NULL, "Unable to connect to http://crossover.codeweavers.com\n");
1017 hRequest = HttpOpenRequest(hConnect, "POST", "/posttest.php",
1018 NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
1019 if (!hRequest && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
1020 {
1021 skip( "Network unreachable, skipping test\n" );
1022 goto done;
1023 }
1024 ok( hRequest != NULL, "Failed to open request handle\n");
1025
1026 index = 0;
1027 len = sizeof(buffer);
1028 strcpy(buffer,"Warning");
1029 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1030 buffer,&len,&index)==0,"Warning hearder reported as Existing\n");
1031
1032 ok(HttpAddRequestHeaders(hRequest,"Warning:test1",-1,HTTP_ADDREQ_FLAG_ADD),
1033 "Failed to add new header\n");
1034
1035 index = 0;
1036 len = sizeof(buffer);
1037 strcpy(buffer,"Warning");
1038 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1039 buffer,&len,&index),"Unable to query header\n");
1040 ok(index == 1, "Index was not incremented\n");
1041 ok(strcmp(buffer,"test1")==0, "incorrect string was returned(%s)\n",buffer);
1042 ok(len == 5, "Invalid length (exp. 5, got %d)\n", len);
1043 ok((len < sizeof(buffer)) && (buffer[len] == 0), "Buffer not NULL-terminated\n"); /* len show only 5 characters but the buffer is NULL-terminated*/
1044 len = sizeof(buffer);
1045 strcpy(buffer,"Warning");
1046 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1047 buffer,&len,&index)==0,"Second Index Should Not Exist\n");
1048
1049 index = 0;
1050 len = 5; /* could store the string but not the NULL terminator */
1051 strcpy(buffer,"Warning");
1052 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1053 buffer,&len,&index) == FALSE,"Query succeeded on a too small buffer\n");
1054 ok(strcmp(buffer,"Warning")==0, "incorrect string was returned(%s)\n",buffer); /* string not touched */
1055 ok(len == 6, "Invalid length (exp. 6, got %d)\n", len); /* unlike success, the length includes the NULL-terminator */
1056
1057 /* a call with NULL will fail but will return the length */
1058 index = 0;
1059 len = sizeof(buffer);
1060 SetLastError(0xdeadbeef);
1061 ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1062 NULL,&len,&index) == FALSE,"Query worked\n");
1063 ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1064 ok(len > 40, "Invalid length (exp. more than 40, got %d)\n", len);
1065 ok(index == 0, "Index was incremented\n");
1066
1067 /* even for a len that is too small */
1068 index = 0;
1069 len = 15;
1070 SetLastError(0xdeadbeef);
1071 ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1072 NULL,&len,&index) == FALSE,"Query worked\n");
1073 ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1074 ok(len > 40, "Invalid length (exp. more than 40, got %d)\n", len);
1075 ok(index == 0, "Index was incremented\n");
1076
1077 index = 0;
1078 len = 0;
1079 SetLastError(0xdeadbeef);
1080 ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1081 NULL,&len,&index) == FALSE,"Query worked\n");
1082 ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1083 ok(len > 40, "Invalid length (exp. more than 40, got %d)\n", len);
1084 ok(index == 0, "Index was incremented\n");
1085 oldlen = len; /* bytes; at least long enough to hold buffer & nul */
1086
1087
1088 /* a working query */
1089 index = 0;
1090 len = sizeof(buffer);
1091 memset(buffer, 'x', sizeof(buffer));
1092 ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1093 buffer,&len,&index),"Unable to query header\n");
1094 ok(len + sizeof(CHAR) <= oldlen, "Result longer than advertised\n");
1095 ok((len < sizeof(buffer)-sizeof(CHAR)) && (buffer[len/sizeof(CHAR)] == 0),"No NUL at end\n");
1096 ok(len == strlen(buffer) * sizeof(CHAR), "Length wrong\n");
1097 /* what's in the middle differs between Wine and Windows so currently we check only the beginning and the end */
1098 ok(strncmp(buffer, "POST /posttest.php HTTP/1", 25)==0, "Invalid beginning of headers string\n");
1099 ok(strcmp(buffer + strlen(buffer) - 4, "\r\n\r\n")==0, "Invalid end of headers string\n");
1100 ok(index == 0, "Index was incremented\n");
1101
1102 /* Like above two tests, but for W version */
1103
1104 index = 0;
1105 len = 0;
1106 SetLastError(0xdeadbeef);
1107 ok(HttpQueryInfoW(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1108 NULL,&len,&index) == FALSE,"Query worked\n");
1109 ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1110 ok(len > 80, "Invalid length (exp. more than 80, got %d)\n", len);
1111 ok(index == 0, "Index was incremented\n");
1112 oldlen = len; /* bytes; at least long enough to hold buffer & nul */
1113
1114 /* a working query */
1115 index = 0;
1116 len = sizeof(wbuffer);
1117 memset(wbuffer, 'x', sizeof(wbuffer));
1118 ok(HttpQueryInfoW(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1119 wbuffer,&len,&index),"Unable to query header\n");
1120 ok(len + sizeof(WCHAR) <= oldlen, "Result longer than advertised\n");
1121 ok(len == lstrlenW(wbuffer) * sizeof(WCHAR), "Length wrong\n");
1122 ok((len < sizeof(wbuffer)-sizeof(WCHAR)) && (wbuffer[len/sizeof(WCHAR)] == 0),"No NUL at end\n");
1123 ok(index == 0, "Index was incremented\n");
1124
1125 /* end of W version tests */
1126
1127 /* Without HTTP_QUERY_FLAG_REQUEST_HEADERS */
1128 index = 0;
1129 len = sizeof(buffer);
1130 memset(buffer, 'x', sizeof(buffer));
1131 ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF,
1132 buffer,&len,&index) == TRUE,"Query failed\n");
1133 ok(len == 2, "Expected 2, got %d\n", len);
1134 ok(strcmp(buffer, "\r\n") == 0, "Expected CRLF, got '%s'\n", buffer);
1135 ok(index == 0, "Index was incremented\n");
1136
1137 ok(HttpAddRequestHeaders(hRequest,"Warning:test2",-1,HTTP_ADDREQ_FLAG_ADD),
1138 "Failed to add duplicate header using HTTP_ADDREQ_FLAG_ADD\n");
1139
1140 index = 0;
1141 len = sizeof(buffer);
1142 strcpy(buffer,"Warning");
1143 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1144 buffer,&len,&index),"Unable to query header\n");
1145 ok(index == 1, "Index was not incremented\n");
1146 ok(strcmp(buffer,"test1")==0, "incorrect string was returned(%s)\n",buffer);
1147 len = sizeof(buffer);
1148 strcpy(buffer,"Warning");
1149 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1150 buffer,&len,&index),"Failed to get second header\n");
1151 ok(index == 2, "Index was not incremented\n");
1152 ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
1153 len = sizeof(buffer);
1154 strcpy(buffer,"Warning");
1155 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1156 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1157
1158 ok(HttpAddRequestHeaders(hRequest,"Warning:test3",-1,HTTP_ADDREQ_FLAG_REPLACE), "Failed to replace header using HTTP_ADDREQ_FLAG_REPLACE\n");
1159
1160 index = 0;
1161 len = sizeof(buffer);
1162 strcpy(buffer,"Warning");
1163 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1164 buffer,&len,&index),"Unable to query header\n");
1165 ok(index == 1, "Index was not incremented\n");
1166 ok(strcmp(buffer,"test2")==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,
1170 buffer,&len,&index),"Failed to get second header\n");
1171 ok(index == 2, "Index was not incremented\n");
1172 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1173 len = sizeof(buffer);
1174 strcpy(buffer,"Warning");
1175 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1176 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1177
1178 ok(HttpAddRequestHeaders(hRequest,"Warning:test4",-1,HTTP_ADDREQ_FLAG_ADD_IF_NEW)==0, "HTTP_ADDREQ_FLAG_ADD_IF_NEW replaced existing header\n");
1179
1180 index = 0;
1181 len = sizeof(buffer);
1182 strcpy(buffer,"Warning");
1183 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1184 buffer,&len,&index),"Unable to query header\n");
1185 ok(index == 1, "Index was not incremented\n");
1186 ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
1187 len = sizeof(buffer);
1188 strcpy(buffer,"Warning");
1189 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1190 buffer,&len,&index),"Failed to get second header\n");
1191 ok(index == 2, "Index was not incremented\n");
1192 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1193 len = sizeof(buffer);
1194 strcpy(buffer,"Warning");
1195 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1196 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1197
1198 ok(HttpAddRequestHeaders(hRequest,"Warning:test4",-1, HTTP_ADDREQ_FLAG_COALESCE), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
1199
1200 index = 0;
1201 len = sizeof(buffer);
1202 strcpy(buffer,"Warning");
1203 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1204 buffer,&len,&index),"Unable to query header\n");
1205 ok(index == 1, "Index was not incremented\n");
1206 ok(strcmp(buffer,"test2, test4")==0, "incorrect string was returned(%s)\n", buffer);
1207 len = sizeof(buffer);
1208 strcpy(buffer,"Warning");
1209 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1210 ok(index == 2, "Index was not incremented\n");
1211 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1212 len = sizeof(buffer);
1213 strcpy(buffer,"Warning");
1214 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1215
1216 ok(HttpAddRequestHeaders(hRequest,"Warning:test5",-1, HTTP_ADDREQ_FLAG_COALESCE_WITH_COMMA), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
1217
1218 index = 0;
1219 len = sizeof(buffer);
1220 strcpy(buffer,"Warning");
1221 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1222 ok(index == 1, "Index was not incremented\n");
1223 ok(strcmp(buffer,"test2, test4, test5")==0, "incorrect string was returned(%s)\n",buffer);
1224 len = sizeof(buffer);
1225 strcpy(buffer,"Warning");
1226 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1227 ok(index == 2, "Index was not incremented\n");
1228 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1229 len = sizeof(buffer);
1230 strcpy(buffer,"Warning");
1231 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1232
1233 ok(HttpAddRequestHeaders(hRequest,"Warning:test6",-1, HTTP_ADDREQ_FLAG_COALESCE_WITH_SEMICOLON), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
1234
1235 index = 0;
1236 len = sizeof(buffer);
1237 strcpy(buffer,"Warning");
1238 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1239 ok(index == 1, "Index was not incremented\n");
1240 ok(strcmp(buffer,"test2, test4, test5; test6")==0, "incorrect string was returned(%s)\n",buffer);
1241 len = sizeof(buffer);
1242 strcpy(buffer,"Warning");
1243 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1244 ok(index == 2, "Index was not incremented\n");
1245 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1246 len = sizeof(buffer);
1247 strcpy(buffer,"Warning");
1248 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1249
1250 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");
1251
1252 index = 0;
1253 len = sizeof(buffer);
1254 strcpy(buffer,"Warning");
1255 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1256 ok(index == 1, "Index was not incremented\n");
1257 ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1258 len = sizeof(buffer);
1259 strcpy(buffer,"Warning");
1260 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1261 ok(index == 2, "Index was not incremented\n");
1262 ok(strcmp(buffer,"test7")==0, "incorrect string was returned(%s)\n",buffer);
1263 len = sizeof(buffer);
1264 strcpy(buffer,"Warning");
1265 ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1266
1267
1268 ok(InternetCloseHandle(hRequest), "Close request handle failed\n");
1269 done:
1270 ok(InternetCloseHandle(hConnect), "Close connect handle failed\n");
1271 ok(InternetCloseHandle(hSession), "Close session handle failed\n");
1272 }
1273
1274 static const char contmsg[] =
1275 "HTTP/1.1 100 Continue\r\n";
1276
1277 static const char okmsg[] =
1278 "HTTP/1.1 200 OK\r\n"
1279 "Server: winetest\r\n"
1280 "\r\n";
1281
1282 static const char notokmsg[] =
1283 "HTTP/1.1 400 Bad Request\r\n"
1284 "Server: winetest\r\n"
1285 "\r\n";
1286
1287 static const char noauthmsg[] =
1288 "HTTP/1.1 401 Unauthorized\r\n"
1289 "Server: winetest\r\n"
1290 "\r\n";
1291
1292 static const char proxymsg[] =
1293 "HTTP/1.1 407 Proxy Authentication Required\r\n"
1294 "Server: winetest\r\n"
1295 "Proxy-Connection: close\r\n"
1296 "Proxy-Authenticate: Basic realm=\"placebo\"\r\n"
1297 "\r\n";
1298
1299 static const char page1[] =
1300 "<HTML>\r\n"
1301 "<HEAD><TITLE>wininet test page</TITLE></HEAD>\r\n"
1302 "<BODY>The quick brown fox jumped over the lazy dog<P></BODY>\r\n"
1303 "</HTML>\r\n\r\n";
1304
1305 struct server_info {
1306 HANDLE hEvent;
1307 int port;
1308 };
1309
1310 static DWORD CALLBACK server_thread(LPVOID param)
1311 {
1312 struct server_info *si = param;
1313 int r, c, i, on;
1314 SOCKET s;
1315 struct sockaddr_in sa;
1316 char buffer[0x100];
1317 WSADATA wsaData;
1318 int last_request = 0;
1319 char host_header[22];
1320 static int test_b = 0;
1321
1322 WSAStartup(MAKEWORD(1,1), &wsaData);
1323
1324 s = socket(AF_INET, SOCK_STREAM, 0);
1325 if (s == INVALID_SOCKET)
1326 return 1;
1327
1328 on = 1;
1329 setsockopt(s, SOL_SOCKET, SO_REUSEADDR, (char*)&on, sizeof on);
1330
1331 memset(&sa, 0, sizeof sa);
1332 sa.sin_family = AF_INET;
1333 sa.sin_port = htons(si->port);
1334 sa.sin_addr.S_un.S_addr = inet_addr("127.0.0.1");
1335
1336 r = bind(s, (struct sockaddr*) &sa, sizeof sa);
1337 if (r<0)
1338 return 1;
1339
1340 listen(s, 0);
1341
1342 SetEvent(si->hEvent);
1343
1344 sprintf(host_header, "Host: localhost:%d", si->port);
1345
1346 do
1347 {
1348 c = accept(s, NULL, NULL);
1349
1350 memset(buffer, 0, sizeof buffer);
1351 for(i=0; i<(sizeof buffer-1); i++)
1352 {
1353 r = recv(c, &buffer[i], 1, 0);
1354 if (r != 1)
1355 break;
1356 if (i<4) continue;
1357 if (buffer[i-2] == '\n' && buffer[i] == '\n' &&
1358 buffer[i-3] == '\r' && buffer[i-1] == '\r')
1359 break;
1360 }
1361 if (strstr(buffer, "GET /test1"))
1362 {
1363 if (!strstr(buffer, "Content-Length: 0"))
1364 {
1365 send(c, okmsg, sizeof okmsg-1, 0);
1366 send(c, page1, sizeof page1-1, 0);
1367 }
1368 else
1369 send(c, notokmsg, sizeof notokmsg-1, 0);
1370 }
1371 if (strstr(buffer, "/test2"))
1372 {
1373 if (strstr(buffer, "Proxy-Authorization: Basic bWlrZToxMTAx"))
1374 {
1375 send(c, okmsg, sizeof okmsg-1, 0);
1376 send(c, page1, sizeof page1-1, 0);
1377 }
1378 else
1379 send(c, proxymsg, sizeof proxymsg-1, 0);
1380 }
1381 if (strstr(buffer, "/test3"))
1382 {
1383 if (strstr(buffer, "Authorization: Basic dXNlcjpwd2Q="))
1384 send(c, okmsg, sizeof okmsg-1, 0);
1385 else
1386 send(c, noauthmsg, sizeof noauthmsg-1, 0);
1387 }
1388 if (strstr(buffer, "/test4"))
1389 {
1390 if (strstr(buffer, "Connection: Close"))
1391 send(c, okmsg, sizeof okmsg-1, 0);
1392 else
1393 send(c, notokmsg, sizeof notokmsg-1, 0);
1394 }
1395 if (strstr(buffer, "POST /test5"))
1396 {
1397 if (strstr(buffer, "Content-Length: 0"))
1398 {
1399 send(c, okmsg, sizeof okmsg-1, 0);
1400 send(c, page1, sizeof page1-1, 0);
1401 }
1402 else
1403 send(c, notokmsg, sizeof notokmsg-1, 0);
1404 }
1405 if (strstr(buffer, "GET /test6"))
1406 {
1407 send(c, contmsg, sizeof contmsg-1, 0);
1408 send(c, contmsg, sizeof contmsg-1, 0);
1409 send(c, okmsg, sizeof okmsg-1, 0);
1410 send(c, page1, sizeof page1-1, 0);
1411 }
1412 if (strstr(buffer, "POST /test7"))
1413 {
1414 if (strstr(buffer, "Content-Length: 100"))
1415 {
1416 send(c, okmsg, sizeof okmsg-1, 0);
1417 send(c, page1, sizeof page1-1, 0);
1418 }
1419 else
1420 send(c, notokmsg, sizeof notokmsg-1, 0);
1421 }
1422 if (strstr(buffer, "/test8"))
1423 {
1424 if (!strstr(buffer, "Connection: Close") &&
1425 strstr(buffer, "Connection: Keep-Alive") &&
1426 !strstr(buffer, "Cache-Control: no-cache") &&
1427 !strstr(buffer, "Pragma: no-cache") &&
1428 strstr(buffer, host_header))
1429 send(c, okmsg, sizeof okmsg-1, 0);
1430 else
1431 send(c, notokmsg, sizeof notokmsg-1, 0);
1432 }
1433 if (strstr(buffer, "/test9"))
1434 {
1435 if (!strstr(buffer, "Connection: Close") &&
1436 !strstr(buffer, "Connection: Keep-Alive") &&
1437 !strstr(buffer, "Cache-Control: no-cache") &&
1438 !strstr(buffer, "Pragma: no-cache") &&
1439 strstr(buffer, host_header))
1440 send(c, okmsg, sizeof okmsg-1, 0);
1441 else
1442 send(c, notokmsg, sizeof notokmsg-1, 0);
1443 }
1444 if (strstr(buffer, "/testA"))
1445 {
1446 if (!strstr(buffer, "Connection: Close") &&
1447 !strstr(buffer, "Connection: Keep-Alive") &&
1448 (strstr(buffer, "Cache-Control: no-cache") ||
1449 strstr(buffer, "Pragma: no-cache")) &&
1450 strstr(buffer, host_header))
1451 send(c, okmsg, sizeof okmsg-1, 0);
1452 else
1453 send(c, notokmsg, sizeof notokmsg-1, 0);
1454 }
1455 if (!test_b && strstr(buffer, "/testB HTTP/1.1"))
1456 {
1457 test_b = 1;
1458 send(c, okmsg, sizeof okmsg-1, 0);
1459 recvfrom(c, buffer, sizeof buffer, 0, NULL, NULL);
1460 send(c, okmsg, sizeof okmsg-1, 0);
1461 }
1462 if (strstr(buffer, "/testC"))
1463 {
1464 if (strstr(buffer, "Cookie: cookie=biscuit"))
1465 send(c, okmsg, sizeof okmsg-1, 0);
1466 else
1467 send(c, notokmsg, sizeof notokmsg-1, 0);
1468 }
1469 if (strstr(buffer, "GET /quit"))
1470 {
1471 send(c, okmsg, sizeof okmsg-1, 0);
1472 send(c, page1, sizeof page1-1, 0);
1473 last_request = 1;
1474 }
1475
1476 shutdown(c, 2);
1477 closesocket(c);
1478 } while (!last_request);
1479
1480 closesocket(s);
1481
1482 return 0;
1483 }
1484
1485 static void test_basic_request(int port, const char *verb, const char *url)
1486 {
1487 HINTERNET hi, hc, hr;
1488 DWORD r, count;
1489 char buffer[0x100];
1490
1491 hi = InternetOpen(NULL, INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1492 ok(hi != NULL, "open failed\n");
1493
1494 hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1495 ok(hc != NULL, "connect failed\n");
1496
1497 hr = HttpOpenRequest(hc, verb, url, NULL, NULL, NULL, 0, 0);
1498 ok(hr != NULL, "HttpOpenRequest failed\n");
1499
1500 r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1501 ok(r, "HttpSendRequest failed\n");
1502
1503 count = 0;
1504 memset(buffer, 0, sizeof buffer);
1505 r = InternetReadFile(hr, buffer, sizeof buffer, &count);
1506 ok(r, "InternetReadFile failed\n");
1507 ok(count == sizeof page1 - 1, "count was wrong\n");
1508 ok(!memcmp(buffer, page1, sizeof page1), "http data wrong\n");
1509
1510 InternetCloseHandle(hr);
1511 InternetCloseHandle(hc);
1512 InternetCloseHandle(hi);
1513 }
1514
1515 static void test_proxy_indirect(int port)
1516 {
1517 HINTERNET hi, hc, hr;
1518 DWORD r, sz, val;
1519 char buffer[0x40];
1520
1521 hi = InternetOpen(NULL, 0, NULL, NULL, 0);
1522 ok(hi != NULL, "open failed\n");
1523
1524 hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1525 ok(hc != NULL, "connect failed\n");
1526
1527 hr = HttpOpenRequest(hc, NULL, "/test2", NULL, NULL, NULL, 0, 0);
1528 ok(hr != NULL, "HttpOpenRequest failed\n");
1529
1530 r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1531 ok(r, "HttpSendRequest failed\n");
1532
1533 sz = sizeof buffer;
1534 r = HttpQueryInfo(hr, HTTP_QUERY_PROXY_AUTHENTICATE, buffer, &sz, NULL);
1535 ok(r, "HttpQueryInfo failed\n");
1536 ok(!strcmp(buffer, "Basic realm=\"placebo\""), "proxy auth info wrong\n");
1537
1538 sz = sizeof buffer;
1539 r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1540 ok(r, "HttpQueryInfo failed\n");
1541 ok(!strcmp(buffer, "407"), "proxy code wrong\n");
1542
1543 sz = sizeof val;
1544 r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE|HTTP_QUERY_FLAG_NUMBER, &val, &sz, NULL);
1545 ok(r, "HttpQueryInfo failed\n");
1546 ok(val == 407, "proxy code wrong\n");
1547
1548 sz = sizeof buffer;
1549 r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_TEXT, buffer, &sz, NULL);
1550 ok(r, "HttpQueryInfo failed\n");
1551 ok(!strcmp(buffer, "Proxy Authentication Required"), "proxy text wrong\n");
1552
1553 sz = sizeof buffer;
1554 r = HttpQueryInfo(hr, HTTP_QUERY_VERSION, buffer, &sz, NULL);
1555 ok(r, "HttpQueryInfo failed\n");
1556 ok(!strcmp(buffer, "HTTP/1.1"), "http version wrong\n");
1557
1558 sz = sizeof buffer;
1559 r = HttpQueryInfo(hr, HTTP_QUERY_SERVER, buffer, &sz, NULL);
1560 ok(r, "HttpQueryInfo failed\n");
1561 ok(!strcmp(buffer, "winetest"), "http server wrong\n");
1562
1563 sz = sizeof buffer;
1564 r = HttpQueryInfo(hr, HTTP_QUERY_CONTENT_ENCODING, buffer, &sz, NULL);
1565 ok(GetLastError() == ERROR_HTTP_HEADER_NOT_FOUND, "HttpQueryInfo should fail\n");
1566 ok(r == FALSE, "HttpQueryInfo failed\n");
1567
1568 InternetCloseHandle(hr);
1569 InternetCloseHandle(hc);
1570 InternetCloseHandle(hi);
1571 }
1572
1573 static void test_proxy_direct(int port)
1574 {
1575 HINTERNET hi, hc, hr;
1576 DWORD r, sz;
1577 char buffer[0x40];
1578 static CHAR username[] = "mike",
1579 password[] = "1101";
1580
1581 sprintf(buffer, "localhost:%d\n", port);
1582 hi = InternetOpen(NULL, INTERNET_OPEN_TYPE_PROXY, buffer, NULL, 0);
1583 ok(hi != NULL, "open failed\n");
1584
1585 /* try connect without authorization */
1586 hc = InternetConnect(hi, "www.winehq.org/", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1587 ok(hc != NULL, "connect failed\n");
1588
1589 hr = HttpOpenRequest(hc, NULL, "/test2", NULL, NULL, NULL, 0, 0);
1590 ok(hr != NULL, "HttpOpenRequest failed\n");
1591
1592 r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1593 ok(r, "HttpSendRequest failed\n");
1594
1595 sz = sizeof buffer;
1596 r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1597 ok(r, "HttpQueryInfo failed\n");
1598 ok(!strcmp(buffer, "407"), "proxy code wrong\n");
1599
1600
1601 /* set the user + password then try again */
1602 todo_wine {
1603 r = InternetSetOption(hr, INTERNET_OPTION_PROXY_USERNAME, username, 4);
1604 ok(r, "failed to set user\n");
1605
1606 r = InternetSetOption(hr, INTERNET_OPTION_PROXY_PASSWORD, password, 4);
1607 ok(r, "failed to set password\n");
1608 }
1609
1610 r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1611 ok(r, "HttpSendRequest failed\n");
1612 sz = sizeof buffer;
1613 r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1614 ok(r, "HttpQueryInfo failed\n");
1615 todo_wine {
1616 ok(!strcmp(buffer, "200"), "proxy code wrong\n");
1617 }
1618
1619
1620 InternetCloseHandle(hr);
1621 InternetCloseHandle(hc);
1622 InternetCloseHandle(hi);
1623 }
1624
1625 static void test_header_handling_order(int port)
1626 {
1627 static char authorization[] = "Authorization: Basic dXNlcjpwd2Q=";
1628 static char connection[] = "Connection: Close";
1629
1630 static const char *types[2] = { "*", NULL };
1631 HINTERNET session, connect, request;
1632 DWORD size, status;
1633 BOOL ret;
1634
1635 session = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1636 ok(session != NULL, "InternetOpen failed\n");
1637
1638 connect = InternetConnect(session, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1639 ok(connect != NULL, "InternetConnect failed\n");
1640
1641 request = HttpOpenRequest(connect, NULL, "/test3", NULL, NULL, types, INTERNET_FLAG_KEEP_CONNECTION, 0);
1642 ok(request != NULL, "HttpOpenRequest failed\n");
1643
1644 ret = HttpAddRequestHeaders(request, authorization, ~0UL, HTTP_ADDREQ_FLAG_ADD);
1645 ok(ret, "HttpAddRequestHeaders failed\n");
1646
1647 ret = HttpSendRequest(request, NULL, 0, NULL, 0);
1648 ok(ret, "HttpSendRequest failed\n");
1649
1650 status = 0;
1651 size = sizeof(status);
1652 ret = HttpQueryInfo( request, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
1653 ok(ret, "HttpQueryInfo failed\n");
1654 ok(status == 200, "request failed with status %u\n", status);
1655
1656 InternetCloseHandle(request);
1657
1658 request = HttpOpenRequest(connect, NULL, "/test4", NULL, NULL, types, INTERNET_FLAG_KEEP_CONNECTION, 0);
1659 ok(request != NULL, "HttpOpenRequest failed\n");
1660
1661 ret = HttpSendRequest(request, connection, ~0UL, NULL, 0);
1662 ok(ret, "HttpSendRequest failed\n");
1663
1664 status = 0;
1665 size = sizeof(status);
1666 ret = HttpQueryInfo( request, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
1667 ok(ret, "HttpQueryInfo failed\n");
1668 ok(status == 200 || status == 400 /* IE6 */, "got status %u, expected 200 or 400\n", status);
1669
1670 InternetCloseHandle(request);
1671
1672 request = HttpOpenRequest(connect, "POST", "/test7", NULL, NULL, types, INTERNET_FLAG_KEEP_CONNECTION, 0);
1673 ok(request != NULL, "HttpOpenRequest failed\n");
1674
1675 ret = HttpAddRequestHeaders(request, "Content-Length: 100\r\n", ~0UL, HTTP_ADDREQ_FLAG_ADD_IF_NEW);
1676 ok(ret, "HttpAddRequestHeaders failed\n");
1677
1678 ret = HttpSendRequest(request, connection, ~0UL, NULL, 0);
1679 ok(ret, "HttpSendRequest failed\n");
1680
1681 status = 0;
1682 size = sizeof(status);
1683 ret = HttpQueryInfo( request, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
1684 ok(ret, "HttpQueryInfo failed\n");
1685 ok(status == 200 || status == 400 /* IE6 */, "got status %u, expected 200 or 400\n", status);
1686
1687 InternetCloseHandle(request);
1688 InternetCloseHandle(connect);
1689 InternetCloseHandle(session);
1690 }
1691
1692 static void test_connection_header(int port)
1693 {
1694 HINTERNET ses, con, req;
1695 DWORD size, status;
1696 BOOL ret;
1697
1698 ses = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1699 ok(ses != NULL, "InternetOpen failed\n");
1700
1701 con = InternetConnect(ses, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1702 ok(con != NULL, "InternetConnect failed\n");
1703
1704 req = HttpOpenRequest(con, NULL, "/test8", NULL, NULL, NULL, INTERNET_FLAG_KEEP_CONNECTION, 0);
1705 ok(req != NULL, "HttpOpenRequest failed\n");
1706
1707 ret = HttpSendRequest(req, NULL, 0, NULL, 0);
1708 ok(ret, "HttpSendRequest failed\n");
1709
1710 status = 0;
1711 size = sizeof(status);
1712 ret = HttpQueryInfo(req, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL);
1713 ok(ret, "HttpQueryInfo failed\n");
1714 ok(status == 200, "request failed with status %u\n", status);
1715
1716 InternetCloseHandle(req);
1717
1718 req = HttpOpenRequest(con, NULL, "/test9", NULL, NULL, NULL, 0, 0);
1719 ok(req != NULL, "HttpOpenRequest failed\n");
1720
1721 ret = HttpSendRequest(req, NULL, 0, NULL, 0);
1722 ok(ret, "HttpSendRequest failed\n");
1723
1724 status = 0;
1725 size = sizeof(status);
1726 ret = HttpQueryInfo(req, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL);
1727 ok(ret, "HttpQueryInfo failed\n");
1728 ok(status == 200, "request failed with status %u\n", status);
1729
1730 InternetCloseHandle(req);
1731
1732 req = HttpOpenRequest(con, NULL, "/test9", NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
1733 ok(req != NULL, "HttpOpenRequest failed\n");
1734
1735 ret = HttpSendRequest(req, NULL, 0, NULL, 0);
1736 ok(ret, "HttpSendRequest failed\n");
1737
1738 status = 0;
1739 size = sizeof(status);
1740 ret = HttpQueryInfo(req, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL);
1741 ok(ret, "HttpQueryInfo failed\n");
1742 ok(status == 200, "request failed with status %u\n", status);
1743
1744 InternetCloseHandle(req);
1745
1746 req = HttpOpenRequest(con, "POST", "/testA", NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
1747 ok(req != NULL, "HttpOpenRequest failed\n");
1748
1749 ret = HttpSendRequest(req, NULL, 0, NULL, 0);
1750 ok(ret, "HttpSendRequest failed\n");
1751
1752 status = 0;
1753 size = sizeof(status);
1754 ret = HttpQueryInfo(req, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL);
1755 ok(ret, "HttpQueryInfo failed\n");
1756 ok(status == 200, "request failed with status %u\n", status);
1757
1758 InternetCloseHandle(req);
1759 InternetCloseHandle(con);
1760 InternetCloseHandle(ses);
1761 }
1762
1763 static void test_http1_1(int port)
1764 {
1765 HINTERNET ses, con, req;
1766 BOOL ret;
1767
1768 ses = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1769 ok(ses != NULL, "InternetOpen failed\n");
1770
1771 con = InternetConnect(ses, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1772 ok(con != NULL, "InternetConnect failed\n");
1773
1774 req = HttpOpenRequest(con, NULL, "/testB", NULL, NULL, NULL, INTERNET_FLAG_KEEP_CONNECTION, 0);
1775 ok(req != NULL, "HttpOpenRequest failed\n");
1776
1777 ret = HttpSendRequest(req, NULL, 0, NULL, 0);
1778 if (ret)
1779 {
1780 InternetCloseHandle(req);
1781
1782 req = HttpOpenRequest(con, NULL, "/testB", NULL, NULL, NULL, INTERNET_FLAG_KEEP_CONNECTION, 0);
1783 ok(req != NULL, "HttpOpenRequest failed\n");
1784
1785 ret = HttpSendRequest(req, NULL, 0, NULL, 0);
1786 todo_wine
1787 ok(ret, "HttpSendRequest failed\n");
1788 }
1789
1790 InternetCloseHandle(req);
1791 InternetCloseHandle(con);
1792 InternetCloseHandle(ses);
1793 }
1794
1795 static void test_cookie_header(int port)
1796 {
1797 HINTERNET ses, con, req;
1798 DWORD size, status, error;
1799 BOOL ret;
1800 char buffer[64];
1801
1802 ses = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1803 ok(ses != NULL, "InternetOpen failed\n");
1804
1805 con = InternetConnect(ses, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1806 ok(con != NULL, "InternetConnect failed\n");
1807
1808 InternetSetCookie("http://localhost", "cookie", "biscuit");
1809
1810 req = HttpOpenRequest(con, NULL, "/testC", NULL, NULL, NULL, INTERNET_FLAG_KEEP_CONNECTION, 0);
1811 ok(req != NULL, "HttpOpenRequest failed\n");
1812
1813 buffer[0] = 0;
1814 size = sizeof(buffer);
1815 SetLastError(0xdeadbeef);
1816 ret = HttpQueryInfo(req, HTTP_QUERY_COOKIE | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
1817 error = GetLastError();
1818 ok(!ret, "HttpQueryInfo succeeded\n");
1819 ok(error == ERROR_HTTP_HEADER_NOT_FOUND, "got %u expected ERROR_HTTP_HEADER_NOT_FOUND\n", error);
1820
1821 ret = HttpSendRequest(req, NULL, 0, NULL, 0);
1822 ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
1823
1824 status = 0;
1825 size = sizeof(status);
1826 ret = HttpQueryInfo(req, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL);
1827 ok(ret, "HttpQueryInfo failed\n");
1828 ok(status == 200, "request failed with status %u\n", status);
1829
1830 buffer[0] = 0;
1831 size = sizeof(buffer);
1832 ret = HttpQueryInfo(req, HTTP_QUERY_COOKIE | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
1833 ok(ret, "HttpQueryInfo failed: %u\n", GetLastError());
1834 ok(!strcmp(buffer, "cookie=biscuit"), "got '%s' expected \'cookie=biscuit\'\n", buffer);
1835
1836 InternetCloseHandle(req);
1837 InternetCloseHandle(con);
1838 InternetCloseHandle(ses);
1839 }
1840
1841 static void test_http_connection(void)
1842 {
1843 struct server_info si;
1844 HANDLE hThread;
1845 DWORD id = 0, r;
1846
1847 si.hEvent = CreateEvent(NULL, 0, 0, NULL);
1848 si.port = 7531;
1849
1850 hThread = CreateThread(NULL, 0, server_thread, (LPVOID) &si, 0, &id);
1851 ok( hThread != NULL, "create thread failed\n");
1852
1853 r = WaitForSingleObject(si.hEvent, 10000);
1854 ok (r == WAIT_OBJECT_0, "failed to start wininet test server\n");
1855 if (r != WAIT_OBJECT_0)
1856 return;
1857
1858 test_basic_request(si.port, "GET", "/test1");
1859 test_proxy_indirect(si.port);
1860 test_proxy_direct(si.port);
1861 test_header_handling_order(si.port);
1862 test_basic_request(si.port, "POST", "/test5");
1863 test_basic_request(si.port, "GET", "/test6");
1864 test_connection_header(si.port);
1865 test_http1_1(si.port);
1866 test_cookie_header(si.port);
1867
1868 /* send the basic request again to shutdown the server thread */
1869 test_basic_request(si.port, "GET", "/quit");
1870
1871 r = WaitForSingleObject(hThread, 3000);
1872 ok( r == WAIT_OBJECT_0, "thread wait failed\n");
1873 CloseHandle(hThread);
1874 }
1875
1876 static void test_user_agent_header(void)
1877 {
1878 HINTERNET ses, con, req;
1879 DWORD size, err;
1880 char buffer[64];
1881 BOOL ret;
1882
1883 ses = InternetOpen("Gizmo5", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1884 ok(ses != NULL, "InternetOpen failed\n");
1885
1886 con = InternetConnect(ses, "www.winehq.org", 80, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1887 ok(con != NULL, "InternetConnect failed\n");
1888
1889 req = HttpOpenRequest(con, "GET", "/", "HTTP/1.0", NULL, NULL, 0, 0);
1890 ok(req != NULL, "HttpOpenRequest failed\n");
1891
1892 size = sizeof(buffer);
1893 ret = HttpQueryInfo(req, HTTP_QUERY_USER_AGENT | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
1894 err = GetLastError();
1895 ok(!ret, "HttpQueryInfo succeeded\n");
1896 ok(err == ERROR_HTTP_HEADER_NOT_FOUND, "expected ERROR_HTTP_HEADER_NOT_FOUND, got %u\n", err);
1897
1898 ret = HttpAddRequestHeaders(req, "User-Agent: Gizmo Project\r\n", ~0UL, HTTP_ADDREQ_FLAG_ADD_IF_NEW);
1899 ok(ret, "HttpAddRequestHeaders succeeded\n");
1900
1901 size = sizeof(buffer);
1902 ret = HttpQueryInfo(req, HTTP_QUERY_USER_AGENT | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
1903 err = GetLastError();
1904 ok(ret, "HttpQueryInfo failed\n");
1905 ok(err == ERROR_HTTP_HEADER_NOT_FOUND, "expected ERROR_HTTP_HEADER_NOT_FOUND, got %u\n", err);
1906
1907 InternetCloseHandle(req);
1908
1909 req = HttpOpenRequest(con, "GET", "/", "HTTP/1.0", NULL, NULL, 0, 0);
1910 ok(req != NULL, "HttpOpenRequest failed\n");
1911
1912 size = sizeof(buffer);
1913 ret = HttpQueryInfo(req, HTTP_QUERY_ACCEPT | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
1914 err = GetLastError();
1915 ok(!ret, "HttpQueryInfo succeeded\n");
1916 ok(err == ERROR_HTTP_HEADER_NOT_FOUND, "expected ERROR_HTTP_HEADER_NOT_FOUND, got %u\n", err);
1917
1918 ret = HttpAddRequestHeaders(req, "Accept: audio/*, image/*, text/*\r\nUser-Agent: Gizmo Project\r\n", ~0UL, HTTP_ADDREQ_FLAG_ADD_IF_NEW);
1919 ok(ret, "HttpAddRequestHeaders failed\n");
1920
1921 buffer[0] = 0;
1922 size = sizeof(buffer);
1923 ret = HttpQueryInfo(req, HTTP_QUERY_ACCEPT | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
1924 ok(ret, "HttpQueryInfo failed: %u\n", GetLastError());
1925 ok(!strcmp(buffer, "audio/*, image/*, text/*"), "got '%s' expected 'audio/*, image/*, text/*'\n", buffer);
1926
1927 InternetCloseHandle(req);
1928 InternetCloseHandle(con);
1929 InternetCloseHandle(ses);
1930 }
1931
1932 static void test_bogus_accept_types_array(void)
1933 {
1934 HINTERNET ses, con, req;
1935 static const char *types[] = { (const char *)6240, "*/*", "%p", "", "*/*", NULL };
1936 DWORD size;
1937 char buffer[32];
1938 BOOL ret;
1939
1940 ses = InternetOpen("MERONG(0.9/;p)", INTERNET_OPEN_TYPE_DIRECT, "", "", 0);
1941 con = InternetConnect(ses, "www.winehq.org", 80, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1942 req = HttpOpenRequest(con, "POST", "/post/post_action.php", "HTTP/1.0", "", types, INTERNET_FLAG_FORMS_SUBMIT, 0);
1943
1944 ok(req != NULL, "HttpOpenRequest failed: %u\n", GetLastError());
1945
1946 buffer[0] = 0;
1947 size = sizeof(buffer);
1948 ret = HttpQueryInfo(req, HTTP_QUERY_ACCEPT | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
1949 ok(ret, "HttpQueryInfo failed: %u\n", GetLastError());
1950 ok(!strcmp(buffer, ", */*, %p, , */*") || /* IE6 */
1951 !strcmp(buffer, "*/*, %p, */*"),
1952 "got '%s' expected '*/*, %%p, */*' or ', */*, %%p, , */*'\n", buffer);
1953
1954 InternetCloseHandle(req);
1955 InternetCloseHandle(con);
1956 InternetCloseHandle(ses);
1957 }
1958
1959 struct context
1960 {
1961 HANDLE event;
1962 HINTERNET req;
1963 };
1964
1965 static void WINAPI cb(HINTERNET handle, DWORD_PTR context, DWORD status, LPVOID info, DWORD size)
1966 {
1967 INTERNET_ASYNC_RESULT *result = info;
1968 struct context *ctx = (struct context *)context;
1969
1970 trace("%p 0x%08lx %u %p 0x%08x\n", handle, context, status, info, size);
1971
1972 if (status == INTERNET_STATUS_REQUEST_COMPLETE)
1973 {
1974 trace("request handle: 0x%08lx\n", result->dwResult);
1975 ctx->req = (HINTERNET)result->dwResult;
1976 SetEvent(ctx->event);
1977 }
1978 if (status == INTERNET_STATUS_HANDLE_CLOSING)
1979 {
1980 DWORD type = INTERNET_HANDLE_TYPE_CONNECT_HTTP, size = sizeof(type);
1981
1982 if (InternetQueryOption(handle, INTERNET_OPTION_HANDLE_TYPE, &type, &size))
1983 ok(type != INTERNET_HANDLE_TYPE_CONNECT_HTTP, "unexpected callback\n");
1984 SetEvent(ctx->event);
1985 }
1986 }
1987
1988 static void test_open_url_async(void)
1989 {
1990 BOOL ret;
1991 HINTERNET ses, req;
1992 DWORD size, error;
1993 struct context ctx;
1994 ULONG type;
1995
1996 ctx.req = NULL;
1997 ctx.event = CreateEvent(NULL, TRUE, FALSE, "Z:_home_hans_jaman-installer.exe_ev1");
1998
1999 ses = InternetOpen("AdvancedInstaller", 0, NULL, NULL, INTERNET_FLAG_ASYNC);
2000 ok(ses != NULL, "InternetOpen failed\n");
2001
2002 SetLastError(0xdeadbeef);
2003 ret = InternetSetOptionA(NULL, INTERNET_OPTION_CALLBACK, &cb, sizeof(DWORD_PTR));
2004 error = GetLastError();
2005 ok(!ret, "InternetSetOptionA succeeded\n");
2006 ok(error == ERROR_INTERNET_INCORRECT_HANDLE_TYPE, "got %u expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE\n", error);
2007
2008 ret = InternetSetOptionA(ses, INTERNET_OPTION_CALLBACK, &cb, sizeof(DWORD_PTR));
2009 error = GetLastError();
2010 ok(!ret, "InternetSetOptionA failed\n");
2011 ok(error == ERROR_INTERNET_OPTION_NOT_SETTABLE, "got %u expected ERROR_INTERNET_OPTION_NOT_SETTABLE\n", error);
2012
2013 pInternetSetStatusCallbackA(ses, cb);
2014 ResetEvent(ctx.event);
2015
2016 req = InternetOpenUrl(ses, "http://www.winehq.org", NULL, 0, 0, (DWORD_PTR)&ctx);
2017 ok(!req && GetLastError() == ERROR_IO_PENDING, "InternetOpenUrl failed\n");
2018
2019 WaitForSingleObject(ctx.event, INFINITE);
2020
2021 type = 0;
2022 size = sizeof(type);
2023 ret = InternetQueryOption(ctx.req, INTERNET_OPTION_HANDLE_TYPE, &type, &size);
2024 ok(ret, "InternetQueryOption failed: %u\n", GetLastError());
2025 ok(type == INTERNET_HANDLE_TYPE_HTTP_REQUEST,
2026 "expected INTERNET_HANDLE_TYPE_HTTP_REQUEST, got %u\n", type);
2027
2028 size = 0;
2029 ret = HttpQueryInfo(ctx.req, HTTP_QUERY_RAW_HEADERS_CRLF, NULL, &size, NULL);
2030 ok(!ret && GetLastError() == ERROR_INSUFFICIENT_BUFFER, "HttpQueryInfo failed\n");
2031 ok(size > 0, "expected size > 0\n");
2032
2033 ResetEvent(ctx.event);
2034 InternetCloseHandle(ctx.req);
2035 WaitForSingleObject(ctx.event, INFINITE);
2036
2037 InternetCloseHandle(ses);
2038 CloseHandle(ctx.event);
2039 }
2040
2041 #define STATUS_STRING(status) \
2042 memcpy(status_string[status], #status, sizeof(CHAR) * \
2043 (strlen(#status) < MAX_STATUS_NAME ? \
2044 strlen(#status) : \
2045 MAX_STATUS_NAME - 1))
2046 static void init_status_tests(void)
2047 {
2048 memset(expect, 0, sizeof(expect));
2049 memset(optional, 0, sizeof(optional));
2050 memset(wine_allow, 0, sizeof(wine_allow));
2051 memset(notified, 0, sizeof(notified));
2052 memset(status_string, 0, sizeof(status_string));
2053 STATUS_STRING(INTERNET_STATUS_RESOLVING_NAME);
2054 STATUS_STRING(INTERNET_STATUS_NAME_RESOLVED);
2055 STATUS_STRING(INTERNET_STATUS_CONNECTING_TO_SERVER);
2056 STATUS_STRING(INTERNET_STATUS_CONNECTED_TO_SERVER);
2057 STATUS_STRING(INTERNET_STATUS_SENDING_REQUEST);
2058 STATUS_STRING(INTERNET_STATUS_REQUEST_SENT);
2059 STATUS_STRING(INTERNET_STATUS_RECEIVING_RESPONSE);
2060 STATUS_STRING(INTERNET_STATUS_RESPONSE_RECEIVED);
2061 STATUS_STRING(INTERNET_STATUS_CTL_RESPONSE_RECEIVED);
2062 STATUS_STRING(INTERNET_STATUS_PREFETCH);
2063 STATUS_STRING(INTERNET_STATUS_CLOSING_CONNECTION);
2064 STATUS_STRING(INTERNET_STATUS_CONNECTION_CLOSED);
2065 STATUS_STRING(INTERNET_STATUS_HANDLE_CREATED);
2066 STATUS_STRING(INTERNET_STATUS_HANDLE_CLOSING);
2067 STATUS_STRING(INTERNET_STATUS_DETECTING_PROXY);
2068 STATUS_STRING(INTERNET_STATUS_REQUEST_COMPLETE);
2069 STATUS_STRING(INTERNET_STATUS_REDIRECT);
2070 STATUS_STRING(INTERNET_STATUS_INTERMEDIATE_RESPONSE);
2071 STATUS_STRING(INTERNET_STATUS_USER_INPUT_REQUIRED);
2072 STATUS_STRING(INTERNET_STATUS_STATE_CHANGE);
2073 STATUS_STRING(INTERNET_STATUS_COOKIE_SENT);
2074 STATUS_STRING(INTERNET_STATUS_COOKIE_RECEIVED);
2075 STATUS_STRING(INTERNET_STATUS_PRIVACY_IMPACTED);
2076 STATUS_STRING(INTERNET_STATUS_P3P_HEADER);
2077 STATUS_STRING(INTERNET_STATUS_P3P_POLICYREF);
2078 STATUS_STRING(INTERNET_STATUS_COOKIE_HISTORY);
2079 }
2080 #undef STATUS_STRING
2081
2082 START_TEST(http)
2083 {
2084 HMODULE hdll;
2085 hdll = GetModuleHandleA("wininet.dll");
2086 pInternetSetStatusCallbackA = (void*)GetProcAddress(hdll, "InternetSetStatusCallbackA");
2087
2088 if (!pInternetSetStatusCallbackA)
2089 skip("skipping the InternetReadFile tests\n");
2090 else
2091 {
2092 init_status_tests();
2093 InternetReadFile_test(INTERNET_FLAG_ASYNC);
2094 InternetReadFile_test(0);
2095 InternetReadFileExA_test(INTERNET_FLAG_ASYNC);
2096 test_open_url_async();
2097 }
2098 InternetOpenRequest_test();
2099 test_http_cache();
2100 InternetOpenUrlA_test();
2101 HttpSendRequestEx_test();
2102 HttpHeaders_test();
2103 test_http_connection();
2104 test_user_agent_header();
2105 test_bogus_accept_types_array();
2106 }
useful hacks and other patches not (yet) suitable for mainline