git.oblomov.eu Git - wine/blob - dlls/wininet/tests/internet.c

   1 /*
   2  * Wininet - internet tests
   3  *
   4  * Copyright 2005 Vijay Kiran Kamuju
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include <stdarg.h>
  22 #include <stdio.h>
  23 #include <string.h>
  24 #include "windef.h"
  25 #include "winbase.h"
  26 #include "winuser.h"
  27 #include "wininet.h"
  28 #include "winerror.h"
  29 #include "winreg.h"
  30
  31 #include "wine/test.h"
  32
  33 static BOOL (WINAPI *pCreateUrlCacheContainerA)(DWORD, DWORD, DWORD, DWORD,
  34                                                 DWORD, DWORD, DWORD, DWORD);
  35 static BOOL (WINAPI *pCreateUrlCacheContainerW)(DWORD, DWORD, DWORD, DWORD,
  36                                                 DWORD, DWORD, DWORD, DWORD);
  37 static BOOL (WINAPI *pInternetTimeFromSystemTimeA)(CONST SYSTEMTIME *,DWORD ,LPSTR ,DWORD);
  38 static BOOL (WINAPI *pInternetTimeFromSystemTimeW)(CONST SYSTEMTIME *,DWORD ,LPWSTR ,DWORD);
  39 static BOOL (WINAPI *pInternetTimeToSystemTimeA)(LPCSTR ,SYSTEMTIME *,DWORD);
  40 static BOOL (WINAPI *pInternetTimeToSystemTimeW)(LPCWSTR ,SYSTEMTIME *,DWORD);
  41 static BOOL (WINAPI *pIsDomainLegalCookieDomainW)(LPCWSTR, LPCWSTR);
  42 static DWORD (WINAPI *pPrivacyGetZonePreferenceW)(DWORD, DWORD, LPDWORD, LPWSTR, LPDWORD);
  43 static DWORD (WINAPI *pPrivacySetZonePreferenceW)(DWORD, DWORD, DWORD, LPCWSTR);
  44 static BOOL (WINAPI *pInternetGetCookieExA)(LPCSTR,LPCSTR,LPSTR,LPDWORD,DWORD,LPVOID);
  45 static BOOL (WINAPI *pInternetGetCookieExW)(LPCWSTR,LPCWSTR,LPWSTR,LPDWORD,DWORD,LPVOID);
  46
  47 /* ############################### */
  48
  49 static void test_InternetCanonicalizeUrlA(void)
  50 {
  51     CHAR    buffer[256];
  52     LPCSTR  url;
  53     DWORD   urllen;
  54     DWORD   dwSize;
  55     DWORD   res;
  56
  57     /* Acrobat Updater 5 calls this for Adobe Reader 8.1 */
  58     url = "http://swupmf.adobe.com/manifest/50/win/AdobeUpdater.upd";
  59     urllen = lstrlenA(url);
  60
  61     memset(buffer, '#', sizeof(buffer)-1);
  62     buffer[sizeof(buffer)-1] = '\0';
  63     dwSize = 1; /* Acrobat Updater use this size */
  64     SetLastError(0xdeadbeef);
  65     res = InternetCanonicalizeUrlA(url, buffer, &dwSize, 0);
  66     ok( !res && (GetLastError() == ERROR_INSUFFICIENT_BUFFER) && (dwSize == (urllen+1)),
  67         "got %u and %u with size %u for '%s' (%d)\n",
  68         res, GetLastError(), dwSize, buffer, lstrlenA(buffer));
  69
  70
  71     /* buffer has no space for the terminating '\0' */
  72     memset(buffer, '#', sizeof(buffer)-1);
  73     buffer[sizeof(buffer)-1] = '\0';
  74     dwSize = urllen;
  75     SetLastError(0xdeadbeef);
  76     res = InternetCanonicalizeUrlA(url, buffer, &dwSize, 0);
  77     /* dwSize is nr. of needed bytes with the terminating '\0' */
  78     ok( !res && (GetLastError() == ERROR_INSUFFICIENT_BUFFER) && (dwSize == (urllen+1)),
  79         "got %u and %u with size %u for '%s' (%d)\n",
  80         res, GetLastError(), dwSize, buffer, lstrlenA(buffer));
  81
  82     /* buffer has the required size */
  83     memset(buffer, '#', sizeof(buffer)-1);
  84     buffer[sizeof(buffer)-1] = '\0';
  85     dwSize = urllen+1;
  86     SetLastError(0xdeadbeef);
  87     res = InternetCanonicalizeUrlA(url, buffer, &dwSize, 0);
  88     /* dwSize is nr. of copied bytes without the terminating '\0' */
  89     ok( res && (dwSize == urllen) && (lstrcmpA(url, buffer) == 0),
  90         "got %u and %u with size %u for '%s' (%d)\n",
  91         res, GetLastError(), dwSize, buffer, lstrlenA(buffer));
  92
  93     memset(buffer, '#', sizeof(buffer)-1);
  94     buffer[sizeof(buffer)-1] = '\0';
  95     dwSize = sizeof(buffer);
  96     SetLastError(0xdeadbeef);
  97     res = InternetCanonicalizeUrlA("file:///C:/Program%20Files/Atmel/AVR%20Tools/STK500/STK500.xml", buffer, &dwSize, ICU_DECODE | ICU_NO_ENCODE);
  98     ok(res, "InternetCanonicalizeUrlA failed %u\n", GetLastError());
  99     ok(dwSize == lstrlenA(buffer), "got %d expected %d\n", dwSize, lstrlenA(buffer));
 100     ok(!lstrcmpA("file://C:\\Program Files\\Atmel\\AVR Tools\\STK500\\STK500.xml", buffer),
 101        "got %s expected 'file://C:\\Program Files\\Atmel\\AVR Tools\\STK500\\STK500.xml'\n", buffer);
 102
 103     /* buffer is larger as the required size */
 104     memset(buffer, '#', sizeof(buffer)-1);
 105     buffer[sizeof(buffer)-1] = '\0';
 106     dwSize = urllen+2;
 107     SetLastError(0xdeadbeef);
 108     res = InternetCanonicalizeUrlA(url, buffer, &dwSize, 0);
 109     /* dwSize is nr. of copied bytes without the terminating '\0' */
 110     ok( res && (dwSize == urllen) && (lstrcmpA(url, buffer) == 0),
 111         "got %u and %u with size %u for '%s' (%d)\n",
 112         res, GetLastError(), dwSize, buffer, lstrlenA(buffer));
 113
 114
 115     /* check NULL pointers */
 116     memset(buffer, '#', urllen + 4);
 117     buffer[urllen + 4] = '\0';
 118     dwSize = urllen+1;
 119     SetLastError(0xdeadbeef);
 120     res = InternetCanonicalizeUrlA(NULL, buffer, &dwSize, 0);
 121     ok( !res && (GetLastError() == ERROR_INVALID_PARAMETER),
 122         "got %u and %u with size %u for '%s' (%d)\n",
 123         res, GetLastError(), dwSize, buffer, lstrlenA(buffer));
 124
 125     memset(buffer, '#', urllen + 4);
 126     buffer[urllen + 4] = '\0';
 127     dwSize = urllen+1;
 128     SetLastError(0xdeadbeef);
 129     res = InternetCanonicalizeUrlA(url, NULL, &dwSize, 0);
 130     ok( !res && (GetLastError() == ERROR_INVALID_PARAMETER),
 131         "got %u and %u with size %u for '%s' (%d)\n",
 132         res, GetLastError(), dwSize, buffer, lstrlenA(buffer));
 133
 134     memset(buffer, '#', urllen + 4);
 135     buffer[urllen + 4] = '\0';
 136     dwSize = urllen+1;
 137     SetLastError(0xdeadbeef);
 138     res = InternetCanonicalizeUrlA(url, buffer, NULL, 0);
 139     ok( !res && (GetLastError() == ERROR_INVALID_PARAMETER),
 140         "got %u and %u with size %u for '%s' (%d)\n",
 141         res, GetLastError(), dwSize, buffer, lstrlenA(buffer));
 142
 143     /* test with trailing space */
 144     dwSize = 256;
 145     res = InternetCanonicalizeUrlA("http://www.winehq.org/index.php?x= ", buffer, &dwSize, ICU_BROWSER_MODE);
 146     ok(res == 1, "InternetCanonicalizeUrlA failed\n");
 147     ok(!strcmp(buffer, "http://www.winehq.org/index.php?x="), "Trailing space should have been stripped even in ICU_BROWSER_MODE (%s)\n", buffer);
 148
 149     res = InternetSetOptionA(NULL, 0xdeadbeef, buffer, sizeof(buffer));
 150     ok(!res, "InternetSetOptionA succeeded\n");
 151     ok(GetLastError() == ERROR_INTERNET_INVALID_OPTION,
 152        "InternetSetOptionA failed %u, expected ERROR_INTERNET_INVALID_OPTION\n", GetLastError());
 153 }
 154
 155 /* ############################### */
 156
 157 static void test_InternetQueryOptionA(void)
 158 {
 159   HINTERNET hinet,hurl;
 160   DWORD len, val;
 161   DWORD err;
 162   static const char useragent[] = {"Wininet Test"};
 163   char *buffer;
 164   int retval;
 165   BOOL res;
 166
 167   hinet = InternetOpenA(useragent,INTERNET_OPEN_TYPE_DIRECT,NULL,NULL, 0);
 168   ok((hinet != 0x0),"InternetOpen Failed\n");
 169
 170   SetLastError(0xdeadbeef);
 171   retval=InternetQueryOptionA(NULL,INTERNET_OPTION_USER_AGENT,NULL,&len);
 172   err=GetLastError();
 173   ok(retval == 0,"Got wrong return value %d\n",retval);
 174   ok(err == ERROR_INTERNET_INCORRECT_HANDLE_TYPE, "Got wrong error code%d\n",err);
 175
 176   SetLastError(0xdeadbeef);
 177   len=strlen(useragent)+1;
 178   retval=InternetQueryOptionA(hinet,INTERNET_OPTION_USER_AGENT,NULL,&len);
 179   err=GetLastError();
 180   ok(len == strlen(useragent)+1,"Got wrong user agent length %d instead of %d\n",len,lstrlenA(useragent));
 181   ok(retval == 0,"Got wrong return value %d\n",retval);
 182   ok(err == ERROR_INSUFFICIENT_BUFFER, "Got wrong error code %d\n",err);
 183
 184   SetLastError(0xdeadbeef);
 185   len=strlen(useragent)+1;
 186   buffer=HeapAlloc(GetProcessHeap(),0,len);
 187   retval=InternetQueryOptionA(hinet,INTERNET_OPTION_USER_AGENT,buffer,&len);
 188   err=GetLastError();
 189   ok(retval == 1,"Got wrong return value %d\n",retval);
 190   if (retval)
 191   {
 192       ok(!strcmp(useragent,buffer),"Got wrong user agent string %s instead of %s\n",buffer,useragent);
 193       ok(len == strlen(useragent),"Got wrong user agent length %d instead of %d\n",len,lstrlenA(useragent));
 194   }
 195   ok(err == 0xdeadbeef, "Got wrong error code %d\n",err);
 196   HeapFree(GetProcessHeap(),0,buffer);
 197
 198   SetLastError(0xdeadbeef);
 199   len=0;
 200   buffer=HeapAlloc(GetProcessHeap(),0,100);
 201   retval=InternetQueryOptionA(hinet,INTERNET_OPTION_USER_AGENT,buffer,&len);
 202   err=GetLastError();
 203   ok(len == strlen(useragent) + 1,"Got wrong user agent length %d instead of %d\n", len, lstrlenA(useragent) + 1);
 204   ok(!retval, "Got wrong return value %d\n", retval);
 205   ok(err == ERROR_INSUFFICIENT_BUFFER, "Got wrong error code %d\n", err);
 206   HeapFree(GetProcessHeap(),0,buffer);
 207
 208   hurl = InternetConnectA(hinet,"www.winehq.org",INTERNET_DEFAULT_HTTP_PORT,NULL,NULL,INTERNET_SERVICE_HTTP,0,0);
 209
 210   SetLastError(0xdeadbeef);
 211   len=0;
 212   retval = InternetQueryOptionA(hurl,INTERNET_OPTION_USER_AGENT,NULL,&len);
 213   err=GetLastError();
 214   ok(len == 0,"Got wrong user agent length %d instead of 0\n",len);
 215   ok(retval == 0,"Got wrong return value %d\n",retval);
 216   ok(err == ERROR_INTERNET_INCORRECT_HANDLE_TYPE, "Got wrong error code %d\n",err);
 217
 218   SetLastError(0xdeadbeef);
 219   len = sizeof(DWORD);
 220   retval = InternetQueryOptionA(hurl,INTERNET_OPTION_REQUEST_FLAGS,NULL,&len);
 221   err = GetLastError();
 222   ok(retval == 0,"Got wrong return value %d\n",retval);
 223   ok(err == ERROR_INTERNET_INCORRECT_HANDLE_TYPE, "Got wrong error code %d\n",err);
 224   ok(len == sizeof(DWORD), "len = %d\n", len);
 225
 226   SetLastError(0xdeadbeef);
 227   len = sizeof(DWORD);
 228   retval = InternetQueryOptionA(NULL,INTERNET_OPTION_REQUEST_FLAGS,NULL,&len);
 229   err = GetLastError();
 230   ok(retval == 0,"Got wrong return value %d\n",retval);
 231   ok(err == ERROR_INTERNET_INCORRECT_HANDLE_TYPE, "Got wrong error code %d\n",err);
 232   ok(!len, "len = %d\n", len);
 233
 234   InternetCloseHandle(hurl);
 235   InternetCloseHandle(hinet);
 236
 237   hinet = InternetOpenA("",INTERNET_OPEN_TYPE_DIRECT,NULL,NULL, 0);
 238   ok((hinet != 0x0),"InternetOpen Failed\n");
 239
 240   SetLastError(0xdeadbeef);
 241   len=0;
 242   retval=InternetQueryOptionA(hinet,INTERNET_OPTION_USER_AGENT,NULL,&len);
 243   err=GetLastError();
 244   ok(len == 1,"Got wrong user agent length %d instead of %d\n",len,1);
 245   ok(retval == 0,"Got wrong return value %d\n",retval);
 246   ok(err == ERROR_INSUFFICIENT_BUFFER, "Got wrong error code%d\n",err);
 247
 248   InternetCloseHandle(hinet);
 249
 250   val = 12345;
 251   res = InternetSetOptionA(NULL, INTERNET_OPTION_CONNECT_TIMEOUT, &val, sizeof(val));
 252   ok(res, "InternetSetOptionA(INTERNET_OPTION_CONNECT_TIMEOUT) failed (%u)\n", GetLastError());
 253
 254   len = sizeof(val);
 255   res = InternetQueryOptionA(NULL, INTERNET_OPTION_CONNECT_TIMEOUT, &val, &len);
 256   ok(res, "InternetQueryOptionA failed %d)\n", GetLastError());
 257   ok(val == 12345, "val = %d\n", val);
 258   ok(len == sizeof(val), "len = %d\n", len);
 259
 260   hinet = InternetOpenA(NULL,INTERNET_OPEN_TYPE_DIRECT,NULL,NULL, 0);
 261   ok((hinet != 0x0),"InternetOpen Failed\n");
 262   SetLastError(0xdeadbeef);
 263   len=0;
 264   retval=InternetQueryOptionA(hinet,INTERNET_OPTION_USER_AGENT,NULL,&len);
 265   err=GetLastError();
 266   ok(len == 1,"Got wrong user agent length %d instead of %d\n",len,1);
 267   ok(retval == 0,"Got wrong return value %d\n",retval);
 268   ok(err == ERROR_INSUFFICIENT_BUFFER, "Got wrong error code%d\n",err);
 269
 270   len = sizeof(val);
 271   val = 0xdeadbeef;
 272   res = InternetQueryOptionA(hinet, INTERNET_OPTION_MAX_CONNS_PER_SERVER, &val, &len);
 273   ok(!res, "InternetQueryOptionA(INTERNET_OPTION_MAX_CONNS_PER_SERVER) succeeded\n");
 274   ok(GetLastError() == ERROR_INTERNET_INVALID_OPERATION, "GetLastError() = %u\n", GetLastError());
 275
 276   val = 2;
 277   res = InternetSetOptionA(hinet, INTERNET_OPTION_MAX_CONNS_PER_SERVER, &val, sizeof(val));
 278   ok(!res, "InternetSetOptionA(INTERNET_OPTION_MAX_CONNS_PER_SERVER) succeeded\n");
 279   ok(GetLastError() == ERROR_INTERNET_INVALID_OPERATION, "GetLastError() = %u\n", GetLastError());
 280
 281   len = sizeof(val);
 282   res = InternetQueryOptionA(hinet, INTERNET_OPTION_CONNECT_TIMEOUT, &val, &len);
 283   ok(res, "InternetQueryOptionA failed %d)\n", GetLastError());
 284   ok(val == 12345, "val = %d\n", val);
 285   ok(len == sizeof(val), "len = %d\n", len);
 286
 287   val = 1;
 288   res = InternetSetOptionA(hinet, INTERNET_OPTION_CONNECT_TIMEOUT, &val, sizeof(val));
 289   ok(res, "InternetSetOptionA(INTERNET_OPTION_CONNECT_TIMEOUT) failed (%u)\n", GetLastError());
 290
 291   len = sizeof(val);
 292   res = InternetQueryOptionA(hinet, INTERNET_OPTION_CONNECT_TIMEOUT, &val, &len);
 293   ok(res, "InternetQueryOptionA failed %d)\n", GetLastError());
 294   ok(val == 1, "val = %d\n", val);
 295   ok(len == sizeof(val), "len = %d\n", len);
 296
 297   len = sizeof(val);
 298   res = InternetQueryOptionA(NULL, INTERNET_OPTION_CONNECT_TIMEOUT, &val, &len);
 299   ok(res, "InternetQueryOptionA failed %d)\n", GetLastError());
 300   ok(val == 12345, "val = %d\n", val);
 301   ok(len == sizeof(val), "len = %d\n", len);
 302
 303   InternetCloseHandle(hinet);
 304 }
 305
 306 static void test_max_conns(void)
 307 {
 308     DWORD len, val;
 309     BOOL res;
 310
 311     len = sizeof(val);
 312     val = 0xdeadbeef;
 313     res = InternetQueryOptionA(NULL, INTERNET_OPTION_MAX_CONNS_PER_SERVER, &val, &len);
 314     ok(res,"Got wrong return value %x\n", res);
 315     ok(len == sizeof(val), "got %d\n", len);
 316     ok(val == 2, "got %d\n", val);
 317
 318     len = sizeof(val);
 319     val = 0xdeadbeef;
 320     res = InternetQueryOptionA(NULL, INTERNET_OPTION_MAX_CONNS_PER_1_0_SERVER, &val, &len);
 321     ok(res,"Got wrong return value %x\n", res);
 322     ok(len == sizeof(val), "got %d\n", len);
 323     ok(val == 4, "got %d\n", val);
 324
 325     val = 3;
 326     res = InternetSetOptionA(NULL, INTERNET_OPTION_MAX_CONNS_PER_SERVER, &val, sizeof(val));
 327     ok(res, "InternetSetOptionA(INTERNET_OPTION_MAX_CONNS_PER_SERVER) failed: %x\n", res);
 328
 329     len = sizeof(val);
 330     val = 0xdeadbeef;
 331     res = InternetQueryOptionA(NULL, INTERNET_OPTION_MAX_CONNS_PER_SERVER, &val, &len);
 332     ok(res,"Got wrong return value %x\n", res);
 333     ok(len == sizeof(val), "got %d\n", len);
 334     ok(val == 3, "got %d\n", val);
 335
 336     val = 0;
 337     res = InternetSetOptionA(NULL, INTERNET_OPTION_MAX_CONNS_PER_SERVER, &val, sizeof(val));
 338     ok(!res || broken(res), /* <= w2k3 */
 339        "InternetSetOptionA(INTERNET_OPTION_MAX_CONNS_PER_SERVER, 0) succeeded\n");
 340     if (!res) ok(GetLastError() == ERROR_BAD_ARGUMENTS, "GetLastError() = %u\n", GetLastError());
 341
 342     val = 2;
 343     res = InternetSetOptionA(NULL, INTERNET_OPTION_MAX_CONNS_PER_SERVER, &val, sizeof(val)-1);
 344     ok(!res, "InternetSetOptionA(INTERNET_OPTION_MAX_CONNS_PER_SERVER) succeeded\n");
 345     ok(GetLastError() == ERROR_INTERNET_BAD_OPTION_LENGTH, "GetLastError() = %u\n", GetLastError());
 346
 347     val = 2;
 348     res = InternetSetOptionA(NULL, INTERNET_OPTION_MAX_CONNS_PER_SERVER, &val, sizeof(val)+1);
 349     ok(!res, "InternetSetOptionA(INTERNET_OPTION_MAX_CONNS_PER_SERVER) succeeded\n");
 350     ok(GetLastError() == ERROR_INTERNET_BAD_OPTION_LENGTH, "GetLastError() = %u\n", GetLastError());
 351 }
 352
 353 static void test_get_cookie(void)
 354 {
 355   DWORD len;
 356   BOOL ret;
 357
 358   SetLastError(0xdeadbeef);
 359   ret = InternetGetCookie("http://www.example.com", NULL, NULL, &len);
 360   ok(!ret && GetLastError() == ERROR_NO_MORE_ITEMS,
 361     "InternetGetCookie should have failed with %s and error %d\n",
 362     ret ? "TRUE" : "FALSE", GetLastError());
 363 }
 364
 365
 366 static void test_complicated_cookie(void)
 367 {
 368   DWORD len;
 369   BOOL ret;
 370
 371   CHAR buffer[1024];
 372   CHAR user[256];
 373   WCHAR wbuf[1024];
 374
 375   static const WCHAR testing_example_comW[] =
 376       {'h','t','t','p',':','/','/','t','e','s','t','i','n','g','.','e','x','a','m','p','l','e','.','c','o','m',0};
 377
 378   ret = InternetSetCookie("http://www.example.com/bar",NULL,"A=B; domain=.example.com");
 379   ok(ret == TRUE,"InternetSetCookie failed\n");
 380   ret = InternetSetCookie("http://www.example.com/bar",NULL,"C=D; domain=.example.com; path=/");
 381   ok(ret == TRUE,"InternetSetCookie failed\n");
 382
 383   /* Technically illegal! domain should require 2 dots, but native wininet accepts it */
 384   ret = InternetSetCookie("http://www.example.com",NULL,"E=F; domain=example.com");
 385   ok(ret == TRUE,"InternetSetCookie failed\n");
 386   ret = InternetSetCookie("http://www.example.com",NULL,"G=H; domain=.example.com; path=/foo");
 387   ok(ret == TRUE,"InternetSetCookie failed\n");
 388   ret = InternetSetCookie("http://www.example.com/bar.html",NULL,"I=J; domain=.example.com");
 389   ok(ret == TRUE,"InternetSetCookie failed\n");
 390   ret = InternetSetCookie("http://www.example.com/bar/",NULL,"K=L; domain=.example.com");
 391   ok(ret == TRUE,"InternetSetCookie failed\n");
 392   ret = InternetSetCookie("http://www.example.com/bar/",NULL,"M=N; domain=.example.com; path=/foo/");
 393   ok(ret == TRUE,"InternetSetCookie failed\n");
 394   ret = InternetSetCookie("http://www.example.com/bar/",NULL,"O=P; secure; path=/bar");
 395   ok(ret == TRUE,"InternetSetCookie failed\n");
 396
 397   len = 1024;
 398   ret = InternetGetCookie("http://testing.example.com", NULL, NULL, &len);
 399   ok(ret == TRUE,"InternetGetCookie failed\n");
 400   ok(len == 19, "len = %u\n", len);
 401
 402   len = 1024;
 403   memset(buffer, 0xac, sizeof(buffer));
 404   ret = InternetGetCookie("http://testing.example.com", NULL, buffer, &len);
 405   ok(ret == TRUE,"InternetGetCookie failed\n");
 406   ok(len == 19, "len = %u\n", len);
 407   ok(strlen(buffer) == 18, "strlen(buffer) = %u\n", lstrlenA(buffer));
 408   ok(strstr(buffer,"A=B")!=NULL,"A=B missing\n");
 409   ok(strstr(buffer,"C=D")!=NULL,"C=D missing\n");
 410   ok(strstr(buffer,"E=F")!=NULL,"E=F missing\n");
 411   ok(strstr(buffer,"G=H")==NULL,"G=H present\n");
 412   ok(strstr(buffer,"I=J")!=NULL,"I=J missing\n");
 413   ok(strstr(buffer,"K=L")==NULL,"K=L present\n");
 414   ok(strstr(buffer,"M=N")==NULL,"M=N present\n");
 415   ok(strstr(buffer,"O=P")==NULL,"O=P present\n");
 416
 417   len = 1024;
 418   ret = InternetGetCookieW(testing_example_comW, NULL, NULL, &len);
 419   ok(ret == TRUE,"InternetGetCookieW failed\n");
 420   ok(len == 38, "len = %u\n", len);
 421
 422   len = 1024;
 423   memset(wbuf, 0xac, sizeof(wbuf));
 424   ret = InternetGetCookieW(testing_example_comW, NULL, wbuf, &len);
 425   ok(ret == TRUE,"InternetGetCookieW failed\n");
 426   ok(len == 19, "len = %u\n", len);
 427   ok(lstrlenW(wbuf) == 18, "strlenW(wbuf) = %u\n", lstrlenW(wbuf));
 428
 429   len = 1024;
 430   ret = InternetGetCookie("http://testing.example.com/foobar", NULL, buffer, &len);
 431   ok(ret == TRUE,"InternetGetCookie failed\n");
 432   ok(strstr(buffer,"A=B")!=NULL,"A=B missing\n");
 433   ok(strstr(buffer,"C=D")!=NULL,"C=D missing\n");
 434   ok(strstr(buffer,"E=F")!=NULL,"E=F missing\n");
 435   ok(strstr(buffer,"G=H")==NULL,"G=H present\n");
 436   ok(strstr(buffer,"I=J")!=NULL,"I=J missing\n");
 437   ok(strstr(buffer,"K=L")==NULL,"K=L present\n");
 438   ok(strstr(buffer,"M=N")==NULL,"M=N present\n");
 439   ok(strstr(buffer,"O=P")==NULL,"O=P present\n");
 440
 441   len = 1024;
 442   ret = InternetGetCookie("http://testing.example.com/foobar/", NULL, buffer, &len);
 443   ok(ret == TRUE,"InternetGetCookie failed\n");
 444   ok(strstr(buffer,"A=B")!=NULL,"A=B missing\n");
 445   ok(strstr(buffer,"C=D")!=NULL,"C=D missing\n");
 446   ok(strstr(buffer,"E=F")!=NULL,"E=F missing\n");
 447   ok(strstr(buffer,"G=H")!=NULL,"G=H missing\n");
 448   ok(strstr(buffer,"I=J")!=NULL,"I=J missing\n");
 449   ok(strstr(buffer,"K=L")==NULL,"K=L present\n");
 450   ok(strstr(buffer,"M=N")==NULL,"M=N present\n");
 451   ok(strstr(buffer,"O=P")==NULL,"O=P present\n");
 452
 453   len = 1024;
 454   ret = InternetGetCookie("http://testing.example.com/foo/bar", NULL, buffer, &len);
 455   ok(ret == TRUE,"InternetGetCookie failed\n");
 456   ok(strstr(buffer,"A=B")!=NULL,"A=B missing\n");
 457   ok(strstr(buffer,"C=D")!=NULL,"C=D missing\n");
 458   ok(strstr(buffer,"E=F")!=NULL,"E=F missing\n");
 459   ok(strstr(buffer,"G=H")!=NULL,"G=H missing\n");
 460   ok(strstr(buffer,"I=J")!=NULL,"I=J missing\n");
 461   ok(strstr(buffer,"K=L")==NULL,"K=L present\n");
 462   ok(strstr(buffer,"M=N")!=NULL,"M=N missing\n");
 463   ok(strstr(buffer,"O=P")==NULL,"O=P present\n");
 464
 465   len = 1024;
 466   ret = InternetGetCookie("http://testing.example.com/barfoo", NULL, buffer, &len);
 467   ok(ret == TRUE,"InternetGetCookie failed\n");
 468   ok(strstr(buffer,"A=B")!=NULL,"A=B missing\n");
 469   ok(strstr(buffer,"C=D")!=NULL,"C=D missing\n");
 470   ok(strstr(buffer,"E=F")!=NULL,"E=F missing\n");
 471   ok(strstr(buffer,"G=H")==NULL,"G=H present\n");
 472   ok(strstr(buffer,"I=J")!=NULL,"I=J missing\n");
 473   ok(strstr(buffer,"K=L")==NULL,"K=L present\n");
 474   ok(strstr(buffer,"M=N")==NULL,"M=N present\n");
 475   ok(strstr(buffer,"O=P")==NULL,"O=P present\n");
 476
 477   len = 1024;
 478   ret = InternetGetCookie("http://testing.example.com/barfoo/", NULL, buffer, &len);
 479   ok(ret == TRUE,"InternetGetCookie failed\n");
 480   ok(strstr(buffer,"A=B")!=NULL,"A=B missing\n");
 481   ok(strstr(buffer,"C=D")!=NULL,"C=D missing\n");
 482   ok(strstr(buffer,"E=F")!=NULL,"E=F missing\n");
 483   ok(strstr(buffer,"G=H")==NULL,"G=H present\n");
 484   ok(strstr(buffer,"I=J")!=NULL,"I=J missing\n");
 485   ok(strstr(buffer,"K=L")==NULL,"K=L present\n");
 486   ok(strstr(buffer,"M=N")==NULL,"M=N present\n");
 487   ok(strstr(buffer,"O=P")==NULL,"O=P present\n");
 488
 489   len = 1024;
 490   ret = InternetGetCookie("http://testing.example.com/bar/foo", NULL, buffer, &len);
 491   ok(ret == TRUE,"InternetGetCookie failed\n");
 492   ok(len == 24, "len = %u\n", 24);
 493   ok(strstr(buffer,"A=B")!=NULL,"A=B missing\n");
 494   ok(strstr(buffer,"C=D")!=NULL,"C=D missing\n");
 495   ok(strstr(buffer,"E=F")!=NULL,"E=F missing\n");
 496   ok(strstr(buffer,"G=H")==NULL,"G=H present\n");
 497   ok(strstr(buffer,"I=J")!=NULL,"I=J missing\n");
 498   ok(strstr(buffer,"K=L")!=NULL,"K=L missing\n");
 499   ok(strstr(buffer,"M=N")==NULL,"M=N present\n");
 500   ok(strstr(buffer,"O=P")==NULL,"O=P present\n");
 501
 502   /* Cookie name argument is not implemented */
 503   len = 1024;
 504   ret = InternetGetCookie("http://testing.example.com/bar/foo", "A", buffer, &len);
 505   ok(ret == TRUE,"InternetGetCookie failed\n");
 506   ok(len == 24, "len = %u\n", 24);
 507
 508   /* test persistent cookies */
 509   ret = InternetSetCookie("http://testing.example.com", NULL, "A=B; expires=Fri, 01-Jan-2038 00:00:00 GMT");
 510   ok(ret, "InternetSetCookie failed with error %d\n", GetLastError());
 511
 512   len = sizeof(user);
 513   ret = GetUserName(user, &len);
 514   ok(ret, "GetUserName failed with error %d\n", GetLastError());
 515   for(; len>0; len--)
 516       user[len-1] = tolower(user[len-1]);
 517
 518   sprintf(buffer, "Cookie:%s@testing.example.com/", user);
 519   ret = GetUrlCacheEntryInfo(buffer, NULL, &len);
 520   ok(!ret, "GetUrlCacheEntryInfo succeeded\n");
 521   ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER, "GetLastError() = %d\n", GetLastError());
 522
 523   /* remove persistent cookie */
 524   ret = InternetSetCookie("http://testing.example.com", NULL, "A=B");
 525   ok(ret, "InternetSetCookie failed with error %d\n", GetLastError());
 526
 527   ret = GetUrlCacheEntryInfo(buffer, NULL, &len);
 528   ok(!ret, "GetUrlCacheEntryInfo succeeded\n");
 529   ok(GetLastError() == ERROR_FILE_NOT_FOUND, "GetLastError() = %d\n", GetLastError());
 530
 531   /* try setting cookie for different domain */
 532   ret = InternetSetCookie("http://www.aaa.example.com/bar",NULL,"E=F; domain=different.com");
 533   ok(!ret, "InternetSetCookie succeeded\n");
 534   ok(GetLastError() == ERROR_INVALID_PARAMETER, "GetLastError() = %d\n", GetLastError());
 535   ret = InternetSetCookie("http://www.aaa.example.com.pl/bar",NULL,"E=F; domain=example.com.pl");
 536   ok(ret, "InternetSetCookie failed with error: %d\n", GetLastError());
 537   ret = InternetSetCookie("http://www.aaa.example.com.pl/bar",NULL,"E=F; domain=com.pl");
 538   todo_wine ok(!ret, "InternetSetCookie succeeded\n");
 539 }
 540
 541 static void test_cookie_url(void)
 542 {
 543     WCHAR bufw[512];
 544     char buf[512];
 545     DWORD len;
 546     BOOL res;
 547
 548     static const WCHAR about_blankW[] = {'a','b','o','u','t',':','b','l','a','n','k',0};
 549
 550     len = sizeof(buf);
 551     res = InternetGetCookieA("about:blank", NULL, buf, &len);
 552     ok(!res && GetLastError() == ERROR_INVALID_PARAMETER,
 553        "InternetGetCookeA failed: %u, expected ERROR_INVALID_PARAMETER\n", GetLastError());
 554
 555     len = sizeof(bufw)/sizeof(*bufw);
 556     res = InternetGetCookieW(about_blankW, NULL, bufw, &len);
 557     ok(!res && GetLastError() == ERROR_INVALID_PARAMETER,
 558        "InternetGetCookeW failed: %u, expected ERROR_INVALID_PARAMETER\n", GetLastError());
 559
 560     len = sizeof(buf);
 561     res = pInternetGetCookieExA("about:blank", NULL, buf, &len, 0, NULL);
 562     ok(!res && GetLastError() == ERROR_INVALID_PARAMETER,
 563        "InternetGetCookeExA failed: %u, expected ERROR_INVALID_PARAMETER\n", GetLastError());
 564
 565     len = sizeof(bufw)/sizeof(*bufw);
 566     res = pInternetGetCookieExW(about_blankW, NULL, bufw, &len, 0, NULL);
 567     ok(!res && GetLastError() == ERROR_INVALID_PARAMETER,
 568        "InternetGetCookeExW failed: %u, expected ERROR_INVALID_PARAMETER\n", GetLastError());
 569 }
 570
 571 static void test_null(void)
 572 {
 573   HINTERNET hi, hc;
 574   static const WCHAR szServer[] = { 's','e','r','v','e','r',0 };
 575   static const WCHAR szEmpty[] = { 0 };
 576   static const WCHAR szUrl[] = { 'h','t','t','p',':','/','/','a','.','b','.','c',0 };
 577   static const WCHAR szUrlEmpty[] = { 'h','t','t','p',':','/','/',0 };
 578   static const WCHAR szExpect[] = { 's','e','r','v','e','r',';',' ','s','e','r','v','e','r',0 };
 579   WCHAR buffer[0x20];
 580   BOOL r;
 581   DWORD sz;
 582
 583   SetLastError(0xdeadbeef);
 584   hi = InternetOpenW(NULL, 0, NULL, NULL, 0);
 585   if (hi == NULL && GetLastError() == ERROR_CALL_NOT_IMPLEMENTED)
 586   {
 587     win_skip("Internet*W functions are not implemented\n");
 588     return;
 589   }
 590   ok(hi != NULL, "open failed\n");
 591
 592   hc = InternetConnectW(hi, NULL, 0, NULL, NULL, 0, 0, 0);
 593   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 594   ok(hc == NULL, "connect failed\n");
 595
 596   hc = InternetConnectW(hi, NULL, 0, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
 597   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 598   ok(hc == NULL, "connect failed\n");
 599
 600   hc = InternetConnectW(hi, NULL, 0, NULL, NULL, INTERNET_SERVICE_FTP, 0, 0);
 601   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 602   ok(hc == NULL, "connect failed\n");
 603
 604   hc = InternetConnectW(NULL, szServer, 0, NULL, NULL, INTERNET_SERVICE_FTP, 0, 0);
 605   ok(GetLastError() == ERROR_INVALID_HANDLE, "wrong error\n");
 606   ok(hc == NULL, "connect failed\n");
 607
 608   hc = InternetOpenUrlW(hi, NULL, NULL, 0, 0, 0);
 609   ok(GetLastError() == ERROR_INVALID_PARAMETER ||
 610      GetLastError() == ERROR_INTERNET_UNRECOGNIZED_SCHEME, "wrong error\n");
 611   ok(hc == NULL, "connect failed\n");
 612
 613   hc = InternetOpenUrlW(hi, szServer, NULL, 0, 0, 0);
 614   ok(GetLastError() == ERROR_INTERNET_UNRECOGNIZED_SCHEME, "wrong error\n");
 615   ok(hc == NULL, "connect failed\n");
 616
 617   InternetCloseHandle(hi);
 618
 619   r = InternetSetCookieW(NULL, NULL, NULL);
 620   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 621   ok(r == FALSE, "return wrong\n");
 622
 623   r = InternetSetCookieW(szServer, NULL, NULL);
 624   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 625   ok(r == FALSE, "return wrong\n");
 626
 627   r = InternetSetCookieW(szUrl, szServer, NULL);
 628   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 629   ok(r == FALSE, "return wrong\n");
 630
 631   r = InternetSetCookieW(szUrl, szServer, szServer);
 632   ok(r == TRUE, "return wrong\n");
 633
 634   r = InternetSetCookieW(szUrl, NULL, szServer);
 635   ok(r == TRUE, "return wrong\n");
 636
 637   r = InternetSetCookieW(szUrl, szServer, szEmpty);
 638   ok(r == TRUE, "return wrong\n");
 639
 640   r = InternetSetCookieW(szUrlEmpty, szServer, szServer);
 641   ok(r == FALSE, "return wrong\n");
 642
 643   r = InternetSetCookieW(szServer, NULL, szServer);
 644   todo_wine {
 645   ok(GetLastError() == ERROR_INTERNET_UNRECOGNIZED_SCHEME, "wrong error\n");
 646   }
 647   ok(r == FALSE, "return wrong\n");
 648
 649   sz = 0;
 650   r = InternetGetCookieW(NULL, NULL, NULL, &sz);
 651   ok(GetLastError() == ERROR_INVALID_PARAMETER || GetLastError() == ERROR_INTERNET_UNRECOGNIZED_SCHEME,
 652      "wrong error %u\n", GetLastError());
 653   ok( r == FALSE, "return wrong\n");
 654
 655   r = InternetGetCookieW(szServer, NULL, NULL, &sz);
 656   todo_wine {
 657   ok(GetLastError() == ERROR_INTERNET_UNRECOGNIZED_SCHEME, "wrong error\n");
 658   }
 659   ok( r == FALSE, "return wrong\n");
 660
 661   sz = 0;
 662   r = InternetGetCookieW(szUrlEmpty, szServer, NULL, &sz);
 663   ok( r == FALSE, "return wrong\n");
 664
 665   sz = 0;
 666   r = InternetGetCookieW(szUrl, szServer, NULL, &sz);
 667   ok( r == TRUE, "return wrong\n");
 668
 669   /* sz is 14 on XP SP2 and beyond, 30 on XP SP1 and before */
 670   ok( sz == 14 || sz == 30, "sz wrong, got %u, expected 14 or 30\n", sz);
 671
 672   sz = 0x20;
 673   memset(buffer, 0, sizeof buffer);
 674   r = InternetGetCookieW(szUrl, szServer, buffer, &sz);
 675   ok( r == TRUE, "return wrong\n");
 676
 677   /* sz == lstrlenW(buffer) only in XP SP1 */
 678   ok( sz == 1 + lstrlenW(buffer) || sz == lstrlenW(buffer), "sz wrong %d\n", sz);
 679
 680   /* before XP SP2, buffer is "server; server" */
 681   ok( !lstrcmpW(szExpect, buffer) || !lstrcmpW(szServer, buffer), "cookie data wrong\n");
 682
 683   sz = sizeof(buffer);
 684   r = InternetQueryOptionA(NULL, INTERNET_OPTION_CONNECTED_STATE, buffer, &sz);
 685   ok(r == TRUE, "ret %d\n", r);
 686 }
 687
 688 static void test_version(void)
 689 {
 690     INTERNET_VERSION_INFO version;
 691     DWORD size;
 692     BOOL res;
 693
 694     size = sizeof(version);
 695     res = InternetQueryOptionA(NULL, INTERNET_OPTION_VERSION, &version, &size);
 696     ok(res, "Could not get version: %u\n", GetLastError());
 697     ok(version.dwMajorVersion == 1, "dwMajorVersion=%d, expected 1\n", version.dwMajorVersion);
 698     ok(version.dwMinorVersion == 2, "dwMinorVersion=%d, expected 2\n", version.dwMinorVersion);
 699 }
 700
 701 static void InternetTimeFromSystemTimeA_test(void)
 702 {
 703     BOOL ret;
 704     static const SYSTEMTIME time = { 2005, 1, 5, 7, 12, 6, 35, 0 };
 705     char string[INTERNET_RFC1123_BUFSIZE];
 706     static const char expect[] = "Fri, 07 Jan 2005 12:06:35 GMT";
 707     DWORD error;
 708
 709     ret = pInternetTimeFromSystemTimeA( &time, INTERNET_RFC1123_FORMAT, string, sizeof(string) );
 710     ok( ret, "InternetTimeFromSystemTimeA failed (%u)\n", GetLastError() );
 711
 712     ok( !memcmp( string, expect, sizeof(expect) ),
 713         "InternetTimeFromSystemTimeA failed (%u)\n", GetLastError() );
 714
 715     /* test NULL time parameter */
 716     SetLastError(0xdeadbeef);
 717     ret = pInternetTimeFromSystemTimeA( NULL, INTERNET_RFC1123_FORMAT, string, sizeof(string) );
 718     error = GetLastError();
 719     ok( !ret, "InternetTimeFromSystemTimeA should have returned FALSE\n" );
 720     ok( error == ERROR_INVALID_PARAMETER,
 721         "InternetTimeFromSystemTimeA failed with ERROR_INVALID_PARAMETER instead of %u\n",
 722         error );
 723
 724     /* test NULL string parameter */
 725     SetLastError(0xdeadbeef);
 726     ret = pInternetTimeFromSystemTimeA( &time, INTERNET_RFC1123_FORMAT, NULL, sizeof(string) );
 727     error = GetLastError();
 728     ok( !ret, "InternetTimeFromSystemTimeA should have returned FALSE\n" );
 729     ok( error == ERROR_INVALID_PARAMETER,
 730         "InternetTimeFromSystemTimeA failed with ERROR_INVALID_PARAMETER instead of %u\n",
 731         error );
 732
 733     /* test invalid format parameter */
 734     SetLastError(0xdeadbeef);
 735     ret = pInternetTimeFromSystemTimeA( &time, INTERNET_RFC1123_FORMAT + 1, string, sizeof(string) );
 736     error = GetLastError();
 737     ok( !ret, "InternetTimeFromSystemTimeA should have returned FALSE\n" );
 738     ok( error == ERROR_INVALID_PARAMETER,
 739         "InternetTimeFromSystemTimeA failed with ERROR_INVALID_PARAMETER instead of %u\n",
 740         error );
 741
 742     /* test too small buffer size */
 743     SetLastError(0xdeadbeef);
 744     ret = pInternetTimeFromSystemTimeA( &time, INTERNET_RFC1123_FORMAT, string, 0 );
 745     error = GetLastError();
 746     ok( !ret, "InternetTimeFromSystemTimeA should have returned FALSE\n" );
 747     ok( error == ERROR_INSUFFICIENT_BUFFER,
 748         "InternetTimeFromSystemTimeA failed with ERROR_INSUFFICIENT_BUFFER instead of %u\n",
 749         error );
 750 }
 751
 752 static void InternetTimeFromSystemTimeW_test(void)
 753 {
 754     BOOL ret;
 755     static const SYSTEMTIME time = { 2005, 1, 5, 7, 12, 6, 35, 0 };
 756     WCHAR string[INTERNET_RFC1123_BUFSIZE + 1];
 757     static const WCHAR expect[] = { 'F','r','i',',',' ','0','7',' ','J','a','n',' ','2','0','0','5',' ',
 758                                     '1','2',':','0','6',':','3','5',' ','G','M','T',0 };
 759     DWORD error;
 760
 761     ret = pInternetTimeFromSystemTimeW( &time, INTERNET_RFC1123_FORMAT, string, sizeof(string) );
 762     ok( ret, "InternetTimeFromSystemTimeW failed (%u)\n", GetLastError() );
 763
 764     ok( !memcmp( string, expect, sizeof(expect) ),
 765         "InternetTimeFromSystemTimeW failed (%u)\n", GetLastError() );
 766
 767     /* test NULL time parameter */
 768     SetLastError(0xdeadbeef);
 769     ret = pInternetTimeFromSystemTimeW( NULL, INTERNET_RFC1123_FORMAT, string, sizeof(string) );
 770     error = GetLastError();
 771     ok( !ret, "InternetTimeFromSystemTimeW should have returned FALSE\n" );
 772     ok( error == ERROR_INVALID_PARAMETER,
 773         "InternetTimeFromSystemTimeW failed with ERROR_INVALID_PARAMETER instead of %u\n",
 774         error );
 775
 776     /* test NULL string parameter */
 777     SetLastError(0xdeadbeef);
 778     ret = pInternetTimeFromSystemTimeW( &time, INTERNET_RFC1123_FORMAT, NULL, sizeof(string) );
 779     error = GetLastError();
 780     ok( !ret, "InternetTimeFromSystemTimeW should have returned FALSE\n" );
 781     ok( error == ERROR_INVALID_PARAMETER,
 782         "InternetTimeFromSystemTimeW failed with ERROR_INVALID_PARAMETER instead of %u\n",
 783         error );
 784
 785     /* test invalid format parameter */
 786     SetLastError(0xdeadbeef);
 787     ret = pInternetTimeFromSystemTimeW( &time, INTERNET_RFC1123_FORMAT + 1, string, sizeof(string) );
 788     error = GetLastError();
 789     ok( !ret, "InternetTimeFromSystemTimeW should have returned FALSE\n" );
 790     ok( error == ERROR_INVALID_PARAMETER,
 791         "InternetTimeFromSystemTimeW failed with ERROR_INVALID_PARAMETER instead of %u\n",
 792         error );
 793
 794     /* test too small buffer size */
 795     SetLastError(0xdeadbeef);
 796     ret = pInternetTimeFromSystemTimeW( &time, INTERNET_RFC1123_FORMAT, string, sizeof(string)/sizeof(string[0]) );
 797     error = GetLastError();
 798     ok( !ret, "InternetTimeFromSystemTimeW should have returned FALSE\n" );
 799     ok( error == ERROR_INSUFFICIENT_BUFFER,
 800         "InternetTimeFromSystemTimeW failed with ERROR_INSUFFICIENT_BUFFER instead of %u\n",
 801         error );
 802 }
 803
 804 static void InternetTimeToSystemTimeA_test(void)
 805 {
 806     BOOL ret;
 807     SYSTEMTIME time;
 808     static const SYSTEMTIME expect = { 2005, 1, 5, 7, 12, 6, 35, 0 };
 809     static const char string[] = "Fri, 07 Jan 2005 12:06:35 GMT";
 810     static const char string2[] = " fri 7 jan 2005 12 06 35";
 811
 812     ret = pInternetTimeToSystemTimeA( string, &time, 0 );
 813     ok( ret, "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
 814     ok( !memcmp( &time, &expect, sizeof(expect) ),
 815         "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
 816
 817     ret = pInternetTimeToSystemTimeA( string2, &time, 0 );
 818     ok( ret, "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
 819     ok( !memcmp( &time, &expect, sizeof(expect) ),
 820         "InternetTimeToSystemTimeA failed (%u)\n", GetLastError() );
 821 }
 822
 823 static void InternetTimeToSystemTimeW_test(void)
 824 {
 825     BOOL ret;
 826     SYSTEMTIME time;
 827     static const SYSTEMTIME expect = { 2005, 1, 5, 7, 12, 6, 35, 0 };
 828     static const WCHAR string[] = { 'F','r','i',',',' ','0','7',' ','J','a','n',' ','2','0','0','5',' ',
 829                                     '1','2',':','0','6',':','3','5',' ','G','M','T',0 };
 830     static const WCHAR string2[] = { ' ','f','r','i',' ','7',' ','j','a','n',' ','2','0','0','5',' ',
 831                                      '1','2',' ','0','6',' ','3','5',0 };
 832     static const WCHAR string3[] = { 'F','r',0 };
 833
 834     ret = pInternetTimeToSystemTimeW( NULL, NULL, 0 );
 835     ok( !ret, "InternetTimeToSystemTimeW succeeded (%u)\n", GetLastError() );
 836
 837     ret = pInternetTimeToSystemTimeW( NULL, &time, 0 );
 838     ok( !ret, "InternetTimeToSystemTimeW succeeded (%u)\n", GetLastError() );
 839
 840     ret = pInternetTimeToSystemTimeW( string, NULL, 0 );
 841     ok( !ret, "InternetTimeToSystemTimeW succeeded (%u)\n", GetLastError() );
 842
 843     ret = pInternetTimeToSystemTimeW( string, &time, 0 );
 844     ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 845
 846     ret = pInternetTimeToSystemTimeW( string, &time, 0 );
 847     ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 848     ok( !memcmp( &time, &expect, sizeof(expect) ),
 849         "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 850
 851     ret = pInternetTimeToSystemTimeW( string2, &time, 0 );
 852     ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 853     ok( !memcmp( &time, &expect, sizeof(expect) ),
 854         "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 855
 856     ret = pInternetTimeToSystemTimeW( string3, &time, 0 );
 857     ok( ret, "InternetTimeToSystemTimeW failed (%u)\n", GetLastError() );
 858 }
 859
 860 static void test_IsDomainLegalCookieDomainW(void)
 861 {
 862     BOOL ret;
 863     DWORD error;
 864     static const WCHAR empty[]          = {0};
 865     static const WCHAR dot[]            = {'.',0};
 866     static const WCHAR uk[]             = {'u','k',0};
 867     static const WCHAR com[]            = {'c','o','m',0};
 868     static const WCHAR dot_com[]        = {'.','c','o','m',0};
 869     static const WCHAR gmail_com[]      = {'g','m','a','i','l','.','c','o','m',0};
 870     static const WCHAR dot_gmail_com[]  = {'.','g','m','a','i','l','.','c','o','m',0};
 871     static const WCHAR www_gmail_com[]  = {'w','w','w','.','g','m','a','i','l','.','c','o','m',0};
 872     static const WCHAR www_mail_gmail_com[] = {'w','w','w','.','m','a','i','l','.','g','m','a','i','l','.','c','o','m',0};
 873     static const WCHAR mail_gmail_com[] = {'m','a','i','l','.','g','m','a','i','l','.','c','o','m',0};
 874     static const WCHAR gmail_co_uk[]    = {'g','m','a','i','l','.','c','o','.','u','k',0};
 875     static const WCHAR co_uk[]          = {'c','o','.','u','k',0};
 876     static const WCHAR dot_co_uk[]      = {'.','c','o','.','u','k',0};
 877
 878     SetLastError(0xdeadbeef);
 879     ret = pIsDomainLegalCookieDomainW(NULL, NULL);
 880     error = GetLastError();
 881     if (!ret && error == ERROR_CALL_NOT_IMPLEMENTED)
 882     {
 883         win_skip("IsDomainLegalCookieDomainW is not implemented\n");
 884         return;
 885     }
 886     ok(!ret ||
 887         broken(ret), /* IE6 */
 888         "IsDomainLegalCookieDomainW succeeded\n");
 889     ok(error == ERROR_INVALID_PARAMETER, "got %u expected ERROR_INVALID_PARAMETER\n", error);
 890
 891     SetLastError(0xdeadbeef);
 892     ret = pIsDomainLegalCookieDomainW(com, NULL);
 893     error = GetLastError();
 894     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 895     ok(error == ERROR_INVALID_PARAMETER, "got %u expected ERROR_INVALID_PARAMETER\n", error);
 896
 897     SetLastError(0xdeadbeef);
 898     ret = pIsDomainLegalCookieDomainW(NULL, gmail_com);
 899     error = GetLastError();
 900     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 901     ok(error == ERROR_INVALID_PARAMETER, "got %u expected ERROR_INVALID_PARAMETER\n", error);
 902
 903     SetLastError(0xdeadbeef);
 904     ret = pIsDomainLegalCookieDomainW(empty, gmail_com);
 905     error = GetLastError();
 906     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 907     ok(error == ERROR_INVALID_NAME ||
 908         broken(error == ERROR_INVALID_PARAMETER), /* IE6 */
 909         "got %u expected ERROR_INVALID_NAME\n", error);
 910
 911     SetLastError(0xdeadbeef);
 912     ret = pIsDomainLegalCookieDomainW(com, empty);
 913     error = GetLastError();
 914     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 915     ok(error == ERROR_INVALID_NAME ||
 916         broken(error == ERROR_INVALID_PARAMETER), /* IE6 */
 917         "got %u expected ERROR_INVALID_NAME\n", error);
 918
 919     SetLastError(0xdeadbeef);
 920     ret = pIsDomainLegalCookieDomainW(gmail_com, dot);
 921     error = GetLastError();
 922     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 923     ok(error == ERROR_INVALID_NAME ||
 924         broken(error == 0xdeadbeef), /* IE6 */
 925         "got %u expected ERROR_INVALID_NAME\n", error);
 926
 927     SetLastError(0xdeadbeef);
 928     ret = pIsDomainLegalCookieDomainW(dot, gmail_com);
 929     error = GetLastError();
 930     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 931     ok(error == ERROR_INVALID_NAME ||
 932         broken(error == 0xdeadbeef), /* IE6 */
 933         "got %u expected ERROR_INVALID_NAME\n", error);
 934
 935     SetLastError(0xdeadbeef);
 936     ret = pIsDomainLegalCookieDomainW(com, com);
 937     error = GetLastError();
 938     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 939     ok(error == 0xdeadbeef, "got %u expected 0xdeadbeef\n", error);
 940
 941     SetLastError(0xdeadbeef);
 942     ret = pIsDomainLegalCookieDomainW(com, dot_com);
 943     error = GetLastError();
 944     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 945     ok(error == ERROR_INVALID_NAME ||
 946         broken(error == 0xdeadbeef), /* IE6 */
 947         "got %u expected ERROR_INVALID_NAME\n", error);
 948
 949     SetLastError(0xdeadbeef);
 950     ret = pIsDomainLegalCookieDomainW(dot_com, com);
 951     error = GetLastError();
 952     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 953     ok(error == ERROR_INVALID_NAME ||
 954         broken(error == 0xdeadbeef), /* IE6 */
 955         "got %u expected ERROR_INVALID_NAME\n", error);
 956
 957     SetLastError(0xdeadbeef);
 958     ret = pIsDomainLegalCookieDomainW(com, gmail_com);
 959     error = GetLastError();
 960     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 961     ok(error == ERROR_SXS_KEY_NOT_FOUND ||
 962         error == ERROR_SUCCESS || /* IE8 on W2K3 */
 963         error == 0xdeadbeef, /* up to IE7 */
 964         "unexpected error: %u\n", error);
 965
 966     ret = pIsDomainLegalCookieDomainW(gmail_com, gmail_com);
 967     ok(ret, "IsDomainLegalCookieDomainW failed\n");
 968
 969     ret = pIsDomainLegalCookieDomainW(gmail_com, www_gmail_com);
 970     ok(ret, "IsDomainLegalCookieDomainW failed\n");
 971
 972     ret = pIsDomainLegalCookieDomainW(gmail_com, www_mail_gmail_com);
 973     ok(ret, "IsDomainLegalCookieDomainW failed\n");
 974
 975     SetLastError(0xdeadbeef);
 976     ret = pIsDomainLegalCookieDomainW(gmail_co_uk, co_uk);
 977     error = GetLastError();
 978     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 979     ok(error == ERROR_SXS_KEY_NOT_FOUND || /* IE8 on XP */
 980         error == ERROR_FILE_NOT_FOUND ||   /* IE8 on Vista */
 981         error == ERROR_SUCCESS || /* IE8 on W2K3 */
 982         error == 0xdeadbeef, /* up to IE7 */
 983         "unexpected error: %u\n", error);
 984
 985     ret = pIsDomainLegalCookieDomainW(uk, co_uk);
 986     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 987
 988     ret = pIsDomainLegalCookieDomainW(gmail_co_uk, dot_co_uk);
 989     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 990
 991     ret = pIsDomainLegalCookieDomainW(co_uk, gmail_co_uk);
 992     todo_wine ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 993
 994     ret = pIsDomainLegalCookieDomainW(gmail_co_uk, gmail_co_uk);
 995     ok(ret, "IsDomainLegalCookieDomainW failed\n");
 996
 997     ret = pIsDomainLegalCookieDomainW(gmail_com, com);
 998     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
 999
1000     SetLastError(0xdeadbeef);
1001     ret = pIsDomainLegalCookieDomainW(dot_gmail_com, mail_gmail_com);
1002     error = GetLastError();
1003     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
1004     ok(error == ERROR_INVALID_NAME ||
1005         broken(error == 0xdeadbeef), /* IE6 */
1006         "got %u expected ERROR_INVALID_NAME\n", error);
1007
1008     ret = pIsDomainLegalCookieDomainW(gmail_com, mail_gmail_com);
1009     ok(ret, "IsDomainLegalCookieDomainW failed\n");
1010
1011     ret = pIsDomainLegalCookieDomainW(mail_gmail_com, gmail_com);
1012     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
1013
1014     ret = pIsDomainLegalCookieDomainW(mail_gmail_com, com);
1015     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
1016
1017     ret = pIsDomainLegalCookieDomainW(dot_gmail_com, mail_gmail_com);
1018     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
1019
1020     ret = pIsDomainLegalCookieDomainW(mail_gmail_com, dot_gmail_com);
1021     ok(!ret, "IsDomainLegalCookieDomainW succeeded\n");
1022 }
1023
1024 static void test_PrivacyGetSetZonePreferenceW(void)
1025 {
1026     DWORD ret, zone, type, template, old_template;
1027
1028     zone = 3;
1029     type = 0;
1030     ret = pPrivacyGetZonePreferenceW(zone, type, NULL, NULL, NULL);
1031     ok(ret == 0, "expected ret == 0, got %u\n", ret);
1032
1033     old_template = 0;
1034     ret = pPrivacyGetZonePreferenceW(zone, type, &old_template, NULL, NULL);
1035     ok(ret == 0, "expected ret == 0, got %u\n", ret);
1036
1037     template = 5;
1038     ret = pPrivacySetZonePreferenceW(zone, type, template, NULL);
1039     ok(ret == 0, "expected ret == 0, got %u\n", ret);
1040
1041     template = 0;
1042     ret = pPrivacyGetZonePreferenceW(zone, type, &template, NULL, NULL);
1043     ok(ret == 0, "expected ret == 0, got %u\n", ret);
1044     ok(template == 5, "expected template == 5, got %u\n", template);
1045
1046     template = 5;
1047     ret = pPrivacySetZonePreferenceW(zone, type, old_template, NULL);
1048     ok(ret == 0, "expected ret == 0, got %u\n", ret);
1049 }
1050
1051 static void test_InternetSetOption(void)
1052 {
1053     HINTERNET ses, con, req;
1054     ULONG ulArg;
1055     DWORD size;
1056     BOOL ret;
1057
1058     ses = InternetOpen(NULL, INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1059     ok(ses != 0, "InternetOpen failed: 0x%08x\n", GetLastError());
1060     con = InternetConnect(ses, "www.winehq.org", 80, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1061     ok(con != 0, "InternetConnect failed: 0x%08x\n", GetLastError());
1062     req = HttpOpenRequest(con, "GET", "/", NULL, NULL, NULL, 0, 0);
1063     ok(req != 0, "HttpOpenRequest failed: 0x%08x\n", GetLastError());
1064
1065     /* INTERNET_OPTION_POLICY tests */
1066     SetLastError(0xdeadbeef);
1067     ret = InternetSetOptionW(ses, INTERNET_OPTION_POLICY, NULL, 0);
1068     ok(ret == FALSE, "InternetSetOption should've failed\n");
1069     ok(GetLastError() == ERROR_INVALID_PARAMETER, "GetLastError should've "
1070             "given ERROR_INVALID_PARAMETER, gave: 0x%08x\n", GetLastError());
1071
1072     SetLastError(0xdeadbeef);
1073     ret = InternetQueryOptionW(ses, INTERNET_OPTION_POLICY, NULL, 0);
1074     ok(ret == FALSE, "InternetQueryOption should've failed\n");
1075     ok(GetLastError() == ERROR_INVALID_PARAMETER, "GetLastError should've "
1076             "given ERROR_INVALID_PARAMETER, gave: 0x%08x\n", GetLastError());
1077
1078     /* INTERNET_OPTION_ERROR_MASK tests */
1079     SetLastError(0xdeadbeef);
1080     size = sizeof(ulArg);
1081     ret = InternetQueryOptionW(NULL, INTERNET_OPTION_ERROR_MASK, (void*)&ulArg, &size);
1082     ok(ret == FALSE, "InternetQueryOption should've failed\n");
1083     ok(GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE, "GetLastError() = %x\n", GetLastError());
1084
1085     SetLastError(0xdeadbeef);
1086     ulArg = 11;
1087     ret = InternetSetOption(NULL, INTERNET_OPTION_ERROR_MASK, (void*)&ulArg, sizeof(ULONG));
1088     ok(ret == FALSE, "InternetQueryOption should've failed\n");
1089     ok(GetLastError() == ERROR_INTERNET_INCORRECT_HANDLE_TYPE, "GetLastError() = %x\n", GetLastError());
1090
1091     SetLastError(0xdeadbeef);
1092     ulArg = 11;
1093     ret = InternetSetOption(req, INTERNET_OPTION_ERROR_MASK, (void*)&ulArg, 20);
1094     ok(ret == FALSE, "InternetQueryOption should've failed\n");
1095     ok(GetLastError() == ERROR_INTERNET_BAD_OPTION_LENGTH, "GetLastError() = %d\n", GetLastError());
1096
1097     SetLastError(0xdeadbeef);
1098     ulArg = 11;
1099     ret = InternetSetOption(req, INTERNET_OPTION_ERROR_MASK, (void*)&ulArg, sizeof(ULONG));
1100     ok(ret == TRUE, "InternetQueryOption should've succeeded\n");
1101     ok(GetLastError() == 0xdeadbeef, "GetLastError() = %d\n", GetLastError());
1102
1103     SetLastError(0xdeadbeef);
1104     ulArg = 4;
1105     ret = InternetSetOption(req, INTERNET_OPTION_ERROR_MASK, (void*)&ulArg, sizeof(ULONG));
1106     ok(ret == FALSE, "InternetQueryOption should've failed\n");
1107     ok(GetLastError() == ERROR_INVALID_PARAMETER, "GetLastError() = %x\n", GetLastError());
1108
1109     SetLastError(0xdeadbeef);
1110     ulArg = 16;
1111     ret = InternetSetOption(req, INTERNET_OPTION_ERROR_MASK, (void*)&ulArg, sizeof(ULONG));
1112     ok(ret == FALSE, "InternetQueryOption should've failed\n");
1113     ok(GetLastError() == ERROR_INVALID_PARAMETER, "GetLastError() = %x\n", GetLastError());
1114
1115     ret = InternetCloseHandle(req);
1116     ok(ret == TRUE, "InternetCloseHandle failed: 0x%08x\n", GetLastError());
1117     ret = InternetCloseHandle(con);
1118     ok(ret == TRUE, "InternetCloseHandle failed: 0x%08x\n", GetLastError());
1119     ret = InternetCloseHandle(ses);
1120     ok(ret == TRUE, "InternetCloseHandle failed: 0x%08x\n", GetLastError());
1121 }
1122
1123 #define verifyProxyEnable(e) r_verifyProxyEnable(__LINE__, e)
1124 static void r_verifyProxyEnable(LONG l, DWORD exp)
1125 {
1126     HKEY hkey;
1127     DWORD type, val, size = sizeof(DWORD);
1128     LONG ret;
1129     static const CHAR szInternetSettings[] = "Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings";
1130     static const CHAR szProxyEnable[] = "ProxyEnable";
1131
1132     ret = RegOpenKeyA(HKEY_CURRENT_USER, szInternetSettings, &hkey);
1133     ok_(__FILE__,l) (!ret, "RegOpenKeyA failed: 0x%08x\n", ret);
1134
1135     ret = RegQueryValueExA(hkey, szProxyEnable, 0, &type, (BYTE*)&val, &size);
1136     ok_(__FILE__,l) (!ret, "RegQueryValueExA failed: 0x%08x\n", ret);
1137     ok_(__FILE__,l) (type == REG_DWORD, "Expected regtype to be REG_DWORD, was: %d\n", type);
1138     ok_(__FILE__,l) (val == exp, "Expected ProxyEnabled to be %d, got: %d\n", exp, val);
1139
1140     ret = RegCloseKey(hkey);
1141     ok_(__FILE__,l) (!ret, "RegCloseKey failed: 0x%08x\n", ret);
1142 }
1143
1144 static void test_Option_PerConnectionOption(void)
1145 {
1146     BOOL ret;
1147     DWORD size = sizeof(INTERNET_PER_CONN_OPTION_LISTW);
1148     INTERNET_PER_CONN_OPTION_LISTW list = {size};
1149     INTERNET_PER_CONN_OPTIONW *orig_settings;
1150     static WCHAR proxy_srvW[] = {'p','r','o','x','y','.','e','x','a','m','p','l','e',0};
1151
1152     /* get the global IE proxy server info, to restore later */
1153     list.dwOptionCount = 2;
1154     list.pOptions = HeapAlloc(GetProcessHeap(), 0, 2 * sizeof(INTERNET_PER_CONN_OPTIONW));
1155
1156     list.pOptions[0].dwOption = INTERNET_PER_CONN_PROXY_SERVER;
1157     list.pOptions[1].dwOption = INTERNET_PER_CONN_FLAGS;
1158
1159     ret = InternetQueryOptionW(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1160             &list, &size);
1161     ok(ret == TRUE, "InternetQueryOption should've succeeded\n");
1162     orig_settings = list.pOptions;
1163
1164     /* set the global IE proxy server */
1165     list.dwOptionCount = 2;
1166     list.pOptions = HeapAlloc(GetProcessHeap(), 0, 2 * sizeof(INTERNET_PER_CONN_OPTIONW));
1167
1168     list.pOptions[0].dwOption = INTERNET_PER_CONN_PROXY_SERVER;
1169     list.pOptions[0].Value.pszValue = proxy_srvW;
1170     list.pOptions[1].dwOption = INTERNET_PER_CONN_FLAGS;
1171     list.pOptions[1].Value.dwValue = PROXY_TYPE_PROXY;
1172
1173     ret = InternetSetOptionW(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1174             &list, size);
1175     ok(ret == TRUE, "InternetSetOption should've succeeded\n");
1176
1177     HeapFree(GetProcessHeap(), 0, list.pOptions);
1178
1179     /* get & verify the global IE proxy server */
1180     list.dwOptionCount = 2;
1181     list.dwOptionError = 0;
1182     list.pOptions = HeapAlloc(GetProcessHeap(), 0, 2 * sizeof(INTERNET_PER_CONN_OPTIONW));
1183
1184     list.pOptions[0].dwOption = INTERNET_PER_CONN_PROXY_SERVER;
1185     list.pOptions[1].dwOption = INTERNET_PER_CONN_FLAGS;
1186
1187     ret = InternetQueryOptionW(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1188             &list, &size);
1189     ok(ret == TRUE, "InternetQueryOption should've succeeded\n");
1190     ok(!lstrcmpW(list.pOptions[0].Value.pszValue, proxy_srvW),
1191             "Retrieved proxy server should've been %s, was: %s\n",
1192             wine_dbgstr_w(proxy_srvW), wine_dbgstr_w(list.pOptions[0].Value.pszValue));
1193     ok(list.pOptions[1].Value.dwValue == PROXY_TYPE_PROXY,
1194             "Retrieved flags should've been PROXY_TYPE_PROXY, was: %d\n",
1195             list.pOptions[1].Value.dwValue);
1196     verifyProxyEnable(1);
1197
1198     HeapFree(GetProcessHeap(), 0, list.pOptions[0].Value.pszValue);
1199     HeapFree(GetProcessHeap(), 0, list.pOptions);
1200
1201     /* disable the proxy server */
1202     list.dwOptionCount = 1;
1203     list.pOptions = HeapAlloc(GetProcessHeap(), 0, sizeof(INTERNET_PER_CONN_OPTIONW));
1204
1205     list.pOptions[0].dwOption = INTERNET_PER_CONN_FLAGS;
1206     list.pOptions[0].Value.dwValue = PROXY_TYPE_DIRECT;
1207
1208     ret = InternetSetOptionW(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1209             &list, size);
1210     ok(ret == TRUE, "InternetSetOption should've succeeded\n");
1211
1212     HeapFree(GetProcessHeap(), 0, list.pOptions);
1213
1214     /* verify that the proxy is disabled */
1215     list.dwOptionCount = 1;
1216     list.dwOptionError = 0;
1217     list.pOptions = HeapAlloc(GetProcessHeap(), 0, sizeof(INTERNET_PER_CONN_OPTIONW));
1218
1219     list.pOptions[0].dwOption = INTERNET_PER_CONN_FLAGS;
1220
1221     ret = InternetQueryOptionW(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1222             &list, &size);
1223     ok(ret == TRUE, "InternetQueryOption should've succeeded\n");
1224     ok(list.pOptions[0].Value.dwValue == PROXY_TYPE_DIRECT,
1225             "Retrieved flags should've been PROXY_TYPE_DIRECT, was: %d\n",
1226             list.pOptions[0].Value.dwValue);
1227     verifyProxyEnable(0);
1228
1229     HeapFree(GetProcessHeap(), 0, list.pOptions);
1230
1231     /* set the proxy flags to 'invalid' value */
1232     list.dwOptionCount = 1;
1233     list.pOptions = HeapAlloc(GetProcessHeap(), 0, sizeof(INTERNET_PER_CONN_OPTIONW));
1234
1235     list.pOptions[0].dwOption = INTERNET_PER_CONN_FLAGS;
1236     list.pOptions[0].Value.dwValue = PROXY_TYPE_PROXY | PROXY_TYPE_DIRECT;
1237
1238     ret = InternetSetOptionW(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1239             &list, size);
1240     ok(ret == TRUE, "InternetSetOption should've succeeded\n");
1241
1242     HeapFree(GetProcessHeap(), 0, list.pOptions);
1243
1244     /* verify that the proxy is enabled */
1245     list.dwOptionCount = 1;
1246     list.dwOptionError = 0;
1247     list.pOptions = HeapAlloc(GetProcessHeap(), 0, sizeof(INTERNET_PER_CONN_OPTIONW));
1248
1249     list.pOptions[0].dwOption = INTERNET_PER_CONN_FLAGS;
1250
1251     ret = InternetQueryOptionW(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1252             &list, &size);
1253     ok(ret == TRUE, "InternetQueryOption should've succeeded\n");
1254     todo_wine ok(list.pOptions[0].Value.dwValue == (PROXY_TYPE_PROXY | PROXY_TYPE_DIRECT),
1255             "Retrieved flags should've been PROXY_TYPE_PROXY | PROXY_TYPE_DIRECT, was: %d\n",
1256             list.pOptions[0].Value.dwValue);
1257     verifyProxyEnable(1);
1258
1259     HeapFree(GetProcessHeap(), 0, list.pOptions);
1260
1261     /* restore original settings */
1262     list.dwOptionCount = 2;
1263     list.pOptions = orig_settings;
1264
1265     ret = InternetSetOptionW(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1266             &list, size);
1267     ok(ret == TRUE, "InternetSetOption should've succeeded\n");
1268
1269     HeapFree(GetProcessHeap(), 0, list.pOptions);
1270 }
1271
1272 static void test_Option_PerConnectionOptionA(void)
1273 {
1274     BOOL ret;
1275     DWORD size = sizeof(INTERNET_PER_CONN_OPTION_LISTA);
1276     INTERNET_PER_CONN_OPTION_LISTA list = {size};
1277     INTERNET_PER_CONN_OPTIONA *orig_settings;
1278     char proxy_srv[] = "proxy.example";
1279
1280     /* get the global IE proxy server info, to restore later */
1281     list.dwOptionCount = 2;
1282     list.pOptions = HeapAlloc(GetProcessHeap(), 0, 2 * sizeof(INTERNET_PER_CONN_OPTIONA));
1283
1284     list.pOptions[0].dwOption = INTERNET_PER_CONN_PROXY_SERVER;
1285     list.pOptions[1].dwOption = INTERNET_PER_CONN_FLAGS;
1286
1287     ret = InternetQueryOptionA(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1288             &list, &size);
1289     ok(ret == TRUE, "InternetQueryOption should've succeeded\n");
1290     orig_settings = list.pOptions;
1291
1292     /* set the global IE proxy server */
1293     list.dwOptionCount = 2;
1294     list.pOptions = HeapAlloc(GetProcessHeap(), 0, 2 * sizeof(INTERNET_PER_CONN_OPTIONA));
1295
1296     list.pOptions[0].dwOption = INTERNET_PER_CONN_PROXY_SERVER;
1297     list.pOptions[0].Value.pszValue = proxy_srv;
1298     list.pOptions[1].dwOption = INTERNET_PER_CONN_FLAGS;
1299     list.pOptions[1].Value.dwValue = PROXY_TYPE_PROXY;
1300
1301     ret = InternetSetOptionA(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1302             &list, size);
1303     ok(ret == TRUE, "InternetSetOption should've succeeded\n");
1304
1305     HeapFree(GetProcessHeap(), 0, list.pOptions);
1306
1307     /* get & verify the global IE proxy server */
1308     list.dwOptionCount = 2;
1309     list.dwOptionError = 0;
1310     list.pOptions = HeapAlloc(GetProcessHeap(), 0, 2 * sizeof(INTERNET_PER_CONN_OPTIONA));
1311
1312     list.pOptions[0].dwOption = INTERNET_PER_CONN_PROXY_SERVER;
1313     list.pOptions[1].dwOption = INTERNET_PER_CONN_FLAGS;
1314
1315     ret = InternetQueryOptionA(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1316             &list, &size);
1317     ok(ret == TRUE, "InternetQueryOption should've succeeded\n");
1318     ok(!lstrcmpA(list.pOptions[0].Value.pszValue, "proxy.example"),
1319             "Retrieved proxy server should've been \"%s\", was: \"%s\"\n",
1320             proxy_srv, list.pOptions[0].Value.pszValue);
1321     ok(list.pOptions[1].Value.dwValue == PROXY_TYPE_PROXY,
1322             "Retrieved flags should've been PROXY_TYPE_PROXY, was: %d\n",
1323             list.pOptions[1].Value.dwValue);
1324
1325     HeapFree(GetProcessHeap(), 0, list.pOptions[0].Value.pszValue);
1326     HeapFree(GetProcessHeap(), 0, list.pOptions);
1327
1328     /* restore original settings */
1329     list.dwOptionCount = 2;
1330     list.pOptions = orig_settings;
1331
1332     ret = InternetSetOptionA(NULL, INTERNET_OPTION_PER_CONNECTION_OPTION,
1333             &list, size);
1334     ok(ret == TRUE, "InternetSetOption should've succeeded\n");
1335
1336     HeapFree(GetProcessHeap(), 0, list.pOptions);
1337 }
1338
1339 #define FLAG_TODO     0x1
1340 #define FLAG_NEEDREQ  0x2
1341 #define FLAG_UNIMPL   0x4
1342
1343 static void test_InternetErrorDlg(void)
1344 {
1345     HINTERNET ses, con, req;
1346     DWORD res, flags;
1347     HWND hwnd;
1348     ULONG i;
1349     static const struct {
1350         DWORD error;
1351         DWORD res;
1352         DWORD test_flags;
1353     } no_ui_res[] = {
1354         { ERROR_INTERNET_INCORRECT_PASSWORD     , ERROR_SUCCESS, FLAG_NEEDREQ },
1355         { ERROR_INTERNET_SEC_CERT_DATE_INVALID  , ERROR_CANCELLED, 0 },
1356         { ERROR_INTERNET_SEC_CERT_CN_INVALID    , ERROR_CANCELLED, 0 },
1357         { ERROR_INTERNET_HTTP_TO_HTTPS_ON_REDIR , ERROR_SUCCESS, 0 },
1358         { ERROR_INTERNET_HTTPS_TO_HTTP_ON_REDIR , ERROR_SUCCESS, FLAG_TODO },
1359         { ERROR_INTERNET_MIXED_SECURITY         , ERROR_CANCELLED, FLAG_TODO },
1360         { ERROR_INTERNET_CHG_POST_IS_NON_SECURE , ERROR_CANCELLED, FLAG_TODO },
1361         { ERROR_INTERNET_POST_IS_NON_SECURE     , ERROR_SUCCESS, 0 },
1362         { ERROR_INTERNET_CLIENT_AUTH_CERT_NEEDED, ERROR_CANCELLED, FLAG_NEEDREQ|FLAG_TODO },
1363         { ERROR_INTERNET_INVALID_CA             , ERROR_CANCELLED, 0 },
1364         { ERROR_INTERNET_HTTPS_HTTP_SUBMIT_REDIR, ERROR_CANCELLED, FLAG_TODO },
1365         { ERROR_INTERNET_INSERT_CDROM           , ERROR_CANCELLED, FLAG_TODO|FLAG_NEEDREQ|FLAG_UNIMPL },
1366         { ERROR_INTERNET_SEC_CERT_ERRORS        , ERROR_CANCELLED, 0 },
1367         { ERROR_INTERNET_SEC_CERT_REV_FAILED    , ERROR_CANCELLED, 0 },
1368         { ERROR_HTTP_COOKIE_NEEDS_CONFIRMATION  , ERROR_HTTP_COOKIE_DECLINED, FLAG_TODO },
1369         { ERROR_INTERNET_BAD_AUTO_PROXY_SCRIPT  , ERROR_CANCELLED, FLAG_TODO },
1370         { ERROR_INTERNET_UNABLE_TO_DOWNLOAD_SCRIPT, ERROR_CANCELLED, FLAG_TODO },
1371         { ERROR_HTTP_REDIRECT_NEEDS_CONFIRMATION, ERROR_CANCELLED, FLAG_TODO },
1372         { ERROR_INTERNET_SEC_CERT_REVOKED       , ERROR_CANCELLED, 0 },
1373         { 0, ERROR_NOT_SUPPORTED }
1374     };
1375
1376     flags = 0;
1377
1378     res = InternetErrorDlg(NULL, NULL, 12055, flags, NULL);
1379     ok(res == ERROR_INVALID_HANDLE, "Got %d\n", res);
1380
1381     ses = InternetOpen(NULL, INTERNET_OPEN_TYPE_DIRECT, NULL, NULL, 0);
1382     ok(ses != 0, "InternetOpen failed: 0x%08x\n", GetLastError());
1383     con = InternetConnect(ses, "www.winehq.org", 80, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
1384     ok(con != 0, "InternetConnect failed: 0x%08x\n", GetLastError());
1385     req = HttpOpenRequest(con, "GET", "/", NULL, NULL, NULL, 0, 0);
1386     ok(req != 0, "HttpOpenRequest failed: 0x%08x\n", GetLastError());
1387
1388     /* NULL hwnd and FLAGS_ERROR_UI_FLAGS_NO_UI not set */
1389     for(i = INTERNET_ERROR_BASE; i < INTERNET_ERROR_LAST; i++)
1390     {
1391         res = InternetErrorDlg(NULL, req, i, flags, NULL);
1392         ok(res == ERROR_INVALID_HANDLE, "Got %d (%d)\n", res, i);
1393     }
1394
1395     hwnd = GetDesktopWindow();
1396     ok(hwnd != NULL, "GetDesktopWindow failed (%d)\n", GetLastError());
1397
1398     flags = FLAGS_ERROR_UI_FLAGS_NO_UI;
1399     for(i = INTERNET_ERROR_BASE; i < INTERNET_ERROR_LAST; i++)
1400     {
1401         DWORD expected, test_flags, j;
1402
1403         for(j = 0; no_ui_res[j].error != 0; ++j)
1404             if(no_ui_res[j].error == i)
1405                 break;
1406
1407         test_flags = no_ui_res[j].test_flags;
1408         expected = no_ui_res[j].res;
1409
1410         /* Try an invalid request handle */
1411         res = InternetErrorDlg(hwnd, (HANDLE)0xdeadbeef, i, flags, NULL);
1412         if(res == ERROR_CALL_NOT_IMPLEMENTED)
1413         {
1414             ok(test_flags & FLAG_UNIMPL, "%i is unexpectedly unimplemented.\n", i);
1415             continue;
1416         }
1417         else
1418             ok(res == ERROR_INVALID_HANDLE, "Got %d (%d)\n", res, i);
1419
1420         /* With a valid req */
1421         if(i == ERROR_INTERNET_NEED_UI)
1422             continue; /* Crashes on windows XP */
1423
1424         if(i == ERROR_INTERNET_SEC_CERT_REVOKED)
1425             continue; /* Interactive (XP, Win7) */
1426
1427         res = InternetErrorDlg(hwnd, req, i, flags, NULL);
1428
1429         /* Handle some special cases */
1430         switch(i)
1431         {
1432         case ERROR_INTERNET_HTTP_TO_HTTPS_ON_REDIR:
1433         case ERROR_INTERNET_HTTPS_TO_HTTP_ON_REDIR:
1434             if(res == ERROR_CANCELLED)
1435             {
1436                 /* Some windows XP, w2k3 x64, W2K8 */
1437                 win_skip("Skipping some tests for %d\n", i);
1438                 continue;
1439             }
1440             break;
1441         case ERROR_INTERNET_FORTEZZA_LOGIN_NEEDED:
1442             if(res != expected)
1443             {
1444                 /* Windows XP, W2K3 */
1445                 ok(res == NTE_PROV_TYPE_NOT_DEF, "Got %d\n", res);
1446                 win_skip("Skipping some tests for %d\n", i);
1447                 continue;
1448             }
1449             break;
1450         default: break;
1451         }
1452
1453         if(test_flags & FLAG_TODO)
1454             todo_wine ok(res == expected, "Got %d, expected %d (%d)\n", res, expected, i);
1455         else
1456             ok(res == expected, "Got %d, expected %d (%d)\n", res, expected, i);
1457
1458         /* Same thing with NULL hwnd */
1459         res = InternetErrorDlg(NULL, req, i, flags, NULL);
1460         if(test_flags & FLAG_TODO)
1461             todo_wine ok(res == expected, "Got %d, expected %d (%d)\n", res, expected, i);
1462         else
1463             ok(res == expected, "Got %d, expected %d (%d)\n", res, expected, i);
1464
1465
1466         /* With a null req */
1467         if(test_flags & FLAG_NEEDREQ)
1468             expected = ERROR_INVALID_PARAMETER;
1469
1470         res = InternetErrorDlg(hwnd, NULL, i, flags, NULL);
1471         if( test_flags & FLAG_TODO || i == ERROR_INTERNET_INCORRECT_PASSWORD)
1472             todo_wine ok(res == expected, "Got %d, expected %d (%d)\n", res, expected, i);
1473         else
1474             ok(res == expected, "Got %d, expected %d (%d)\n", res, expected, i);
1475     }
1476
1477     res = InternetCloseHandle(req);
1478     ok(res == TRUE, "InternetCloseHandle failed: 0x%08x\n", GetLastError());
1479     res = InternetCloseHandle(con);
1480     ok(res == TRUE, "InternetCloseHandle failed: 0x%08x\n", GetLastError());
1481     res = InternetCloseHandle(ses);
1482     ok(res == TRUE, "InternetCloseHandle failed: 0x%08x\n", GetLastError());
1483 }
1484
1485 /* ############################### */
1486
1487 START_TEST(internet)
1488 {
1489     HMODULE hdll;
1490     hdll = GetModuleHandleA("wininet.dll");
1491
1492     pCreateUrlCacheContainerA = (void*)GetProcAddress(hdll, "CreateUrlCacheContainerA");
1493     pCreateUrlCacheContainerW = (void*)GetProcAddress(hdll, "CreateUrlCacheContainerW");
1494     pInternetTimeFromSystemTimeA = (void*)GetProcAddress(hdll, "InternetTimeFromSystemTimeA");
1495     pInternetTimeFromSystemTimeW = (void*)GetProcAddress(hdll, "InternetTimeFromSystemTimeW");
1496     pInternetTimeToSystemTimeA = (void*)GetProcAddress(hdll, "InternetTimeToSystemTimeA");
1497     pInternetTimeToSystemTimeW = (void*)GetProcAddress(hdll, "InternetTimeToSystemTimeW");
1498     pIsDomainLegalCookieDomainW = (void*)GetProcAddress(hdll, (LPCSTR)117);
1499     pPrivacyGetZonePreferenceW = (void*)GetProcAddress(hdll, "PrivacyGetZonePreferenceW");
1500     pPrivacySetZonePreferenceW = (void*)GetProcAddress(hdll, "PrivacySetZonePreferenceW");
1501     pInternetGetCookieExA = (void*)GetProcAddress(hdll, "InternetGetCookieExA");
1502     pInternetGetCookieExW = (void*)GetProcAddress(hdll, "InternetGetCookieExW");
1503
1504     if(!pInternetGetCookieExW) {
1505         win_skip("Too old IE (older than 6.0)\n");
1506         return;
1507     }
1508
1509     test_InternetCanonicalizeUrlA();
1510     test_InternetQueryOptionA();
1511     test_get_cookie();
1512     test_complicated_cookie();
1513     test_cookie_url();
1514     test_version();
1515     test_null();
1516     test_Option_PerConnectionOption();
1517     test_Option_PerConnectionOptionA();
1518     test_InternetErrorDlg();
1519     test_max_conns();
1520
1521     if (!pInternetTimeFromSystemTimeA)
1522         win_skip("skipping the InternetTime tests\n");
1523     else
1524     {
1525         InternetTimeFromSystemTimeA_test();
1526         InternetTimeFromSystemTimeW_test();
1527         InternetTimeToSystemTimeA_test();
1528         InternetTimeToSystemTimeW_test();
1529     }
1530     if (pIsDomainLegalCookieDomainW &&
1531         ((void*)pIsDomainLegalCookieDomainW == (void*)pCreateUrlCacheContainerA ||
1532          (void*)pIsDomainLegalCookieDomainW == (void*)pCreateUrlCacheContainerW))
1533         win_skip("IsDomainLegalCookieDomainW is not available on systems with IE5\n");
1534     else if (!pIsDomainLegalCookieDomainW)
1535         win_skip("IsDomainLegalCookieDomainW (or ordinal 117) is not available\n");
1536     else
1537         test_IsDomainLegalCookieDomainW();
1538
1539     if (pPrivacyGetZonePreferenceW && pPrivacySetZonePreferenceW)
1540         test_PrivacyGetSetZonePreferenceW();
1541     else
1542         win_skip("Privacy[SG]etZonePreferenceW are not available\n");
1543
1544     test_InternetSetOption();
1545 }