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 <string.h>
  23 #include "windef.h"
  24 #include "winbase.h"
  25 #include "wininet.h"
  26 #include "winerror.h"
  27
  28 #include "wine/test.h"
  29
  30 static void InternetQueryOptionA_test(void)
  31 {
  32   HINTERNET hinet,hurl;
  33   DWORD len;
  34   DWORD err;
  35   static const char useragent[] = {"Wininet Test"};
  36   char *buffer;
  37   int retval;
  38
  39   hinet = InternetOpenA(useragent,INTERNET_OPEN_TYPE_DIRECT,NULL,NULL, 0);
  40   ok((hinet != 0x0),"InternetOpen Failed\n");
  41
  42   SetLastError(0xdeadbeef);
  43   len=strlen(useragent)+1;
  44   retval=InternetQueryOptionA(hinet,INTERNET_OPTION_USER_AGENT,NULL,&len);
  45   err=GetLastError();
  46   ok(len == strlen(useragent)+1,"Got wrong user agent length %ld instead of %d\n",len,lstrlenA(useragent));
  47   ok(retval == 0,"Got wrong return value %d\n",retval);
  48   todo_wine ok(err == ERROR_INSUFFICIENT_BUFFER, "Got wrong error code%ld\n",err);
  49
  50   SetLastError(0xdeadbeef);
  51   len=strlen(useragent)+1;
  52   buffer=HeapAlloc(GetProcessHeap(),0,len);
  53   retval=InternetQueryOptionA(hinet,INTERNET_OPTION_USER_AGENT,buffer,&len);
  54   err=GetLastError();
  55   todo_wine ok(!strcmp(useragent,buffer),"Got wrong user agent string %s instead of %s\n",buffer,useragent);
  56   todo_wine ok(len == strlen(useragent),"Got wrong user agent length %ld instead of %d\n",len,lstrlenA(useragent));
  57   todo_wine ok(retval == 1,"Got wrong return value %d\n",retval);
  58   ok(err == 0xdeadbeef, "Got wrong error code %ld\n",err);
  59   HeapFree(GetProcessHeap(),0,buffer);
  60
  61   SetLastError(0xdeadbeef);
  62   len=0;
  63   buffer=HeapAlloc(GetProcessHeap(),0,100);
  64   retval=InternetQueryOptionA(hinet,INTERNET_OPTION_USER_AGENT,buffer,&len);
  65   err=GetLastError();
  66   todo_wine ok(len == strlen(useragent) + 1,"Got wrong user agent length %ld instead of %d\n", len, lstrlenA(useragent) + 1);
  67   ok(!retval, "Got wrong return value %d\n", retval);
  68   todo_wine ok(err == ERROR_INSUFFICIENT_BUFFER, "Got wrong error code %ld\n", err);
  69   HeapFree(GetProcessHeap(),0,buffer);
  70
  71   hurl = InternetConnectA(hinet,"www.winehq.com",INTERNET_DEFAULT_HTTP_PORT,NULL,NULL,INTERNET_SERVICE_HTTP,0,0);
  72
  73   SetLastError(0xdeadbeef);
  74   len=0;
  75   retval = InternetQueryOptionA(hurl,INTERNET_OPTION_USER_AGENT,NULL,&len);
  76   err=GetLastError();
  77   ok(len == 0,"Got wrong user agent length %ld instead of 0\n",len);
  78   ok(retval == 0,"Got wrong return value %d\n",retval);
  79   todo_wine ok(err == ERROR_INTERNET_INCORRECT_HANDLE_TYPE, "Got wrong error code %ld\n",err);
  80
  81   InternetCloseHandle(hurl);
  82   InternetCloseHandle(hinet);
  83
  84   hinet = InternetOpenA("",INTERNET_OPEN_TYPE_DIRECT,NULL,NULL, 0);
  85   ok((hinet != 0x0),"InternetOpen Failed\n");
  86
  87   SetLastError(0xdeadbeef);
  88   len=0;
  89   retval=InternetQueryOptionA(hinet,INTERNET_OPTION_USER_AGENT,NULL,&len);
  90   err=GetLastError();
  91   todo_wine ok(len == 1,"Got wrong user agent length %ld instead of %d\n",len,1);
  92   ok(retval == 0,"Got wrong return value %d\n",retval);
  93   todo_wine ok(err == ERROR_INSUFFICIENT_BUFFER, "Got wrong error code%ld\n",err);
  94
  95   InternetCloseHandle(hinet);
  96
  97   hinet = InternetOpenA(NULL,INTERNET_OPEN_TYPE_DIRECT,NULL,NULL, 0);
  98   ok((hinet != 0x0),"InternetOpen Failed\n");
  99   SetLastError(0xdeadbeef);
 100   len=0;
 101   retval=InternetQueryOptionA(hinet,INTERNET_OPTION_USER_AGENT,NULL,&len);
 102   err=GetLastError();
 103   todo_wine ok(len == 1,"Got wrong user agent length %ld instead of %d\n",len,1);
 104   ok(retval == 0,"Got wrong return value %d\n",retval);
 105   todo_wine ok(err == ERROR_INSUFFICIENT_BUFFER, "Got wrong error code%ld\n",err);
 106
 107   InternetCloseHandle(hinet);
 108 }
 109
 110 static void test_get_cookie(void)
 111 {
 112   DWORD len;
 113   BOOL ret;
 114
 115   SetLastError(0xdeadbeef);
 116   ret = InternetGetCookie("http://www.example.com", NULL, NULL, &len);
 117   ok(!ret && GetLastError() == ERROR_NO_MORE_ITEMS,
 118     "InternetGetCookie should have failed with %s and error %ld\n",
 119     ret ? "TRUE" : "FALSE", GetLastError());
 120 }
 121
 122 static void test_null(void)
 123 {
 124   HINTERNET hi, hc;
 125   static const WCHAR szServer[] = { 's','e','r','v','e','r',0 };
 126   static const WCHAR szEmpty[] = { 0 };
 127   static const WCHAR szUrl[] = { 'h','t','t','p',':','/','/','a','.','b','.','c',0 };
 128   static const WCHAR szExpect[] = { 's','e','r','v','e','r',';',' ','s','e','r','v','e','r',0 };
 129   WCHAR buffer[0x20];
 130   BOOL r;
 131   DWORD sz;
 132
 133   hi = InternetOpenW(NULL, 0, NULL, NULL, 0);
 134   ok(hi != NULL, "open failed\n");
 135
 136   hc = InternetConnectW(hi, NULL, 0, NULL, NULL, 0, 0, 0);
 137   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 138   ok(hc == NULL, "connect failed\n");
 139
 140   hc = InternetConnectW(hi, NULL, 0, NULL, NULL, INTERNET_SERVICE_HTTP, 0, 0);
 141   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 142   ok(hc == NULL, "connect failed\n");
 143
 144   hc = InternetConnectW(hi, NULL, 0, NULL, NULL, INTERNET_SERVICE_FTP, 0, 0);
 145   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 146   ok(hc == NULL, "connect failed\n");
 147
 148   hc = InternetConnectW(NULL, szServer, 0, NULL, NULL, INTERNET_SERVICE_FTP, 0, 0);
 149   ok(GetLastError() == ERROR_INVALID_HANDLE, "wrong error\n");
 150   ok(hc == NULL, "connect failed\n");
 151
 152   hc = InternetOpenUrlW(hi, NULL, NULL, 0, 0, 0);
 153   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 154   ok(hc == NULL, "connect failed\n");
 155
 156   hc = InternetOpenUrlW(hi, szServer, NULL, 0, 0, 0);
 157   ok(GetLastError() == ERROR_INTERNET_UNRECOGNIZED_SCHEME, "wrong error\n");
 158   ok(hc == NULL, "connect failed\n");
 159
 160   InternetCloseHandle(hi);
 161
 162   r = InternetSetCookieW(NULL, NULL, NULL);
 163   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 164   ok(r == FALSE, "return wrong\n");
 165
 166   r = InternetSetCookieW(szServer, NULL, NULL);
 167   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 168   ok(r == FALSE, "return wrong\n");
 169
 170   r = InternetSetCookieW(szUrl, szServer, NULL);
 171   ok(GetLastError() == ERROR_INVALID_PARAMETER, "wrong error\n");
 172   ok(r == FALSE, "return wrong\n");
 173
 174   r = InternetSetCookieW(szUrl, szServer, szServer);
 175   ok(r == TRUE, "return wrong\n");
 176
 177   todo_wine {
 178   r = InternetSetCookieW(szUrl, NULL, szServer);
 179   ok(r == TRUE, "return wrong\n");
 180   }
 181
 182   r = InternetSetCookieW(szUrl, szServer, szEmpty);
 183   ok(r == TRUE, "return wrong\n");
 184
 185   r = InternetSetCookieW(szServer, NULL, szServer);
 186   todo_wine {
 187   ok(GetLastError() == ERROR_INTERNET_UNRECOGNIZED_SCHEME, "wrong error\n");
 188   }
 189   ok(r == FALSE, "return wrong\n");
 190
 191   sz = 0;
 192   r = InternetGetCookieW(NULL, NULL, NULL, &sz);
 193   ok(GetLastError() == ERROR_INTERNET_UNRECOGNIZED_SCHEME, "wrong error\n");
 194   ok( r == FALSE, "return wrong\n");
 195
 196   r = InternetGetCookieW(szServer, NULL, NULL, &sz);
 197   todo_wine {
 198   ok(GetLastError() == ERROR_INTERNET_UNRECOGNIZED_SCHEME, "wrong error\n");
 199   }
 200   ok( r == FALSE, "return wrong\n");
 201
 202   sz = 0;
 203   r = InternetGetCookieW(szUrl, szServer, NULL, &sz);
 204   ok( r == TRUE, "return wrong\n");
 205   todo_wine {
 206   ok( sz == 30, "sz wrong\n");
 207   }
 208
 209   sz = 0x20;
 210   memset(buffer, 0, sizeof buffer);
 211   r = InternetGetCookieW(szUrl, szServer, buffer, &sz);
 212   ok( r == TRUE, "return wrong\n");
 213   todo_wine {
 214   ok( sz == lstrlenW(buffer), "sz wrong\n");
 215   ok( !lstrcmpW(szExpect, buffer), "cookie data wrong\n");
 216   }
 217 }
 218
 219 START_TEST(internet)
 220 {
 221   InternetQueryOptionA_test();
 222   test_get_cookie();
 223   test_null();
 224 }