git.oblomov.eu Git - wine/blob - 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://www.winehq.org/site/about"
  35
  36 static HANDLE hCompleteEvent;
  37
  38 static VOID WINAPI callback(
  39      HINTERNET hInternet,
  40      DWORD_PTR dwContext,
  41      DWORD dwInternetStatus,
  42      LPVOID lpvStatusInformation,
  43      DWORD dwStatusInformationLength
  44 )
  45 {
  46     switch (dwInternetStatus)
  47     {
  48         case INTERNET_STATUS_RESOLVING_NAME:
  49             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RESOLVING_NAME \"%s\" %d\n",
  50                 GetCurrentThreadId(), hInternet, dwContext,
  51                 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
  52             break;
  53         case INTERNET_STATUS_NAME_RESOLVED:
  54             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_NAME_RESOLVED \"%s\" %d\n",
  55                 GetCurrentThreadId(), hInternet, dwContext,
  56                 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
  57             break;
  58         case INTERNET_STATUS_CONNECTING_TO_SERVER:
  59             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTING_TO_SERVER \"%s\" %d\n",
  60                 GetCurrentThreadId(), hInternet, dwContext,
  61                 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
  62             break;
  63         case INTERNET_STATUS_CONNECTED_TO_SERVER:
  64             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTED_TO_SERVER \"%s\" %d\n",
  65                 GetCurrentThreadId(), hInternet, dwContext,
  66                 (LPCSTR)lpvStatusInformation,dwStatusInformationLength);
  67             break;
  68         case INTERNET_STATUS_SENDING_REQUEST:
  69             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_SENDING_REQUEST %p %d\n",
  70                 GetCurrentThreadId(), hInternet, dwContext,
  71                 lpvStatusInformation,dwStatusInformationLength);
  72             break;
  73         case INTERNET_STATUS_REQUEST_SENT:
  74             ok(dwStatusInformationLength == sizeof(DWORD),
  75                 "info length should be sizeof(DWORD) instead of %d\n",
  76                 dwStatusInformationLength);
  77             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REQUEST_SENT 0x%x %d\n",
  78                 GetCurrentThreadId(), hInternet, dwContext,
  79                 *(DWORD *)lpvStatusInformation,dwStatusInformationLength);
  80             break;
  81         case INTERNET_STATUS_RECEIVING_RESPONSE:
  82             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RECEIVING_RESPONSE %p %d\n",
  83                 GetCurrentThreadId(), hInternet, dwContext,
  84                 lpvStatusInformation,dwStatusInformationLength);
  85             break;
  86         case INTERNET_STATUS_RESPONSE_RECEIVED:
  87             ok(dwStatusInformationLength == sizeof(DWORD),
  88                 "info length should be sizeof(DWORD) instead of %d\n",
  89                 dwStatusInformationLength);
  90             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_RESPONSE_RECEIVED 0x%x %d\n",
  91                 GetCurrentThreadId(), hInternet, dwContext,
  92                 *(DWORD *)lpvStatusInformation,dwStatusInformationLength);
  93             break;
  94         case INTERNET_STATUS_CTL_RESPONSE_RECEIVED:
  95             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CTL_RESPONSE_RECEIVED %p %d\n",
  96                 GetCurrentThreadId(), hInternet,dwContext,
  97                 lpvStatusInformation,dwStatusInformationLength);
  98             break;
  99         case INTERNET_STATUS_PREFETCH:
 100             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_PREFETCH %p %d\n",
 101                 GetCurrentThreadId(), hInternet, dwContext,
 102                 lpvStatusInformation,dwStatusInformationLength);
 103             break;
 104         case INTERNET_STATUS_CLOSING_CONNECTION:
 105             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CLOSING_CONNECTION %p %d\n",
 106                 GetCurrentThreadId(), hInternet, dwContext,
 107                 lpvStatusInformation,dwStatusInformationLength);
 108             break;
 109         case INTERNET_STATUS_CONNECTION_CLOSED:
 110             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_CONNECTION_CLOSED %p %d\n",
 111                 GetCurrentThreadId(), hInternet, dwContext,
 112                 lpvStatusInformation,dwStatusInformationLength);
 113             break;
 114         case INTERNET_STATUS_HANDLE_CREATED:
 115             ok(dwStatusInformationLength == sizeof(HINTERNET),
 116                 "info length should be sizeof(HINTERNET) instead of %d\n",
 117                 dwStatusInformationLength);
 118             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_HANDLE_CREATED %p %d\n",
 119                 GetCurrentThreadId(), hInternet, dwContext,
 120                 *(HINTERNET *)lpvStatusInformation,dwStatusInformationLength);
 121             break;
 122         case INTERNET_STATUS_HANDLE_CLOSING:
 123             ok(dwStatusInformationLength == sizeof(HINTERNET),
 124                 "info length should be sizeof(HINTERNET) instead of %d\n",
 125                 dwStatusInformationLength);
 126             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_HANDLE_CLOSING %p %d\n",
 127                 GetCurrentThreadId(), hInternet, dwContext,
 128                 *(HINTERNET *)lpvStatusInformation, dwStatusInformationLength);
 129             break;
 130         case INTERNET_STATUS_REQUEST_COMPLETE:
 131         {
 132             INTERNET_ASYNC_RESULT *iar = (INTERNET_ASYNC_RESULT *)lpvStatusInformation;
 133             ok(dwStatusInformationLength == sizeof(INTERNET_ASYNC_RESULT),
 134                 "info length should be sizeof(INTERNET_ASYNC_RESULT) instead of %d\n",
 135                 dwStatusInformationLength);
 136             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REQUEST_COMPLETE {%d,%d} %d\n",
 137                 GetCurrentThreadId(), hInternet, dwContext,
 138                 iar->dwResult,iar->dwError,dwStatusInformationLength);
 139             SetEvent(hCompleteEvent);
 140             break;
 141         }
 142         case INTERNET_STATUS_REDIRECT:
 143             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_REDIRECT \"%s\" %d\n",
 144                 GetCurrentThreadId(), hInternet, dwContext,
 145                 (LPCSTR)lpvStatusInformation, dwStatusInformationLength);
 146             break;
 147         case INTERNET_STATUS_INTERMEDIATE_RESPONSE:
 148             trace("%04x:Callback %p 0x%lx INTERNET_STATUS_INTERMEDIATE_RESPONSE %p %d\n",
 149                 GetCurrentThreadId(), hInternet, dwContext,
 150                 lpvStatusInformation, dwStatusInformationLength);
 151             break;
 152         default:
 153             trace("%04x:Callback %p 0x%lx %d %p %d\n",
 154                 GetCurrentThreadId(), hInternet, dwContext, dwInternetStatus,
 155                 lpvStatusInformation, dwStatusInformationLength);
 156     }
 157 }
 158
 159 static void InternetReadFile_test(int flags)
 160 {
 161     DWORD rc;
 162     CHAR buffer[4000];
 163     DWORD length;
 164     DWORD out;
 165     const char *types[2] = { "*", NULL };
 166     HINTERNET hi, hic = 0, hor = 0;
 167
 168     hCompleteEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
 169
 170     trace("Starting InternetReadFile test with flags 0x%x\n",flags);
 171
 172     trace("InternetOpenA <--\n");
 173     hi = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, flags);
 174     ok((hi != 0x0),"InternetOpen failed with error %u\n", GetLastError());
 175     trace("InternetOpenA -->\n");
 176
 177     if (hi == 0x0) goto abort;
 178
 179     InternetSetStatusCallback(hi,&callback);
 180
 181     trace("InternetConnectA <--\n");
 182     hic=InternetConnectA(hi, "www.winehq.org", INTERNET_INVALID_PORT_NUMBER,
 183                          NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
 184     ok((hic != 0x0),"InternetConnect failed with error %u\n", GetLastError());
 185     trace("InternetConnectA -->\n");
 186
 187     if (hic == 0x0) goto abort;
 188
 189     trace("HttpOpenRequestA <--\n");
 190     hor = HttpOpenRequestA(hic, "GET", "/about/", NULL, NULL, types,
 191                            INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
 192                            0xdeadbead);
 193     if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
 194         /*
 195          * If the internet name can't be resolved we are probably behind
 196          * a firewall or in some other way not directly connected to the
 197          * Internet. Not enough reason to fail the test. Just ignore and
 198          * abort.
 199          */
 200     } else  {
 201         ok((hor != 0x0),"HttpOpenRequest failed with error %u\n", GetLastError());
 202     }
 203     trace("HttpOpenRequestA -->\n");
 204
 205     if (hor == 0x0) goto abort;
 206
 207     trace("HttpSendRequestA -->\n");
 208     SetLastError(0xdeadbeef);
 209     rc = HttpSendRequestA(hor, "", -1, NULL, 0);
 210     if (flags & INTERNET_FLAG_ASYNC)
 211         ok(((rc == 0)&&(GetLastError() == ERROR_IO_PENDING)),
 212             "Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
 213     else
 214         ok((rc != 0) || GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED,
 215            "Synchronous HttpSendRequest returning 0, error %u\n", GetLastError());
 216     trace("HttpSendRequestA <--\n");
 217
 218     if (flags & INTERNET_FLAG_ASYNC)
 219         WaitForSingleObject(hCompleteEvent, INFINITE);
 220
 221     length = 4;
 222     rc = InternetQueryOptionA(hor,INTERNET_OPTION_REQUEST_FLAGS,&out,&length);
 223     trace("Option 0x17 -> %i  %i\n",rc,out);
 224
 225     length = 100;
 226     rc = InternetQueryOptionA(hor,INTERNET_OPTION_URL,buffer,&length);
 227     trace("Option 0x22 -> %i  %s\n",rc,buffer);
 228
 229     length = 4000;
 230     rc = HttpQueryInfoA(hor,HTTP_QUERY_RAW_HEADERS,buffer,&length,0x0);
 231     buffer[length]=0;
 232     trace("Option 0x16 -> %i  %s\n",rc,buffer);
 233
 234     length = 4000;
 235     rc = InternetQueryOptionA(hor,INTERNET_OPTION_URL,buffer,&length);
 236     buffer[length]=0;
 237     trace("Option 0x22 -> %i  %s\n",rc,buffer);
 238
 239     length = 16;
 240     rc = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_LENGTH,&buffer,&length,0x0);
 241     trace("Option 0x5 -> %i  %s  (%u)\n",rc,buffer,GetLastError());
 242
 243     length = 100;
 244     rc = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_TYPE,buffer,&length,0x0);
 245     buffer[length]=0;
 246     trace("Option 0x1 -> %i  %s\n",rc,buffer);
 247
 248     SetLastError(0xdeadbeef);
 249     rc = InternetReadFile(NULL, buffer, 100, &length);
 250     ok(!rc, "InternetReadFile should have failed\n");
 251     ok(GetLastError() == ERROR_INVALID_HANDLE,
 252         "InternetReadFile should have set last error to ERROR_INVALID_HANDLE instead of %u\n",
 253         GetLastError());
 254
 255     length = 100;
 256     trace("Entering Query loop\n");
 257
 258     while (length)
 259     {
 260         rc = InternetQueryDataAvailable(hor,&length,0x0,0x0);
 261         ok(!(rc == 0 && length != 0),"InternetQueryDataAvailable failed\n");
 262
 263         if (length)
 264         {
 265             char *buffer;
 266             buffer = HeapAlloc(GetProcessHeap(),0,length+1);
 267
 268             rc = InternetReadFile(hor,buffer,length,&length);
 269
 270             buffer[length]=0;
 271
 272             trace("ReadFile -> %i %i\n",rc,length);
 273
 274             HeapFree(GetProcessHeap(),0,buffer);
 275         }
 276     }
 277 abort:
 278     if (hor != 0x0) {
 279         SetLastError(0xdeadbeef);
 280         rc = InternetCloseHandle(hor);
 281         ok ((rc != 0), "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
 282         SetLastError(0xdeadbeef);
 283         rc = InternetCloseHandle(hor);
 284         ok ((rc == 0), "Double close of handle opened by HttpOpenRequestA succeeded\n");
 285         ok (GetLastError() == ERROR_INVALID_HANDLE,
 286             "Double close of handle should have set ERROR_INVALID_HANDLE instead of %u\n",
 287             GetLastError());
 288     }
 289     if (hic != 0x0) {
 290         rc = InternetCloseHandle(hic);
 291         ok ((rc != 0), "InternetCloseHandle of handle opened by InternetConnectA failed\n");
 292     }
 293     if (hi != 0x0) {
 294       rc = InternetCloseHandle(hi);
 295       ok ((rc != 0), "InternetCloseHandle of handle opened by InternetOpenA failed\n");
 296       if (flags & INTERNET_FLAG_ASYNC)
 297           Sleep(100);
 298     }
 299     CloseHandle(hCompleteEvent);
 300 }
 301
 302 static void InternetReadFileExA_test(int flags)
 303 {
 304     DWORD rc;
 305     DWORD length;
 306     const char *types[2] = { "*", NULL };
 307     HINTERNET hi, hic = 0, hor = 0;
 308     INTERNET_BUFFERS inetbuffers;
 309
 310     hCompleteEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
 311
 312     trace("Starting InternetReadFileExA test with flags 0x%x\n",flags);
 313
 314     trace("InternetOpenA <--\n");
 315     hi = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, flags);
 316     ok((hi != 0x0),"InternetOpen failed with error %u\n", GetLastError());
 317     trace("InternetOpenA -->\n");
 318
 319     if (hi == 0x0) goto abort;
 320
 321     InternetSetStatusCallback(hi,&callback);
 322
 323     trace("InternetConnectA <--\n");
 324     hic=InternetConnectA(hi, "www.winehq.org", INTERNET_INVALID_PORT_NUMBER,
 325                          NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
 326     ok((hic != 0x0),"InternetConnect failed with error %u\n", GetLastError());
 327     trace("InternetConnectA -->\n");
 328
 329     if (hic == 0x0) goto abort;
 330
 331     trace("HttpOpenRequestA <--\n");
 332     hor = HttpOpenRequestA(hic, "GET", "/about/", NULL, NULL, types,
 333                            INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
 334                            0xdeadbead);
 335     if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
 336         /*
 337          * If the internet name can't be resolved we are probably behind
 338          * a firewall or in some other way not directly connected to the
 339          * Internet. Not enough reason to fail the test. Just ignore and
 340          * abort.
 341          */
 342     } else  {
 343         ok((hor != 0x0),"HttpOpenRequest failed with error %u\n", GetLastError());
 344     }
 345     trace("HttpOpenRequestA -->\n");
 346
 347     if (hor == 0x0) goto abort;
 348
 349     trace("HttpSendRequestA -->\n");
 350     SetLastError(0xdeadbeef);
 351     rc = HttpSendRequestA(hor, "", -1, NULL, 0);
 352     if (flags & INTERNET_FLAG_ASYNC)
 353         ok(((rc == 0)&&(GetLastError() == ERROR_IO_PENDING)),
 354             "Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
 355     else
 356         ok((rc != 0) || GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED,
 357            "Synchronous HttpSendRequest returning 0, error %u\n", GetLastError());
 358     trace("HttpSendRequestA <--\n");
 359
 360     if (!rc && (GetLastError() == ERROR_IO_PENDING))
 361         WaitForSingleObject(hCompleteEvent, INFINITE);
 362
 363     /* tests invalid dwStructSize */
 364     inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS)+1;
 365     inetbuffers.lpcszHeader = NULL;
 366     inetbuffers.dwHeadersLength = 0;
 367     inetbuffers.dwBufferLength = 10;
 368     inetbuffers.lpvBuffer = HeapAlloc(GetProcessHeap(), 0, 10);
 369     inetbuffers.dwOffsetHigh = 1234;
 370     inetbuffers.dwOffsetLow = 5678;
 371     rc = InternetReadFileEx(hor, &inetbuffers, 0, 0xdeadcafe);
 372     ok(!rc && (GetLastError() == ERROR_INVALID_PARAMETER),
 373         "InternetReadFileEx should have failed with ERROR_INVALID_PARAMETER instead of %s, %u\n",
 374         rc ? "TRUE" : "FALSE", GetLastError());
 375     HeapFree(GetProcessHeap(), 0, inetbuffers.lpvBuffer);
 376
 377     /* tests to see whether lpcszHeader is used - it isn't */
 378     inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS);
 379     inetbuffers.lpcszHeader = (LPCTSTR)0xdeadbeef;
 380     inetbuffers.dwHeadersLength = 255;
 381     inetbuffers.dwBufferLength = 0;
 382     inetbuffers.lpvBuffer = NULL;
 383     inetbuffers.dwOffsetHigh = 1234;
 384     inetbuffers.dwOffsetLow = 5678;
 385     rc = InternetReadFileEx(hor, &inetbuffers, 0, 0xdeadcafe);
 386     ok(rc, "InternetReadFileEx failed with error %u\n", GetLastError());
 387
 388     rc = InternetReadFileEx(NULL, &inetbuffers, 0, 0xdeadcafe);
 389     ok(!rc && (GetLastError() == ERROR_INVALID_HANDLE),
 390         "InternetReadFileEx should have failed with ERROR_INVALID_HANDLE instead of %s, %u\n",
 391         rc ? "TRUE" : "FALSE", GetLastError());
 392
 393     length = 0;
 394     trace("Entering Query loop\n");
 395
 396     while (TRUE)
 397     {
 398         inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS);
 399         inetbuffers.dwBufferLength = 1024;
 400         inetbuffers.lpvBuffer = HeapAlloc(GetProcessHeap(), 0, inetbuffers.dwBufferLength+1);
 401         inetbuffers.dwOffsetHigh = 1234;
 402         inetbuffers.dwOffsetLow = 5678;
 403
 404         rc = InternetReadFileExA(hor, &inetbuffers, IRF_ASYNC | IRF_USE_CONTEXT, 0xcafebabe);
 405         if (!rc)
 406         {
 407             if (GetLastError() == ERROR_IO_PENDING)
 408             {
 409                 trace("InternetReadFileEx -> PENDING\n");
 410                 WaitForSingleObject(hCompleteEvent, INFINITE);
 411             }
 412             else
 413             {
 414                 trace("InternetReadFileEx -> FAILED %u\n", GetLastError());
 415                 break;
 416             }
 417         }
 418         else
 419             trace("InternetReadFileEx -> SUCCEEDED\n");
 420
 421         trace("read %i bytes\n", inetbuffers.dwBufferLength);
 422         ((char *)inetbuffers.lpvBuffer)[inetbuffers.dwBufferLength] = '\0';
 423
 424         ok(inetbuffers.dwOffsetHigh == 1234 && inetbuffers.dwOffsetLow == 5678,
 425             "InternetReadFileEx sets offsets to 0x%x%08x\n",
 426             inetbuffers.dwOffsetHigh, inetbuffers.dwOffsetLow);
 427
 428         HeapFree(GetProcessHeap(), 0, inetbuffers.lpvBuffer);
 429
 430         if (!inetbuffers.dwBufferLength)
 431             break;
 432
 433         length += inetbuffers.dwBufferLength;
 434     }
 435     trace("Finished. Read %d bytes\n", length);
 436
 437 abort:
 438     if (hor) {
 439         rc = InternetCloseHandle(hor);
 440         ok ((rc != 0), "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
 441         rc = InternetCloseHandle(hor);
 442         ok ((rc == 0), "Double close of handle opened by HttpOpenRequestA succeeded\n");
 443     }
 444     if (hic) {
 445         rc = InternetCloseHandle(hic);
 446         ok ((rc != 0), "InternetCloseHandle of handle opened by InternetConnectA failed\n");
 447     }
 448     if (hi) {
 449       rc = InternetCloseHandle(hi);
 450       ok ((rc != 0), "InternetCloseHandle of handle opened by InternetOpenA failed\n");
 451       if (flags & INTERNET_FLAG_ASYNC)
 452           Sleep(100);
 453     }
 454     CloseHandle(hCompleteEvent);
 455 }
 456
 457 static void InternetOpenUrlA_test(void)
 458 {
 459   HINTERNET myhinternet, myhttp;
 460   char buffer[0x400];
 461   DWORD size, readbytes, totalbytes=0;
 462   BOOL ret;
 463
 464   myhinternet = InternetOpen("Winetest",0,NULL,NULL,INTERNET_FLAG_NO_CACHE_WRITE);
 465   ok((myhinternet != 0), "InternetOpen failed, error %u\n",GetLastError());
 466   size = 0x400;
 467   ret = InternetCanonicalizeUrl(TEST_URL, buffer, &size,ICU_BROWSER_MODE);
 468   ok( ret, "InternetCanonicalizeUrl failed, error %u\n",GetLastError());
 469
 470   SetLastError(0);
 471   myhttp = InternetOpenUrl(myhinternet, TEST_URL, 0, 0,
 472                            INTERNET_FLAG_RELOAD|INTERNET_FLAG_NO_CACHE_WRITE|INTERNET_FLAG_TRANSFER_BINARY,0);
 473   if (GetLastError() == 12007)
 474     return; /* WinXP returns this when not connected to the net */
 475   ok((myhttp != 0),"InternetOpenUrl failed, error %u\n",GetLastError());
 476   ret = InternetReadFile(myhttp, buffer,0x400,&readbytes);
 477   ok( ret, "InternetReadFile failed, error %u\n",GetLastError());
 478   totalbytes += readbytes;
 479   while (readbytes && InternetReadFile(myhttp, buffer,0x400,&readbytes))
 480     totalbytes += readbytes;
 481   trace("read 0x%08x bytes\n",totalbytes);
 482 }
 483
 484 static void InternetTimeFromSystemTimeA_test(void)
 485 {
 486     BOOL ret;
 487     static const SYSTEMTIME time = { 2005, 1, 5, 7, 12, 6, 35, 0 };
 488     char string[INTERNET_RFC1123_BUFSIZE];
 489     static const char expect[] = "Fri, 07 Jan 2005 12:06:35 GMT";
 490
 491     ret = InternetTimeFromSystemTimeA( &time, INTERNET_RFC1123_FORMAT, string, sizeof(string) );
 492     ok( ret, "InternetTimeFromSystemTimeA failed (%u)\n", GetLastError() );
 493
 494     ok( !memcmp( string, expect, sizeof(expect) ),
 495         "InternetTimeFromSystemTimeA failed (%u)\n", GetLastError() );
 496 }
 497
 498 static void InternetTimeFromSystemTimeW_test(void)
 499 {
 500     BOOL ret;
 501     static const SYSTEMTIME time = { 2005, 1, 5, 7, 12, 6, 35, 0 };
 502     WCHAR string[INTERNET_RFC1123_BUFSIZE + 1];
 503     static const WCHAR expect[] = { 'F','r','i',',',' ','0','7',' ','J','a','n',' ','2','0','0','5',' ',
 504                                     '1','2',':','0','6',':','3','5',' ','G','M','T',0 };
 505
 506     ret = InternetTimeFromSystemTimeW( &time, INTERNET_RFC1123_FORMAT, string, sizeof(string) );
 507     ok( ret, "InternetTimeFromSystemTimeW failed (%u)\n", GetLastError() );
 508
 509     ok( !memcmp( string, expect, sizeof(expect) ),
 510         "InternetTimeFromSystemTimeW failed (%u)\n", GetLastError() );
 511 }
 512
 513 static void InternetTimeToSystemTimeA_test(void)
 514 {
 515     BOOL ret;
 516     SYSTEMTIME time;
 517     static const SYSTEMTIME expect = { 2005, 1, 5, 7, 12, 6, 35, 0 };
 518     static const char string[] = "Fri, 07 Jan 2005 12:06:35 GMT";
 519     static const char string2[] = " fri 7 jan 2005 12 06 35";
 520
 521     ret = InternetTimeToSystemTimeA( string, &time, 0 );
 522     ok( ret, "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
 523     ok( !memcmp( &time, &expect, sizeof(expect) ),
 524         "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
 525
 526     ret = InternetTimeToSystemTimeA( string2, &time, 0 );
 527     ok( ret, "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
 528     ok( !memcmp( &time, &expect, sizeof(expect) ),
 529         "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
 530 }
 531
 532 static void InternetTimeToSystemTimeW_test(void)
 533 {
 534     BOOL ret;
 535     SYSTEMTIME time;
 536     static const SYSTEMTIME expect = { 2005, 1, 5, 7, 12, 6, 35, 0 };
 537     static const WCHAR string[] = { 'F','r','i',',',' ','0','7',' ','J','a','n',' ','2','0','0','5',' ',
 538                                     '1','2',':','0','6',':','3','5',' ','G','M','T',0 };
 539     static const WCHAR string2[] = { ' ','f','r','i',' ','7',' ','j','a','n',' ','2','0','0','5',' ',
 540                                      '1','2',' ','0','6',' ','3','5',0 };
 541     static const WCHAR string3[] = { 'F','r',0 };
 542
 543     ret = InternetTimeToSystemTimeW( NULL, NULL, 0 );
 544     ok( !ret, "InternetTimeToSystemTimeW succeeded (%u)\n", GetLastError() );
 545
 546     ret = InternetTimeToSystemTimeW( NULL, &time, 0 );
 547     ok( !ret, "InternetTimeToSystemTimeW succeeded (%u)\n", GetLastError() );
 548
 549     ret = InternetTimeToSystemTimeW( string, NULL, 0 );
 550     ok( !ret, "InternetTimeToSystemTimeW succeeded (%u)\n", GetLastError() );
 551
 552     ret = InternetTimeToSystemTimeW( string, &time, 0 );
 553     ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 554
 555     ret = InternetTimeToSystemTimeW( string, &time, 0 );
 556     ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 557     ok( !memcmp( &time, &expect, sizeof(expect) ),
 558         "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 559
 560     ret = InternetTimeToSystemTimeW( string2, &time, 0 );
 561     ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 562     ok( !memcmp( &time, &expect, sizeof(expect) ),
 563         "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 564
 565     ret = InternetTimeToSystemTimeW( string3, &time, 0 );
 566     ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 567 }
 568
 569 static void HttpSendRequestEx_test(void)
 570 {
 571     HINTERNET hSession;
 572     HINTERNET hConnect;
 573     HINTERNET hRequest;
 574
 575     INTERNET_BUFFERS BufferIn;
 576     DWORD dwBytesWritten;
 577     DWORD dwBytesRead;
 578     CHAR szBuffer[256];
 579     int i;
 580     BOOL ret;
 581
 582     static char szPostData[] = "mode=Test";
 583     static const char szContentType[] = "Content-Type: application/x-www-form-urlencoded";
 584
 585     hSession = InternetOpen("Wine Regression Test",
 586             INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,0);
 587     ok( hSession != NULL ,"Unable to open Internet session\n");
 588     hConnect = InternetConnect(hSession, "crossover.codeweavers.com",
 589             INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0,
 590             0);
 591     ok( hConnect != NULL, "Unable to connect to http://crossover.codeweavers.com\n");
 592     hRequest = HttpOpenRequest(hConnect, "POST", "/posttest.php",
 593             NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
 594     if (!hRequest && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
 595     {
 596         trace( "Network unreachable, skipping test\n" );
 597         goto done;
 598     }
 599     ok( hRequest != NULL, "Failed to open request handle err %u\n", GetLastError());
 600
 601
 602     BufferIn.dwStructSize = sizeof( INTERNET_BUFFERS);
 603     BufferIn.Next = (LPINTERNET_BUFFERS)0xdeadcab;
 604     BufferIn.lpcszHeader = szContentType;
 605     BufferIn.dwHeadersLength = sizeof(szContentType);
 606     BufferIn.dwHeadersTotal = sizeof(szContentType);
 607     BufferIn.lpvBuffer = szPostData;
 608     BufferIn.dwBufferLength = 3;
 609     BufferIn.dwBufferTotal = sizeof(szPostData)-1;
 610     BufferIn.dwOffsetLow = 0;
 611     BufferIn.dwOffsetHigh = 0;
 612
 613     ret = HttpSendRequestEx(hRequest, &BufferIn, NULL, 0 ,0);
 614     ok(ret, "HttpSendRequestEx Failed with error %u\n", GetLastError());
 615
 616     for (i = 3; szPostData[i]; i++)
 617         ok(InternetWriteFile(hRequest, &szPostData[i], 1, &dwBytesWritten),
 618                 "InternetWriteFile failed\n");
 619
 620     ok(HttpEndRequest(hRequest, NULL, 0, 0), "HttpEndRequest Failed\n");
 621
 622     ok(InternetReadFile(hRequest, szBuffer, 255, &dwBytesRead),
 623             "Unable to read response\n");
 624     szBuffer[dwBytesRead] = 0;
 625
 626     ok(dwBytesRead == 13,"Read %u bytes instead of 13\n",dwBytesRead);
 627     ok(strncmp(szBuffer,"mode => Test\n",dwBytesRead)==0,"Got string %s\n",szBuffer);
 628
 629     ok(InternetCloseHandle(hRequest), "Close request handle failed\n");
 630 done:
 631     ok(InternetCloseHandle(hConnect), "Close connect handle failed\n");
 632     ok(InternetCloseHandle(hSession), "Close session handle failed\n");
 633 }
 634
 635 static void InternetOpenRequest_test(void)
 636 {
 637     HINTERNET session, connect, request;
 638     static const char *types[] = { "*", "", NULL };
 639     static const WCHAR slash[] = {'/', 0}, any[] = {'*', 0}, empty[] = {0};
 640     static const WCHAR *typesW[] = { any, empty, NULL };
 641     BOOL ret;
 642
 643     session = InternetOpenA("Wine Regression Test", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
 644     ok(session != NULL ,"Unable to open Internet session\n");
 645
 646     connect = InternetConnectA(session, "winehq.org", INTERNET_DEFAULT_HTTP_PORT, NULL, NULL,
 647                               INTERNET_SERVICE_HTTP, 0, 0);
 648     ok(connect != NULL, "Unable to connect to http://winehq.org\n");
 649
 650     request = HttpOpenRequestA(connect, NULL, "/", NULL, NULL, types, INTERNET_FLAG_NO_CACHE_WRITE, 0);
 651     if (!request && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
 652     {
 653         trace( "Network unreachable, skipping test\n" );
 654         goto done;
 655     }
 656     ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
 657
 658     ret = HttpSendRequest(request, NULL, 0, NULL, 0);
 659     ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
 660     ok(InternetCloseHandle(request), "Close request handle failed\n");
 661
 662     request = HttpOpenRequestW(connect, NULL, slash, NULL, NULL, typesW, INTERNET_FLAG_NO_CACHE_WRITE, 0);
 663     ok(request != NULL, "Failed to open request handle err %u\n", GetLastError());
 664
 665     ret = HttpSendRequest(request, NULL, 0, NULL, 0);
 666     ok(ret, "HttpSendRequest failed: %u\n", GetLastError());
 667     ok(InternetCloseHandle(request), "Close request handle failed\n");
 668
 669 done:
 670     ok(InternetCloseHandle(connect), "Close connect handle failed\n");
 671     ok(InternetCloseHandle(session), "Close session handle failed\n");
 672 }
 673
 674 static void HttpHeaders_test(void)
 675 {
 676     HINTERNET hSession;
 677     HINTERNET hConnect;
 678     HINTERNET hRequest;
 679     CHAR      buffer[256];
 680     DWORD     len = 256;
 681     DWORD     index = 0;
 682
 683     hSession = InternetOpen("Wine Regression Test",
 684             INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,0);
 685     ok( hSession != NULL ,"Unable to open Internet session\n");
 686     hConnect = InternetConnect(hSession, "crossover.codeweavers.com",
 687             INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0,
 688             0);
 689     ok( hConnect != NULL, "Unable to connect to http://crossover.codeweavers.com\n");
 690     hRequest = HttpOpenRequest(hConnect, "POST", "/posttest.php",
 691             NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
 692     if (!hRequest && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED)
 693     {
 694         trace( "Network unreachable, skipping test\n" );
 695         goto done;
 696     }
 697     ok( hRequest != NULL, "Failed to open request handle\n");
 698
 699     index = 0;
 700     len = sizeof(buffer);
 701     strcpy(buffer,"Warning");
 702     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 703                buffer,&len,&index)==0,"Warning hearder reported as Existing\n");
 704
 705     ok(HttpAddRequestHeaders(hRequest,"Warning:test1",-1,HTTP_ADDREQ_FLAG_ADD),
 706             "Failed to add new header\n");
 707
 708     index = 0;
 709     len = sizeof(buffer);
 710     strcpy(buffer,"Warning");
 711     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 712                 buffer,&len,&index),"Unable to query header\n");
 713     ok(index == 1, "Index was not incremented\n");
 714     ok(strcmp(buffer,"test1")==0, "incorrect string was returned(%s)\n",buffer);
 715     len = sizeof(buffer);
 716     strcpy(buffer,"Warning");
 717     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 718                 buffer,&len,&index)==0,"Second Index Should Not Exist\n");
 719
 720     ok(HttpAddRequestHeaders(hRequest,"Warning:test2",-1,HTTP_ADDREQ_FLAG_ADD),
 721             "Failed to add duplicate header using HTTP_ADDREQ_FLAG_ADD\n");
 722
 723     index = 0;
 724     len = sizeof(buffer);
 725     strcpy(buffer,"Warning");
 726     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 727                 buffer,&len,&index),"Unable to query header\n");
 728     ok(index == 1, "Index was not incremented\n");
 729     ok(strcmp(buffer,"test1")==0, "incorrect string was returned(%s)\n",buffer);
 730     len = sizeof(buffer);
 731     strcpy(buffer,"Warning");
 732     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 733                 buffer,&len,&index),"Failed to get second header\n");
 734     ok(index == 2, "Index was not incremented\n");
 735     ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
 736     len = sizeof(buffer);
 737     strcpy(buffer,"Warning");
 738     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 739                 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
 740
 741     ok(HttpAddRequestHeaders(hRequest,"Warning:test3",-1,HTTP_ADDREQ_FLAG_REPLACE), "Failed to replace header using HTTP_ADDREQ_FLAG_REPLACE\n");
 742
 743     index = 0;
 744     len = sizeof(buffer);
 745     strcpy(buffer,"Warning");
 746     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 747                 buffer,&len,&index),"Unable to query header\n");
 748     ok(index == 1, "Index was not incremented\n");
 749     ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
 750     len = sizeof(buffer);
 751     strcpy(buffer,"Warning");
 752     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 753                 buffer,&len,&index),"Failed to get second header\n");
 754     ok(index == 2, "Index was not incremented\n");
 755     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
 756     len = sizeof(buffer);
 757     strcpy(buffer,"Warning");
 758     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 759                 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
 760
 761     ok(HttpAddRequestHeaders(hRequest,"Warning:test4",-1,HTTP_ADDREQ_FLAG_ADD_IF_NEW)==0, "HTTP_ADDREQ_FLAG_ADD_IF_NEW replaced existing header\n");
 762
 763     index = 0;
 764     len = sizeof(buffer);
 765     strcpy(buffer,"Warning");
 766     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 767                 buffer,&len,&index),"Unable to query header\n");
 768     ok(index == 1, "Index was not incremented\n");
 769     ok(strcmp(buffer,"test2")==0, "incorrect string was returned(%s)\n",buffer);
 770     len = sizeof(buffer);
 771     strcpy(buffer,"Warning");
 772     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 773                 buffer,&len,&index),"Failed to get second header\n");
 774     ok(index == 2, "Index was not incremented\n");
 775     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
 776     len = sizeof(buffer);
 777     strcpy(buffer,"Warning");
 778     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 779                 buffer,&len,&index)==0,"Third Header Should Not Exist\n");
 780
 781     ok(HttpAddRequestHeaders(hRequest,"Warning:test4",-1, HTTP_ADDREQ_FLAG_COALESCE), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
 782
 783     index = 0;
 784     len = sizeof(buffer);
 785     strcpy(buffer,"Warning");
 786     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS,
 787                 buffer,&len,&index),"Unable to query header\n");
 788     ok(index == 1, "Index was not incremented\n");
 789     ok(strcmp(buffer,"test2, test4")==0, "incorrect string was returned(%s)\n", buffer);
 790     len = sizeof(buffer);
 791     strcpy(buffer,"Warning");
 792     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
 793     ok(index == 2, "Index was not incremented\n");
 794     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
 795     len = sizeof(buffer);
 796     strcpy(buffer,"Warning");
 797     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
 798
 799     ok(HttpAddRequestHeaders(hRequest,"Warning:test5",-1, HTTP_ADDREQ_FLAG_COALESCE_WITH_COMMA), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
 800
 801     index = 0;
 802     len = sizeof(buffer);
 803     strcpy(buffer,"Warning");
 804     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
 805     ok(index == 1, "Index was not incremented\n");
 806     ok(strcmp(buffer,"test2, test4, test5")==0, "incorrect string was returned(%s)\n",buffer);
 807     len = sizeof(buffer);
 808     strcpy(buffer,"Warning");
 809     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
 810     ok(index == 2, "Index was not incremented\n");
 811     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
 812     len = sizeof(buffer);
 813     strcpy(buffer,"Warning");
 814     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
 815
 816     ok(HttpAddRequestHeaders(hRequest,"Warning:test6",-1, HTTP_ADDREQ_FLAG_COALESCE_WITH_SEMICOLON), "HTTP_ADDREQ_FLAG_COALESCE Did not work\n");
 817
 818     index = 0;
 819     len = sizeof(buffer);
 820     strcpy(buffer,"Warning");
 821     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
 822     ok(index == 1, "Index was not incremented\n");
 823     ok(strcmp(buffer,"test2, test4, test5; test6")==0, "incorrect string was returned(%s)\n",buffer);
 824     len = sizeof(buffer);
 825     strcpy(buffer,"Warning");
 826     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
 827     ok(index == 2, "Index was not incremented\n");
 828     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
 829     len = sizeof(buffer);
 830     strcpy(buffer,"Warning");
 831     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
 832
 833     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");
 834
 835     index = 0;
 836     len = sizeof(buffer);
 837     strcpy(buffer,"Warning");
 838     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Unable to query header\n");
 839     ok(index == 1, "Index was not incremented\n");
 840     ok(strcmp(buffer,"test3")==0, "incorrect string was returned(%s)\n",buffer);
 841     len = sizeof(buffer);
 842     strcpy(buffer,"Warning");
 843     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index),"Failed to get second header\n");
 844     ok(index == 2, "Index was not incremented\n");
 845     ok(strcmp(buffer,"test7")==0, "incorrect string was returned(%s)\n",buffer);
 846     len = sizeof(buffer);
 847     strcpy(buffer,"Warning");
 848     ok(HttpQueryInfo(hRequest,HTTP_QUERY_CUSTOM|HTTP_QUERY_FLAG_REQUEST_HEADERS, buffer,&len,&index)==0,"Third Header Should Not Exist\n");
 849
 850
 851     ok(InternetCloseHandle(hRequest), "Close request handle failed\n");
 852 done:
 853     ok(InternetCloseHandle(hConnect), "Close connect handle failed\n");
 854     ok(InternetCloseHandle(hSession), "Close session handle failed\n");
 855 }
 856
 857 static const char okmsg[] =
 858 "HTTP/1.0 200 OK\r\n"
 859 "Server: winetest\r\n"
 860 "\r\n";
 861
 862 static const char proxymsg[] =
 863 "HTTP/1.1 407 Proxy Authentication Required\r\n"
 864 "Server: winetest\r\n"
 865 "Proxy-Connection: close\r\n"
 866 "Proxy-Authenticate: Basic realm=\"placebo\"\r\n"
 867 "\r\n";
 868
 869 static const char page1[] =
 870 "<HTML>\r\n"
 871 "<HEAD><TITLE>wininet test page</TITLE></HEAD>\r\n"
 872 "<BODY>The quick brown fox jumped over the lazy dog<P></BODY>\r\n"
 873 "</HTML>\r\n\r\n";
 874
 875 struct server_info {
 876     HANDLE hEvent;
 877     int port;
 878 };
 879
 880 static DWORD CALLBACK server_thread(LPVOID param)
 881 {
 882     struct server_info *si = param;
 883     int r, s, c, i, on;
 884     struct sockaddr_in sa;
 885     char buffer[0x100];
 886     WSADATA wsaData;
 887     int last_request = 0;
 888
 889     WSAStartup(MAKEWORD(1,1), &wsaData);
 890
 891     s = socket(AF_INET, SOCK_STREAM, 0);
 892     if (s<0)
 893         return 1;
 894
 895     on = 1;
 896     setsockopt(s, SOL_SOCKET, SO_REUSEADDR, (char*)&on, sizeof on);
 897
 898     memset(&sa, 0, sizeof sa);
 899     sa.sin_family = AF_INET;
 900     sa.sin_port = htons(si->port);
 901     sa.sin_addr.S_un.S_addr = inet_addr("127.0.0.1");
 902
 903     r = bind(s, (struct sockaddr*) &sa, sizeof sa);
 904     if (r<0)
 905         return 1;
 906
 907     listen(s, 0);
 908
 909     SetEvent(si->hEvent);
 910
 911     do
 912     {
 913         c = accept(s, NULL, NULL);
 914
 915         memset(buffer, 0, sizeof buffer);
 916         for(i=0; i<(sizeof buffer-1); i++)
 917         {
 918             r = recv(c, &buffer[i], 1, 0);
 919             if (r != 1)
 920                 break;
 921             if (i<4) continue;
 922             if (buffer[i-2] == '\n' && buffer[i] == '\n' &&
 923                 buffer[i-3] == '\r' && buffer[i-1] == '\r')
 924                 break;
 925         }
 926
 927         if (strstr(buffer, "GET /test1"))
 928         {
 929             send(c, okmsg, sizeof okmsg-1, 0);
 930             send(c, page1, sizeof page1-1, 0);
 931         }
 932
 933         if (strstr(buffer, "/test2"))
 934         {
 935             if (strstr(buffer, "Proxy-Authorization: Basic bWlrZToxMTAx"))
 936             {
 937                 send(c, okmsg, sizeof okmsg-1, 0);
 938                 send(c, page1, sizeof page1-1, 0);
 939             }
 940             else
 941                 send(c, proxymsg, sizeof proxymsg-1, 0);
 942         }
 943
 944         if (strstr(buffer, "/quit"))
 945         {
 946             send(c, okmsg, sizeof okmsg-1, 0);
 947             send(c, page1, sizeof page1-1, 0);
 948             last_request = 1;
 949         }
 950
 951         shutdown(c, 2);
 952         closesocket(c);
 953     } while (!last_request);
 954
 955     closesocket(s);
 956
 957     return 0;
 958 }
 959
 960 static void test_basic_request(int port, const char *url)
 961 {
 962     HINTERNET hi, hc, hr;
 963     DWORD r, count;
 964     char buffer[0x100];
 965
 966     hi = InternetOpen(NULL, 0, NULL, NULL, 0);
 967     ok(hi != NULL, "open failed\n");
 968
 969     hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
 970     ok(hc != NULL, "connect failed\n");
 971
 972     hr = HttpOpenRequest(hc, NULL, url, NULL, NULL, NULL, 0, 0);
 973     ok(hr != NULL, "HttpOpenRequest failed\n");
 974
 975     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
 976     ok(r, "HttpSendRequest failed\n");
 977
 978     count = 0;
 979     memset(buffer, 0, sizeof buffer);
 980     r = InternetReadFile(hr, buffer, sizeof buffer, &count);
 981     ok(r, "InternetReadFile failed\n");
 982     ok(count == sizeof page1 - 1, "count was wrong\n");
 983     ok(!memcmp(buffer, page1, sizeof page1), "http data wrong\n");
 984
 985     InternetCloseHandle(hr);
 986     InternetCloseHandle(hc);
 987     InternetCloseHandle(hi);
 988 }
 989
 990 static void test_proxy_indirect(int port)
 991 {
 992     HINTERNET hi, hc, hr;
 993     DWORD r, sz, val;
 994     char buffer[0x40];
 995
 996     hi = InternetOpen(NULL, 0, NULL, NULL, 0);
 997     ok(hi != NULL, "open failed\n");
 998
 999     hc = InternetConnect(hi, "localhost", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1000     ok(hc != NULL, "connect failed\n");
1001
1002     hr = HttpOpenRequest(hc, NULL, "/test2", NULL, NULL, NULL, 0, 0);
1003     ok(hr != NULL, "HttpOpenRequest failed\n");
1004
1005     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1006     ok(r, "HttpSendRequest failed\n");
1007
1008     sz = sizeof buffer;
1009     r = HttpQueryInfo(hr, HTTP_QUERY_PROXY_AUTHENTICATE, buffer, &sz, NULL);
1010     ok(r, "HttpQueryInfo failed\n");
1011     ok(!strcmp(buffer, "Basic realm=\"placebo\""), "proxy auth info wrong\n");
1012
1013     sz = sizeof buffer;
1014     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1015     ok(r, "HttpQueryInfo failed\n");
1016     ok(!strcmp(buffer, "407"), "proxy code wrong\n");
1017
1018     sz = sizeof val;
1019     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE|HTTP_QUERY_FLAG_NUMBER, &val, &sz, NULL);
1020     ok(r, "HttpQueryInfo failed\n");
1021     ok(val == 407, "proxy code wrong\n");
1022
1023     sz = sizeof buffer;
1024     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_TEXT, buffer, &sz, NULL);
1025     ok(r, "HttpQueryInfo failed\n");
1026     ok(!strcmp(buffer, "Proxy Authentication Required"), "proxy text wrong\n");
1027
1028     sz = sizeof buffer;
1029     r = HttpQueryInfo(hr, HTTP_QUERY_VERSION, buffer, &sz, NULL);
1030     ok(r, "HttpQueryInfo failed\n");
1031     ok(!strcmp(buffer, "HTTP/1.1"), "http version wrong\n");
1032
1033     sz = sizeof buffer;
1034     r = HttpQueryInfo(hr, HTTP_QUERY_SERVER, buffer, &sz, NULL);
1035     ok(r, "HttpQueryInfo failed\n");
1036     ok(!strcmp(buffer, "winetest"), "http server wrong\n");
1037
1038     sz = sizeof buffer;
1039     r = HttpQueryInfo(hr, HTTP_QUERY_CONTENT_ENCODING, buffer, &sz, NULL);
1040     ok(GetLastError() == ERROR_HTTP_HEADER_NOT_FOUND, "HttpQueryInfo should fail\n");
1041     ok(r == FALSE, "HttpQueryInfo failed\n");
1042
1043     InternetCloseHandle(hr);
1044     InternetCloseHandle(hc);
1045     InternetCloseHandle(hi);
1046 }
1047
1048 static void test_proxy_direct(int port)
1049 {
1050     HINTERNET hi, hc, hr;
1051     DWORD r, sz;
1052     char buffer[0x40];
1053     static CHAR username[] = "mike",
1054                 password[] = "1101";
1055
1056     sprintf(buffer, "localhost:%d\n", port);
1057     hi = InternetOpen(NULL, INTERNET_OPEN_TYPE_PROXY, buffer, NULL, 0);
1058     ok(hi != NULL, "open failed\n");
1059
1060     /* try connect without authorization */
1061     hc = InternetConnect(hi, "www.winehq.org/", port, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1062     ok(hc != NULL, "connect failed\n");
1063
1064     hr = HttpOpenRequest(hc, NULL, "/test2", NULL, NULL, NULL, 0, 0);
1065     ok(hr != NULL, "HttpOpenRequest failed\n");
1066
1067     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1068     ok(r, "HttpSendRequest failed\n");
1069
1070     sz = sizeof buffer;
1071     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1072     ok(r, "HttpQueryInfo failed\n");
1073     ok(!strcmp(buffer, "407"), "proxy code wrong\n");
1074
1075
1076     /* set the user + password then try again */
1077     todo_wine {
1078     r = InternetSetOption(hr, INTERNET_OPTION_PROXY_USERNAME, username, 4);
1079     ok(r, "failed to set user\n");
1080
1081     r = InternetSetOption(hr, INTERNET_OPTION_PROXY_PASSWORD, password, 4);
1082     ok(r, "failed to set password\n");
1083     }
1084
1085     r = HttpSendRequest(hr, NULL, 0, NULL, 0);
1086     ok(r, "HttpSendRequest failed\n");
1087     sz = sizeof buffer;
1088     r = HttpQueryInfo(hr, HTTP_QUERY_STATUS_CODE, buffer, &sz, NULL);
1089     ok(r, "HttpQueryInfo failed\n");
1090     todo_wine {
1091     ok(!strcmp(buffer, "200"), "proxy code wrong\n");
1092     }
1093
1094
1095     InternetCloseHandle(hr);
1096     InternetCloseHandle(hc);
1097     InternetCloseHandle(hi);
1098 }
1099
1100 static void test_http_connection(void)
1101 {
1102     struct server_info si;
1103     HANDLE hThread;
1104     DWORD id = 0, r;
1105
1106     si.hEvent = CreateEvent(NULL, 0, 0, NULL);
1107     si.port = 7531;
1108
1109     hThread = CreateThread(NULL, 0, server_thread, (LPVOID) &si, 0, &id);
1110     ok( hThread != NULL, "create thread failed\n");
1111
1112     r = WaitForSingleObject(si.hEvent, 10000);
1113     ok (r == WAIT_OBJECT_0, "failed to start wininet test server\n");
1114     if (r != WAIT_OBJECT_0)
1115         return;
1116
1117     test_basic_request(si.port, "/test1");
1118     test_proxy_indirect(si.port);
1119     test_proxy_direct(si.port);
1120
1121     /* send the basic request again to shutdown the server thread */
1122     test_basic_request(si.port, "/quit");
1123
1124     r = WaitForSingleObject(hThread, 3000);
1125     ok( r == WAIT_OBJECT_0, "thread wait failed\n");
1126     CloseHandle(hThread);
1127 }
1128
1129 START_TEST(http)
1130 {
1131     InternetReadFile_test(INTERNET_FLAG_ASYNC);
1132     InternetReadFile_test(0);
1133     InternetReadFileExA_test(INTERNET_FLAG_ASYNC);
1134     InternetOpenRequest_test();
1135     InternetOpenUrlA_test();
1136     InternetTimeFromSystemTimeA_test();
1137     InternetTimeFromSystemTimeW_test();
1138     InternetTimeToSystemTimeA_test();
1139     InternetTimeToSystemTimeW_test();
1140     HttpSendRequestEx_test();
1141     HttpHeaders_test();
1142     test_http_connection();
1143 }