mmdevapi/tests: Add tests for IAudioClient::GetCurrentPadding.
[wine] / dlls / wininet / tests / http.c
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://test.winehq.org/tests/hello.html"
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] ? \
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] ? \
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] + optional[status] == (num), \
88            "expected status %d (%s) %d times, received %d times\n", \
89            status, status < MAX_INTERNET_STATUS && status_string[status] ? \
90            status_string[status] : "unknown", (num), notified[status]); \
91         CLEAR_NOTIFIED(status);                                         \
92     }while(0)
93
94 #define CHECK_NOTIFIED(status) \
95     CHECK_NOTIFIED2(status, 1)
96
97 #define CHECK_NOT_NOTIFIED(status) \
98     CHECK_NOTIFIED2(status, 0)
99
100 #define MAX_INTERNET_STATUS (INTERNET_STATUS_COOKIE_HISTORY+1)
101 static int expect[MAX_INTERNET_STATUS], optional[MAX_INTERNET_STATUS],
102     wine_allow[MAX_INTERNET_STATUS], notified[MAX_INTERNET_STATUS];
103 static const char *status_string[MAX_INTERNET_STATUS];
104
105 static HANDLE hCompleteEvent;
106
107 #define TESTF_REDIRECT      0x01
108 #define TESTF_COMPRESSED    0x02
109 #define TESTF_ALLOW_COOKIE  0x04
110 #define TESTF_CHUNKED       0x08
111
112 typedef struct {
113     const char *url;
114     const char *redirected_url;
115     const char *host;
116     const char *path;
117     const char *headers;
118     DWORD flags;
119     const char *post_data;
120     const char *content;
121 } test_data_t;
122
123 static const test_data_t test_data[] = {
124     {
125         "http://test.winehq.org/tests/data.php",
126         "http://test.winehq.org/tests/data.php",
127         "test.winehq.org",
128         "/tests/data.php",
129         "",
130         TESTF_CHUNKED
131     },
132     {
133         "http://test.winehq.org/tests/redirect",
134         "http://test.winehq.org/tests/hello.html",
135         "test.winehq.org",
136         "/tests/redirect",
137         "",
138         TESTF_REDIRECT
139     },
140     {
141         "http://www.codeweavers.com/",
142         "http://www.codeweavers.com/",
143         "www.codeweavers.com",
144         "",
145         "Accept-Encoding: gzip, deflate",
146         TESTF_COMPRESSED|TESTF_ALLOW_COOKIE
147     },
148     {
149         "http://crossover.codeweavers.com/posttest.php",
150         "http://crossover.codeweavers.com/posttest.php",
151         "crossover.codeweavers.com",
152         "/posttest.php",
153         "Content-Type: application/x-www-form-urlencoded",
154         0,
155         "mode=Test",
156         "mode => Test\n"
157     }
158 };
159
160 static INTERNET_STATUS_CALLBACK (WINAPI *pInternetSetStatusCallbackA)(HINTERNET ,INTERNET_STATUS_CALLBACK);
161
162 static BOOL proxy_active(void)
163 {
164     HKEY internet_settings;
165     DWORD proxy_enable;
166     DWORD size;
167
168     if (RegOpenKeyExA(HKEY_CURRENT_USER, "Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings",
169                       0, KEY_QUERY_VALUE, &internet_settings) != ERROR_SUCCESS)
170         return FALSE;
171
172     size = sizeof(DWORD);
173     if (RegQueryValueExA(internet_settings, "ProxyEnable", NULL, NULL, (LPBYTE) &proxy_enable, &size) != ERROR_SUCCESS)
174         proxy_enable = 0;
175
176     RegCloseKey(internet_settings);
177
178     return proxy_enable != 0;
179 }
180
181 static VOID WINAPI callback(
182      HINTERNET hInternet,
183      DWORD_PTR dwContext,
184      DWORD dwInternetStatus,
185      LPVOID lpvStatusInformation,
186      DWORD dwStatusInformationLength
187 )
188 {
189     CHECK_EXPECT(dwInternetStatus);
190     switch (dwInternetStatus)
191     {
192         case INTERNET_STATUS_RESOLVING_NAME:
193             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RESOLVING_NAME \"%s\" %d\n",
194                 GetCurrentThreadId(), hInternet, dwContext,
195                 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
196             *(LPSTR)lpvStatusInformation = '\0';
197             break;
198         case INTERNET_STATUS_NAME_RESOLVED:
199             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_NAME_RESOLVED \"%s\" %d\n",
200                 GetCurrentThreadId(), hInternet, dwContext,
201                 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
202             *(LPSTR)lpvStatusInformation = '\0';
203             break;
204         case INTERNET_STATUS_CONNECTING_TO_SERVER:
205             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTING_TO_SERVER \"%s\" %d\n",
206                 GetCurrentThreadId(), hInternet, dwContext,
207                 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
208             *(LPSTR)lpvStatusInformation = '\0';
209             break;
210         case INTERNET_STATUS_CONNECTED_TO_SERVER:
211             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTED_TO_SERVER \"%s\" %d\n",
212                 GetCurrentThreadId(), hInternet, dwContext,
213                 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
214             *(LPSTR)lpvStatusInformation = '\0';
215             break;
216         case INTERNET_STATUS_SENDING_REQUEST:
217             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_SENDING_REQUEST %p %d\n",
218                 GetCurrentThreadId(), hInternet, dwContext,
219                 lpvStatusInformation,dwStatusInformationLength);
220             break;
221         case INTERNET_STATUS_REQUEST_SENT:
222             ok(dwStatusInformationLength == sizeof(DWORD),
223                 "info length should be sizeof(DWORD) instead of %d\n",
224                 dwStatusInformationLength);
225             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REQUEST_SENT 0x%x %d\n",
226                 GetCurrentThreadId(), hInternet, dwContext,
227                 *(DWORD *)lpvStatusInformation,dwStatusInformationLength);
228             break;
229         case INTERNET_STATUS_RECEIVING_RESPONSE:
230             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RECEIVING_RESPONSE %p %d\n",
231                 GetCurrentThreadId(), hInternet, dwContext,
232                 lpvStatusInformation,dwStatusInformationLength);
233             break;
234         case INTERNET_STATUS_RESPONSE_RECEIVED:
235             ok(dwStatusInformationLength == sizeof(DWORD),
236                 "info length should be sizeof(DWORD) instead of %d\n",
237                 dwStatusInformationLength);
238             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RESPONSE_RECEIVED 0x%x %d\n",
239                 GetCurrentThreadId(), hInternet, dwContext,
240                 *(DWORD *)lpvStatusInformation,dwStatusInformationLength);
241             break;
242         case INTERNET_STATUS_CTL_RESPONSE_RECEIVED:
243             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CTL_RESPONSE_RECEIVED %p %d\n",
244                 GetCurrentThreadId(), hInternet,dwContext,
245                 lpvStatusInformation,dwStatusInformationLength);
246             break;
247         case INTERNET_STATUS_PREFETCH:
248             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_PREFETCH %p %d\n",
249                 GetCurrentThreadId(), hInternet, dwContext,
250                 lpvStatusInformation,dwStatusInformationLength);
251             break;
252         case INTERNET_STATUS_CLOSING_CONNECTION:
253             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CLOSING_CONNECTION %p %d\n",
254                 GetCurrentThreadId(), hInternet, dwContext,
255                 lpvStatusInformation,dwStatusInformationLength);
256             break;
257         case INTERNET_STATUS_CONNECTION_CLOSED:
258             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTION_CLOSED %p %d\n",
259                 GetCurrentThreadId(), hInternet, dwContext,
260                 lpvStatusInformation,dwStatusInformationLength);
261             break;
262         case INTERNET_STATUS_HANDLE_CREATED:
263             ok(dwStatusInformationLength == sizeof(HINTERNET),
264                 "info length should be sizeof(HINTERNET) instead of %d\n",
265                 dwStatusInformationLength);
266             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_HANDLE_CREATED %p %d\n",
267                 GetCurrentThreadId(), hInternet, dwContext,
268                 *(HINTERNET *)lpvStatusInformation,dwStatusInformationLength);
269             CLEAR_NOTIFIED(INTERNET_STATUS_DETECTING_PROXY);
270             SET_EXPECT(INTERNET_STATUS_DETECTING_PROXY);
271             break;
272         case INTERNET_STATUS_HANDLE_CLOSING:
273             ok(dwStatusInformationLength == sizeof(HINTERNET),
274                 "info length should be sizeof(HINTERNET) instead of %d\n",
275                 dwStatusInformationLength);
276             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_HANDLE_CLOSING %p %d\n",
277                 GetCurrentThreadId(), hInternet, dwContext,
278                 *(HINTERNET *)lpvStatusInformation, dwStatusInformationLength);
279             break;
280         case INTERNET_STATUS_REQUEST_COMPLETE:
281         {
282             INTERNET_ASYNC_RESULT *iar = (INTERNET_ASYNC_RESULT *)lpvStatusInformation;
283             ok(dwStatusInformationLength == sizeof(INTERNET_ASYNC_RESULT),
284                 "info length should be sizeof(INTERNET_ASYNC_RESULT) instead of %d\n",
285                 dwStatusInformationLength);
286             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REQUEST_COMPLETE {%ld,%d} %d\n",
287                 GetCurrentThreadId(), hInternet, dwContext,
288                 iar->dwResult,iar->dwError,dwStatusInformationLength);
289             SetEvent(hCompleteEvent);
290             break;
291         }
292         case INTERNET_STATUS_REDIRECT:
293             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REDIRECT \"%s\" %d\n",
294                 GetCurrentThreadId(), hInternet, dwContext,
295                 (LPCSTR)lpvStatusInformation, dwStatusInformationLength);
296             *(LPSTR)lpvStatusInformation = '\0';
297             CLEAR_NOTIFIED(INTERNET_STATUS_DETECTING_PROXY);
298             SET_EXPECT(INTERNET_STATUS_DETECTING_PROXY);
299             break;
300         case INTERNET_STATUS_INTERMEDIATE_RESPONSE:
301             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_INTERMEDIATE_RESPONSE %p %d\n",
302                 GetCurrentThreadId(), hInternet, dwContext,
303                 lpvStatusInformation, dwStatusInformationLength);
304             break;
305         default:
306             trace("%04x:Callback %p 0x%lx %d %p %d\n",
307                 GetCurrentThreadId(), hInternet, dwContext, dwInternetStatus,
308                 lpvStatusInformation, dwStatusInformationLength);
309     }
310 }
311
312 static void InternetReadFile_test(int flags, const test_data_t *test)
313 {
314     char *post_data = NULL;
315     BOOL res, on_async = TRUE;
316     CHAR buffer[4000];
317     DWORD length, post_len = 0;
318     DWORD out;
319     const char *types[2] = { "*", NULL };
320     HINTERNET hi, hic = 0, hor = 0;
321
322     hCompleteEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
323
324     trace("Starting InternetReadFile test with flags 0x%x on url %s\n",flags,test->url);
325
326     trace("InternetOpenA <--\n");
327     hi = InternetOpenA((test->flags & TESTF_COMPRESSED) ? "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)" : "",
328             INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, flags);
329     ok((hi != 0x0),"InternetOpen failed with error %u\n", GetLastError());
330     trace("InternetOpenA -->\n");
331
332     if (hi == 0x0) goto abort;
333
334     pInternetSetStatusCallbackA(hi,&callback);
335
336     SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
337
338     trace("InternetConnectA <--\n");
339     hic=InternetConnectA(hi, test->host, INTERNET_INVALID_PORT_NUMBER,
340                          NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
341     ok((hic != 0x0),"InternetConnect failed with error %u\n", GetLastError());
342     trace("InternetConnectA -->\n");
343
344     if (hic == 0x0) goto abort;
345
346     CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
347     SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
348
349     trace("HttpOpenRequestA <--\n");
350     hor = HttpOpenRequestA(hic, test->post_data ? "POST" : "GET", test->path, NULL, NULL, types,
351                            INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
352                            0xdeadbead);
353     if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
354         /*
355          * If the internet name can't be resolved we are probably behind
356          * a firewall or in some other way not directly connected to the
357          * Internet. Not enough reason to fail the test. Just ignore and
358          * abort.
359          */
360     } else  {
361         ok((hor != 0x0),"HttpOpenRequest failed with error %u\n", GetLastError());
362     }
363     trace("HttpOpenRequestA -->\n");
364
365     if (hor == 0x0) goto abort;
366
367     length = sizeof(buffer);
368     res = InternetQueryOptionA(hor, INTERNET_OPTION_URL, buffer, &length);
369     ok(res, "InternetQueryOptionA(INTERNET_OPTION_URL) failed: %u\n", GetLastError());
370     ok(!strcmp(buffer, test->url), "Wrong URL %s, expected %s\n", buffer, test->url);
371
372     length = sizeof(buffer);
373     res = HttpQueryInfoA(hor, HTTP_QUERY_RAW_HEADERS, buffer, &length, 0x0);
374     ok(res, "HttpQueryInfoA(HTTP_QUERY_RAW_HEADERS) failed with error %d\n", GetLastError());
375     ok(length == 0, "HTTP_QUERY_RAW_HEADERS: expected length 0, but got %d\n", length);
376     ok(!strcmp(buffer, ""), "HTTP_QUERY_RAW_HEADERS: expected string \"\", but got \"%s\"\n", buffer);
377
378     CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
379     CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
380     CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
381     if(test->flags & TESTF_ALLOW_COOKIE) {
382         SET_OPTIONAL(INTERNET_STATUS_COOKIE_SENT);
383         SET_OPTIONAL(INTERNET_STATUS_COOKIE_RECEIVED);
384     }
385     if (first_connection_to_test_url)
386     {
387         SET_EXPECT(INTERNET_STATUS_RESOLVING_NAME);
388         SET_EXPECT(INTERNET_STATUS_NAME_RESOLVED);
389         SET_WINE_ALLOW(INTERNET_STATUS_RESOLVING_NAME);
390         SET_WINE_ALLOW(INTERNET_STATUS_NAME_RESOLVED);
391     }
392     else
393     {
394         SET_WINE_ALLOW2(INTERNET_STATUS_RESOLVING_NAME,2);
395         SET_WINE_ALLOW2(INTERNET_STATUS_NAME_RESOLVED,2);
396     }
397     SET_WINE_ALLOW(INTERNET_STATUS_CONNECTING_TO_SERVER);
398     SET_EXPECT(INTERNET_STATUS_CONNECTING_TO_SERVER);
399     SET_WINE_ALLOW(INTERNET_STATUS_CONNECTED_TO_SERVER);
400     SET_EXPECT(INTERNET_STATUS_CONNECTED_TO_SERVER);
401     SET_EXPECT2(INTERNET_STATUS_SENDING_REQUEST, (test->flags & TESTF_REDIRECT) ? 2 : 1);
402     SET_EXPECT2(INTERNET_STATUS_REQUEST_SENT, (test->flags & TESTF_REDIRECT) ? 2 : 1);
403     SET_EXPECT2(INTERNET_STATUS_RECEIVING_RESPONSE, (test->flags & TESTF_REDIRECT) ? 2 : 1);
404     SET_EXPECT2(INTERNET_STATUS_RESPONSE_RECEIVED, (test->flags & TESTF_REDIRECT) ? 2 : 1);
405     if(test->flags & TESTF_REDIRECT) {
406         SET_OPTIONAL2(INTERNET_STATUS_CLOSING_CONNECTION, 2);
407         SET_OPTIONAL2(INTERNET_STATUS_CONNECTION_CLOSED, 2);
408     }
409     SET_EXPECT(INTERNET_STATUS_REDIRECT);
410     SET_OPTIONAL(INTERNET_STATUS_CONNECTING_TO_SERVER);
411     SET_OPTIONAL(INTERNET_STATUS_CONNECTED_TO_SERVER);
412     if (flags & INTERNET_FLAG_ASYNC)
413         SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
414     else
415         SET_WINE_ALLOW(INTERNET_STATUS_REQUEST_COMPLETE);
416
417     if(test->flags & TESTF_COMPRESSED) {
418         BOOL b = TRUE;
419
420         res = InternetSetOption(hor, INTERNET_OPTION_HTTP_DECODING, &b, sizeof(b));
421         ok(res || broken(!res && GetLastError() == ERROR_INTERNET_INVALID_OPTION),
422            "InternetSetOption failed: %u\n", GetLastError());
423         if(!res)
424             goto abort;
425     }
426
427     trace("HttpSendRequestA -->\n");
428     if(test->post_data) {
429         post_len = strlen(test->post_data);
430         post_data = HeapAlloc(GetProcessHeap(), 0, post_len);
431         memcpy(post_data, test->post_data, post_len);
432     }
433     SetLastError(0xdeadbeef);
434     res = HttpSendRequestA(hor, test->headers, -1, post_data, post_len);
435     if (flags & INTERNET_FLAG_ASYNC)
436         ok(!res && (GetLastError() == ERROR_IO_PENDING),
437             "Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
438     else
439         ok(res || (GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED),
440            "Synchronous HttpSendRequest returning 0, error %u\n", GetLastError());
441     trace("HttpSendRequestA <--\n");
442
443     if (flags & INTERNET_FLAG_ASYNC)
444         WaitForSingleObject(hCompleteEvent, INFINITE);
445     HeapFree(GetProcessHeap(), 0, post_data);
446
447     if(test->flags & TESTF_ALLOW_COOKIE) {
448         CLEAR_NOTIFIED(INTERNET_STATUS_COOKIE_SENT);
449         CLEAR_NOTIFIED(INTERNET_STATUS_COOKIE_RECEIVED);
450     }
451     if (first_connection_to_test_url)
452     {
453         if (! proxy_active())
454         {
455             CHECK_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
456             CHECK_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
457         }
458         else
459         {
460             CLEAR_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
461             CLEAR_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
462         }
463     }
464     else todo_wine
465     {
466         CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
467         CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
468     }
469     CHECK_NOTIFIED2(INTERNET_STATUS_SENDING_REQUEST, (test->flags & TESTF_REDIRECT) ? 2 : 1);
470     CHECK_NOTIFIED2(INTERNET_STATUS_REQUEST_SENT, (test->flags & TESTF_REDIRECT) ? 2 : 1);
471     CHECK_NOTIFIED2(INTERNET_STATUS_RECEIVING_RESPONSE, (test->flags & TESTF_REDIRECT) ? 2 : 1);
472     CHECK_NOTIFIED2(INTERNET_STATUS_RESPONSE_RECEIVED, (test->flags & TESTF_REDIRECT) ? 2 : 1);
473     if(test->flags & TESTF_REDIRECT)
474         CHECK_NOTIFIED(INTERNET_STATUS_REDIRECT);
475     if (flags & INTERNET_FLAG_ASYNC)
476         CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
477     else
478         CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
479     /* Sent on WinXP only if first_connection_to_test_url is TRUE, on Win98 always sent */
480     CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTING_TO_SERVER);
481     CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTED_TO_SERVER);
482
483     length = 4;
484     res = InternetQueryOptionA(hor,INTERNET_OPTION_REQUEST_FLAGS,&out,&length);
485     ok(res, "InternetQueryOptionA(INTERNET_OPTION_REQUEST) failed with error %d\n", GetLastError());
486
487     length = 100;
488     res = InternetQueryOptionA(hor,INTERNET_OPTION_URL,buffer,&length);
489     ok(res, "InternetQueryOptionA(INTERNET_OPTION_URL) failed with error %d\n", GetLastError());
490
491     length = sizeof(buffer);
492     res = HttpQueryInfoA(hor,HTTP_QUERY_RAW_HEADERS,buffer,&length,0x0);
493     ok(res, "HttpQueryInfoA(HTTP_QUERY_RAW_HEADERS) failed with error %d\n", GetLastError());
494     buffer[length]=0;
495
496     length = sizeof(buffer);
497     res = InternetQueryOptionA(hor, INTERNET_OPTION_URL, buffer, &length);
498     ok(res, "InternetQueryOptionA(INTERNET_OPTION_URL) failed: %u\n", GetLastError());
499     ok(!strcmp(buffer, test->redirected_url), "Wrong URL %s\n", buffer);
500
501     length = 16;
502     res = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_LENGTH,&buffer,&length,0x0);
503     trace("Option HTTP_QUERY_CONTENT_LENGTH -> %i  %s  (%u)\n",res,buffer,GetLastError());
504     if(test->flags & TESTF_COMPRESSED)
505         ok(!res && GetLastError() == ERROR_HTTP_HEADER_NOT_FOUND,
506            "expected ERROR_HTTP_HEADER_NOT_FOUND, got %x (%u)\n", res, GetLastError());
507
508     length = 100;
509     res = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_TYPE,buffer,&length,0x0);
510     buffer[length]=0;
511     trace("Option HTTP_QUERY_CONTENT_TYPE -> %i  %s\n",res,buffer);
512
513     length = 100;
514     res = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_ENCODING,buffer,&length,0x0);
515     buffer[length]=0;
516     trace("Option HTTP_QUERY_CONTENT_ENCODING -> %i  %s\n",res,buffer);
517
518     SetLastError(0xdeadbeef);
519     res = InternetReadFile(NULL, buffer, 100, &length);
520     ok(!res, "InternetReadFile should have failed\n");
521     ok(GetLastError() == ERROR_INVALID_HANDLE,
522         "InternetReadFile should have set last error to ERROR_INVALID_HANDLE instead of %u\n",
523         GetLastError());
524
525     length = 100;
526     trace("Entering Query loop\n");
527
528     while (TRUE)
529     {
530         if (flags & INTERNET_FLAG_ASYNC)
531             SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
532         res = InternetQueryDataAvailable(hor,&length,0x0,0x0);
533         if (flags & INTERNET_FLAG_ASYNC)
534         {
535             if (res)
536             {
537                 CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
538             }
539             else if (GetLastError() == ERROR_IO_PENDING)
540             {
541                 trace("PENDING\n");
542                 /* on some tests, InternetQueryDataAvailable returns non-zero length and ERROR_IO_PENDING */
543                 if(!(test->flags & TESTF_CHUNKED))
544                     ok(!length, "InternetQueryDataAvailable returned ERROR_IO_PENDING and %u length\n", length);
545                 WaitForSingleObject(hCompleteEvent, INFINITE);
546                 CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
547                 continue;
548             }else {
549                 ok(0, "InternetQueryDataAvailable failed: %u\n", GetLastError());
550             }
551         }else {
552             ok(res, "InternetQueryDataAvailable failed: %u\n", GetLastError());
553         }
554         trace("LENGTH %d\n", length);
555         if(test->flags & TESTF_CHUNKED)
556             ok(length <= 8192, "length = %d, expected <= 8192\n", length);
557         if (length)
558         {
559             char *buffer;
560             buffer = HeapAlloc(GetProcessHeap(),0,length+1);
561
562             res = InternetReadFile(hor,buffer,length,&length);
563
564             buffer[length]=0;
565
566             trace("ReadFile -> %s %i\n",res?"TRUE":"FALSE",length);
567
568             if(test->content)
569                 ok(!strcmp(buffer, test->content), "buffer = '%s', expected '%s'\n", buffer, test->content);
570             HeapFree(GetProcessHeap(),0,buffer);
571         }else {
572             ok(!on_async, "Returned zero size in response to request complete\n");
573             break;
574         }
575         on_async = FALSE;
576     }
577     if(test->flags & TESTF_REDIRECT) {
578         CHECK_NOTIFIED2(INTERNET_STATUS_CLOSING_CONNECTION, 2);
579         CHECK_NOTIFIED2(INTERNET_STATUS_CONNECTION_CLOSED, 2);
580     }
581 abort:
582     trace("aborting\n");
583     SET_EXPECT2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
584     if (hor != 0x0) {
585         SET_WINE_ALLOW(INTERNET_STATUS_CLOSING_CONNECTION);
586         SET_WINE_ALLOW(INTERNET_STATUS_CONNECTION_CLOSED);
587         SetLastError(0xdeadbeef);
588         trace("closing\n");
589         res = InternetCloseHandle(hor);
590         ok (res, "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
591         SetLastError(0xdeadbeef);
592         res = InternetCloseHandle(hor);
593         ok (!res, "Double close of handle opened by HttpOpenRequestA succeeded\n");
594         ok (GetLastError() == ERROR_INVALID_HANDLE,
595             "Double close of handle should have set ERROR_INVALID_HANDLE instead of %u\n",
596             GetLastError());
597     }
598     /* We intentionally do not close the handle opened by InternetConnectA as this
599      * tickles bug #9479: native closes child internet handles when the parent handles
600      * are closed. This is verified below by checking that the number of
601      * INTERNET_STATUS_HANDLE_CLOSING notifications matches the number expected. */
602     if (hi != 0x0) {
603       SET_WINE_ALLOW(INTERNET_STATUS_HANDLE_CLOSING);
604         trace("closing 2\n");
605       res = InternetCloseHandle(hi);
606       ok (res, "InternetCloseHandle of handle opened by InternetOpenA failed\n");
607       if (flags & INTERNET_FLAG_ASYNC)
608           Sleep(100);
609     }
610     CHECK_NOTIFIED2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
611     if (hor != 0x0) todo_wine
612     {
613         CHECK_NOT_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
614         CHECK_NOT_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
615     }
616     else
617     {
618         CHECK_NOT_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
619         CHECK_NOT_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
620     }
621     CloseHandle(hCompleteEvent);
622     first_connection_to_test_url = FALSE;
623 }
624
625 static void InternetReadFile_chunked_test(void)
626 {
627     BOOL res;
628     CHAR buffer[4000];
629     DWORD length;
630     const char *types[2] = { "*", NULL };
631     HINTERNET hi, hic = 0, hor = 0;
632
633     trace("Starting InternetReadFile chunked test\n");
634
635     trace("InternetOpenA <--\n");
636     hi = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
637     ok((hi != 0x0),"InternetOpen failed with error %u\n", GetLastError());
638     trace("InternetOpenA -->\n");
639
640     if (hi == 0x0) goto abort;
641
642     trace("InternetConnectA <--\n");
643     hic=InternetConnectA(hi, "test.winehq.org", INTERNET_INVALID_PORT_NUMBER,
644                          NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
645     ok((hic != 0x0),"InternetConnect failed with error %u\n", GetLastError());
646     trace("InternetConnectA -->\n");
647
648     if (hic == 0x0) goto abort;
649
650     trace("HttpOpenRequestA <--\n");
651     hor = HttpOpenRequestA(hic, "GET", "/tests/chunked", NULL, NULL, types,
652                            INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
653                            0xdeadbead);
654     if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
655         /*
656          * If the internet name can't be resolved we are probably behind
657          * a firewall or in some other way not directly connected to the
658          * Internet. Not enough reason to fail the test. Just ignore and
659          * abort.
660          */
661     } else  {
662         ok((hor != 0x0),"HttpOpenRequest failed with error %u\n", GetLastError());
663     }
664     trace("HttpOpenRequestA -->\n");
665
666     if (hor == 0x0) goto abort;
667
668     trace("HttpSendRequestA -->\n");
669     SetLastError(0xdeadbeef);
670     res = HttpSendRequestA(hor, "", -1, NULL, 0);
671     ok(res || (GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED),
672        "Synchronous HttpSendRequest returning 0, error %u\n", GetLastError());
673     trace("HttpSendRequestA <--\n");
674
675     length = 100;
676     res = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_TYPE,buffer,&length,0x0);
677     buffer[length]=0;
678     trace("Option CONTENT_TYPE -> %i  %s\n",res,buffer);
679
680     SetLastError( 0xdeadbeef );
681     length = 100;
682     res = HttpQueryInfoA(hor,HTTP_QUERY_TRANSFER_ENCODING,buffer,&length,0x0);
683     buffer[length]=0;
684     trace("Option TRANSFER_ENCODING -> %i  %s\n",res,buffer);
685     ok( res || ( proxy_active() && GetLastError() == ERROR_HTTP_HEADER_NOT_FOUND ),
686         "Failed to get TRANSFER_ENCODING option, error %u\n", GetLastError() );
687     ok( !strcmp( buffer, "chunked" ) || ( ! res && proxy_active() && GetLastError() == ERROR_HTTP_HEADER_NOT_FOUND ),
688         "Wrong transfer encoding '%s'\n", buffer );
689
690     SetLastError( 0xdeadbeef );
691     length = 16;
692     res = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_LENGTH,&buffer,&length,0x0);
693     ok( !res, "Found CONTENT_LENGTH option '%s'\n", buffer );
694     ok( GetLastError() == ERROR_HTTP_HEADER_NOT_FOUND, "Wrong error %u\n", GetLastError() );
695
696     length = 100;
697     trace("Entering Query loop\n");
698
699     while (TRUE)
700     {
701         res = InternetQueryDataAvailable(hor,&length,0x0,0x0);
702         ok(!(!res && length != 0),"InternetQueryDataAvailable failed with non-zero length\n");
703         ok(res, "InternetQueryDataAvailable failed, error %d\n", GetLastError());
704         trace("got %u available\n",length);
705         if (length)
706         {
707             DWORD got;
708             char *buffer = HeapAlloc(GetProcessHeap(),0,length+1);
709
710             res = InternetReadFile(hor,buffer,length,&got);
711
712             buffer[got]=0;
713             trace("ReadFile -> %i %i\n",res,got);
714             ok( length == got, "only got %u of %u available\n", got, length );
715             ok( buffer[got-1] == '\n', "received partial line '%s'\n", buffer );
716
717             HeapFree(GetProcessHeap(),0,buffer);
718             if (!got) break;
719         }
720         if (length == 0)
721             break;
722     }
723 abort:
724     trace("aborting\n");
725     if (hor != 0x0) {
726         res = InternetCloseHandle(hor);
727         ok (res, "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
728     }
729     if (hi != 0x0) {
730         res = InternetCloseHandle(hi);
731         ok (res, "InternetCloseHandle of handle opened by InternetOpenA failed\n");
732     }
733 }
734
735 static void InternetReadFileExA_test(int flags)
736 {
737     DWORD rc;
738     DWORD length;
739     const char *types[2] = { "*", NULL };
740     HINTERNET hi, hic = 0, hor = 0;
741     INTERNET_BUFFERS inetbuffers;
742
743     hCompleteEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
744
745     trace("Starting InternetReadFileExA test with flags 0x%x\n",flags);
746
747     trace("InternetOpenA <--\n");
748     hi = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, flags);
749     ok((hi != 0x0),"InternetOpen failed with error %u\n", GetLastError());
750     trace("InternetOpenA -->\n");
751
752     if (hi == 0x0) goto abort;
753
754     pInternetSetStatusCallbackA(hi,&callback);
755
756     SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
757
758     trace("InternetConnectA <--\n");
759     hic=InternetConnectA(hi, "test.winehq.org", INTERNET_INVALID_PORT_NUMBER,
760                          NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
761     ok((hic != 0x0),"InternetConnect failed with error %u\n", GetLastError());
762     trace("InternetConnectA -->\n");
763
764     if (hic == 0x0) goto abort;
765
766     CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
767     SET_EXPECT(INTERNET_STATUS_HANDLE_CREATED);
768
769     trace("HttpOpenRequestA <--\n");
770     hor = HttpOpenRequestA(hic, "GET", "/tests/redirect", NULL, NULL, types,
771                            INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
772                            0xdeadbead);
773     if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
774         /*
775          * If the internet name can't be resolved we are probably behind
776          * a firewall or in some other way not directly connected to the
777          * Internet. Not enough reason to fail the test. Just ignore and
778          * abort.
779          */
780     } else  {
781         ok((hor != 0x0),"HttpOpenRequest failed with error %u\n", GetLastError());
782     }
783     trace("HttpOpenRequestA -->\n");
784
785     if (hor == 0x0) goto abort;
786
787     CHECK_NOTIFIED(INTERNET_STATUS_HANDLE_CREATED);
788     CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
789     CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
790     if (first_connection_to_test_url)
791     {
792         SET_EXPECT(INTERNET_STATUS_RESOLVING_NAME);
793         SET_EXPECT(INTERNET_STATUS_NAME_RESOLVED);
794         SET_WINE_ALLOW(INTERNET_STATUS_RESOLVING_NAME);
795         SET_WINE_ALLOW(INTERNET_STATUS_NAME_RESOLVED);
796     }
797     else
798     {
799         SET_WINE_ALLOW2(INTERNET_STATUS_RESOLVING_NAME,2);
800         SET_WINE_ALLOW2(INTERNET_STATUS_NAME_RESOLVED,2);
801     }
802     SET_WINE_ALLOW(INTERNET_STATUS_CONNECTING_TO_SERVER);
803     SET_EXPECT(INTERNET_STATUS_CONNECTING_TO_SERVER);
804     SET_WINE_ALLOW(INTERNET_STATUS_CONNECTED_TO_SERVER);
805     SET_EXPECT(INTERNET_STATUS_CONNECTED_TO_SERVER);
806     SET_EXPECT2(INTERNET_STATUS_SENDING_REQUEST, 2);
807     SET_EXPECT2(INTERNET_STATUS_REQUEST_SENT, 2);
808     SET_EXPECT2(INTERNET_STATUS_RECEIVING_RESPONSE, 2);
809     SET_EXPECT2(INTERNET_STATUS_RESPONSE_RECEIVED, 2);
810     SET_OPTIONAL2(INTERNET_STATUS_CLOSING_CONNECTION, 2);
811     SET_OPTIONAL2(INTERNET_STATUS_CONNECTION_CLOSED, 2);
812     SET_EXPECT(INTERNET_STATUS_REDIRECT);
813     SET_OPTIONAL(INTERNET_STATUS_CONNECTING_TO_SERVER);
814     SET_OPTIONAL(INTERNET_STATUS_CONNECTED_TO_SERVER);
815     if (flags & INTERNET_FLAG_ASYNC)
816         SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
817     else
818         SET_WINE_ALLOW(INTERNET_STATUS_REQUEST_COMPLETE);
819
820     trace("HttpSendRequestA -->\n");
821     SetLastError(0xdeadbeef);
822     rc = HttpSendRequestA(hor, "", -1, NULL, 0);
823     if (flags & INTERNET_FLAG_ASYNC)
824         ok(((rc == 0)&&(GetLastError() == ERROR_IO_PENDING)),
825             "Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
826     else
827         ok((rc != 0) || GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED,
828            "Synchronous HttpSendRequest returning 0, error %u\n", GetLastError());
829     trace("HttpSendRequestA <--\n");
830
831     if (!rc && (GetLastError() == ERROR_IO_PENDING))
832         WaitForSingleObject(hCompleteEvent, INFINITE);
833
834     if (first_connection_to_test_url)
835     {
836         CHECK_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
837         CHECK_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
838     }
839     else todo_wine
840     {
841         CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESOLVING_NAME);
842         CHECK_NOT_NOTIFIED(INTERNET_STATUS_NAME_RESOLVED);
843     }
844     CHECK_NOTIFIED2(INTERNET_STATUS_SENDING_REQUEST, 2);
845     CHECK_NOTIFIED2(INTERNET_STATUS_REQUEST_SENT, 2);
846     CHECK_NOTIFIED2(INTERNET_STATUS_RECEIVING_RESPONSE, 2);
847     CHECK_NOTIFIED2(INTERNET_STATUS_RESPONSE_RECEIVED, 2);
848     CHECK_NOTIFIED2(INTERNET_STATUS_CLOSING_CONNECTION, 2);
849     CHECK_NOTIFIED2(INTERNET_STATUS_CONNECTION_CLOSED, 2);
850     CHECK_NOTIFIED(INTERNET_STATUS_REDIRECT);
851     if (flags & INTERNET_FLAG_ASYNC)
852         CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
853     else
854         todo_wine CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
855     /* Sent on WinXP only if first_connection_to_test_url is TRUE, on Win98 always sent */
856     CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTING_TO_SERVER);
857     CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTED_TO_SERVER);
858
859     /* tests invalid dwStructSize */
860     inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS)+1;
861     inetbuffers.lpcszHeader = NULL;
862     inetbuffers.dwHeadersLength = 0;
863     inetbuffers.dwBufferLength = 10;
864     inetbuffers.lpvBuffer = HeapAlloc(GetProcessHeap(), 0, 10);
865     inetbuffers.dwOffsetHigh = 1234;
866     inetbuffers.dwOffsetLow = 5678;
867     rc = InternetReadFileEx(hor, &inetbuffers, 0, 0xdeadcafe);
868     ok(!rc && (GetLastError() == ERROR_INVALID_PARAMETER),
869         "InternetReadFileEx should have failed with ERROR_INVALID_PARAMETER instead of %s, %u\n",
870         rc ? "TRUE" : "FALSE", GetLastError());
871     HeapFree(GetProcessHeap(), 0, inetbuffers.lpvBuffer);
872
873     /* tests to see whether lpcszHeader is used - it isn't */
874     inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS);
875     inetbuffers.lpcszHeader = (LPCTSTR)0xdeadbeef;
876     inetbuffers.dwHeadersLength = 255;
877     inetbuffers.dwBufferLength = 0;
878     inetbuffers.lpvBuffer = NULL;
879     inetbuffers.dwOffsetHigh = 1234;
880     inetbuffers.dwOffsetLow = 5678;
881     SET_EXPECT(INTERNET_STATUS_RECEIVING_RESPONSE);
882     SET_EXPECT(INTERNET_STATUS_RESPONSE_RECEIVED);
883     SET_EXPECT(INTERNET_STATUS_CLOSING_CONNECTION);
884     SET_EXPECT(INTERNET_STATUS_CONNECTION_CLOSED);
885     rc = InternetReadFileEx(hor, &inetbuffers, 0, 0xdeadcafe);
886     ok(rc, "InternetReadFileEx failed with error %u\n", GetLastError());
887         trace("read %i bytes\n", inetbuffers.dwBufferLength);
888     todo_wine
889     {
890         CHECK_NOT_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
891         CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
892     }
893
894     rc = InternetReadFileEx(NULL, &inetbuffers, 0, 0xdeadcafe);
895     ok(!rc && (GetLastError() == ERROR_INVALID_HANDLE),
896         "InternetReadFileEx should have failed with ERROR_INVALID_HANDLE instead of %s, %u\n",
897         rc ? "TRUE" : "FALSE", GetLastError());
898
899     length = 0;
900     trace("Entering Query loop\n");
901
902     SET_EXPECT(INTERNET_STATUS_CLOSING_CONNECTION);
903     SET_EXPECT(INTERNET_STATUS_CONNECTION_CLOSED);
904     while (TRUE)
905     {
906         inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS);
907         inetbuffers.dwBufferLength = 1024;
908         inetbuffers.lpvBuffer = HeapAlloc(GetProcessHeap(), 0, inetbuffers.dwBufferLength+1);
909         inetbuffers.dwOffsetHigh = 1234;
910         inetbuffers.dwOffsetLow = 5678;
911
912         SET_WINE_ALLOW(INTERNET_STATUS_RECEIVING_RESPONSE);
913         SET_WINE_ALLOW(INTERNET_STATUS_RESPONSE_RECEIVED);
914         SET_EXPECT(INTERNET_STATUS_CLOSING_CONNECTION);
915         SET_EXPECT(INTERNET_STATUS_CONNECTION_CLOSED);
916         SET_EXPECT(INTERNET_STATUS_REQUEST_COMPLETE);
917         rc = InternetReadFileExA(hor, &inetbuffers, IRF_ASYNC | IRF_USE_CONTEXT, 0xcafebabe);
918         if (!rc)
919         {
920             if (GetLastError() == ERROR_IO_PENDING)
921             {
922                 trace("InternetReadFileEx -> PENDING\n");
923                 ok(flags & INTERNET_FLAG_ASYNC,
924                    "Should not get ERROR_IO_PENDING without INTERNET_FLAG_ASYNC\n");
925                 CHECK_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
926                 WaitForSingleObject(hCompleteEvent, INFINITE);
927                 CHECK_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
928                 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
929             }
930             else
931             {
932                 trace("InternetReadFileEx -> FAILED %u\n", GetLastError());
933                 break;
934             }
935         }
936         else
937         {
938             trace("InternetReadFileEx -> SUCCEEDED\n");
939             CHECK_NOT_NOTIFIED(INTERNET_STATUS_REQUEST_COMPLETE);
940             if (inetbuffers.dwBufferLength)
941             {
942                 todo_wine {
943                 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
944                 CHECK_NOT_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
945                 }
946             }
947             else
948             {
949                 /* Win98 still sends these when 0 bytes are read, WinXP does not */
950                 CLEAR_NOTIFIED(INTERNET_STATUS_RECEIVING_RESPONSE);
951                 CLEAR_NOTIFIED(INTERNET_STATUS_RESPONSE_RECEIVED);
952             }
953         }
954
955         trace("read %i bytes\n", inetbuffers.dwBufferLength);
956         ((char *)inetbuffers.lpvBuffer)[inetbuffers.dwBufferLength] = '\0';
957
958         ok(inetbuffers.dwOffsetHigh == 1234 && inetbuffers.dwOffsetLow == 5678,
959             "InternetReadFileEx sets offsets to 0x%x%08x\n",
960             inetbuffers.dwOffsetHigh, inetbuffers.dwOffsetLow);
961
962         HeapFree(GetProcessHeap(), 0, inetbuffers.lpvBuffer);
963
964         if (!inetbuffers.dwBufferLength)
965             break;
966
967         length += inetbuffers.dwBufferLength;
968     }
969     ok(length > 0, "failed to read any of the document\n");
970     trace("Finished. Read %d bytes\n", length);
971
972     /* WinXP does not send, but Win98 does */
973     CLEAR_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
974     CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
975 abort:
976     SET_EXPECT2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
977     if (hor) {
978         SET_WINE_ALLOW(INTERNET_STATUS_CLOSING_CONNECTION);
979         SET_WINE_ALLOW(INTERNET_STATUS_CONNECTION_CLOSED);
980         rc = InternetCloseHandle(hor);
981         ok ((rc != 0), "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
982         rc = InternetCloseHandle(hor);
983         ok ((rc == 0), "Double close of handle opened by HttpOpenRequestA succeeded\n");
984     }
985     if (hic) {
986         rc = InternetCloseHandle(hic);
987         ok ((rc != 0), "InternetCloseHandle of handle opened by InternetConnectA failed\n");
988     }
989     if (hi) {
990       SET_WINE_ALLOW(INTERNET_STATUS_HANDLE_CLOSING);
991       rc = InternetCloseHandle(hi);
992       ok ((rc != 0), "InternetCloseHandle of handle opened by InternetOpenA failed\n");
993       if (flags & INTERNET_FLAG_ASYNC)
994           Sleep(100);
995       CHECK_NOTIFIED2(INTERNET_STATUS_HANDLE_CLOSING, (hor != 0x0) + (hic != 0x0));
996     }
997     /* to enable once Wine is fixed to never send it
998     CHECK_NOT_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
999     CHECK_NOT_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
1000     */
1001     CLEAR_NOTIFIED(INTERNET_STATUS_CLOSING_CONNECTION);
1002     CLEAR_NOTIFIED(INTERNET_STATUS_CONNECTION_CLOSED);
1003     CloseHandle(hCompleteEvent);
1004     first_connection_to_test_url = FALSE;
1005 }
1006
1007 static void InternetOpenUrlA_test(void)
1008 {
1009   HINTERNET myhinternet, myhttp;
1010   char buffer[0x400];
1011   DWORD size, readbytes, totalbytes=0;
1012   BOOL ret;
1013
1014   myhinternet = InternetOpen("Winetest",0,NULL,NULL,INTERNET_FLAG_NO_CACHE_WRITE);
1015   ok((myhinternet != 0), "InternetOpen failed, error %u\n",GetLastError());
1016   size = 0x400;
1017   ret = InternetCanonicalizeUrl(TEST_URL, buffer, &size,ICU_BROWSER_MODE);
1018   ok( ret, "InternetCanonicalizeUrl failed, error %u\n",GetLastError());
1019
1020   SetLastError(0);
1021   myhttp = InternetOpenUrl(myhinternet, TEST_URL, 0, 0,
1022                            INTERNET_FLAG_RELOAD|INTERNET_FLAG_NO_CACHE_WRITE|INTERNET_FLAG_TRANSFER_BINARY,0);
1023   if (GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
1024     return; /* WinXP returns this when not connected to the net */
1025   ok((myhttp != 0),"InternetOpenUrl failed, error %u\n",GetLastError());
1026   ret = InternetReadFile(myhttp, buffer,0x400,&readbytes);
1027   ok( ret, "InternetReadFile failed, error %u\n",GetLastError());
1028   totalbytes += readbytes;
1029   while (readbytes && InternetReadFile(myhttp, buffer,0x400,&readbytes))
1030     totalbytes += readbytes;
1031   trace("read 0x%08x bytes\n",totalbytes);
1032
1033   InternetCloseHandle(myhttp);
1034   InternetCloseHandle(myhinternet);
1035 }
1036
1037 static void HttpSendRequestEx_test(void)
1038 {
1039     HINTERNET hSession;
1040     HINTERNET hConnect;
1041     HINTERNET hRequest;
1042
1043     INTERNET_BUFFERS BufferIn;
1044     DWORD dwBytesWritten, dwBytesRead, error;
1045     CHAR szBuffer[256];
1046     int i;
1047     BOOL ret;
1048
1049     static char szPostData[] = "mode=Test";
1050     static const char szContentType[] = "Content-Type: application/x-www-form-urlencoded";
1051
1052     hSession = InternetOpen("Wine Regression Test",
1053             INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,0);
1054     ok( hSession != NULL ,"Unable to open Internet session\n");
1055     hConnect = InternetConnect(hSession, "crossover.codeweavers.com",
1056             INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0,
1057             0);
1058     ok( hConnect != NULL, "Unable to connect to http://crossover.codeweavers.com\n");
1059     hRequest = HttpOpenRequest(hConnect, "POST", "/posttest.php",
1060             NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
1061     if (!hRequest && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
1062     {
1063         skip( "Network unreachable, skipping test\n" );
1064         goto done;
1065     }
1066     ok( hRequest != NULL, "Failed to open request handle err %u\n", GetLastError());
1067
1068
1069     BufferIn.dwStructSize = sizeof( INTERNET_BUFFERS);
1070     BufferIn.Next = (LPINTERNET_BUFFERS)0xdeadcab;
1071     BufferIn.lpcszHeader = szContentType;
1072     BufferIn.dwHeadersLength = sizeof(szContentType)-1;
1073     BufferIn.dwHeadersTotal = sizeof(szContentType)-1;
1074     BufferIn.lpvBuffer = szPostData;
1075     BufferIn.dwBufferLength = 3;
1076     BufferIn.dwBufferTotal = sizeof(szPostData)-1;
1077     BufferIn.dwOffsetLow = 0;
1078     BufferIn.dwOffsetHigh = 0;
1079
1080     SetLastError(0xdeadbeef);
1081     ret = HttpSendRequestEx(hRequest, &BufferIn, NULL, 0 ,0);
1082     error = GetLastError();
1083     ok(ret, "HttpSendRequestEx Failed with error %u\n", error);
1084     ok(error == ERROR_SUCCESS, "expected ERROR_SUCCESS, got %u\n", error);
1085
1086     for (i = 3; szPostData[i]; i++)
1087         ok(InternetWriteFile(hRequest, &szPostData[i], 1, &dwBytesWritten),
1088                 "InternetWriteFile failed\n");
1089
1090     ok(HttpEndRequest(hRequest, NULL, 0, 0), "HttpEndRequest Failed\n");
1091
1092     ok(InternetReadFile(hRequest, szBuffer, 255, &dwBytesRead),
1093             "Unable to read response\n");
1094     szBuffer[dwBytesRead] = 0;
1095
1096     ok(dwBytesRead == 13,"Read %u bytes instead of 13\n",dwBytesRead);
1097     ok(strncmp(szBuffer,"mode => Test\n",dwBytesRead)==0 || broken(proxy_active()),"Got string %s\n",szBuffer);
1098
1099     ok(InternetCloseHandle(hRequest), "Close request handle failed\n");
1100 done:
1101     ok(InternetCloseHandle(hConnect), "Close connect handle failed\n");
1102     ok(InternetCloseHandle(hSession), "Close session handle failed\n");
1103 }
1104
1105 static void InternetOpenRequest_test(void)
1106 {
1107     HINTERNET session, connect, request;
1108     static const char *types[] = { "*", "", NULL };
1109     static const WCHAR slash[] = {'/', 0}, any[] = {'*', 0}, empty[] = {0};
1110     static const WCHAR *typesW[] = { any, empty, NULL };
1111     BOOL ret;
1112
1113     session = InternetOpenA("Wine Regression Test", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
1114     ok(session != NULL ,"Unable to open Internet session\n");
1115
1116     connect = InternetConnectA(session, NULL, INTERNET_DEFAULT_HTTP_PORT, NULL, NULL,
1117                               INTERNET_SERVICE_HTTP, 0, 0);
1118     ok(connect == NULL, "InternetConnectA should have failed\n");
1119     ok(GetLastError() == ERROR_INVALID_PARAMETER, "InternetConnectA with NULL server named should have failed with ERROR_INVALID_PARAMETER instead of %d\n", GetLastError());
1120
1121     connect = InternetConnectA(session, "", INTERNET_DEFAULT_HTTP_PORT, NULL, NULL,
1122                               INTERNET_SERVICE_HTTP, 0, 0);
1123     ok(connect == NULL, "InternetConnectA should have failed\n");
1124     ok(GetLastError() == ERROR_INVALID_PARAMETER, "InternetConnectA with blank server named should have failed with ERROR_INVALID_PARAMETER instead of %d\n", GetLastError());
1125
1126     connect = InternetConnectA(session, "test.winehq.org", INTERNET_DEFAULT_HTTP_PORT, NULL, NULL,
1127                               INTERNET_SERVICE_HTTP, 0, 0);
1128     ok(connect != NULL, "Unable to connect to http://test.winehq.org with error %d\n", GetLastError());
1129
1130     request = HttpOpenRequestA(connect, NULL, "/", NULL, NULL, types, INTERNET_FLAG_NO_CACHE_WRITE, 0);
1131     if (!request && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
1132     {
1133         skip( "Network unreachable, skipping test\n" );
1134         goto done;
1135     }
1136     ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
1137
1138     ret = HttpSendRequest(request, NULL, 0, NULL, 0);
1139     ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
1140     ok(InternetCloseHandle(request), "Close request handle failed\n");
1141
1142     request = HttpOpenRequestW(connect, NULL, slash, NULL, NULL, typesW, INTERNET_FLAG_NO_CACHE_WRITE, 0);
1143     ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
1144
1145     ret = HttpSendRequest(request, NULL, 0, NULL, 0);
1146     ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
1147     ok(InternetCloseHandle(request), "Close request handle failed\n");
1148
1149 done:
1150     ok(InternetCloseHandle(connect), "Close connect handle failed\n");
1151     ok(InternetCloseHandle(session), "Close session handle failed\n");
1152 }
1153
1154 static void test_http_cache(void)
1155 {
1156     HINTERNET session, connect, request;
1157     char file_name[MAX_PATH], url[INTERNET_MAX_URL_LENGTH];
1158     DWORD size, file_size;
1159     BYTE buf[100];
1160     HANDLE file;
1161     BOOL ret;
1162
1163     static const char *types[] = { "*", "", NULL };
1164
1165     session = InternetOpenA("Wine Regression Test", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
1166     ok(session != NULL ,"Unable to open Internet session\n");
1167
1168     connect = InternetConnectA(session, "test.winehq.org", INTERNET_DEFAULT_HTTP_PORT, NULL, NULL,
1169                               INTERNET_SERVICE_HTTP, 0, 0);
1170     ok(connect != NULL, "Unable to connect to http://test.winehq.org with error %d\n", GetLastError());
1171
1172     request = HttpOpenRequestA(connect, NULL, "/tests/hello.html", NULL, NULL, types, INTERNET_FLAG_NEED_FILE, 0);
1173     if (!request && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
1174     {
1175         skip( "Network unreachable, skipping test\n" );
1176
1177         ok(InternetCloseHandle(connect), "Close connect handle failed\n");
1178         ok(InternetCloseHandle(session), "Close session handle failed\n");
1179
1180         return;
1181     }
1182     ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
1183
1184     size = sizeof(url);
1185     ret = InternetQueryOptionA(request, INTERNET_OPTION_URL, url, &size);
1186     ok(ret, "InternetQueryOptionA(INTERNET_OPTION_URL) failed: %u\n", GetLastError());
1187     ok(!strcmp(url, "http://test.winehq.org/tests/hello.html"), "Wrong URL %s\n", url);
1188
1189     size = sizeof(file_name);
1190     ret = InternetQueryOptionA(request, INTERNET_OPTION_DATAFILE_NAME, file_name, &size);
1191     ok(!ret, "InternetQueryOptionA(INTERNET_OPTION_DATAFILE_NAME) succeeded\n");
1192     ok(GetLastError() == ERROR_INTERNET_ITEM_NOT_FOUND, "GetLastError()=%u\n", GetLastError());
1193     ok(!size, "size = %d\n", size);
1194
1195     ret = HttpSendRequest(request, NULL, 0, NULL, 0);
1196     ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
1197
1198     size = sizeof(file_name);
1199     ret = InternetQueryOptionA(request, INTERNET_OPTION_DATAFILE_NAME, file_name, &size);
1200     ok(ret, "InternetQueryOptionA(INTERNET_OPTION_DATAFILE_NAME) failed: %u\n", GetLastError());
1201
1202     file = CreateFile(file_name, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
1203                       FILE_ATTRIBUTE_NORMAL, NULL);
1204     ok(file != INVALID_HANDLE_VALUE, "Could not create file: %u\n", GetLastError());
1205     file_size = GetFileSize(file, NULL);
1206     todo_wine ok(file_size == 106, "file size = %u\n", file_size);
1207
1208     size = sizeof(buf);
1209     ret = InternetReadFile(request, buf, sizeof(buf), &size);
1210     ok(ret, "InternetReadFile failed: %u\n", GetLastError());
1211     ok(size == 100, "size = %u\n", size);
1212
1213     file_size = GetFileSize(file, NULL);
1214     todo_wine ok(file_size == 106, "file size = %u\n", file_size);
1215     CloseHandle(file);
1216
1217     ok(InternetCloseHandle(request), "Close request handle failed\n");
1218
1219     file = CreateFile(file_name, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
1220                       FILE_ATTRIBUTE_NORMAL, NULL);
1221     ok(file != INVALID_HANDLE_VALUE, "Could not create file: %u\n", GetLastError());
1222     CloseHandle(file);
1223
1224     /* Send the same request, requiring it to be retrieved from the cache */
1225     request = HttpOpenRequest(connect, "GET", "/tests/hello.html", NULL, NULL, NULL, INTERNET_FLAG_FROM_CACHE, 0);
1226
1227     ret = HttpSendRequest(request, NULL, 0, NULL, 0);
1228     ok(ret, "HttpSendRequest failed\n");
1229
1230     size = sizeof(buf);
1231     ret = InternetReadFile(request, buf, sizeof(buf), &size);
1232     ok(ret, "InternetReadFile failed: %u\n", GetLastError());
1233     ok(size == 100, "size = %u\n", size);
1234
1235     ok(InternetCloseHandle(request), "Close request handle failed\n");
1236
1237     request = HttpOpenRequestA(connect, NULL, "/", NULL, NULL, types, INTERNET_FLAG_NO_CACHE_WRITE, 0);
1238     ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
1239
1240     size = sizeof(file_name);
1241     ret = InternetQueryOptionA(request, INTERNET_OPTION_DATAFILE_NAME, file_name, &size);
1242     ok(!ret, "InternetQueryOptionA(INTERNET_OPTION_DATAFILE_NAME) succeeded\n");
1243     ok(GetLastError() == ERROR_INTERNET_ITEM_NOT_FOUND, "GetLastError()=%u\n", GetLastError());
1244     ok(!size, "size = %d\n", size);
1245
1246     ret = HttpSendRequest(request, NULL, 0, NULL, 0);
1247     ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
1248
1249     size = sizeof(file_name);
1250     file_name[0] = 0;
1251     ret = InternetQueryOptionA(request, INTERNET_OPTION_DATAFILE_NAME, file_name, &size);
1252     if (ret)
1253     {
1254         file = CreateFile(file_name, GENERIC_READ, FILE_SHARE_READ|FILE_SHARE_WRITE, NULL, OPEN_EXISTING,
1255                       FILE_ATTRIBUTE_NORMAL, NULL);
1256         ok(file != INVALID_HANDLE_VALUE, "Could not create file: %u\n", GetLastError());
1257         CloseHandle(file);
1258     }
1259     else
1260     {
1261         /* < IE8 */
1262         ok(file_name[0] == 0, "Didn't expect a file name\n");
1263     }
1264
1265     ok(InternetCloseHandle(request), "Close request handle failed\n");
1266     ok(InternetCloseHandle(connect), "Close connect handle failed\n");
1267     ok(InternetCloseHandle(session), "Close session handle failed\n");
1268 }
1269
1270 static void HttpHeaders_test(void)
1271 {
1272     HINTERNET hSession;
1273     HINTERNET hConnect;
1274     HINTERNET hRequest;
1275     CHAR      buffer[256];
1276     WCHAR     wbuffer[256];
1277     DWORD     len = 256;
1278     DWORD     oldlen;
1279     DWORD     index = 0;
1280
1281     hSession = InternetOpen("Wine Regression Test",
1282             INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,0);
1283     ok( hSession != NULL ,"Unable to open Internet session\n");
1284     hConnect = InternetConnect(hSession, "crossover.codeweavers.com",
1285             INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0,
1286             0);
1287     ok( hConnect != NULL, "Unable to connect to http://crossover.codeweavers.com\n");
1288     hRequest = HttpOpenRequest(hConnect, "POST", "/posttest.php",
1289             NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
1290     if (!hRequest && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
1291     {
1292         skip( "Network unreachable, skipping test\n" );
1293         goto done;
1294     }
1295     ok( hRequest != NULL, "Failed to open request handle\n");
1296
1297     index = 0;
1298     len = sizeof(buffer);
1299     strcpy(buffer,"Warning");
1300     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1301                buffer,&len,&index)==0,"Warning hearder reported as Existing\n");
1302
1303     ok(HttpAddRequestHeaders(hRequest,"Warning:test1",-1,HTTP_ADDREQ_FLAG_ADD),
1304             "Failed to add new header\n");
1305
1306     index = 0;
1307     len = sizeof(buffer);
1308     strcpy(buffer,"Warning");
1309     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1310                 buffer,&len,&index),"Unable to query header\n");
1311     ok(index == 1, "Index was not incremented\n");
1312     ok(strcmp(buffer,"test1")==0, "incorrect string was returned(%s)\n",buffer);
1313     ok(len == 5, "Invalid length (exp. 5, got %d)\n", len);
1314     ok((len < sizeof(buffer)) && (buffer[len] == 0), "Buffer not NULL-terminated\n"); /* len show only 5 characters but the buffer is NULL-terminated*/
1315     len = sizeof(buffer);
1316     strcpy(buffer,"Warning");
1317     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1318                 buffer,&len,&index)==0,"Second Index Should Not Exist\n");
1319
1320     index = 0;
1321     len = 5; /* could store the string but not the NULL terminator */
1322     strcpy(buffer,"Warning");
1323     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1324                 buffer,&len,&index) == FALSE,"Query succeeded on a too small buffer\n");
1325     ok(strcmp(buffer,"Warning")==0, "incorrect string was returned(%s)\n",buffer); /* string not touched */
1326     ok(len == 6, "Invalid length (exp. 6, got %d)\n", len); /* unlike success, the length includes the NULL-terminator */
1327
1328     /* a call with NULL will fail but will return the length */
1329     index = 0;
1330     len = sizeof(buffer);
1331     SetLastError(0xdeadbeef);
1332     ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1333                 NULL,&len,&index) == FALSE,"Query worked\n");
1334     ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1335     ok(len > 40, "Invalid length (exp. more than 40, got %d)\n", len);
1336     ok(index == 0, "Index was incremented\n");
1337
1338     /* even for a len that is too small */
1339     index = 0;
1340     len = 15;
1341     SetLastError(0xdeadbeef);
1342     ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1343                 NULL,&len,&index) == FALSE,"Query worked\n");
1344     ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1345     ok(len > 40, "Invalid length (exp. more than 40, got %d)\n", len);
1346     ok(index == 0, "Index was incremented\n");
1347
1348     index = 0;
1349     len = 0;
1350     SetLastError(0xdeadbeef);
1351     ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1352                 NULL,&len,&index) == FALSE,"Query worked\n");
1353     ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1354     ok(len > 40, "Invalid length (exp. more than 40, got %d)\n", len);
1355     ok(index == 0, "Index was incremented\n");
1356     oldlen = len;   /* bytes; at least long enough to hold buffer & nul */
1357
1358
1359     /* a working query */
1360     index = 0;
1361     len = sizeof(buffer);
1362     memset(buffer, 'x', sizeof(buffer));
1363     ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1364                 buffer,&len,&index),"Unable to query header\n");
1365     ok(len + sizeof(CHAR) <= oldlen, "Result longer than advertised\n");
1366     ok((len < sizeof(buffer)-sizeof(CHAR)) && (buffer[len/sizeof(CHAR)] == 0),"No NUL at end\n");
1367     ok(len == strlen(buffer) * sizeof(CHAR), "Length wrong\n");
1368     /* what's in the middle differs between Wine and Windows so currently we check only the beginning and the end */
1369     ok(strncmp(buffer, "POST /posttest.php HTTP/1", 25)==0, "Invalid beginning of headers string\n");
1370     ok(strcmp(buffer + strlen(buffer) - 4, "\r\n\r\n")==0, "Invalid end of headers string\n");
1371     ok(index == 0, "Index was incremented\n");
1372
1373     /* Like above two tests, but for W version */
1374
1375     index = 0;
1376     len = 0;
1377     SetLastError(0xdeadbeef);
1378     ok(HttpQueryInfoW(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1379                 NULL,&len,&index) == FALSE,"Query worked\n");
1380     ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "Unexpected last error: %d\n", GetLastError());
1381     ok(len > 80, "Invalid length (exp. more than 80, got %d)\n", len);
1382     ok(index == 0, "Index was incremented\n");
1383     oldlen = len;   /* bytes; at least long enough to hold buffer & nul */
1384
1385     /* a working query */
1386     index = 0;
1387     len = sizeof(wbuffer);
1388     memset(wbuffer, 'x', sizeof(wbuffer));
1389     ok(HttpQueryInfoW(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1390                 wbuffer,&len,&index),"Unable to query header\n");
1391     ok(len + sizeof(WCHAR) <= oldlen, "Result longer than advertised\n");
1392     ok(len == lstrlenW(wbuffer) * sizeof(WCHAR), "Length wrong\n");
1393     ok((len < sizeof(wbuffer)-sizeof(WCHAR)) && (wbuffer[len/sizeof(WCHAR)] == 0),"No NUL at end\n");
1394     ok(index == 0, "Index was incremented\n");
1395
1396     /* end of W version tests */
1397
1398     /* Without HTTP_QUERY_FLAG_REQUEST_HEADERS */
1399     index = 0;
1400     len = sizeof(buffer);
1401     memset(buffer, 'x', sizeof(buffer));
1402     ok(HttpQueryInfo(hRequest,HTTP_QUERY_RAW_HEADERS_CRLF,
1403                 buffer,&len,&index) == TRUE,"Query failed\n");
1404     ok(len == 2, "Expected 2, got %d\n", len);
1405     ok(strcmp(buffer, "\r\n") == 0, "Expected CRLF, got '%s'\n", buffer);
1406     ok(index == 0, "Index was incremented\n");
1407
1408     ok(HttpAddRequestHeaders(hRequest,"Warning:test2",-1,HTTP_ADDREQ_FLAG_ADD),
1409             "Failed to add duplicate header using HTTP_ADDREQ_FLAG_ADD\n");
1410
1411     index = 0;
1412     len = sizeof(buffer);
1413     strcpy(buffer,"Warning");
1414     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1415                 buffer,&len,&index),"Unable to query header\n");
1416     ok(index == 1, "Index was not incremented\n");
1417     ok(strcmp(buffer,"test1")==0, "incorrect string was returned(%s)\n",buffer);
1418     len = sizeof(buffer);
1419     strcpy(buffer,"Warning");
1420     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1421                 buffer,&len,&index),"Failed to get second header\n");
1422     ok(index == 2, "Index was not incremented\n");
1423     ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
1424     len = sizeof(buffer);
1425     strcpy(buffer,"Warning");
1426     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1427                 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1428
1429     ok(HttpAddRequestHeaders(hRequest,"Warning:test3",-1,HTTP_ADDREQ_FLAG_REPLACE), "Failed to replace header using HTTP_ADDREQ_FLAG_REPLACE\n");
1430
1431     index = 0;
1432     len = sizeof(buffer);
1433     strcpy(buffer,"Warning");
1434     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1435                 buffer,&len,&index),"Unable to query header\n");
1436     ok(index == 1, "Index was not incremented\n");
1437     ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
1438     len = sizeof(buffer);
1439     strcpy(buffer,"Warning");
1440     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1441                 buffer,&len,&index),"Failed to get second header\n");
1442     ok(index == 2, "Index was not incremented\n");
1443     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1444     len = sizeof(buffer);
1445     strcpy(buffer,"Warning");
1446     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1447                 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1448
1449     ok(HttpAddRequestHeaders(hRequest,"Warning:test4",-1,HTTP_ADDREQ_FLAG_ADD_IF_NEW)==0, "HTTP_ADDREQ_FLAG_ADD_IF_NEW replaced existing header\n");
1450
1451     index = 0;
1452     len = sizeof(buffer);
1453     strcpy(buffer,"Warning");
1454     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1455                 buffer,&len,&index),"Unable to query header\n");
1456     ok(index == 1, "Index was not incremented\n");
1457     ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
1458     len = sizeof(buffer);
1459     strcpy(buffer,"Warning");
1460     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1461                 buffer,&len,&index),"Failed to get second header\n");
1462     ok(index == 2, "Index was not incremented\n");
1463     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1464     len = sizeof(buffer);
1465     strcpy(buffer,"Warning");
1466     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1467                 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1468
1469     ok(HttpAddRequestHeaders(hRequest,"Warning:test4",-1, HTTP_ADDREQ_FLAG_COALESCE), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
1470
1471     index = 0;
1472     len = sizeof(buffer);
1473     strcpy(buffer,"Warning");
1474     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
1475                 buffer,&len,&index),"Unable to query header\n");
1476     ok(index == 1, "Index was not incremented\n");
1477     ok(strcmp(buffer,"test2, test4")==0, "incorrect string was returned(%s)\n", buffer);
1478     len = sizeof(buffer);
1479     strcpy(buffer,"Warning");
1480     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1481     ok(index == 2, "Index was not incremented\n");
1482     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1483     len = sizeof(buffer);
1484     strcpy(buffer,"Warning");
1485     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1486
1487     ok(HttpAddRequestHeaders(hRequest,"Warning:test5",-1, HTTP_ADDREQ_FLAG_COALESCE_WITH_COMMA), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
1488
1489     index = 0;
1490     len = sizeof(buffer);
1491     strcpy(buffer,"Warning");
1492     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1493     ok(index == 1, "Index was not incremented\n");
1494     ok(strcmp(buffer,"test2, test4, test5")==0, "incorrect string was returned(%s)\n",buffer);
1495     len = sizeof(buffer);
1496     strcpy(buffer,"Warning");
1497     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1498     ok(index == 2, "Index was not incremented\n");
1499     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1500     len = sizeof(buffer);
1501     strcpy(buffer,"Warning");
1502     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1503
1504     ok(HttpAddRequestHeaders(hRequest,"Warning:test6",-1, HTTP_ADDREQ_FLAG_COALESCE_WITH_SEMICOLON), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
1505
1506     index = 0;
1507     len = sizeof(buffer);
1508     strcpy(buffer,"Warning");
1509     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1510     ok(index == 1, "Index was not incremented\n");
1511     ok(strcmp(buffer,"test2, test4, test5; test6")==0, "incorrect string was returned(%s)\n",buffer);
1512     len = sizeof(buffer);
1513     strcpy(buffer,"Warning");
1514     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1515     ok(index == 2, "Index was not incremented\n");
1516     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1517     len = sizeof(buffer);
1518     strcpy(buffer,"Warning");
1519     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1520
1521     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");
1522
1523     index = 0;
1524     len = sizeof(buffer);
1525     strcpy(buffer,"Warning");
1526     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1527     ok(index == 1, "Index was not incremented\n");
1528     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
1529     len = sizeof(buffer);
1530     strcpy(buffer,"Warning");
1531     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
1532     ok(index == 2, "Index was not incremented\n");
1533     ok(strcmp(buffer,"test7")==0, "incorrect string was returned(%s)\n",buffer);
1534     len = sizeof(buffer);
1535     strcpy(buffer,"Warning");
1536     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
1537
1538     /* Ensure that blank headers are ignored and don't cause a failure */
1539     ok(HttpAddRequestHeaders(hRequest,"\r\nBlankTest:value\r\n\r\n",-1, HTTP_ADDREQ_FLAG_ADD_IF_NEW), "Failed to add header with blank entries in list\n");
1540
1541     index = 0;
1542     len = sizeof(buffer);
1543     strcpy(buffer,"BlankTest");
1544     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1545     ok(index == 1, "Index was not incremented\n");
1546     ok(strcmp(buffer,"value")==0, "incorrect string was returned(%s)\n",buffer);
1547
1548     /* Ensure that malformed header separators are ignored and don't cause a failure */
1549     ok(HttpAddRequestHeaders(hRequest,"\r\rMalformedTest:value\n\nMalformedTestTwo: value2\rMalformedTestThree: value3\n\n\r\r\n",-1, HTTP_ADDREQ_FLAG_ADD|HTTP_ADDREQ_FLAG_REPLACE),
1550         "Failed to add header with malformed entries in list\n");
1551
1552     index = 0;
1553     len = sizeof(buffer);
1554     strcpy(buffer,"MalformedTest");
1555     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1556     ok(index == 1, "Index was not incremented\n");
1557     ok(strcmp(buffer,"value")==0, "incorrect string was returned(%s)\n",buffer);
1558     index = 0;
1559     len = sizeof(buffer);
1560     strcpy(buffer,"MalformedTestTwo");
1561     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1562     ok(index == 1, "Index was not incremented\n");
1563     ok(strcmp(buffer,"value2")==0, "incorrect string was returned(%s)\n",buffer);
1564     index = 0;
1565     len = sizeof(buffer);
1566     strcpy(buffer,"MalformedTestThree");
1567     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
1568     ok(index == 1, "Index was not incremented\n");
1569     ok(strcmp(buffer,"value3")==0, "incorrect string was returned(%s)\n",buffer);
1570
1571     ok(InternetCloseHandle(hRequest), "Close request handle failed\n");
1572 done:
1573     ok(InternetCloseHandle(hConnect), "Close connect handle failed\n");
1574     ok(InternetCloseHandle(hSession), "Close session handle failed\n");
1575 }
1576
1577 static const char garbagemsg[] =
1578 "Garbage: Header\r\n";
1579
1580 static const char contmsg[] =
1581 "HTTP/1.1 100 Continue\r\n";
1582
1583 static const char expandcontmsg[] =
1584 "HTTP/1.1 100 Continue\r\n"
1585 "Server: winecontinue\r\n"
1586 "Tag: something witty\r\n"
1587 "\r\n";
1588
1589 static const char okmsg[] =
1590 "HTTP/1.1 200 OK\r\n"
1591 "Server: winetest\r\n"
1592 "\r\n";
1593
1594 static const char okmsg2[] =
1595 "HTTP/1.1 200 OK\r\n"
1596 "Date: Mon, 01 Dec 2008 13:44:34 GMT\r\n"
1597 "Server: winetest\r\n"
1598 "Content-Length: 0\r\n"
1599 "Set-Cookie: one\r\n"
1600 "Set-Cookie: two\r\n"
1601 "\r\n";
1602
1603 static const char notokmsg[] =
1604 "HTTP/1.1 400 Bad Request\r\n"
1605 "Server: winetest\r\n"
1606 "\r\n";
1607
1608 static const char noauthmsg[] =
1609 "HTTP/1.1 401 Unauthorized\r\n"
1610 "Server: winetest\r\n"
1611 "Connection: close\r\n"
1612 "WWW-Authenticate: Basic realm=\"placebo\"\r\n"
1613 "\r\n";
1614
1615 static const char noauthmsg2[] =
1616 "HTTP/1.0 401 Anonymous requests or requests on unsecure channel are not allowed\r\n"
1617 "HTTP/1.0 401 Anonymous requests or requests on unsecure channel are not allowed"
1618 "\0d`0|6\n"
1619 "Server: winetest\r\n";
1620
1621 static const char proxymsg[] =
1622 "HTTP/1.1 407 Proxy Authentication Required\r\n"
1623 "Server: winetest\r\n"
1624 "Proxy-Connection: close\r\n"
1625 "Proxy-Authenticate: Basic realm=\"placebo\"\r\n"
1626 "\r\n";
1627
1628 static const char page1[] =
1629 "<HTML>\r\n"
1630 "<HEAD><TITLE>wininet test page</TITLE></HEAD>\r\n"
1631 "<BODY>The quick brown fox jumped over the lazy dog<P></BODY>\r\n"
1632 "</HTML>\r\n\r\n";
1633
1634 struct server_info {
1635     HANDLE hEvent;
1636     int port;
1637     int num_testH_retrievals;
1638 };
1639
1640 static DWORD CALLBACK server_thread(LPVOID param)
1641 {
1642     struct server_info *si = param;
1643     int r, c, i, on;
1644     SOCKET s;
1645     struct sockaddr_in sa;
1646     char buffer[0x100];
1647     WSADATA wsaData;
1648     int last_request = 0;
1649     char host_header[22];
1650     static int test_b = 0;
1651
1652     WSAStartup(MAKEWORD(1,1), &wsaData);
1653
1654     s = socket(AF_INET, SOCK_STREAM, 0);
1655     if (s == INVALID_SOCKET)
1656         return 1;
1657
1658     on = 1;
1659     setsockopt(s, SOL_SOCKET, SO_REUSEADDR, (char*)&on, sizeof on);
1660
1661     memset(&sa, 0, sizeof sa);
1662     sa.sin_family = AF_INET;
1663     sa.sin_port = htons(si->port);
1664     sa.sin_addr.S_un.S_addr = inet_addr("127.0.0.1");
1665
1666     r = bind(s, (struct sockaddr*) &sa, sizeof sa);
1667     if (r<0)
1668         return 1;
1669
1670     listen(s, 0);
1671
1672     SetEvent(si->hEvent);
1673
1674     sprintf(host_header, "Host: localhost:%d", si->port);
1675
1676     do
1677     {
1678         c = accept(s, NULL, NULL);
1679
1680         memset(buffer, 0, sizeof buffer);
1681         for(i=0; i<(sizeof buffer-1); i++)
1682         {
1683             r = recv(c, &buffer[i], 1, 0);
1684             if (r != 1)
1685                 break;
1686             if (i<4) continue;
1687             if (buffer[i-2] == '\n' && buffer[i] == '\n' &&
1688                 buffer[i-3] == '\r' && buffer[i-1] == '\r')
1689                 break;
1690         }
1691         if (strstr(buffer, "GET /test1"))
1692         {
1693             if (!strstr(buffer, "Content-Length: 0"))
1694             {
1695                 send(c, okmsg, sizeof okmsg-1, 0);
1696                 send(c, page1, sizeof page1-1, 0);
1697             }
1698             else
1699                 send(c, notokmsg, sizeof notokmsg-1, 0);
1700         }
1701         if (strstr(buffer, "/test2"))
1702         {
1703             if (strstr(buffer, "Proxy-Authorization: Basic bWlrZToxMTAx"))
1704             {
1705                 send(c, okmsg, sizeof okmsg-1, 0);
1706                 send(c, page1, sizeof page1-1, 0);
1707             }
1708             else
1709                 send(c, proxymsg, sizeof proxymsg-1, 0);
1710         }
1711         if (strstr(buffer, "/test3"))
1712         {
1713             if (strstr(buffer, "Authorization: Basic dXNlcjpwd2Q="))
1714                 send(c, okmsg, sizeof okmsg-1, 0);
1715             else
1716                 send(c, noauthmsg, sizeof noauthmsg-1, 0);
1717         }
1718         if (strstr(buffer, "/test4"))
1719         {
1720             if (strstr(buffer, "Connection: Close"))
1721                 send(c, okmsg, sizeof okmsg-1, 0);
1722             else
1723                 send(c, notokmsg, sizeof notokmsg-1, 0);
1724         }
1725         if (strstr(buffer, "POST /test5") ||
1726             strstr(buffer, "RPC_IN_DATA /test5") ||
1727             strstr(buffer, "RPC_OUT_DATA /test5"))
1728         {
1729             if (strstr(buffer, "Content-Length: 0"))
1730             {
1731                 send(c, okmsg, sizeof okmsg-1, 0);
1732                 send(c, page1, sizeof page1-1, 0);
1733             }
1734             else
1735                 send(c, notokmsg, sizeof notokmsg-1, 0);
1736         }
1737         if (strstr(buffer, "GET /test6"))
1738         {
1739             send(c, contmsg, sizeof contmsg-1, 0);
1740             send(c, contmsg, sizeof contmsg-1, 0);
1741             send(c, okmsg, sizeof okmsg-1, 0);
1742             send(c, page1, sizeof page1-1, 0);
1743         }
1744         if (strstr(buffer, "POST /test7"))
1745         {
1746             if (strstr(buffer, "Content-Length: 100"))
1747             {
1748                 send(c, okmsg, sizeof okmsg-1, 0);
1749                 send(c, page1, sizeof page1-1, 0);
1750             }
1751             else
1752                 send(c, notokmsg, sizeof notokmsg-1, 0);
1753         }
1754         if (strstr(buffer, "/test8"))
1755         {
1756             if (!strstr(buffer, "Connection: Close") &&
1757                  strstr(buffer, "Connection: Keep-Alive") &&
1758                 !strstr(buffer, "Cache-Control: no-cache") &&
1759                 !strstr(buffer, "Pragma: no-cache") &&
1760                  strstr(buffer, host_header))
1761                 send(c, okmsg, sizeof okmsg-1, 0);
1762             else
1763                 send(c, notokmsg, sizeof notokmsg-1, 0);
1764         }
1765         if (strstr(buffer, "/test9"))
1766         {
1767             if (!strstr(buffer, "Connection: Close") &&
1768                 !strstr(buffer, "Connection: Keep-Alive") &&
1769                 !strstr(buffer, "Cache-Control: no-cache") &&
1770                 !strstr(buffer, "Pragma: no-cache") &&
1771                  strstr(buffer, host_header))
1772                 send(c, okmsg, sizeof okmsg-1, 0);
1773             else
1774                 send(c, notokmsg, sizeof notokmsg-1, 0);
1775         }
1776         if (strstr(buffer, "/testA"))
1777         {
1778             if (!strstr(buffer, "Connection: Close") &&
1779                 !strstr(buffer, "Connection: Keep-Alive") &&
1780                 (strstr(buffer, "Cache-Control: no-cache") ||
1781                  strstr(buffer, "Pragma: no-cache")) &&
1782                  strstr(buffer, host_header))
1783                 send(c, okmsg, sizeof okmsg-1, 0);
1784             else
1785                 send(c, notokmsg, sizeof notokmsg-1, 0);
1786         }
1787         if (!test_b && strstr(buffer, "/testB HTTP/1.1"))
1788         {
1789             test_b = 1;
1790             send(c, okmsg, sizeof okmsg-1, 0);
1791             recvfrom(c, buffer, sizeof buffer, 0, NULL, NULL);
1792             send(c, okmsg, sizeof okmsg-1, 0);
1793         }
1794         if (strstr(buffer, "/testC"))
1795         {
1796             if (strstr(buffer, "Cookie: cookie=biscuit"))
1797                 send(c, okmsg, sizeof okmsg-1, 0);
1798             else
1799                 send(c, notokmsg, sizeof notokmsg-1, 0);
1800         }
1801         if (strstr(buffer, "/testD"))
1802         {
1803             send(c, okmsg2, sizeof okmsg2-1, 0);
1804         }
1805         if (strstr(buffer, "/testE"))
1806         {
1807             send(c, noauthmsg2, sizeof noauthmsg2-1, 0);
1808         }
1809         if (strstr(buffer, "GET /quit"))
1810         {
1811             send(c, okmsg, sizeof okmsg-1, 0);
1812             send(c, page1, sizeof page1-1, 0);
1813             last_request = 1;
1814         }
1815         if (strstr(buffer, "GET /testF"))
1816         {
1817             send(c, expandcontmsg, sizeof expandcontmsg-1, 0);
1818             send(c, garbagemsg, sizeof garbagemsg-1, 0);
1819             send(c, contmsg, sizeof contmsg-1, 0);
1820             send(c, garbagemsg, sizeof garbagemsg-1, 0);
1821             send(c, okmsg, sizeof okmsg-1, 0);
1822             send(c, page1, sizeof page1-1, 0);
1823         }
1824         if (strstr(buffer, "GET /testG"))
1825         {
1826             send(c, page1, sizeof page1-1, 0);
1827         }
1828         if (strstr(buffer, "GET /testH"))
1829         {
1830             si->num_testH_retrievals++;
1831             if (!strstr(buffer, "Content-Length: 0"))
1832             {
1833                 send(c, okmsg, sizeof okmsg-1, 0);
1834                 send(c, page1, sizeof page1-1, 0);
1835             }
1836             else
1837                 send(c, notokmsg, sizeof notokmsg-1, 0);
1838         }
1839
1840         shutdown(c, 2);
1841         closesocket(c);
1842     } while (!last_request);
1843
1844     closesocket(s);
1845
1846     return 0;
1847 }
1848
1849 static void test_basic_request(int port, const char *verb, const char *url)
1850 {
1851     HINTERNET hi, hc, hr;
1852     DWORD r, count;
1853     char buffer[0x100];
1854
1855     hi = InternetOpen(NULL, INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1856     ok(hi != NULL, "open failed\n");
1857
1858     hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1859     ok(hc != NULL, "connect failed\n");
1860
1861     hr = HttpOpenRequest(hc, verb, url, NULL, NULL, NULL, 0, 0);
1862     ok(hr != NULL, "HttpOpenRequest failed\n");
1863
1864     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1865     ok(r, "HttpSendRequest failed\n");
1866
1867     count = 0;
1868     memset(buffer, 0, sizeof buffer);
1869     SetLastError(0xdeadbeef);
1870     r = InternetReadFile(hr, buffer, sizeof buffer, &count);
1871     ok(r, "InternetReadFile failed %u\n", GetLastError());
1872     ok(count == sizeof page1 - 1, "count was wrong\n");
1873     ok(!memcmp(buffer, page1, sizeof page1), "http data wrong, got: %s\n", buffer);
1874
1875     InternetCloseHandle(hr);
1876     InternetCloseHandle(hc);
1877     InternetCloseHandle(hi);
1878 }
1879
1880 static void test_last_error(int port)
1881 {
1882     HINTERNET hi, hc, hr;
1883     DWORD error;
1884     BOOL r;
1885
1886     hi = InternetOpen(NULL, INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1887     ok(hi != NULL, "open failed\n");
1888
1889     hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1890     ok(hc != NULL, "connect failed\n");
1891
1892     hr = HttpOpenRequest(hc, NULL, "/test1", NULL, NULL, NULL, 0, 0);
1893     ok(hr != NULL, "HttpOpenRequest failed\n");
1894
1895     SetLastError(0xdeadbeef);
1896     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1897     error = GetLastError();
1898     ok(r, "HttpSendRequest failed\n");
1899     ok(error == ERROR_SUCCESS || broken(error != ERROR_SUCCESS), "expected ERROR_SUCCESS, got %u\n", error);
1900
1901     InternetCloseHandle(hr);
1902     InternetCloseHandle(hc);
1903     InternetCloseHandle(hi);
1904 }
1905
1906 static void test_proxy_indirect(int port)
1907 {
1908     HINTERNET hi, hc, hr;
1909     DWORD r, sz, val;
1910     char buffer[0x40];
1911
1912     hi = InternetOpen(NULL, 0, NULL, NULL, 0);
1913     ok(hi != NULL, "open failed\n");
1914
1915     hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1916     ok(hc != NULL, "connect failed\n");
1917
1918     hr = HttpOpenRequest(hc, NULL, "/test2", NULL, NULL, NULL, 0, 0);
1919     ok(hr != NULL, "HttpOpenRequest failed\n");
1920
1921     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1922     ok(r, "HttpSendRequest failed\n");
1923
1924     sz = sizeof buffer;
1925     r = HttpQueryInfo(hr, HTTP_QUERY_PROXY_AUTHENTICATE, buffer, &sz, NULL);
1926     ok(r || GetLastError() == ERROR_HTTP_HEADER_NOT_FOUND, "HttpQueryInfo failed: %d\n", GetLastError());
1927     if (!r)
1928     {
1929         skip("missing proxy header, not testing remaining proxy headers\n");
1930         goto out;
1931     }
1932     ok(!strcmp(buffer, "Basic realm=\"placebo\""), "proxy auth info wrong\n");
1933
1934     sz = sizeof buffer;
1935     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1936     ok(r, "HttpQueryInfo failed\n");
1937     ok(!strcmp(buffer, "407"), "proxy code wrong\n");
1938
1939     sz = sizeof val;
1940     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE|HTTP_QUERY_FLAG_NUMBER, &val, &sz, NULL);
1941     ok(r, "HttpQueryInfo failed\n");
1942     ok(val == 407, "proxy code wrong\n");
1943
1944     sz = sizeof buffer;
1945     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_TEXT, buffer, &sz, NULL);
1946     ok(r, "HttpQueryInfo failed\n");
1947     ok(!strcmp(buffer, "Proxy Authentication Required"), "proxy text wrong\n");
1948
1949     sz = sizeof buffer;
1950     r = HttpQueryInfo(hr, HTTP_QUERY_VERSION, buffer, &sz, NULL);
1951     ok(r, "HttpQueryInfo failed\n");
1952     ok(!strcmp(buffer, "HTTP/1.1"), "http version wrong\n");
1953
1954     sz = sizeof buffer;
1955     r = HttpQueryInfo(hr, HTTP_QUERY_SERVER, buffer, &sz, NULL);
1956     ok(r, "HttpQueryInfo failed\n");
1957     ok(!strcmp(buffer, "winetest"), "http server wrong\n");
1958
1959     sz = sizeof buffer;
1960     r = HttpQueryInfo(hr, HTTP_QUERY_CONTENT_ENCODING, buffer, &sz, NULL);
1961     ok(GetLastError() == ERROR_HTTP_HEADER_NOT_FOUND, "HttpQueryInfo should fail\n");
1962     ok(r == FALSE, "HttpQueryInfo failed\n");
1963
1964 out:
1965     InternetCloseHandle(hr);
1966     InternetCloseHandle(hc);
1967     InternetCloseHandle(hi);
1968 }
1969
1970 static void test_proxy_direct(int port)
1971 {
1972     HINTERNET hi, hc, hr;
1973     DWORD r, sz;
1974     char buffer[0x40];
1975     static CHAR username[] = "mike",
1976                 password[] = "1101";
1977
1978     sprintf(buffer, "localhost:%d\n", port);
1979     hi = InternetOpen(NULL, INTERNET_OPEN_TYPE_PROXY, buffer, NULL, 0);
1980     ok(hi != NULL, "open failed\n");
1981
1982     /* try connect without authorization */
1983     hc = InternetConnect(hi, "test.winehq.org/", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1984     ok(hc != NULL, "connect failed\n");
1985
1986     hr = HttpOpenRequest(hc, NULL, "/test2", NULL, NULL, NULL, 0, 0);
1987     ok(hr != NULL, "HttpOpenRequest failed\n");
1988
1989     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1990     ok(r, "HttpSendRequest failed\n");
1991
1992     sz = sizeof buffer;
1993     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1994     ok(r, "HttpQueryInfo failed\n");
1995     ok(!strcmp(buffer, "407"), "proxy code wrong\n");
1996
1997
1998     /* set the user + password then try again */
1999     todo_wine {
2000     r = InternetSetOption(hr, INTERNET_OPTION_PROXY_USERNAME, username, 4);
2001     ok(r, "failed to set user\n");
2002
2003     r = InternetSetOption(hr, INTERNET_OPTION_PROXY_PASSWORD, password, 4);
2004     ok(r, "failed to set password\n");
2005     }
2006
2007     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
2008     ok(r, "HttpSendRequest failed\n");
2009     sz = sizeof buffer;
2010     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
2011     ok(r, "HttpQueryInfo failed\n");
2012     todo_wine {
2013     ok(!strcmp(buffer, "200"), "proxy code wrong\n");
2014     }
2015
2016
2017     InternetCloseHandle(hr);
2018     InternetCloseHandle(hc);
2019     InternetCloseHandle(hi);
2020 }
2021
2022 static void test_header_handling_order(int port)
2023 {
2024     static char authorization[] = "Authorization: Basic dXNlcjpwd2Q=";
2025     static char connection[]    = "Connection: Close";
2026
2027     static const char *types[2] = { "*", NULL };
2028     HINTERNET session, connect, request;
2029     DWORD size, status;
2030     BOOL ret;
2031
2032     session = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
2033     ok(session != NULL, "InternetOpen failed\n");
2034
2035     connect = InternetConnect(session, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2036     ok(connect != NULL, "InternetConnect failed\n");
2037
2038     request = HttpOpenRequest(connect, NULL, "/test3", NULL, NULL, types, INTERNET_FLAG_KEEP_CONNECTION, 0);
2039     ok(request != NULL, "HttpOpenRequest failed\n");
2040
2041     ret = HttpAddRequestHeaders(request, authorization, ~0u, HTTP_ADDREQ_FLAG_ADD);
2042     ok(ret, "HttpAddRequestHeaders failed\n");
2043
2044     ret = HttpSendRequest(request, NULL, 0, NULL, 0);
2045     ok(ret, "HttpSendRequest failed\n");
2046
2047     status = 0;
2048     size = sizeof(status);
2049     ret = HttpQueryInfo( request, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
2050     ok(ret, "HttpQueryInfo failed\n");
2051     ok(status == 200, "request failed with status %u\n", status);
2052
2053     InternetCloseHandle(request);
2054
2055     request = HttpOpenRequest(connect, NULL, "/test4", NULL, NULL, types, INTERNET_FLAG_KEEP_CONNECTION, 0);
2056     ok(request != NULL, "HttpOpenRequest failed\n");
2057
2058     ret = HttpSendRequest(request, connection, ~0u, NULL, 0);
2059     ok(ret, "HttpSendRequest failed\n");
2060
2061     status = 0;
2062     size = sizeof(status);
2063     ret = HttpQueryInfo( request, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
2064     ok(ret, "HttpQueryInfo failed\n");
2065     ok(status == 200 || status == 400 /* IE6 */, "got status %u, expected 200 or 400\n", status);
2066
2067     InternetCloseHandle(request);
2068
2069     request = HttpOpenRequest(connect, "POST", "/test7", NULL, NULL, types, INTERNET_FLAG_KEEP_CONNECTION, 0);
2070     ok(request != NULL, "HttpOpenRequest failed\n");
2071
2072     ret = HttpAddRequestHeaders(request, "Content-Length: 100\r\n", ~0u, HTTP_ADDREQ_FLAG_ADD_IF_NEW);
2073     ok(ret, "HttpAddRequestHeaders failed\n");
2074
2075     ret = HttpSendRequest(request, connection, ~0u, NULL, 0);
2076     ok(ret, "HttpSendRequest failed\n");
2077
2078     status = 0;
2079     size = sizeof(status);
2080     ret = HttpQueryInfo( request, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
2081     ok(ret, "HttpQueryInfo failed\n");
2082     ok(status == 200 || status == 400 /* IE6 */, "got status %u, expected 200 or 400\n", status);
2083
2084     InternetCloseHandle(request);
2085     InternetCloseHandle(connect);
2086     InternetCloseHandle(session);
2087 }
2088
2089 static void test_connection_header(int port)
2090 {
2091     HINTERNET ses, con, req;
2092     DWORD size, status;
2093     BOOL ret;
2094
2095     ses = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
2096     ok(ses != NULL, "InternetOpen failed\n");
2097
2098     con = InternetConnect(ses, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2099     ok(con != NULL, "InternetConnect failed\n");
2100
2101     req = HttpOpenRequest(con, NULL, "/test8", NULL, NULL, NULL, INTERNET_FLAG_KEEP_CONNECTION, 0);
2102     ok(req != NULL, "HttpOpenRequest failed\n");
2103
2104     ret = HttpSendRequest(req, NULL, 0, NULL, 0);
2105     ok(ret, "HttpSendRequest failed\n");
2106
2107     status = 0;
2108     size = sizeof(status);
2109     ret = HttpQueryInfo(req, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL);
2110     ok(ret, "HttpQueryInfo failed\n");
2111     ok(status == 200, "request failed with status %u\n", status);
2112
2113     InternetCloseHandle(req);
2114
2115     req = HttpOpenRequest(con, NULL, "/test9", NULL, NULL, NULL, 0, 0);
2116     ok(req != NULL, "HttpOpenRequest failed\n");
2117
2118     ret = HttpSendRequest(req, NULL, 0, NULL, 0);
2119     ok(ret, "HttpSendRequest failed\n");
2120
2121     status = 0;
2122     size = sizeof(status);
2123     ret = HttpQueryInfo(req, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL);
2124     ok(ret, "HttpQueryInfo failed\n");
2125     ok(status == 200, "request failed with status %u\n", status);
2126
2127     InternetCloseHandle(req);
2128
2129     req = HttpOpenRequest(con, NULL, "/test9", NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
2130     ok(req != NULL, "HttpOpenRequest failed\n");
2131
2132     ret = HttpSendRequest(req, NULL, 0, NULL, 0);
2133     ok(ret, "HttpSendRequest failed\n");
2134
2135     status = 0;
2136     size = sizeof(status);
2137     ret = HttpQueryInfo(req, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL);
2138     ok(ret, "HttpQueryInfo failed\n");
2139     ok(status == 200, "request failed with status %u\n", status);
2140
2141     InternetCloseHandle(req);
2142
2143     req = HttpOpenRequest(con, "POST", "/testA", NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
2144     ok(req != NULL, "HttpOpenRequest failed\n");
2145
2146     ret = HttpSendRequest(req, NULL, 0, NULL, 0);
2147     ok(ret, "HttpSendRequest failed\n");
2148
2149     status = 0;
2150     size = sizeof(status);
2151     ret = HttpQueryInfo(req, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL);
2152     ok(ret, "HttpQueryInfo failed\n");
2153     ok(status == 200, "request failed with status %u\n", status);
2154
2155     InternetCloseHandle(req);
2156     InternetCloseHandle(con);
2157     InternetCloseHandle(ses);
2158 }
2159
2160 static void test_http1_1(int port)
2161 {
2162     HINTERNET ses, con, req;
2163     BOOL ret;
2164
2165     ses = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
2166     ok(ses != NULL, "InternetOpen failed\n");
2167
2168     con = InternetConnect(ses, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2169     ok(con != NULL, "InternetConnect failed\n");
2170
2171     req = HttpOpenRequest(con, NULL, "/testB", NULL, NULL, NULL, INTERNET_FLAG_KEEP_CONNECTION, 0);
2172     ok(req != NULL, "HttpOpenRequest failed\n");
2173
2174     ret = HttpSendRequest(req, NULL, 0, NULL, 0);
2175     if (ret)
2176     {
2177         InternetCloseHandle(req);
2178
2179         req = HttpOpenRequest(con, NULL, "/testB", NULL, NULL, NULL, INTERNET_FLAG_KEEP_CONNECTION, 0);
2180         ok(req != NULL, "HttpOpenRequest failed\n");
2181
2182         ret = HttpSendRequest(req, NULL, 0, NULL, 0);
2183         ok(ret, "HttpSendRequest failed\n");
2184     }
2185
2186     InternetCloseHandle(req);
2187     InternetCloseHandle(con);
2188     InternetCloseHandle(ses);
2189 }
2190
2191 static void test_HttpSendRequestW(int port)
2192 {
2193     static const WCHAR header[] = {'U','A','-','C','P','U',':',' ','x','8','6',0};
2194     HINTERNET ses, con, req;
2195     DWORD error;
2196     BOOL ret;
2197
2198     ses = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, INTERNET_FLAG_ASYNC);
2199     ok(ses != NULL, "InternetOpen failed\n");
2200
2201     con = InternetConnect(ses, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2202     ok(con != NULL, "InternetConnect failed\n");
2203
2204     req = HttpOpenRequest(con, NULL, "/test1", NULL, NULL, NULL, 0, 0);
2205     ok(req != NULL, "HttpOpenRequest failed\n");
2206
2207     SetLastError(0xdeadbeef);
2208     ret = HttpSendRequestW(req, header, ~0u, NULL, 0);
2209     error = GetLastError();
2210     ok(!ret, "HttpSendRequestW succeeded\n");
2211     ok(error == ERROR_IO_PENDING ||
2212        broken(error == ERROR_HTTP_HEADER_NOT_FOUND) ||  /* IE6 */
2213        broken(error == ERROR_INVALID_PARAMETER),        /* IE5 */
2214        "got %u expected ERROR_IO_PENDING\n", error);
2215
2216     InternetCloseHandle(req);
2217     InternetCloseHandle(con);
2218     InternetCloseHandle(ses);
2219 }
2220
2221 static void test_cookie_header(int port)
2222 {
2223     HINTERNET ses, con, req;
2224     DWORD size, status, error;
2225     BOOL ret;
2226     char buffer[64];
2227
2228     ses = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
2229     ok(ses != NULL, "InternetOpen failed\n");
2230
2231     con = InternetConnect(ses, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2232     ok(con != NULL, "InternetConnect failed\n");
2233
2234     InternetSetCookie("http://localhost", "cookie", "biscuit");
2235
2236     req = HttpOpenRequest(con, NULL, "/testC", NULL, NULL, NULL, INTERNET_FLAG_KEEP_CONNECTION, 0);
2237     ok(req != NULL, "HttpOpenRequest failed\n");
2238
2239     buffer[0] = 0;
2240     size = sizeof(buffer);
2241     SetLastError(0xdeadbeef);
2242     ret = HttpQueryInfo(req, HTTP_QUERY_COOKIE | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
2243     error = GetLastError();
2244     ok(!ret, "HttpQueryInfo succeeded\n");
2245     ok(error == ERROR_HTTP_HEADER_NOT_FOUND, "got %u expected ERROR_HTTP_HEADER_NOT_FOUND\n", error);
2246
2247     ret = HttpAddRequestHeaders(req, "Cookie: cookie=not biscuit\r\n", ~0u, HTTP_ADDREQ_FLAG_ADD);
2248     ok(ret, "HttpAddRequestHeaders failed: %u\n", GetLastError());
2249
2250     buffer[0] = 0;
2251     size = sizeof(buffer);
2252     ret = HttpQueryInfo(req, HTTP_QUERY_COOKIE | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
2253     ok(ret, "HttpQueryInfo failed: %u\n", GetLastError());
2254     ok(!strcmp(buffer, "cookie=not biscuit"), "got '%s' expected \'cookie=not biscuit\'\n", buffer);
2255
2256     ret = HttpSendRequest(req, NULL, 0, NULL, 0);
2257     ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
2258
2259     status = 0;
2260     size = sizeof(status);
2261     ret = HttpQueryInfo(req, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL);
2262     ok(ret, "HttpQueryInfo failed\n");
2263     ok(status == 200, "request failed with status %u\n", status);
2264
2265     buffer[0] = 0;
2266     size = sizeof(buffer);
2267     ret = HttpQueryInfo(req, HTTP_QUERY_COOKIE | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
2268     ok(ret, "HttpQueryInfo failed: %u\n", GetLastError());
2269     ok(!strcmp(buffer, "cookie=biscuit"), "got '%s' expected \'cookie=biscuit\'\n", buffer);
2270
2271     InternetCloseHandle(req);
2272     InternetCloseHandle(con);
2273     InternetCloseHandle(ses);
2274 }
2275
2276 static void test_basic_authentication(int port)
2277 {
2278     HINTERNET session, connect, request;
2279     DWORD size, status;
2280     BOOL ret;
2281
2282     session = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
2283     ok(session != NULL, "InternetOpen failed\n");
2284
2285     connect = InternetConnect(session, "localhost", port, "user", "pwd", INTERNET_SERVICE_HTTP, 0, 0);
2286     ok(connect != NULL, "InternetConnect failed\n");
2287
2288     request = HttpOpenRequest(connect, NULL, "/test3", NULL, NULL, NULL, 0, 0);
2289     ok(request != NULL, "HttpOpenRequest failed\n");
2290
2291     ret = HttpSendRequest(request, NULL, 0, NULL, 0);
2292     ok(ret, "HttpSendRequest failed %u\n", GetLastError());
2293
2294     status = 0;
2295     size = sizeof(status);
2296     ret = HttpQueryInfo( request, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
2297     ok(ret, "HttpQueryInfo failed\n");
2298     ok(status == 200, "request failed with status %u\n", status);
2299
2300     InternetCloseHandle(request);
2301     InternetCloseHandle(connect);
2302     InternetCloseHandle(session);
2303 }
2304
2305 static void test_invalid_response_headers(int port)
2306 {
2307     HINTERNET session, connect, request;
2308     DWORD size, status;
2309     BOOL ret;
2310     char buffer[256];
2311
2312     session = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
2313     ok(session != NULL, "InternetOpen failed\n");
2314
2315     connect = InternetConnect(session, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2316     ok(connect != NULL, "InternetConnect failed\n");
2317
2318     request = HttpOpenRequest(connect, NULL, "/testE", NULL, NULL, NULL, 0, 0);
2319     ok(request != NULL, "HttpOpenRequest failed\n");
2320
2321     ret = HttpSendRequest(request, NULL, 0, NULL, 0);
2322     ok(ret, "HttpSendRequest failed %u\n", GetLastError());
2323
2324     status = 0;
2325     size = sizeof(status);
2326     ret = HttpQueryInfo( request, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
2327     ok(ret, "HttpQueryInfo failed\n");
2328     ok(status == 401, "unexpected status %u\n", status);
2329
2330     buffer[0] = 0;
2331     size = sizeof(buffer);
2332     ret = HttpQueryInfo( request, HTTP_QUERY_RAW_HEADERS, buffer, &size, NULL);
2333     ok(ret, "HttpQueryInfo failed\n");
2334     ok(!strcmp(buffer, "HTTP/1.0 401 Anonymous requests or requests on unsecure channel are not allowed"),
2335        "headers wrong \"%s\"\n", buffer);
2336
2337     buffer[0] = 0;
2338     size = sizeof(buffer);
2339     ret = HttpQueryInfo( request, HTTP_QUERY_SERVER, buffer, &size, NULL);
2340     ok(ret, "HttpQueryInfo failed\n");
2341     ok(!strcmp(buffer, "winetest"), "server wrong \"%s\"\n", buffer);
2342
2343     InternetCloseHandle(request);
2344     InternetCloseHandle(connect);
2345     InternetCloseHandle(session);
2346 }
2347
2348 static void test_response_without_headers(int port)
2349 {
2350     HINTERNET hi, hc, hr;
2351     DWORD r, count, size, status;
2352     char buffer[1024];
2353
2354     SetLastError(0xdeadbeef);
2355     hi = InternetOpen(NULL, INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
2356     ok(hi != NULL, "open failed %u\n", GetLastError());
2357
2358     SetLastError(0xdeadbeef);
2359     hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2360     ok(hc != NULL, "connect failed %u\n", GetLastError());
2361
2362     SetLastError(0xdeadbeef);
2363     hr = HttpOpenRequest(hc, NULL, "/testG", NULL, NULL, NULL, 0, 0);
2364     ok(hr != NULL, "HttpOpenRequest failed %u\n", GetLastError());
2365
2366     SetLastError(0xdeadbeef);
2367     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
2368     ok(r, "HttpSendRequest failed %u\n", GetLastError());
2369
2370     count = 0;
2371     memset(buffer, 0, sizeof buffer);
2372     SetLastError(0xdeadbeef);
2373     r = InternetReadFile(hr, buffer, sizeof buffer, &count);
2374     ok(r, "InternetReadFile failed %u\n", GetLastError());
2375     todo_wine ok(count == sizeof page1 - 1, "count was wrong\n");
2376     todo_wine ok(!memcmp(buffer, page1, sizeof page1), "http data wrong\n");
2377
2378     status = 0;
2379     size = sizeof(status);
2380     SetLastError(0xdeadbeef);
2381     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, &status, &size, NULL );
2382     todo_wine ok(r, "HttpQueryInfo failed %u\n", GetLastError());
2383     todo_wine ok(status == 200, "expected status 200 got %u\n", status);
2384
2385     buffer[0] = 0;
2386     size = sizeof(buffer);
2387     SetLastError(0xdeadbeef);
2388     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_TEXT, buffer, &size, NULL );
2389     ok(r, "HttpQueryInfo failed %u\n", GetLastError());
2390     ok(!strcmp(buffer, "OK"), "expected OK got: \"%s\"\n", buffer);
2391
2392     buffer[0] = 0;
2393     size = sizeof(buffer);
2394     SetLastError(0xdeadbeef);
2395     r = HttpQueryInfo(hr, HTTP_QUERY_VERSION, buffer, &size, NULL);
2396     ok(r, "HttpQueryInfo failed %u\n", GetLastError());
2397     ok(!strcmp(buffer, "HTTP/1.0"), "expected HTTP/1.0 got: \"%s\"\n", buffer);
2398
2399     buffer[0] = 0;
2400     size = sizeof(buffer);
2401     SetLastError(0xdeadbeef);
2402     r = HttpQueryInfo(hr, HTTP_QUERY_RAW_HEADERS, buffer, &size, NULL);
2403     ok(r, "HttpQueryInfo failed %u\n", GetLastError());
2404     ok(!strcmp(buffer, "HTTP/1.0 200 OK"), "raw headers wrong: \"%s\"\n", buffer);
2405
2406     InternetCloseHandle(hr);
2407     InternetCloseHandle(hc);
2408     InternetCloseHandle(hi);
2409 }
2410
2411 static void test_HttpQueryInfo(int port)
2412 {
2413     HINTERNET hi, hc, hr;
2414     DWORD size, index;
2415     char buffer[1024];
2416     BOOL ret;
2417
2418     hi = InternetOpen(NULL, INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
2419     ok(hi != NULL, "InternetOpen failed\n");
2420
2421     hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2422     ok(hc != NULL, "InternetConnect failed\n");
2423
2424     hr = HttpOpenRequest(hc, NULL, "/testD", NULL, NULL, NULL, 0, 0);
2425     ok(hr != NULL, "HttpOpenRequest failed\n");
2426
2427     ret = HttpSendRequest(hr, NULL, 0, NULL, 0);
2428     ok(ret, "HttpSendRequest failed\n");
2429
2430     index = 0;
2431     size = sizeof(buffer);
2432     ret = HttpQueryInfo(hr, HTTP_QUERY_HOST | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, &index);
2433     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2434     ok(index == 1, "expected 1 got %u\n", index);
2435
2436     index = 0;
2437     size = sizeof(buffer);
2438     ret = HttpQueryInfo(hr, HTTP_QUERY_DATE | HTTP_QUERY_FLAG_SYSTEMTIME, buffer, &size, &index);
2439     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2440     ok(index == 1, "expected 1 got %u\n", index);
2441
2442     index = 0;
2443     size = sizeof(buffer);
2444     ret = HttpQueryInfo(hr, HTTP_QUERY_RAW_HEADERS, buffer, &size, &index);
2445     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2446     ok(index == 0, "expected 0 got %u\n", index);
2447
2448     size = sizeof(buffer);
2449     ret = HttpQueryInfo(hr, HTTP_QUERY_RAW_HEADERS, buffer, &size, &index);
2450     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2451     ok(index == 0, "expected 0 got %u\n", index);
2452
2453     size = sizeof(buffer);
2454     ret = HttpQueryInfo(hr, HTTP_QUERY_RAW_HEADERS_CRLF, buffer, &size, &index);
2455     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2456     ok(index == 0, "expected 0 got %u\n", index);
2457
2458     size = sizeof(buffer);
2459     ret = HttpQueryInfo(hr, HTTP_QUERY_STATUS_TEXT, buffer, &size, &index);
2460     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2461     ok(index == 0, "expected 0 got %u\n", index);
2462
2463     size = sizeof(buffer);
2464     ret = HttpQueryInfo(hr, HTTP_QUERY_VERSION, buffer, &size, &index);
2465     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2466     ok(index == 0, "expected 0 got %u\n", index);
2467
2468     index = 0;
2469     size = sizeof(buffer);
2470     ret = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &size, &index);
2471     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2472     ok(index == 0, "expected 0 got %u\n", index);
2473
2474     index = 0;
2475     size = sizeof(buffer);
2476     ret = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE | HTTP_QUERY_FLAG_NUMBER, buffer, &size, &index);
2477     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2478     ok(index == 0, "expected 0 got %u\n", index);
2479
2480     index = 0xdeadbeef;
2481     size = sizeof(buffer);
2482     ret = HttpQueryInfo(hr, HTTP_QUERY_FORWARDED, buffer, &size, &index);
2483     ok(!ret, "HttpQueryInfo succeeded\n");
2484     ok(index == 0xdeadbeef, "expected 0xdeadbeef got %u\n", index);
2485
2486     index = 0;
2487     size = sizeof(buffer);
2488     ret = HttpQueryInfo(hr, HTTP_QUERY_SERVER, buffer, &size, &index);
2489     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2490     ok(index == 1, "expected 1 got %u\n", index);
2491
2492     index = 0;
2493     size = sizeof(buffer);
2494     strcpy(buffer, "Server");
2495     ret = HttpQueryInfo(hr, HTTP_QUERY_CUSTOM, buffer, &size, &index);
2496     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2497     ok(index == 1, "expected 1 got %u\n", index);
2498
2499     index = 0;
2500     size = sizeof(buffer);
2501     ret = HttpQueryInfo(hr, HTTP_QUERY_SET_COOKIE, buffer, &size, &index);
2502     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2503     ok(index == 1, "expected 1 got %u\n", index);
2504
2505     size = sizeof(buffer);
2506     ret = HttpQueryInfo(hr, HTTP_QUERY_SET_COOKIE, buffer, &size, &index);
2507     ok(ret, "HttpQueryInfo failed %u\n", GetLastError());
2508     ok(index == 2, "expected 2 got %u\n", index);
2509
2510     InternetCloseHandle(hr);
2511     InternetCloseHandle(hc);
2512     InternetCloseHandle(hi);
2513 }
2514
2515 static void test_options(int port)
2516 {
2517     HINTERNET ses, con, req;
2518     DWORD size, error;
2519     DWORD_PTR ctx;
2520     BOOL ret;
2521
2522     ses = InternetOpen("winetest", INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
2523     ok(ses != NULL, "InternetOpen failed\n");
2524
2525     SetLastError(0xdeadbeef);
2526     ret = InternetSetOption(ses, INTERNET_OPTION_CONTEXT_VALUE, NULL, 0);
2527     error = GetLastError();
2528     ok(!ret, "InternetSetOption succeeded\n");
2529     ok(error == ERROR_INVALID_PARAMETER, "expected ERROR_INVALID_PARAMETER, got %u\n", error);
2530
2531     SetLastError(0xdeadbeef);
2532     ret = InternetSetOption(ses, INTERNET_OPTION_CONTEXT_VALUE, NULL, sizeof(ctx));
2533     ok(!ret, "InternetSetOption succeeded\n");
2534     error = GetLastError();
2535     ok(error == ERROR_INVALID_PARAMETER, "expected ERROR_INVALID_PARAMETER, got %u\n", error);
2536
2537     SetLastError(0xdeadbeef);
2538     ret = InternetSetOption(ses, INTERNET_OPTION_CONTEXT_VALUE, &ctx, 0);
2539     ok(!ret, "InternetSetOption succeeded\n");
2540     error = GetLastError();
2541     ok(error == ERROR_INVALID_PARAMETER, "expected ERROR_INVALID_PARAMETER, got %u\n", error);
2542
2543     ctx = 1;
2544     ret = InternetSetOption(ses, INTERNET_OPTION_CONTEXT_VALUE, &ctx, sizeof(ctx));
2545     ok(ret, "InternetSetOption failed %u\n", GetLastError());
2546
2547     SetLastError(0xdeadbeef);
2548     ret = InternetQueryOption(ses, INTERNET_OPTION_CONTEXT_VALUE, NULL, NULL);
2549     error = GetLastError();
2550     ok(!ret, "InternetQueryOption succeeded\n");
2551     ok(error == ERROR_INVALID_PARAMETER, "expected ERROR_INVALID_PARAMETER, got %u\n", error);
2552
2553     SetLastError(0xdeadbeef);
2554     ret = InternetQueryOption(ses, INTERNET_OPTION_CONTEXT_VALUE, &ctx, NULL);
2555     error = GetLastError();
2556     ok(!ret, "InternetQueryOption succeeded\n");
2557     ok(error == ERROR_INVALID_PARAMETER, "expected ERROR_INVALID_PARAMETER, got %u\n", error);
2558
2559     size = 0;
2560     SetLastError(0xdeadbeef);
2561     ret = InternetQueryOption(ses, INTERNET_OPTION_CONTEXT_VALUE, NULL, &size);
2562     error = GetLastError();
2563     ok(!ret, "InternetQueryOption succeeded\n");
2564     ok(error == ERROR_INSUFFICIENT_BUFFER, "expected ERROR_INSUFFICIENT_BUFFER, got %u\n", error);
2565
2566     size = sizeof(ctx);
2567     SetLastError(0xdeadbeef);
2568     ret = InternetQueryOption(NULL, INTERNET_OPTION_CONTEXT_VALUE, &ctx, &size);
2569     error = GetLastError();
2570     ok(!ret, "InternetQueryOption succeeded\n");
2571     ok(error == ERROR_INTERNET_INCORRECT_HANDLE_TYPE, "expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE, got %u\n", error);
2572
2573     ctx = 0xdeadbeef;
2574     size = sizeof(ctx);
2575     ret = InternetQueryOption(ses, INTERNET_OPTION_CONTEXT_VALUE, &ctx, &size);
2576     ok(ret, "InternetQueryOption failed %u\n", GetLastError());
2577     ok(ctx == 1, "expected 1 got %lu\n", ctx);
2578
2579     con = InternetConnect(ses, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2580     ok(con != NULL, "InternetConnect failed\n");
2581
2582     ctx = 0xdeadbeef;
2583     size = sizeof(ctx);
2584     ret = InternetQueryOption(con, INTERNET_OPTION_CONTEXT_VALUE, &ctx, &size);
2585     ok(ret, "InternetQueryOption failed %u\n", GetLastError());
2586     ok(ctx == 0, "expected 0 got %lu\n", ctx);
2587
2588     ctx = 2;
2589     ret = InternetSetOption(con, INTERNET_OPTION_CONTEXT_VALUE, &ctx, sizeof(ctx));
2590     ok(ret, "InternetSetOption failed %u\n", GetLastError());
2591
2592     ctx = 0xdeadbeef;
2593     size = sizeof(ctx);
2594     ret = InternetQueryOption(con, INTERNET_OPTION_CONTEXT_VALUE, &ctx, &size);
2595     ok(ret, "InternetQueryOption failed %u\n", GetLastError());
2596     ok(ctx == 2, "expected 2 got %lu\n", ctx);
2597
2598     req = HttpOpenRequest(con, NULL, "/test1", NULL, NULL, NULL, 0, 0);
2599     ok(req != NULL, "HttpOpenRequest failed\n");
2600
2601     ctx = 0xdeadbeef;
2602     size = sizeof(ctx);
2603     ret = InternetQueryOption(req, INTERNET_OPTION_CONTEXT_VALUE, &ctx, &size);
2604     ok(ret, "InternetQueryOption failed %u\n", GetLastError());
2605     ok(ctx == 0, "expected 0 got %lu\n", ctx);
2606
2607     ctx = 3;
2608     ret = InternetSetOption(req, INTERNET_OPTION_CONTEXT_VALUE, &ctx, sizeof(ctx));
2609     ok(ret, "InternetSetOption failed %u\n", GetLastError());
2610
2611     ctx = 0xdeadbeef;
2612     size = sizeof(ctx);
2613     ret = InternetQueryOption(req, INTERNET_OPTION_CONTEXT_VALUE, &ctx, &size);
2614     ok(ret, "InternetQueryOption failed %u\n", GetLastError());
2615     ok(ctx == 3, "expected 3 got %lu\n", ctx);
2616
2617     InternetCloseHandle(req);
2618     InternetCloseHandle(con);
2619     InternetCloseHandle(ses);
2620 }
2621
2622 static void test_url_caching(int port, int *num_retrievals)
2623 {
2624     HINTERNET hi, hc, hr;
2625     DWORD r, count;
2626     char buffer[0x100];
2627
2628     ok(*num_retrievals == 0, "expected 0 retrievals prior to test\n");
2629
2630     hi = InternetOpen(NULL, INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
2631     ok(hi != NULL, "open failed\n");
2632
2633     hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2634     ok(hc != NULL, "connect failed\n");
2635
2636     /* Pre-load the cache: */
2637     hr = HttpOpenRequest(hc, "GET", "/testH", NULL, NULL, NULL, 0, 0);
2638     ok(hr != NULL, "HttpOpenRequest failed\n");
2639
2640     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
2641     ok(r, "HttpSendRequest failed\n");
2642
2643     ok(*num_retrievals == 1, "expected 1 retrievals\n");
2644
2645     count = 0;
2646     memset(buffer, 0, sizeof buffer);
2647     SetLastError(0xdeadbeef);
2648     r = InternetReadFile(hr, buffer, sizeof buffer, &count);
2649     ok(r, "InternetReadFile failed %u\n", GetLastError());
2650     ok(count == sizeof page1 - 1, "count was wrong\n");
2651     ok(!memcmp(buffer, page1, sizeof page1), "http data wrong\n");
2652
2653     InternetCloseHandle(hr);
2654
2655     /* Send the same request, requiring it to be retrieved from the cache */
2656     hr = HttpOpenRequest(hc, "GET", "/testH", NULL, NULL, NULL, INTERNET_FLAG_FROM_CACHE, 0);
2657     ok(hr != NULL, "HttpOpenRequest failed\n");
2658
2659     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
2660     /* Older Windows versions succeed with this request, newer ones fail with
2661      * ERROR_FILE_NOT_FOUND.  Accept either, as the older version allows us
2662      * to verify that the server isn't contacted.
2663      */
2664     if (!r)
2665         ok(GetLastError() == ERROR_FILE_NOT_FOUND,
2666            "expected ERROR_FILE_NOT_FOUND, got %d\n", GetLastError());
2667     else
2668     {
2669         /* The server shouldn't be contacted for this request. */
2670         todo_wine
2671         ok(*num_retrievals == 1, "expected 1 retrievals\n");
2672
2673         count = 0;
2674         memset(buffer, 0, sizeof buffer);
2675         SetLastError(0xdeadbeef);
2676         r = InternetReadFile(hr, buffer, sizeof buffer, &count);
2677         ok(r, "InternetReadFile failed %u\n", GetLastError());
2678         ok(count == sizeof page1 - 1, "count was wrong\n");
2679         ok(!memcmp(buffer, page1, sizeof page1), "http data wrong\n");
2680     }
2681
2682     InternetCloseHandle(hc);
2683     InternetCloseHandle(hi);
2684 }
2685
2686 static void test_http_connection(void)
2687 {
2688     struct server_info si;
2689     HANDLE hThread;
2690     DWORD id = 0, r;
2691
2692     si.hEvent = CreateEvent(NULL, 0, 0, NULL);
2693     si.port = 7531;
2694     si.num_testH_retrievals = 0;
2695
2696     hThread = CreateThread(NULL, 0, server_thread, (LPVOID) &si, 0, &id);
2697     ok( hThread != NULL, "create thread failed\n");
2698
2699     r = WaitForSingleObject(si.hEvent, 10000);
2700     ok (r == WAIT_OBJECT_0, "failed to start wininet test server\n");
2701     if (r != WAIT_OBJECT_0)
2702         return;
2703
2704     test_basic_request(si.port, "GET", "/test1");
2705     test_proxy_indirect(si.port);
2706     test_proxy_direct(si.port);
2707     test_header_handling_order(si.port);
2708     test_basic_request(si.port, "POST", "/test5");
2709     test_basic_request(si.port, "RPC_IN_DATA", "/test5");
2710     test_basic_request(si.port, "RPC_OUT_DATA", "/test5");
2711     test_basic_request(si.port, "GET", "/test6");
2712     test_basic_request(si.port, "GET", "/testF");
2713     test_connection_header(si.port);
2714     test_http1_1(si.port);
2715     test_cookie_header(si.port);
2716     test_basic_authentication(si.port);
2717     test_invalid_response_headers(si.port);
2718     test_response_without_headers(si.port);
2719     test_HttpQueryInfo(si.port);
2720     test_HttpSendRequestW(si.port);
2721     test_last_error(si.port);
2722     test_options(si.port);
2723     test_url_caching(si.port, &si.num_testH_retrievals);
2724
2725     /* send the basic request again to shutdown the server thread */
2726     test_basic_request(si.port, "GET", "/quit");
2727
2728     r = WaitForSingleObject(hThread, 3000);
2729     ok( r == WAIT_OBJECT_0, "thread wait failed\n");
2730     CloseHandle(hThread);
2731 }
2732
2733 static void release_cert_info(INTERNET_CERTIFICATE_INFOA *info)
2734 {
2735     LocalFree(info->lpszSubjectInfo);
2736     LocalFree(info->lpszIssuerInfo);
2737     LocalFree(info->lpszProtocolName);
2738     LocalFree(info->lpszSignatureAlgName);
2739     LocalFree(info->lpszEncryptionAlgName);
2740 }
2741
2742 static void test_secure_connection(void)
2743 {
2744     static const WCHAR gizmo5[] = {'G','i','z','m','o','5',0};
2745     static const WCHAR testbot[] = {'t','e','s','t','b','o','t','.','w','i','n','e','h','q','.','o','r','g',0};
2746     static const WCHAR get[] = {'G','E','T',0};
2747     static const WCHAR slash[] = {'/',0};
2748     HINTERNET ses, con, req;
2749     DWORD size, flags;
2750     INTERNET_CERTIFICATE_INFOA *certificate_structA = NULL;
2751     INTERNET_CERTIFICATE_INFOW *certificate_structW = NULL;
2752     BOOL ret;
2753
2754     ses = InternetOpen("Gizmo5", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
2755     ok(ses != NULL, "InternetOpen failed\n");
2756
2757     con = InternetConnect(ses, "testbot.winehq.org",
2758                           INTERNET_DEFAULT_HTTPS_PORT, NULL, NULL,
2759                           INTERNET_SERVICE_HTTP, 0, 0);
2760     ok(con != NULL, "InternetConnect failed\n");
2761
2762     req = HttpOpenRequest(con, "GET", "/", NULL, NULL, NULL,
2763                           INTERNET_FLAG_SECURE, 0);
2764     ok(req != NULL, "HttpOpenRequest failed\n");
2765
2766     ret = HttpSendRequest(req, NULL, 0, NULL, 0);
2767     ok(ret, "HttpSendRequest failed: %d\n", GetLastError());
2768
2769     size = sizeof(flags);
2770     ret = InternetQueryOption(req, INTERNET_OPTION_SECURITY_FLAGS, &flags, &size);
2771     ok(ret, "InternetQueryOption failed: %d\n", GetLastError());
2772     ok(flags & SECURITY_FLAG_SECURE, "expected secure flag to be set\n");
2773
2774     ret = InternetQueryOptionA(req, INTERNET_OPTION_SECURITY_CERTIFICATE_STRUCT,
2775                                NULL, &size);
2776     ok(ret || GetLastError() == ERROR_INSUFFICIENT_BUFFER, "InternetQueryOption failed: %d\n", GetLastError());
2777     ok(size == sizeof(INTERNET_CERTIFICATE_INFOA), "size = %d\n", size);
2778     certificate_structA = HeapAlloc(GetProcessHeap(), 0, size);
2779     ret = InternetQueryOption(req, INTERNET_OPTION_SECURITY_CERTIFICATE_STRUCT,
2780                               certificate_structA, &size);
2781     ok(ret, "InternetQueryOption failed: %d\n", GetLastError());
2782     if (ret)
2783     {
2784         ok(certificate_structA->lpszSubjectInfo &&
2785            strlen(certificate_structA->lpszSubjectInfo) > 1,
2786            "expected a non-empty subject name\n");
2787         ok(certificate_structA->lpszIssuerInfo &&
2788            strlen(certificate_structA->lpszIssuerInfo) > 1,
2789            "expected a non-empty issuer name\n");
2790         ok(!certificate_structA->lpszSignatureAlgName,
2791            "unexpected signature algorithm name\n");
2792         ok(!certificate_structA->lpszEncryptionAlgName,
2793            "unexpected encryption algorithm name\n");
2794         ok(!certificate_structA->lpszProtocolName,
2795            "unexpected protocol name\n");
2796         ok(certificate_structA->dwKeySize, "expected a non-zero key size\n");
2797         release_cert_info(certificate_structA);
2798     }
2799     HeapFree(GetProcessHeap(), 0, certificate_structA);
2800
2801     /* Querying the same option through InternetQueryOptionW still results in
2802      * ASCII strings being returned.
2803      */
2804     size = 0;
2805     ret = InternetQueryOptionW(req, INTERNET_OPTION_SECURITY_CERTIFICATE_STRUCT,
2806                                NULL, &size);
2807     ok(ret || GetLastError() == ERROR_INSUFFICIENT_BUFFER, "InternetQueryOption failed: %d\n", GetLastError());
2808     ok(size == sizeof(INTERNET_CERTIFICATE_INFOW), "size = %d\n", size);
2809     certificate_structW = HeapAlloc(GetProcessHeap(), 0, size);
2810     ret = InternetQueryOption(req, INTERNET_OPTION_SECURITY_CERTIFICATE_STRUCT,
2811                               certificate_structW, &size);
2812     certificate_structA = (INTERNET_CERTIFICATE_INFOA *)certificate_structW;
2813     ok(ret, "InternetQueryOption failed: %d\n", GetLastError());
2814     if (ret)
2815     {
2816         ok(certificate_structA->lpszSubjectInfo &&
2817            strlen(certificate_structA->lpszSubjectInfo) > 1,
2818            "expected a non-empty subject name\n");
2819         ok(certificate_structA->lpszIssuerInfo &&
2820            strlen(certificate_structA->lpszIssuerInfo) > 1,
2821            "expected a non-empty issuer name\n");
2822         ok(!certificate_structA->lpszSignatureAlgName,
2823            "unexpected signature algorithm name\n");
2824         ok(!certificate_structA->lpszEncryptionAlgName,
2825            "unexpected encryption algorithm name\n");
2826         ok(!certificate_structA->lpszProtocolName,
2827            "unexpected protocol name\n");
2828         ok(certificate_structA->dwKeySize, "expected a non-zero key size\n");
2829         release_cert_info(certificate_structA);
2830     }
2831     HeapFree(GetProcessHeap(), 0, certificate_structW);
2832
2833     InternetCloseHandle(req);
2834     InternetCloseHandle(con);
2835     InternetCloseHandle(ses);
2836
2837     /* Repeating the tests with the W functions has the same result: */
2838     ses = InternetOpenW(gizmo5, INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
2839     ok(ses != NULL, "InternetOpen failed\n");
2840
2841     con = InternetConnectW(ses, testbot,
2842                           INTERNET_DEFAULT_HTTPS_PORT, NULL, NULL,
2843                           INTERNET_SERVICE_HTTP, 0, 0);
2844     ok(con != NULL, "InternetConnect failed\n");
2845
2846     req = HttpOpenRequestW(con, get, slash, NULL, NULL, NULL,
2847                           INTERNET_FLAG_SECURE, 0);
2848     ok(req != NULL, "HttpOpenRequest failed\n");
2849
2850     ret = HttpSendRequest(req, NULL, 0, NULL, 0);
2851     ok(ret, "HttpSendRequest failed: %d\n", GetLastError());
2852
2853     size = sizeof(flags);
2854     ret = InternetQueryOption(req, INTERNET_OPTION_SECURITY_FLAGS, &flags, &size);
2855     ok(ret, "InternetQueryOption failed: %d\n", GetLastError());
2856     ok(flags & SECURITY_FLAG_SECURE, "expected secure flag to be set\n");
2857
2858     ret = InternetQueryOptionA(req, INTERNET_OPTION_SECURITY_CERTIFICATE_STRUCT,
2859                                NULL, &size);
2860     ok(ret || GetLastError() == ERROR_INSUFFICIENT_BUFFER, "InternetQueryOption failed: %d\n", GetLastError());
2861     ok(size == sizeof(INTERNET_CERTIFICATE_INFOA), "size = %d\n", size);
2862     certificate_structA = HeapAlloc(GetProcessHeap(), 0, size);
2863     ret = InternetQueryOptionW(req, INTERNET_OPTION_SECURITY_CERTIFICATE_STRUCT,
2864                                certificate_structA, &size);
2865     ok(ret, "InternetQueryOption failed: %d\n", GetLastError());
2866     if (ret)
2867     {
2868         ok(certificate_structA->lpszSubjectInfo &&
2869            strlen(certificate_structA->lpszSubjectInfo) > 1,
2870            "expected a non-empty subject name\n");
2871         ok(certificate_structA->lpszIssuerInfo &&
2872            strlen(certificate_structA->lpszIssuerInfo) > 1,
2873            "expected a non-empty issuer name\n");
2874         ok(!certificate_structA->lpszSignatureAlgName,
2875            "unexpected signature algorithm name\n");
2876         ok(!certificate_structA->lpszEncryptionAlgName,
2877            "unexpected encryption algorithm name\n");
2878         ok(!certificate_structA->lpszProtocolName,
2879            "unexpected protocol name\n");
2880         ok(certificate_structA->dwKeySize, "expected a non-zero key size\n");
2881         release_cert_info(certificate_structA);
2882     }
2883     HeapFree(GetProcessHeap(), 0, certificate_structA);
2884
2885     /* Again, querying the same option through InternetQueryOptionW still
2886      * results in ASCII strings being returned.
2887      */
2888     size = 0;
2889     ret = InternetQueryOptionW(req, INTERNET_OPTION_SECURITY_CERTIFICATE_STRUCT,
2890                                NULL, &size);
2891     ok(ret || GetLastError() == ERROR_INSUFFICIENT_BUFFER, "InternetQueryOption failed: %d\n", GetLastError());
2892     ok(size == sizeof(INTERNET_CERTIFICATE_INFOW), "size = %d\n", size);
2893     certificate_structW = HeapAlloc(GetProcessHeap(), 0, size);
2894     ret = InternetQueryOptionW(req, INTERNET_OPTION_SECURITY_CERTIFICATE_STRUCT,
2895                                certificate_structW, &size);
2896     certificate_structA = (INTERNET_CERTIFICATE_INFOA *)certificate_structW;
2897     ok(ret, "InternetQueryOption failed: %d\n", GetLastError());
2898     if (ret)
2899     {
2900         ok(certificate_structA->lpszSubjectInfo &&
2901            strlen(certificate_structA->lpszSubjectInfo) > 1,
2902            "expected a non-empty subject name\n");
2903         ok(certificate_structA->lpszIssuerInfo &&
2904            strlen(certificate_structA->lpszIssuerInfo) > 1,
2905            "expected a non-empty issuer name\n");
2906         ok(!certificate_structA->lpszSignatureAlgName,
2907            "unexpected signature algorithm name\n");
2908         ok(!certificate_structA->lpszEncryptionAlgName,
2909            "unexpected encryption algorithm name\n");
2910         ok(!certificate_structA->lpszProtocolName,
2911            "unexpected protocol name\n");
2912         ok(certificate_structA->dwKeySize, "expected a non-zero key size\n");
2913         release_cert_info(certificate_structA);
2914     }
2915     HeapFree(GetProcessHeap(), 0, certificate_structW);
2916
2917     InternetCloseHandle(req);
2918     InternetCloseHandle(con);
2919     InternetCloseHandle(ses);
2920 }
2921
2922 static void test_user_agent_header(void)
2923 {
2924     HINTERNET ses, con, req;
2925     DWORD size, err;
2926     char buffer[64];
2927     BOOL ret;
2928
2929     ses = InternetOpen("Gizmo5", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
2930     ok(ses != NULL, "InternetOpen failed\n");
2931
2932     con = InternetConnect(ses, "test.winehq.org", 80, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2933     ok(con != NULL, "InternetConnect failed\n");
2934
2935     req = HttpOpenRequest(con, "GET", "/tests/hello.html", "HTTP/1.0", NULL, NULL, 0, 0);
2936     ok(req != NULL, "HttpOpenRequest failed\n");
2937
2938     size = sizeof(buffer);
2939     ret = HttpQueryInfo(req, HTTP_QUERY_USER_AGENT | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
2940     err = GetLastError();
2941     ok(!ret, "HttpQueryInfo succeeded\n");
2942     ok(err == ERROR_HTTP_HEADER_NOT_FOUND, "expected ERROR_HTTP_HEADER_NOT_FOUND, got %u\n", err);
2943
2944     ret = HttpAddRequestHeaders(req, "User-Agent: Gizmo Project\r\n", ~0u, HTTP_ADDREQ_FLAG_ADD_IF_NEW);
2945     ok(ret, "HttpAddRequestHeaders succeeded\n");
2946
2947     size = sizeof(buffer);
2948     ret = HttpQueryInfo(req, HTTP_QUERY_USER_AGENT | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
2949     err = GetLastError();
2950     ok(ret, "HttpQueryInfo failed\n");
2951     ok(err == ERROR_HTTP_HEADER_NOT_FOUND, "expected ERROR_HTTP_HEADER_NOT_FOUND, got %u\n", err);
2952
2953     InternetCloseHandle(req);
2954
2955     req = HttpOpenRequest(con, "GET", "/", "HTTP/1.0", NULL, NULL, 0, 0);
2956     ok(req != NULL, "HttpOpenRequest failed\n");
2957
2958     size = sizeof(buffer);
2959     ret = HttpQueryInfo(req, HTTP_QUERY_ACCEPT | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
2960     err = GetLastError();
2961     ok(!ret, "HttpQueryInfo succeeded\n");
2962     ok(err == ERROR_HTTP_HEADER_NOT_FOUND, "expected ERROR_HTTP_HEADER_NOT_FOUND, got %u\n", err);
2963
2964     ret = HttpAddRequestHeaders(req, "Accept: audio/*, image/*, text/*\r\nUser-Agent: Gizmo Project\r\n", ~0u, HTTP_ADDREQ_FLAG_ADD_IF_NEW);
2965     ok(ret, "HttpAddRequestHeaders failed\n");
2966
2967     buffer[0] = 0;
2968     size = sizeof(buffer);
2969     ret = HttpQueryInfo(req, HTTP_QUERY_ACCEPT | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
2970     ok(ret, "HttpQueryInfo failed: %u\n", GetLastError());
2971     ok(!strcmp(buffer, "audio/*, image/*, text/*"), "got '%s' expected 'audio/*, image/*, text/*'\n", buffer);
2972
2973     InternetCloseHandle(req);
2974     InternetCloseHandle(con);
2975     InternetCloseHandle(ses);
2976 }
2977
2978 static void test_bogus_accept_types_array(void)
2979 {
2980     HINTERNET ses, con, req;
2981     static const char *types[] = { (const char *)6240, "*/*", "%p", "", (const char *)0xffffffff, "*/*", NULL };
2982     DWORD size;
2983     char buffer[32];
2984     BOOL ret;
2985
2986     ses = InternetOpen("MERONG(0.9/;p)", INTERNET_OPEN_TYPE_DIRECT, "", "", 0);
2987     con = InternetConnect(ses, "www.winehq.org", 80, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
2988     req = HttpOpenRequest(con, "POST", "/post/post_action.php", "HTTP/1.0", "", types, INTERNET_FLAG_FORMS_SUBMIT, 0);
2989
2990     ok(req != NULL, "HttpOpenRequest failed: %u\n", GetLastError());
2991
2992     buffer[0] = 0;
2993     size = sizeof(buffer);
2994     ret = HttpQueryInfo(req, HTTP_QUERY_ACCEPT | HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer, &size, NULL);
2995     ok(ret, "HttpQueryInfo failed: %u\n", GetLastError());
2996     ok(!strcmp(buffer, ", */*, %p, , , */*") || /* IE6 */
2997        !strcmp(buffer, "*/*, %p, */*"),
2998        "got '%s' expected '*/*, %%p, */*' or ', */*, %%p, , , */*'\n", buffer);
2999
3000     InternetCloseHandle(req);
3001     InternetCloseHandle(con);
3002     InternetCloseHandle(ses);
3003 }
3004
3005 struct context
3006 {
3007     HANDLE event;
3008     HINTERNET req;
3009 };
3010
3011 static void WINAPI cb(HINTERNET handle, DWORD_PTR context, DWORD status, LPVOID info, DWORD size)
3012 {
3013     INTERNET_ASYNC_RESULT *result = info;
3014     struct context *ctx = (struct context *)context;
3015
3016     trace("%p 0x%08lx %u %p 0x%08x\n", handle, context, status, info, size);
3017
3018     if (status == INTERNET_STATUS_REQUEST_COMPLETE)
3019     {
3020         trace("request handle: 0x%08lx\n", result->dwResult);
3021         ctx->req = (HINTERNET)result->dwResult;
3022         SetEvent(ctx->event);
3023     }
3024     if (status == INTERNET_STATUS_HANDLE_CLOSING)
3025     {
3026         DWORD type = INTERNET_HANDLE_TYPE_CONNECT_HTTP, size = sizeof(type);
3027
3028         if (InternetQueryOption(handle, INTERNET_OPTION_HANDLE_TYPE, &type, &size))
3029             ok(type != INTERNET_HANDLE_TYPE_CONNECT_HTTP, "unexpected callback\n");
3030         SetEvent(ctx->event);
3031     }
3032 }
3033
3034 static void test_open_url_async(void)
3035 {
3036     BOOL ret;
3037     HINTERNET ses, req;
3038     DWORD size, error;
3039     struct context ctx;
3040     ULONG type;
3041
3042     ctx.req = NULL;
3043     ctx.event = CreateEvent(NULL, TRUE, FALSE, "Z:_home_hans_jaman-installer.exe_ev1");
3044
3045     ses = InternetOpen("AdvancedInstaller", 0, NULL, NULL, INTERNET_FLAG_ASYNC);
3046     ok(ses != NULL, "InternetOpen failed\n");
3047
3048     SetLastError(0xdeadbeef);
3049     ret = InternetSetOptionA(NULL, INTERNET_OPTION_CALLBACK, &cb, sizeof(DWORD_PTR));
3050     error = GetLastError();
3051     ok(!ret, "InternetSetOptionA succeeded\n");
3052     ok(error == ERROR_INTERNET_INCORRECT_HANDLE_TYPE, "got %u expected ERROR_INTERNET_INCORRECT_HANDLE_TYPE\n", error);
3053
3054     ret = InternetSetOptionA(ses, INTERNET_OPTION_CALLBACK, &cb, sizeof(DWORD_PTR));
3055     error = GetLastError();
3056     ok(!ret, "InternetSetOptionA failed\n");
3057     ok(error == ERROR_INTERNET_OPTION_NOT_SETTABLE, "got %u expected ERROR_INTERNET_OPTION_NOT_SETTABLE\n", error);
3058
3059     pInternetSetStatusCallbackA(ses, cb);
3060     ResetEvent(ctx.event);
3061
3062     req = InternetOpenUrl(ses, "http://test.winehq.org", NULL, 0, 0, (DWORD_PTR)&ctx);
3063     ok(!req && GetLastError() == ERROR_IO_PENDING, "InternetOpenUrl failed\n");
3064
3065     WaitForSingleObject(ctx.event, INFINITE);
3066
3067     type = 0;
3068     size = sizeof(type);
3069     ret = InternetQueryOption(ctx.req, INTERNET_OPTION_HANDLE_TYPE, &type, &size);
3070     ok(ret, "InternetQueryOption failed: %u\n", GetLastError());
3071     ok(type == INTERNET_HANDLE_TYPE_HTTP_REQUEST,
3072        "expected INTERNET_HANDLE_TYPE_HTTP_REQUEST, got %u\n", type);
3073
3074     size = 0;
3075     ret = HttpQueryInfo(ctx.req, HTTP_QUERY_RAW_HEADERS_CRLF, NULL, &size, NULL);
3076     ok(!ret && GetLastError() == ERROR_INSUFFICIENT_BUFFER, "HttpQueryInfo failed\n");
3077     ok(size > 0, "expected size > 0\n");
3078
3079     ResetEvent(ctx.event);
3080     InternetCloseHandle(ctx.req);
3081     WaitForSingleObject(ctx.event, INFINITE);
3082
3083     InternetCloseHandle(ses);
3084     CloseHandle(ctx.event);
3085 }
3086
3087 enum api
3088 {
3089     internet_connect = 1,
3090     http_open_request,
3091     http_send_request_ex,
3092     internet_writefile,
3093     http_end_request,
3094     internet_close_handle
3095 };
3096
3097 struct notification
3098 {
3099     enum api     function; /* api responsible for notification */
3100     unsigned int status;   /* status received */
3101     int          async;    /* delivered from another thread? */
3102     int          todo;
3103     int          optional;
3104 };
3105
3106 struct info
3107 {
3108     enum api     function;
3109     const struct notification *test;
3110     unsigned int count;
3111     unsigned int index;
3112     HANDLE       wait;
3113     DWORD        thread;
3114     unsigned int line;
3115 };
3116
3117 static CRITICAL_SECTION notification_cs;
3118
3119 static void CALLBACK check_notification( HINTERNET handle, DWORD_PTR context, DWORD status, LPVOID buffer, DWORD buflen )
3120 {
3121     BOOL status_ok, function_ok;
3122     struct info *info = (struct info *)context;
3123     unsigned int i;
3124
3125     EnterCriticalSection( &notification_cs );
3126
3127     if (status == INTERNET_STATUS_HANDLE_CREATED)
3128     {
3129         DWORD size = sizeof(struct info *);
3130         HttpQueryInfoA( handle, INTERNET_OPTION_CONTEXT_VALUE, &info, &size, 0 );
3131     }
3132     i = info->index;
3133     if (i >= info->count)
3134     {
3135         LeaveCriticalSection( &notification_cs );
3136         return;
3137     }
3138
3139     while (info->test[i].status != status && info->test[i].optional &&
3140         i < info->count - 1 &&
3141         info->test[i].function == info->test[i + 1].function)
3142     {
3143         i++;
3144     }
3145
3146     status_ok   = (info->test[i].status == status);
3147     function_ok = (info->test[i].function == info->function);
3148
3149     if (!info->test[i].todo)
3150     {
3151         ok( status_ok, "%u: expected status %u got %u\n", info->line, info->test[i].status, status );
3152         ok( function_ok, "%u: expected function %u got %u\n", info->line, info->test[i].function, info->function );
3153
3154         if (info->test[i].async)
3155             ok(info->thread != GetCurrentThreadId(), "%u: expected thread %u got %u\n",
3156                info->line, info->thread, GetCurrentThreadId());
3157     }
3158     else
3159     {
3160         todo_wine ok( status_ok, "%u: expected status %u got %u\n", info->line, info->test[i].status, status );
3161         if (status_ok)
3162             todo_wine ok( function_ok, "%u: expected function %u got %u\n", info->line, info->test[i].function, info->function );
3163     }
3164     if (i == info->count - 1 || info->test[i].function != info->test[i + 1].function) SetEvent( info->wait );
3165     info->index = i+1;
3166
3167     LeaveCriticalSection( &notification_cs );
3168 }
3169
3170 static void setup_test( struct info *info, enum api function, unsigned int line )
3171 {
3172     info->function = function;
3173     info->line = line;
3174 }
3175
3176 static const struct notification async_send_request_ex_test[] =
3177 {
3178     { internet_connect,      INTERNET_STATUS_HANDLE_CREATED, 0 },
3179     { http_open_request,     INTERNET_STATUS_HANDLE_CREATED, 0 },
3180     { http_send_request_ex,  INTERNET_STATUS_DETECTING_PROXY, 1, 0, 1 },
3181     { http_send_request_ex,  INTERNET_STATUS_RESOLVING_NAME, 1, 0, 1 },
3182     { http_send_request_ex,  INTERNET_STATUS_NAME_RESOLVED, 1, 0, 1 },
3183     { http_send_request_ex,  INTERNET_STATUS_CONNECTING_TO_SERVER, 1 },
3184     { http_send_request_ex,  INTERNET_STATUS_CONNECTED_TO_SERVER, 1 },
3185     { http_send_request_ex,  INTERNET_STATUS_SENDING_REQUEST, 1 },
3186     { http_send_request_ex,  INTERNET_STATUS_REQUEST_SENT, 1 },
3187     { http_send_request_ex,  INTERNET_STATUS_REQUEST_COMPLETE, 1 },
3188     { internet_writefile,    INTERNET_STATUS_SENDING_REQUEST, 0 },
3189     { internet_writefile,    INTERNET_STATUS_REQUEST_SENT, 0 },
3190     { http_end_request,      INTERNET_STATUS_RECEIVING_RESPONSE, 1 },
3191     { http_end_request,      INTERNET_STATUS_RESPONSE_RECEIVED, 1 },
3192     { http_end_request,      INTERNET_STATUS_REQUEST_COMPLETE, 1 },
3193     { internet_close_handle, INTERNET_STATUS_CLOSING_CONNECTION, 0, 0, 1 },
3194     { internet_close_handle, INTERNET_STATUS_CONNECTION_CLOSED, 0, 0, 1 },
3195     { internet_close_handle, INTERNET_STATUS_HANDLE_CLOSING, 0, },
3196     { internet_close_handle, INTERNET_STATUS_HANDLE_CLOSING, 0, }
3197 };
3198
3199 static void test_async_HttpSendRequestEx(void)
3200 {
3201     BOOL ret;
3202     HINTERNET ses, req, con;
3203     struct info info;
3204     DWORD size, written, error;
3205     INTERNET_BUFFERSA b;
3206     static const char *accept[2] = {"*/*", NULL};
3207     static char data[] = "Public ID=codeweavers";
3208     char buffer[32];
3209
3210     InitializeCriticalSection( &notification_cs );
3211
3212     info.test  = async_send_request_ex_test;
3213     info.count = sizeof(async_send_request_ex_test)/sizeof(async_send_request_ex_test[0]);
3214     info.index = 0;
3215     info.wait = CreateEvent( NULL, FALSE, FALSE, NULL );
3216     info.thread = GetCurrentThreadId();
3217
3218     ses = InternetOpen( "winetest", 0, NULL, NULL, INTERNET_FLAG_ASYNC );
3219     ok( ses != NULL, "InternetOpen failed\n" );
3220
3221     pInternetSetStatusCallbackA( ses, check_notification );
3222
3223     setup_test( &info, internet_connect, __LINE__ );
3224     con = InternetConnect( ses, "crossover.codeweavers.com", 80, NULL, NULL, INTERNET_SERVICE_HTTP, 0, (DWORD_PTR)&info );
3225     ok( con != NULL, "InternetConnect failed %u\n", GetLastError() );
3226
3227     WaitForSingleObject( info.wait, 10000 );
3228
3229     setup_test( &info, http_open_request, __LINE__ );
3230     req = HttpOpenRequest( con, "POST", "posttest.php", NULL, NULL, accept, 0, (DWORD_PTR)&info );
3231     ok( req != NULL, "HttpOpenRequest failed %u\n", GetLastError() );
3232
3233     WaitForSingleObject( info.wait, 10000 );
3234
3235     memset( &b, 0, sizeof(INTERNET_BUFFERSA) );
3236     b.dwStructSize = sizeof(INTERNET_BUFFERSA);
3237     b.lpcszHeader = "Content-Type: application/x-www-form-urlencoded";
3238     b.dwHeadersLength = strlen( b.lpcszHeader );
3239     b.dwBufferTotal = strlen( data );
3240
3241     setup_test( &info, http_send_request_ex, __LINE__ );
3242     ret = HttpSendRequestExA( req, &b, NULL, 0x28, 0 );
3243     ok( !ret && GetLastError() == ERROR_IO_PENDING, "HttpSendRequestExA failed %d %u\n", ret, GetLastError() );
3244
3245     WaitForSingleObject( info.wait, 10000 );
3246
3247     size = sizeof(buffer);
3248     SetLastError( 0xdeadbeef );
3249     ret = HttpQueryInfoA( req, HTTP_QUERY_CONTENT_ENCODING, buffer, &size, 0 );
3250     error = GetLastError();
3251     ok( !ret, "HttpQueryInfoA failed %u\n", GetLastError() );
3252     todo_wine
3253     ok( error == ERROR_INTERNET_INCORRECT_HANDLE_STATE,
3254         "expected ERROR_INTERNET_INCORRECT_HANDLE_STATE got %u\n", error );
3255
3256     written = 0;
3257     size = strlen( data );
3258     setup_test( &info, internet_writefile, __LINE__ );
3259     ret = InternetWriteFile( req, data, size, &written );
3260     ok( ret, "InternetWriteFile failed %u\n", GetLastError() );
3261     ok( written == size, "expected %u got %u\n", written, size );
3262
3263     WaitForSingleObject( info.wait, 10000 );
3264
3265     SetLastError( 0xdeadbeef );
3266     ret = HttpEndRequestA( req, (void *)data, 0x28, 0 );
3267     error = GetLastError();
3268     ok( !ret, "HttpEndRequestA succeeded\n" );
3269     ok( error == ERROR_INVALID_PARAMETER, "expected ERROR_INVALID_PARAMETER got %u\n", error );
3270
3271     SetLastError( 0xdeadbeef );
3272     setup_test( &info, http_end_request, __LINE__ );
3273     ret = HttpEndRequestA( req, NULL, 0x28, 0 );
3274     error = GetLastError();
3275     ok( !ret, "HttpEndRequestA succeeded\n" );
3276     ok( error == ERROR_IO_PENDING, "expected ERROR_IO_PENDING got %u\n", error );
3277
3278     WaitForSingleObject( info.wait, 10000 );
3279
3280     setup_test( &info, internet_close_handle, __LINE__ );
3281     InternetCloseHandle( req );
3282     InternetCloseHandle( con );
3283     InternetCloseHandle( ses );
3284
3285     WaitForSingleObject( info.wait, 10000 );
3286     Sleep(100);
3287     CloseHandle( info.wait );
3288 }
3289
3290 static HINTERNET closetest_session, closetest_req, closetest_conn;
3291 static BOOL closetest_closed;
3292
3293 static void WINAPI closetest_callback(HINTERNET hInternet, DWORD_PTR dwContext, DWORD dwInternetStatus,
3294      LPVOID lpvStatusInformation, DWORD dwStatusInformationLength)
3295 {
3296     DWORD len, type;
3297     BOOL res;
3298
3299     trace("closetest_callback %p: %d\n", hInternet, dwInternetStatus);
3300
3301     ok(hInternet == closetest_session || hInternet == closetest_conn || hInternet == closetest_req,
3302        "Unexpected hInternet %p\n", hInternet);
3303     if(!closetest_closed)
3304         return;
3305
3306     len = sizeof(type);
3307     res = InternetQueryOptionA(closetest_req, INTERNET_OPTION_HANDLE_TYPE, &type, &len);
3308     ok(!res && GetLastError() == ERROR_INVALID_HANDLE,
3309        "InternetQueryOptionA(%p INTERNET_OPTION_HANDLE_TYPE) failed: %x %u, expected TRUE ERROR_INVALID_HANDLE\n",
3310        closetest_req, res, GetLastError());
3311 }
3312
3313 static void test_InternetCloseHandle(void)
3314 {
3315     DWORD len, flags;
3316     BOOL res;
3317
3318     closetest_session = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, INTERNET_FLAG_ASYNC);
3319     ok(closetest_session != NULL,"InternetOpen failed with error %u\n", GetLastError());
3320
3321     pInternetSetStatusCallbackA(closetest_session, closetest_callback);
3322
3323     closetest_conn = InternetConnectA(closetest_session, "source.winehq.org", INTERNET_INVALID_PORT_NUMBER,
3324             NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
3325     ok(closetest_conn != NULL,"InternetConnect failed with error %u\n", GetLastError());
3326
3327     closetest_req = HttpOpenRequestA(closetest_conn, "GET", "winegecko.php", NULL, NULL, NULL,
3328             INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE, 0xdeadbead);
3329
3330     res = HttpSendRequestA(closetest_req, NULL, -1, NULL, 0);
3331     ok(!res && (GetLastError() == ERROR_IO_PENDING),
3332        "Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
3333
3334     len = sizeof(flags);
3335     res = InternetQueryOptionA(closetest_req, INTERNET_OPTION_REQUEST_FLAGS, &flags, &len);
3336     ok(res, "InternetQueryOptionA(%p INTERNET_OPTION_URL) failed: %u\n", closetest_req, GetLastError());
3337
3338     res = InternetCloseHandle(closetest_session);
3339     ok(res, "InternetCloseHandle failed: %u\n", GetLastError());
3340     closetest_closed = TRUE;
3341     trace("Closed session handle\n");
3342
3343     res = InternetCloseHandle(closetest_conn);
3344     ok(!res && GetLastError() == ERROR_INVALID_HANDLE, "InternetCloseConnection(conn) failed: %x %u\n",
3345        res, GetLastError());
3346
3347     res = InternetCloseHandle(closetest_req);
3348     ok(!res && GetLastError() == ERROR_INVALID_HANDLE, "InternetCloseConnection(req) failed: %x %u\n",
3349        res, GetLastError());
3350
3351     len = sizeof(flags);
3352     res = InternetQueryOptionA(closetest_req, INTERNET_OPTION_REQUEST_FLAGS, &flags, &len);
3353     ok(!res && GetLastError() == ERROR_INVALID_HANDLE,
3354        "InternetQueryOptionA(%p INTERNET_OPTION_URL) failed: %x %u, expected TRUE ERROR_INVALID_HANDLE\n",
3355        closetest_req, res, GetLastError());
3356 }
3357
3358 static void init_status_tests(void)
3359 {
3360     memset(expect, 0, sizeof(expect));
3361     memset(optional, 0, sizeof(optional));
3362     memset(wine_allow, 0, sizeof(wine_allow));
3363     memset(notified, 0, sizeof(notified));
3364     memset(status_string, 0, sizeof(status_string));
3365
3366 #define STATUS_STRING(status) status_string[status] = #status
3367     STATUS_STRING(INTERNET_STATUS_RESOLVING_NAME);
3368     STATUS_STRING(INTERNET_STATUS_NAME_RESOLVED);
3369     STATUS_STRING(INTERNET_STATUS_CONNECTING_TO_SERVER);
3370     STATUS_STRING(INTERNET_STATUS_CONNECTED_TO_SERVER);
3371     STATUS_STRING(INTERNET_STATUS_SENDING_REQUEST);
3372     STATUS_STRING(INTERNET_STATUS_REQUEST_SENT);
3373     STATUS_STRING(INTERNET_STATUS_RECEIVING_RESPONSE);
3374     STATUS_STRING(INTERNET_STATUS_RESPONSE_RECEIVED);
3375     STATUS_STRING(INTERNET_STATUS_CTL_RESPONSE_RECEIVED);
3376     STATUS_STRING(INTERNET_STATUS_PREFETCH);
3377     STATUS_STRING(INTERNET_STATUS_CLOSING_CONNECTION);
3378     STATUS_STRING(INTERNET_STATUS_CONNECTION_CLOSED);
3379     STATUS_STRING(INTERNET_STATUS_HANDLE_CREATED);
3380     STATUS_STRING(INTERNET_STATUS_HANDLE_CLOSING);
3381     STATUS_STRING(INTERNET_STATUS_DETECTING_PROXY);
3382     STATUS_STRING(INTERNET_STATUS_REQUEST_COMPLETE);
3383     STATUS_STRING(INTERNET_STATUS_REDIRECT);
3384     STATUS_STRING(INTERNET_STATUS_INTERMEDIATE_RESPONSE);
3385     STATUS_STRING(INTERNET_STATUS_USER_INPUT_REQUIRED);
3386     STATUS_STRING(INTERNET_STATUS_STATE_CHANGE);
3387     STATUS_STRING(INTERNET_STATUS_COOKIE_SENT);
3388     STATUS_STRING(INTERNET_STATUS_COOKIE_RECEIVED);
3389     STATUS_STRING(INTERNET_STATUS_PRIVACY_IMPACTED);
3390     STATUS_STRING(INTERNET_STATUS_P3P_HEADER);
3391     STATUS_STRING(INTERNET_STATUS_P3P_POLICYREF);
3392     STATUS_STRING(INTERNET_STATUS_COOKIE_HISTORY);
3393 #undef STATUS_STRING
3394 }
3395
3396 START_TEST(http)
3397 {
3398     HMODULE hdll;
3399     hdll = GetModuleHandleA("wininet.dll");
3400
3401     if(!GetProcAddress(hdll, "InternetGetCookieExW")) {
3402         win_skip("Too old IE (older than 6.0)\n");
3403         return;
3404     }
3405
3406     pInternetSetStatusCallbackA = (void*)GetProcAddress(hdll, "InternetSetStatusCallbackA");
3407
3408     init_status_tests();
3409     if(0)test_InternetCloseHandle();
3410     InternetReadFile_test(INTERNET_FLAG_ASYNC, &test_data[0]);
3411     InternetReadFile_test(INTERNET_FLAG_ASYNC, &test_data[1]);
3412     InternetReadFile_test(0, &test_data[1]);
3413     first_connection_to_test_url = TRUE;
3414     InternetReadFile_test(INTERNET_FLAG_ASYNC, &test_data[2]);
3415     InternetReadFile_test(0, &test_data[2]);
3416     InternetReadFileExA_test(INTERNET_FLAG_ASYNC);
3417     test_open_url_async();
3418     test_async_HttpSendRequestEx();
3419     InternetOpenRequest_test();
3420     test_http_cache();
3421     InternetOpenUrlA_test();
3422     HttpHeaders_test();
3423     test_http_connection();
3424     test_secure_connection();
3425     test_user_agent_header();
3426     test_bogus_accept_types_array();
3427     InternetReadFile_chunked_test();
3428     HttpSendRequestEx_test();
3429     InternetReadFile_test(INTERNET_FLAG_ASYNC, &test_data[3]);
3430 }