1162 lines
46 KiB
C
1162 lines
46 KiB
C
/*
|
|
* Wininet - Http tests
|
|
*
|
|
* Copyright 2002 Aric Stewart
|
|
* Copyright 2004 Mike McCormack
|
|
* Copyright 2005 Hans Leidekker
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
*/
|
|
|
|
#include <stdarg.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "wininet.h"
|
|
|
|
#include "wine/test.h"
|
|
|
|
#define TEST_URL "http://www.winehq.org/site/about"
|
|
#define TEST_URL_PATH "/site/about"
|
|
#define TEST_URL2 "http://www.myserver.com/myscript.php?arg=1"
|
|
#define TEST_URL2_SERVER "www.myserver.com"
|
|
#define TEST_URL2_PATH "/myscript.php"
|
|
#define TEST_URL2_PATHEXTRA "/myscript.php?arg=1"
|
|
#define TEST_URL2_EXTRA "?arg=1"
|
|
#define TEST_URL3 "file:///C:/Program%20Files/Atmel/AVR%20Tools/STK500/STK500.xml"
|
|
|
|
#define CREATE_URL1 "http://username:password@www.winehq.org/site/about"
|
|
#define CREATE_URL2 "http://username@www.winehq.org/site/about"
|
|
#define CREATE_URL3 "http://username:"
|
|
#define CREATE_URL4 "http://www.winehq.org/site/about"
|
|
#define CREATE_URL5 "http://"
|
|
#define CREATE_URL6 "nhtt://username:password@www.winehq.org:80/site/about"
|
|
#define CREATE_URL7 "http://username:password@www.winehq.org:42/site/about"
|
|
|
|
static HANDLE hCompleteEvent;
|
|
|
|
static VOID WINAPI callback(
|
|
HINTERNET hInternet,
|
|
DWORD dwContext,
|
|
DWORD dwInternetStatus,
|
|
LPVOID lpvStatusInformation,
|
|
DWORD dwStatusInformationLength
|
|
)
|
|
{
|
|
switch (dwInternetStatus)
|
|
{
|
|
case INTERNET_STATUS_RESOLVING_NAME:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_RESOLVING_NAME \"%s\" %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
(LPCSTR)lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_NAME_RESOLVED:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_NAME_RESOLVED \"%s\" %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
(LPCSTR)lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_CONNECTING_TO_SERVER:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_CONNECTING_TO_SERVER \"%s\" %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
(LPCSTR)lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_CONNECTED_TO_SERVER:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_CONNECTED_TO_SERVER \"%s\" %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
(LPCSTR)lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_SENDING_REQUEST:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_SENDING_REQUEST %p %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_REQUEST_SENT:
|
|
ok(dwStatusInformationLength == sizeof(DWORD),
|
|
"info length should be sizeof(DWORD) instead of %ld\n",
|
|
dwStatusInformationLength);
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_REQUEST_SENT 0x%lx %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
*(DWORD *)lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_RECEIVING_RESPONSE:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_RECEIVING_RESPONSE %p %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_RESPONSE_RECEIVED:
|
|
ok(dwStatusInformationLength == sizeof(DWORD),
|
|
"info length should be sizeof(DWORD) instead of %ld\n",
|
|
dwStatusInformationLength);
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_RESPONSE_RECEIVED 0x%lx %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
*(DWORD *)lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_CTL_RESPONSE_RECEIVED:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_CTL_RESPONSE_RECEIVED %p %ld\n",
|
|
GetCurrentThreadId(), hInternet,dwContext,
|
|
lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_PREFETCH:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_PREFETCH %p %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_CLOSING_CONNECTION:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_CLOSING_CONNECTION %p %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_CONNECTION_CLOSED:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_CONNECTION_CLOSED %p %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_HANDLE_CREATED:
|
|
ok(dwStatusInformationLength == sizeof(HINTERNET),
|
|
"info length should be sizeof(HINTERNET) instead of %ld\n",
|
|
dwStatusInformationLength);
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_HANDLE_CREATED %p %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
*(HINTERNET *)lpvStatusInformation,dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_HANDLE_CLOSING:
|
|
ok(dwStatusInformationLength == sizeof(HINTERNET),
|
|
"info length should be sizeof(HINTERNET) instead of %ld\n",
|
|
dwStatusInformationLength);
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_HANDLE_CLOSING %p %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
*(HINTERNET *)lpvStatusInformation, dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_REQUEST_COMPLETE:
|
|
{
|
|
INTERNET_ASYNC_RESULT *iar = (INTERNET_ASYNC_RESULT *)lpvStatusInformation;
|
|
ok(dwStatusInformationLength == sizeof(INTERNET_ASYNC_RESULT),
|
|
"info length should be sizeof(INTERNET_ASYNC_RESULT) instead of %ld\n",
|
|
dwStatusInformationLength);
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_REQUEST_COMPLETE {%ld,%ld} %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
iar->dwResult,iar->dwError,dwStatusInformationLength);
|
|
SetEvent(hCompleteEvent);
|
|
break;
|
|
}
|
|
case INTERNET_STATUS_REDIRECT:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_REDIRECT \"%s\" %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
(LPCSTR)lpvStatusInformation, dwStatusInformationLength);
|
|
break;
|
|
case INTERNET_STATUS_INTERMEDIATE_RESPONSE:
|
|
trace("%04lx:Callback %p 0x%lx INTERNET_STATUS_INTERMEDIATE_RESPONSE %p %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext,
|
|
lpvStatusInformation, dwStatusInformationLength);
|
|
break;
|
|
default:
|
|
trace("%04lx:Callback %p 0x%lx %ld %p %ld\n",
|
|
GetCurrentThreadId(), hInternet, dwContext, dwInternetStatus,
|
|
lpvStatusInformation, dwStatusInformationLength);
|
|
}
|
|
}
|
|
|
|
static void InternetReadFile_test(int flags)
|
|
{
|
|
DWORD rc;
|
|
CHAR buffer[4000];
|
|
DWORD length;
|
|
DWORD out;
|
|
const char *types[2] = { "*", NULL };
|
|
HINTERNET hi, hic = 0, hor = 0;
|
|
|
|
hCompleteEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
|
|
|
|
trace("Starting InternetReadFile test with flags 0x%x\n",flags);
|
|
|
|
trace("InternetOpenA <--\n");
|
|
hi = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, flags);
|
|
ok((hi != 0x0),"InternetOpen failed with error %ld\n", GetLastError());
|
|
trace("InternetOpenA -->\n");
|
|
|
|
if (hi == 0x0) goto abort;
|
|
|
|
InternetSetStatusCallback(hi,&callback);
|
|
|
|
trace("InternetConnectA <--\n");
|
|
hic=InternetConnectA(hi, "www.winehq.org", INTERNET_INVALID_PORT_NUMBER,
|
|
NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
|
|
ok((hic != 0x0),"InternetConnect failed with error %ld\n", GetLastError());
|
|
trace("InternetConnectA -->\n");
|
|
|
|
if (hic == 0x0) goto abort;
|
|
|
|
trace("HttpOpenRequestA <--\n");
|
|
hor = HttpOpenRequestA(hic, "GET", "/about/", NULL, NULL, types,
|
|
INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
|
|
0xdeadbead);
|
|
if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
|
|
/*
|
|
* If the internet name can't be resolved we are probably behind
|
|
* a firewall or in some other way not directly connected to the
|
|
* Internet. Not enough reason to fail the test. Just ignore and
|
|
* abort.
|
|
*/
|
|
} else {
|
|
ok((hor != 0x0),"HttpOpenRequest failed with error %ld\n", GetLastError());
|
|
}
|
|
trace("HttpOpenRequestA -->\n");
|
|
|
|
if (hor == 0x0) goto abort;
|
|
|
|
trace("HttpSendRequestA -->\n");
|
|
SetLastError(0xdeadbeef);
|
|
rc = HttpSendRequestA(hor, "", -1, NULL, 0);
|
|
if (flags & INTERNET_FLAG_ASYNC)
|
|
ok(((rc == 0)&&(GetLastError() == ERROR_IO_PENDING)),
|
|
"Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
|
|
else
|
|
ok((rc != 0) || GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED,
|
|
"Synchronous HttpSendRequest returning 0, error %ld\n", GetLastError());
|
|
trace("HttpSendRequestA <--\n");
|
|
|
|
if (flags & INTERNET_FLAG_ASYNC)
|
|
WaitForSingleObject(hCompleteEvent, INFINITE);
|
|
|
|
length = 4;
|
|
rc = InternetQueryOptionA(hor,INTERNET_OPTION_REQUEST_FLAGS,&out,&length);
|
|
trace("Option 0x17 -> %li %li\n",rc,out);
|
|
|
|
length = 100;
|
|
rc = InternetQueryOptionA(hor,INTERNET_OPTION_URL,buffer,&length);
|
|
trace("Option 0x22 -> %li %s\n",rc,buffer);
|
|
|
|
length = 4000;
|
|
rc = HttpQueryInfoA(hor,HTTP_QUERY_RAW_HEADERS,buffer,&length,0x0);
|
|
buffer[length]=0;
|
|
trace("Option 0x16 -> %li %s\n",rc,buffer);
|
|
|
|
length = 4000;
|
|
rc = InternetQueryOptionA(hor,INTERNET_OPTION_URL,buffer,&length);
|
|
buffer[length]=0;
|
|
trace("Option 0x22 -> %li %s\n",rc,buffer);
|
|
|
|
length = 16;
|
|
rc = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_LENGTH,&buffer,&length,0x0);
|
|
trace("Option 0x5 -> %li %s (%li)\n",rc,buffer,GetLastError());
|
|
|
|
length = 100;
|
|
rc = HttpQueryInfoA(hor,HTTP_QUERY_CONTENT_TYPE,buffer,&length,0x0);
|
|
buffer[length]=0;
|
|
trace("Option 0x1 -> %li %s\n",rc,buffer);
|
|
|
|
SetLastError(0xdeadbeef);
|
|
rc = InternetReadFile(NULL, buffer, 100, &length);
|
|
ok(!rc, "InternetReadFile should have failed\n");
|
|
ok(GetLastError() == ERROR_INVALID_HANDLE,
|
|
"InternetReadFile should have set last error to ERROR_INVALID_HANDLE instead of %ld\n",
|
|
GetLastError());
|
|
|
|
length = 100;
|
|
trace("Entering Query loop\n");
|
|
|
|
while (length)
|
|
{
|
|
rc = InternetQueryDataAvailable(hor,&length,0x0,0x0);
|
|
ok(!(rc == 0 && length != 0),"InternetQueryDataAvailable failed\n");
|
|
|
|
if (length)
|
|
{
|
|
char *buffer;
|
|
buffer = HeapAlloc(GetProcessHeap(),0,length+1);
|
|
|
|
rc = InternetReadFile(hor,buffer,length,&length);
|
|
|
|
buffer[length]=0;
|
|
|
|
trace("ReadFile -> %li %li\n",rc,length);
|
|
|
|
HeapFree(GetProcessHeap(),0,buffer);
|
|
}
|
|
}
|
|
abort:
|
|
if (hor != 0x0) {
|
|
SetLastError(0xdeadbeef);
|
|
rc = InternetCloseHandle(hor);
|
|
ok ((rc != 0), "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
|
|
SetLastError(0xdeadbeef);
|
|
rc = InternetCloseHandle(hor);
|
|
ok ((rc == 0), "Double close of handle opened by HttpOpenRequestA succeeded\n");
|
|
ok (GetLastError() == ERROR_INVALID_HANDLE,
|
|
"Double close of handle should have set ERROR_INVALID_HANDLE instead of %ld\n",
|
|
GetLastError());
|
|
}
|
|
if (hic != 0x0) {
|
|
rc = InternetCloseHandle(hic);
|
|
ok ((rc != 0), "InternetCloseHandle of handle opened by InternetConnectA failed\n");
|
|
}
|
|
if (hi != 0x0) {
|
|
rc = InternetCloseHandle(hi);
|
|
ok ((rc != 0), "InternetCloseHandle of handle opened by InternetOpenA failed\n");
|
|
if (flags & INTERNET_FLAG_ASYNC)
|
|
Sleep(100);
|
|
}
|
|
CloseHandle(hCompleteEvent);
|
|
}
|
|
|
|
static void InternetReadFileExA_test(int flags)
|
|
{
|
|
DWORD rc;
|
|
DWORD length;
|
|
const char *types[2] = { "*", NULL };
|
|
HINTERNET hi, hic = 0, hor = 0;
|
|
INTERNET_BUFFERS inetbuffers;
|
|
|
|
hCompleteEvent = CreateEvent(NULL, FALSE, FALSE, NULL);
|
|
|
|
trace("Starting InternetReadFileExA test with flags 0x%x\n",flags);
|
|
|
|
trace("InternetOpenA <--\n");
|
|
hi = InternetOpenA("", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, flags);
|
|
ok((hi != 0x0),"InternetOpen failed with error %ld\n", GetLastError());
|
|
trace("InternetOpenA -->\n");
|
|
|
|
if (hi == 0x0) goto abort;
|
|
|
|
InternetSetStatusCallback(hi,&callback);
|
|
|
|
trace("InternetConnectA <--\n");
|
|
hic=InternetConnectA(hi, "www.winehq.org", INTERNET_INVALID_PORT_NUMBER,
|
|
NULL, NULL, INTERNET_SERVICE_HTTP, 0x0, 0xdeadbeef);
|
|
ok((hic != 0x0),"InternetConnect failed with error %ld\n", GetLastError());
|
|
trace("InternetConnectA -->\n");
|
|
|
|
if (hic == 0x0) goto abort;
|
|
|
|
trace("HttpOpenRequestA <--\n");
|
|
hor = HttpOpenRequestA(hic, "GET", "/about/", NULL, NULL, types,
|
|
INTERNET_FLAG_KEEP_CONNECTION | INTERNET_FLAG_RESYNCHRONIZE,
|
|
0xdeadbead);
|
|
if (hor == 0x0 && GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED) {
|
|
/*
|
|
* If the internet name can't be resolved we are probably behind
|
|
* a firewall or in some other way not directly connected to the
|
|
* Internet. Not enough reason to fail the test. Just ignore and
|
|
* abort.
|
|
*/
|
|
} else {
|
|
ok((hor != 0x0),"HttpOpenRequest failed with error %ld\n", GetLastError());
|
|
}
|
|
trace("HttpOpenRequestA -->\n");
|
|
|
|
if (hor == 0x0) goto abort;
|
|
|
|
trace("HttpSendRequestA -->\n");
|
|
SetLastError(0xdeadbeef);
|
|
rc = HttpSendRequestA(hor, "", -1, NULL, 0);
|
|
if (flags & INTERNET_FLAG_ASYNC)
|
|
ok(((rc == 0)&&(GetLastError() == ERROR_IO_PENDING)),
|
|
"Asynchronous HttpSendRequest NOT returning 0 with error ERROR_IO_PENDING\n");
|
|
else
|
|
ok((rc != 0) || GetLastError() == ERROR_INTERNET_NAME_NOT_RESOLVED,
|
|
"Synchronous HttpSendRequest returning 0, error %ld\n", GetLastError());
|
|
trace("HttpSendRequestA <--\n");
|
|
|
|
if (!rc && (GetLastError() == ERROR_IO_PENDING))
|
|
WaitForSingleObject(hCompleteEvent, INFINITE);
|
|
|
|
/* tests invalid dwStructSize */
|
|
inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS)+1;
|
|
inetbuffers.lpcszHeader = NULL;
|
|
inetbuffers.dwHeadersLength = 0;
|
|
inetbuffers.dwBufferLength = 10;
|
|
inetbuffers.lpvBuffer = HeapAlloc(GetProcessHeap(), 0, 10);
|
|
inetbuffers.dwOffsetHigh = 1234;
|
|
inetbuffers.dwOffsetLow = 5678;
|
|
rc = InternetReadFileEx(hor, &inetbuffers, 0, 0xdeadcafe);
|
|
ok(!rc && (GetLastError() == ERROR_INVALID_PARAMETER),
|
|
"InternetReadFileEx should have failed with ERROR_INVALID_PARAMETER instead of %s, %ld\n",
|
|
rc ? "TRUE" : "FALSE", GetLastError());
|
|
HeapFree(GetProcessHeap(), 0, inetbuffers.lpvBuffer);
|
|
|
|
/* tests to see whether lpcszHeader is used - it isn't */
|
|
inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS);
|
|
inetbuffers.lpcszHeader = (LPCTSTR)0xdeadbeef;
|
|
inetbuffers.dwHeadersLength = 255;
|
|
inetbuffers.dwBufferLength = 0;
|
|
inetbuffers.lpvBuffer = NULL;
|
|
inetbuffers.dwOffsetHigh = 1234;
|
|
inetbuffers.dwOffsetLow = 5678;
|
|
rc = InternetReadFileEx(hor, &inetbuffers, 0, 0xdeadcafe);
|
|
ok(rc, "InternetReadFileEx failed with error %ld\n", GetLastError());
|
|
|
|
rc = InternetReadFileEx(NULL, &inetbuffers, 0, 0xdeadcafe);
|
|
ok(!rc && (GetLastError() == ERROR_INVALID_HANDLE),
|
|
"InternetReadFileEx should have failed with ERROR_INVALID_HANDLE instead of %s, %ld\n",
|
|
rc ? "TRUE" : "FALSE", GetLastError());
|
|
|
|
length = 0;
|
|
trace("Entering Query loop\n");
|
|
|
|
while (TRUE)
|
|
{
|
|
inetbuffers.dwStructSize = sizeof(INTERNET_BUFFERS);
|
|
inetbuffers.dwBufferLength = 1024;
|
|
inetbuffers.lpvBuffer = HeapAlloc(GetProcessHeap(), 0, inetbuffers.dwBufferLength+1);
|
|
inetbuffers.dwOffsetHigh = 1234;
|
|
inetbuffers.dwOffsetLow = 5678;
|
|
|
|
rc = InternetReadFileExA(hor, &inetbuffers, IRF_ASYNC | IRF_USE_CONTEXT, 0xcafebabe);
|
|
if (!rc)
|
|
{
|
|
if (GetLastError() == ERROR_IO_PENDING)
|
|
{
|
|
trace("InternetReadFileEx -> PENDING\n");
|
|
WaitForSingleObject(hCompleteEvent, INFINITE);
|
|
}
|
|
else
|
|
{
|
|
trace("InternetReadFileEx -> FAILED %ld\n", GetLastError());
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
trace("InternetReadFileEx -> SUCCEEDED\n");
|
|
|
|
trace("read %li bytes\n", inetbuffers.dwBufferLength);
|
|
((char *)inetbuffers.lpvBuffer)[inetbuffers.dwBufferLength] = '\0';
|
|
|
|
ok(inetbuffers.dwOffsetHigh == 1234 && inetbuffers.dwOffsetLow == 5678,
|
|
"InternetReadFileEx sets offsets to 0x%lx%08lx\n",
|
|
inetbuffers.dwOffsetHigh, inetbuffers.dwOffsetLow);
|
|
|
|
HeapFree(GetProcessHeap(), 0, inetbuffers.lpvBuffer);
|
|
|
|
if (!inetbuffers.dwBufferLength)
|
|
break;
|
|
|
|
length += inetbuffers.dwBufferLength;
|
|
}
|
|
trace("Finished. Read %ld bytes\n", length);
|
|
|
|
abort:
|
|
if (hor) {
|
|
rc = InternetCloseHandle(hor);
|
|
ok ((rc != 0), "InternetCloseHandle of handle opened by HttpOpenRequestA failed\n");
|
|
rc = InternetCloseHandle(hor);
|
|
ok ((rc == 0), "Double close of handle opened by HttpOpenRequestA succeeded\n");
|
|
}
|
|
if (hic) {
|
|
rc = InternetCloseHandle(hic);
|
|
ok ((rc != 0), "InternetCloseHandle of handle opened by InternetConnectA failed\n");
|
|
}
|
|
if (hi) {
|
|
rc = InternetCloseHandle(hi);
|
|
ok ((rc != 0), "InternetCloseHandle of handle opened by InternetOpenA failed\n");
|
|
if (flags & INTERNET_FLAG_ASYNC)
|
|
Sleep(100);
|
|
}
|
|
CloseHandle(hCompleteEvent);
|
|
}
|
|
|
|
static void InternetOpenUrlA_test(void)
|
|
{
|
|
HINTERNET myhinternet, myhttp;
|
|
char buffer[0x400];
|
|
URL_COMPONENTSA urlComponents;
|
|
char protocol[32], hostName[1024], userName[1024];
|
|
char password[1024], extra[1024], path[1024];
|
|
DWORD size, readbytes, totalbytes=0;
|
|
BOOL ret;
|
|
|
|
myhinternet = InternetOpen("Winetest",0,NULL,NULL,INTERNET_FLAG_NO_CACHE_WRITE);
|
|
ok((myhinternet != 0), "InternetOpen failed, error %lx\n",GetLastError());
|
|
size = 0x400;
|
|
ret = InternetCanonicalizeUrl(TEST_URL, buffer, &size,ICU_BROWSER_MODE);
|
|
ok( ret, "InternetCanonicalizeUrl failed, error %lx\n",GetLastError());
|
|
|
|
urlComponents.dwStructSize = sizeof(URL_COMPONENTSA);
|
|
urlComponents.lpszScheme = protocol;
|
|
urlComponents.dwSchemeLength = 32;
|
|
urlComponents.lpszHostName = hostName;
|
|
urlComponents.dwHostNameLength = 1024;
|
|
urlComponents.lpszUserName = userName;
|
|
urlComponents.dwUserNameLength = 1024;
|
|
urlComponents.lpszPassword = password;
|
|
urlComponents.dwPasswordLength = 1024;
|
|
urlComponents.lpszUrlPath = path;
|
|
urlComponents.dwUrlPathLength = 2048;
|
|
urlComponents.lpszExtraInfo = extra;
|
|
urlComponents.dwExtraInfoLength = 1024;
|
|
ret = InternetCrackUrl(TEST_URL, 0,0,&urlComponents);
|
|
ok( ret, "InternetCrackUrl failed, error %lx\n",GetLastError());
|
|
SetLastError(0);
|
|
myhttp = InternetOpenUrl(myhinternet, TEST_URL, 0, 0,
|
|
INTERNET_FLAG_RELOAD|INTERNET_FLAG_NO_CACHE_WRITE|INTERNET_FLAG_TRANSFER_BINARY,0);
|
|
if (GetLastError() == 12007)
|
|
return; /* WinXP returns this when not connected to the net */
|
|
ok((myhttp != 0),"InternetOpenUrl failed, error %lx\n",GetLastError());
|
|
ret = InternetReadFile(myhttp, buffer,0x400,&readbytes);
|
|
ok( ret, "InternetReadFile failed, error %lx\n",GetLastError());
|
|
totalbytes += readbytes;
|
|
while (readbytes && InternetReadFile(myhttp, buffer,0x400,&readbytes))
|
|
totalbytes += readbytes;
|
|
trace("read 0x%08lx bytes\n",totalbytes);
|
|
}
|
|
|
|
static inline void copy_compsA(
|
|
URL_COMPONENTSA *src,
|
|
URL_COMPONENTSA *dst,
|
|
DWORD scheLen,
|
|
DWORD hostLen,
|
|
DWORD userLen,
|
|
DWORD passLen,
|
|
DWORD pathLen,
|
|
DWORD extrLen )
|
|
{
|
|
*dst = *src;
|
|
dst->dwSchemeLength = scheLen;
|
|
dst->dwHostNameLength = hostLen;
|
|
dst->dwUserNameLength = userLen;
|
|
dst->dwPasswordLength = passLen;
|
|
dst->dwUrlPathLength = pathLen;
|
|
dst->dwExtraInfoLength = extrLen;
|
|
SetLastError(0xfaceabad);
|
|
}
|
|
|
|
static inline void zero_compsA(
|
|
URL_COMPONENTSA *dst,
|
|
DWORD scheLen,
|
|
DWORD hostLen,
|
|
DWORD userLen,
|
|
DWORD passLen,
|
|
DWORD pathLen,
|
|
DWORD extrLen )
|
|
{
|
|
ZeroMemory(dst, sizeof(URL_COMPONENTSA));
|
|
dst->dwStructSize = sizeof(URL_COMPONENTSA);
|
|
dst->dwSchemeLength = scheLen;
|
|
dst->dwHostNameLength = hostLen;
|
|
dst->dwUserNameLength = userLen;
|
|
dst->dwPasswordLength = passLen;
|
|
dst->dwUrlPathLength = pathLen;
|
|
dst->dwExtraInfoLength = extrLen;
|
|
SetLastError(0xfaceabad);
|
|
}
|
|
|
|
static void InternetCrackUrl_test(void)
|
|
{
|
|
URL_COMPONENTSA urlSrc, urlComponents;
|
|
char protocol[32], hostName[1024], userName[1024];
|
|
char password[1024], extra[1024], path[1024];
|
|
BOOL ret;
|
|
DWORD GLE;
|
|
|
|
ZeroMemory(&urlSrc, sizeof(urlSrc));
|
|
urlSrc.dwStructSize = sizeof(urlSrc);
|
|
urlSrc.lpszScheme = protocol;
|
|
urlSrc.lpszHostName = hostName;
|
|
urlSrc.lpszUserName = userName;
|
|
urlSrc.lpszPassword = password;
|
|
urlSrc.lpszUrlPath = path;
|
|
urlSrc.lpszExtraInfo = extra;
|
|
|
|
copy_compsA(&urlSrc, &urlComponents, 32, 1024, 1024, 1024, 2048, 1024);
|
|
ret = InternetCrackUrl(TEST_URL, 0,0,&urlComponents);
|
|
ok( ret, "InternetCrackUrl failed, error %lx\n",GetLastError());
|
|
ok((strcmp(TEST_URL_PATH,path) == 0),"path cracked wrong\n");
|
|
|
|
/* Bug 1805: Confirm the returned lengths are correct: */
|
|
/* 1. When extra info split out explicitly */
|
|
zero_compsA(&urlComponents, 0, 1, 0, 0, 1, 1);
|
|
ok(InternetCrackUrlA(TEST_URL2, 0, 0, &urlComponents),"InternetCrackUrl failed, error 0x%lx\n", GetLastError());
|
|
ok(urlComponents.dwUrlPathLength == strlen(TEST_URL2_PATH),".dwUrlPathLength should be %ld, but is %ld\n", (DWORD)strlen(TEST_URL2_PATH), urlComponents.dwUrlPathLength);
|
|
ok(!strncmp(urlComponents.lpszUrlPath,TEST_URL2_PATH,strlen(TEST_URL2_PATH)),"lpszUrlPath should be %s but is %s\n", TEST_URL2_PATH, urlComponents.lpszUrlPath);
|
|
ok(urlComponents.dwHostNameLength == strlen(TEST_URL2_SERVER),".dwHostNameLength should be %ld, but is %ld\n", (DWORD)strlen(TEST_URL2_SERVER), urlComponents.dwHostNameLength);
|
|
ok(!strncmp(urlComponents.lpszHostName,TEST_URL2_SERVER,strlen(TEST_URL2_SERVER)),"lpszHostName should be %s but is %s\n", TEST_URL2_SERVER, urlComponents.lpszHostName);
|
|
ok(urlComponents.dwExtraInfoLength == strlen(TEST_URL2_EXTRA),".dwExtraInfoLength should be %ld, but is %ld\n", (DWORD)strlen(TEST_URL2_EXTRA), urlComponents.dwExtraInfoLength);
|
|
ok(!strncmp(urlComponents.lpszExtraInfo,TEST_URL2_EXTRA,strlen(TEST_URL2_EXTRA)),"lpszExtraInfo should be %s but is %s\n", TEST_URL2_EXTRA, urlComponents.lpszHostName);
|
|
|
|
/* 2. When extra info is not split out explicitly and is in url path */
|
|
zero_compsA(&urlComponents, 0, 1, 0, 0, 1, 0);
|
|
ok(InternetCrackUrlA(TEST_URL2, 0, 0, &urlComponents),"InternetCrackUrl failed with GLE 0x%lx\n",GetLastError());
|
|
ok(urlComponents.dwUrlPathLength == strlen(TEST_URL2_PATHEXTRA),".dwUrlPathLength should be %ld, but is %ld\n", (DWORD)strlen(TEST_URL2_PATHEXTRA), urlComponents.dwUrlPathLength);
|
|
ok(!strncmp(urlComponents.lpszUrlPath,TEST_URL2_PATHEXTRA,strlen(TEST_URL2_PATHEXTRA)),"lpszUrlPath should be %s but is %s\n", TEST_URL2_PATHEXTRA, urlComponents.lpszUrlPath);
|
|
ok(urlComponents.dwHostNameLength == strlen(TEST_URL2_SERVER),".dwHostNameLength should be %ld, but is %ld\n", (DWORD)strlen(TEST_URL2_SERVER), urlComponents.dwHostNameLength);
|
|
ok(!strncmp(urlComponents.lpszHostName,TEST_URL2_SERVER,strlen(TEST_URL2_SERVER)),"lpszHostName should be %s but is %s\n", TEST_URL2_SERVER, urlComponents.lpszHostName);
|
|
|
|
/*3. Check for %20 */
|
|
copy_compsA(&urlSrc, &urlComponents, 32, 1024, 1024, 1024, 2048, 1024);
|
|
ok(InternetCrackUrlA(TEST_URL3, 0, ICU_DECODE, &urlComponents),"InternetCrackUrl failed with GLE 0x%lx\n",GetLastError());
|
|
|
|
|
|
/* Tests for lpsz* members pointing to real strings while
|
|
* some corresponding length members are set to zero */
|
|
copy_compsA(&urlSrc, &urlComponents, 0, 1024, 1024, 1024, 2048, 1024);
|
|
ret = InternetCrackUrlA(TEST_URL3, 0, ICU_DECODE, &urlComponents);
|
|
ok(ret==1, "InternetCrackUrl returned %d with GLE=%ld (expected to return 1)\n",
|
|
ret, GetLastError());
|
|
|
|
copy_compsA(&urlSrc, &urlComponents, 32, 0, 1024, 1024, 2048, 1024);
|
|
ret = InternetCrackUrlA(TEST_URL3, 0, ICU_DECODE, &urlComponents);
|
|
ok(ret==1, "InternetCrackUrl returned %d with GLE=%ld (expected to return 1)\n",
|
|
ret, GetLastError());
|
|
|
|
copy_compsA(&urlSrc, &urlComponents, 32, 1024, 0, 1024, 2048, 1024);
|
|
ret = InternetCrackUrlA(TEST_URL3, 0, ICU_DECODE, &urlComponents);
|
|
ok(ret==1, "InternetCrackUrl returned %d with GLE=%ld (expected to return 1)\n",
|
|
ret, GetLastError());
|
|
|
|
copy_compsA(&urlSrc, &urlComponents, 32, 1024, 1024, 0, 2048, 1024);
|
|
ret = InternetCrackUrlA(TEST_URL3, 0, ICU_DECODE, &urlComponents);
|
|
ok(ret==1, "InternetCrackUrl returned %d with GLE=%ld (expected to return 1)\n",
|
|
ret, GetLastError());
|
|
|
|
copy_compsA(&urlSrc, &urlComponents, 32, 1024, 1024, 1024, 0, 1024);
|
|
ret = InternetCrackUrlA(TEST_URL3, 0, ICU_DECODE, &urlComponents);
|
|
GLE = GetLastError();
|
|
todo_wine
|
|
ok(ret==0 && (GLE==ERROR_INVALID_HANDLE || GLE==ERROR_INSUFFICIENT_BUFFER),
|
|
"InternetCrackUrl returned %d with GLE=%ld (expected to return 0 and ERROR_INVALID_HANDLE or ERROR_INSUFFICIENT_BUFFER)\n",
|
|
ret, GLE);
|
|
|
|
copy_compsA(&urlSrc, &urlComponents, 32, 1024, 1024, 1024, 2048, 0);
|
|
ret = InternetCrackUrlA(TEST_URL3, 0, ICU_DECODE, &urlComponents);
|
|
GLE = GetLastError();
|
|
todo_wine
|
|
ok(ret==0 && (GLE==ERROR_INVALID_HANDLE || GLE==ERROR_INSUFFICIENT_BUFFER),
|
|
"InternetCrackUrl returned %d with GLE=%ld (expected to return 0 and ERROR_INVALID_HANDLE or ERROR_INSUFFICIENT_BUFFER)\n",
|
|
ret, GLE);
|
|
|
|
copy_compsA(&urlSrc, &urlComponents, 0, 0, 0, 0, 0, 0);
|
|
ret = InternetCrackUrlA(TEST_URL3, 0, ICU_DECODE, &urlComponents);
|
|
GLE = GetLastError();
|
|
todo_wine
|
|
ok(ret==0 && GLE==ERROR_INVALID_PARAMETER,
|
|
"InternetCrackUrl returned %d with GLE=%ld (expected to return 0 and ERROR_INVALID_PARAMETER)\n",
|
|
ret, GLE);
|
|
}
|
|
|
|
static void InternetCrackUrlW_test(void)
|
|
{
|
|
WCHAR url[] = {
|
|
'h','t','t','p',':','/','/','1','9','2','.','1','6','8','.','0','.','2','2','/',
|
|
'C','F','I','D','E','/','m','a','i','n','.','c','f','m','?','C','F','S','V','R',
|
|
'=','I','D','E','&','A','C','T','I','O','N','=','I','D','E','_','D','E','F','A',
|
|
'U','L','T', 0 };
|
|
URL_COMPONENTSW comp;
|
|
WCHAR scheme[20], host[20], user[20], pwd[20], urlpart[50], extra[50];
|
|
BOOL r;
|
|
|
|
urlpart[0]=0;
|
|
scheme[0]=0;
|
|
extra[0]=0;
|
|
host[0]=0;
|
|
user[0]=0;
|
|
pwd[0]=0;
|
|
memset(&comp, 0, sizeof comp);
|
|
comp.dwStructSize = sizeof comp;
|
|
comp.lpszScheme = scheme;
|
|
comp.dwSchemeLength = sizeof scheme;
|
|
comp.lpszHostName = host;
|
|
comp.dwHostNameLength = sizeof host;
|
|
comp.lpszUserName = user;
|
|
comp.dwUserNameLength = sizeof user;
|
|
comp.lpszPassword = pwd;
|
|
comp.dwPasswordLength = sizeof pwd;
|
|
comp.lpszUrlPath = urlpart;
|
|
comp.dwUrlPathLength = sizeof urlpart;
|
|
comp.lpszExtraInfo = extra;
|
|
comp.dwExtraInfoLength = sizeof extra;
|
|
|
|
r = InternetCrackUrlW(url, 0, 0, &comp );
|
|
ok( r, "failed to crack url\n");
|
|
ok( comp.dwSchemeLength == 4, "scheme length wrong\n");
|
|
ok( comp.dwHostNameLength == 12, "host length wrong\n");
|
|
ok( comp.dwUserNameLength == 0, "user length wrong\n");
|
|
ok( comp.dwPasswordLength == 0, "password length wrong\n");
|
|
ok( comp.dwUrlPathLength == 15, "url length wrong\n");
|
|
ok( comp.dwExtraInfoLength == 29, "extra length wrong\n");
|
|
|
|
urlpart[0]=0;
|
|
scheme[0]=0;
|
|
extra[0]=0;
|
|
host[0]=0;
|
|
user[0]=0;
|
|
pwd[0]=0;
|
|
memset(&comp, 0, sizeof comp);
|
|
comp.dwStructSize = sizeof comp;
|
|
comp.lpszHostName = host;
|
|
comp.dwHostNameLength = sizeof host;
|
|
comp.lpszUrlPath = urlpart;
|
|
comp.dwUrlPathLength = sizeof urlpart;
|
|
|
|
r = InternetCrackUrlW(url, 0, 0, &comp );
|
|
ok( r, "failed to crack url\n");
|
|
ok( comp.dwSchemeLength == 0, "scheme length wrong\n");
|
|
ok( comp.dwHostNameLength == 12, "host length wrong\n");
|
|
ok( comp.dwUserNameLength == 0, "user length wrong\n");
|
|
ok( comp.dwPasswordLength == 0, "password length wrong\n");
|
|
ok( comp.dwUrlPathLength == 44, "url length wrong\n");
|
|
ok( comp.dwExtraInfoLength == 0, "extra length wrong\n");
|
|
|
|
urlpart[0]=0;
|
|
scheme[0]=0;
|
|
extra[0]=0;
|
|
host[0]=0;
|
|
user[0]=0;
|
|
pwd[0]=0;
|
|
memset(&comp, 0, sizeof comp);
|
|
comp.dwStructSize = sizeof comp;
|
|
comp.lpszHostName = host;
|
|
comp.dwHostNameLength = sizeof host;
|
|
comp.lpszUrlPath = urlpart;
|
|
comp.dwUrlPathLength = sizeof urlpart;
|
|
comp.lpszExtraInfo = NULL;
|
|
comp.dwExtraInfoLength = sizeof extra;
|
|
|
|
r = InternetCrackUrlW(url, 0, 0, &comp );
|
|
ok( r, "failed to crack url\n");
|
|
ok( comp.dwSchemeLength == 0, "scheme length wrong\n");
|
|
ok( comp.dwHostNameLength == 12, "host length wrong\n");
|
|
ok( comp.dwUserNameLength == 0, "user length wrong\n");
|
|
ok( comp.dwPasswordLength == 0, "password length wrong\n");
|
|
ok( comp.dwUrlPathLength == 15, "url length wrong\n");
|
|
ok( comp.dwExtraInfoLength == 29, "extra length wrong\n");
|
|
}
|
|
|
|
static void InternetTimeFromSystemTimeA_test(void)
|
|
{
|
|
BOOL ret;
|
|
static const SYSTEMTIME time = { 2005, 1, 5, 7, 12, 6, 35, 0 };
|
|
char string[INTERNET_RFC1123_BUFSIZE];
|
|
static const char expect[] = "Fri, 07 Jan 2005 12:06:35 GMT";
|
|
|
|
ret = InternetTimeFromSystemTimeA( &time, INTERNET_RFC1123_FORMAT, string, sizeof(string) );
|
|
ok( ret, "InternetTimeFromSystemTimeA failed (%ld)\n", GetLastError() );
|
|
|
|
ok( !memcmp( string, expect, sizeof(expect) ),
|
|
"InternetTimeFromSystemTimeA failed (%ld)\n", GetLastError() );
|
|
}
|
|
|
|
static void InternetTimeFromSystemTimeW_test(void)
|
|
{
|
|
BOOL ret;
|
|
static const SYSTEMTIME time = { 2005, 1, 5, 7, 12, 6, 35, 0 };
|
|
WCHAR string[INTERNET_RFC1123_BUFSIZE + 1];
|
|
static const WCHAR expect[] = { 'F','r','i',',',' ','0','7',' ','J','a','n',' ','2','0','0','5',' ',
|
|
'1','2',':','0','6',':','3','5',' ','G','M','T',0 };
|
|
|
|
ret = InternetTimeFromSystemTimeW( &time, INTERNET_RFC1123_FORMAT, string, sizeof(string) );
|
|
ok( ret, "InternetTimeFromSystemTimeW failed (%ld)\n", GetLastError() );
|
|
|
|
ok( !memcmp( string, expect, sizeof(expect) ),
|
|
"InternetTimeFromSystemTimeW failed (%ld)\n", GetLastError() );
|
|
}
|
|
|
|
static void InternetTimeToSystemTimeA_test(void)
|
|
{
|
|
BOOL ret;
|
|
SYSTEMTIME time;
|
|
static const SYSTEMTIME expect = { 2005, 1, 5, 7, 12, 6, 35, 0 };
|
|
static const char string[] = "Fri, 07 Jan 2005 12:06:35 GMT";
|
|
static const char string2[] = " fri 7 jan 2005 12 06 35";
|
|
|
|
ret = InternetTimeToSystemTimeA( string, &time, 0 );
|
|
ok( ret, "InternetTimeToSystemTimeA failed (%ld)\n", GetLastError() );
|
|
ok( !memcmp( &time, &expect, sizeof(expect) ),
|
|
"InternetTimeToSystemTimeA failed (%ld)\n", GetLastError() );
|
|
|
|
ret = InternetTimeToSystemTimeA( string2, &time, 0 );
|
|
ok( ret, "InternetTimeToSystemTimeA failed (%ld)\n", GetLastError() );
|
|
ok( !memcmp( &time, &expect, sizeof(expect) ),
|
|
"InternetTimeToSystemTimeA failed (%ld)\n", GetLastError() );
|
|
}
|
|
|
|
static void InternetTimeToSystemTimeW_test(void)
|
|
{
|
|
BOOL ret;
|
|
SYSTEMTIME time;
|
|
static const SYSTEMTIME expect = { 2005, 1, 5, 7, 12, 6, 35, 0 };
|
|
static const WCHAR string[] = { 'F','r','i',',',' ','0','7',' ','J','a','n',' ','2','0','0','5',' ',
|
|
'1','2',':','0','6',':','3','5',' ','G','M','T',0 };
|
|
static const WCHAR string2[] = { ' ','f','r','i',' ','7',' ','j','a','n',' ','2','0','0','5',' ',
|
|
'1','2',' ','0','6',' ','3','5',0 };
|
|
static const WCHAR string3[] = { 'F','r',0 };
|
|
|
|
ret = InternetTimeToSystemTimeW( NULL, NULL, 0 );
|
|
ok( !ret, "InternetTimeToSystemTimeW succeeded (%ld)\n", GetLastError() );
|
|
|
|
ret = InternetTimeToSystemTimeW( NULL, &time, 0 );
|
|
ok( !ret, "InternetTimeToSystemTimeW succeeded (%ld)\n", GetLastError() );
|
|
|
|
ret = InternetTimeToSystemTimeW( string, NULL, 0 );
|
|
ok( !ret, "InternetTimeToSystemTimeW succeeded (%ld)\n", GetLastError() );
|
|
|
|
ret = InternetTimeToSystemTimeW( string, &time, 1 );
|
|
ok( ret, "InternetTimeToSystemTimeW failed (%ld)\n", GetLastError() );
|
|
|
|
ret = InternetTimeToSystemTimeW( string, &time, 0 );
|
|
ok( ret, "InternetTimeToSystemTimeW failed (%ld)\n", GetLastError() );
|
|
ok( !memcmp( &time, &expect, sizeof(expect) ),
|
|
"InternetTimeToSystemTimeW failed (%ld)\n", GetLastError() );
|
|
|
|
ret = InternetTimeToSystemTimeW( string2, &time, 0 );
|
|
ok( ret, "InternetTimeToSystemTimeW failed (%ld)\n", GetLastError() );
|
|
ok( !memcmp( &time, &expect, sizeof(expect) ),
|
|
"InternetTimeToSystemTimeW failed (%ld)\n", GetLastError() );
|
|
|
|
ret = InternetTimeToSystemTimeW( string3, &time, 0 );
|
|
ok( ret, "InternetTimeToSystemTimeW failed (%ld)\n", GetLastError() );
|
|
}
|
|
|
|
static void fill_url_components(LPURL_COMPONENTS lpUrlComponents)
|
|
{
|
|
lpUrlComponents->dwStructSize = sizeof(URL_COMPONENTS);
|
|
lpUrlComponents->lpszScheme = "http";
|
|
lpUrlComponents->dwSchemeLength = strlen(lpUrlComponents->lpszScheme);
|
|
lpUrlComponents->nScheme = INTERNET_SCHEME_HTTP;
|
|
lpUrlComponents->lpszHostName = "www.winehq.org";
|
|
lpUrlComponents->dwHostNameLength = strlen(lpUrlComponents->lpszHostName);
|
|
lpUrlComponents->nPort = 80;
|
|
lpUrlComponents->lpszUserName = "username";
|
|
lpUrlComponents->dwUserNameLength = strlen(lpUrlComponents->lpszUserName);
|
|
lpUrlComponents->lpszPassword = "password";
|
|
lpUrlComponents->dwPasswordLength = strlen(lpUrlComponents->lpszPassword);
|
|
lpUrlComponents->lpszUrlPath = "/site/about";
|
|
lpUrlComponents->dwUrlPathLength = strlen(lpUrlComponents->lpszUrlPath);
|
|
lpUrlComponents->lpszExtraInfo = "";
|
|
lpUrlComponents->dwExtraInfoLength = strlen(lpUrlComponents->lpszExtraInfo);
|
|
}
|
|
|
|
static void InternetCreateUrlA_test()
|
|
{
|
|
URL_COMPONENTS urlComp;
|
|
LPSTR szUrl;
|
|
DWORD len = -1;
|
|
BOOL ret;
|
|
|
|
/* test NULL lpUrlComponents */
|
|
ret = InternetCreateUrlA(NULL, 0, NULL, &len);
|
|
SetLastError(0xdeadbeef);
|
|
ok(!ret, "Expected failure\n");
|
|
ok(GetLastError() == 0xdeadbeef,
|
|
"Expected 0xdeadbeef, got %ld\n", GetLastError());
|
|
ok(len == -1, "Expected len -1, got %ld\n", len);
|
|
|
|
/* test garbage lpUrlComponets */
|
|
ret = InternetCreateUrlA(&urlComp, 0, NULL, &len);
|
|
SetLastError(0xdeadbeef);
|
|
ok(!ret, "Expected failure\n");
|
|
ok(GetLastError() == 0xdeadbeef,
|
|
"Expected 0xdeadbeef, got %ld\n", GetLastError());
|
|
ok(len == -1, "Expected len -1, got %ld\n", len);
|
|
|
|
/* test zero'ed lpUrlComponents */
|
|
ZeroMemory(&urlComp, sizeof(URL_COMPONENTS));
|
|
SetLastError(0xdeadbeef);
|
|
ret = InternetCreateUrlA(&urlComp, 0, NULL, &len);
|
|
ok(!ret, "Expected failure\n");
|
|
ok(GetLastError() == ERROR_INVALID_PARAMETER,
|
|
"Expected ERROR_INVALID_PARAMETER, got %ld\n", GetLastError());
|
|
ok(len == -1, "Expected len -1, got %ld\n", len);
|
|
|
|
/* test valid lpUrlComponets, NULL lpdwUrlLength */
|
|
fill_url_components(&urlComp);
|
|
SetLastError(0xdeadbeef);
|
|
ret = InternetCreateUrlA(&urlComp, 0, NULL, NULL);
|
|
ok(!ret, "Expected failure\n");
|
|
ok(GetLastError() == ERROR_INVALID_PARAMETER,
|
|
"Expected ERROR_INVALID_PARAMETER, got %ld\n", GetLastError());
|
|
ok(len == -1, "Expected len -1, got %ld\n", len);
|
|
|
|
/* test valid lpUrlComponets, emptry szUrl
|
|
* lpdwUrlLength is size of buffer required on exit, including
|
|
* the terminating null when GLE == ERROR_INSUFFICIENT_BUFFER
|
|
*/
|
|
SetLastError(0xdeadbeef);
|
|
ret = InternetCreateUrlA(&urlComp, 0, NULL, &len);
|
|
ok(!ret, "Expected failure\n");
|
|
ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER,
|
|
"Expected ERROR_INSUFFICIENT_BUFFER, got %ld\n", GetLastError());
|
|
ok(len == 51, "Expected len 51, got %ld\n", len);
|
|
|
|
/* test correct size, NULL szUrl */
|
|
fill_url_components(&urlComp);
|
|
SetLastError(0xdeadbeef);
|
|
ret = InternetCreateUrlA(&urlComp, 0, NULL, &len);
|
|
ok(!ret, "Expected failure\n");
|
|
ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER,
|
|
"Expected ERROR_INSUFFICIENT_BUFFER, got %ld\n", GetLastError());
|
|
ok(len == 51, "Expected len 51, got %ld\n", len);
|
|
|
|
/* test valid lpUrlComponets, alloced szUrl, small size */
|
|
SetLastError(0xdeadbeef);
|
|
szUrl = HeapAlloc(GetProcessHeap(), 0, len);
|
|
len -= 2;
|
|
ret = InternetCreateUrlA(&urlComp, 0, szUrl, &len);
|
|
ok(!ret, "Expected failure\n");
|
|
ok(GetLastError() == ERROR_INSUFFICIENT_BUFFER,
|
|
"Expected ERROR_INSUFFICIENT_BUFFER, got %ld\n", GetLastError());
|
|
ok(len == 51, "Expected len 51, got %ld\n", len);
|
|
|
|
/* alloced szUrl, NULL lpszScheme
|
|
* shows that it uses dwXLength instead of strlen(lpszX)
|
|
*/
|
|
SetLastError(0xdeadbeef);
|
|
urlComp.lpszScheme = NULL;
|
|
ret = InternetCreateUrlA(&urlComp, 0, szUrl, &len);
|
|
ok(ret, "Expected success\n");
|
|
ok(GetLastError() == 0xdeadbeef,
|
|
"Expected 0xdeadbeef, got %ld\n", GetLastError());
|
|
ok(len == 50, "Expected len 50, got %ld\n", len);
|
|
|
|
/* alloced szUrl, invalid nScheme
|
|
* any nScheme out of range seems ignored
|
|
*/
|
|
fill_url_components(&urlComp);
|
|
SetLastError(0xdeadbeef);
|
|
urlComp.nScheme = -3;
|
|
len++;
|
|
ret = InternetCreateUrlA(&urlComp, 0, szUrl, &len);
|
|
ok(ret, "Expected success\n");
|
|
ok(GetLastError() == 0xdeadbeef,
|
|
"Expected 0xdeadbeef, got %ld\n", GetLastError());
|
|
ok(len == 50, "Expected len 50, got %ld\n", len);
|
|
|
|
/* test valid lpUrlComponets, alloced szUrl */
|
|
fill_url_components(&urlComp);
|
|
SetLastError(0xdeadbeef);
|
|
len = 51;
|
|
ret = InternetCreateUrlA(&urlComp, 0, szUrl, &len);
|
|
ok(ret, "Expected success\n");
|
|
ok(GetLastError() == 0xdeadbeef,
|
|
"Expected 0xdeadbeef, got %ld\n", GetLastError());
|
|
ok(len == 50, "Expected len 50, got %ld\n", len);
|
|
ok(strstr(szUrl, "80") == NULL, "Didn't expect to find 80 in szUrl\n");
|
|
ok(!strcmp(szUrl, CREATE_URL1), "Expected %s, got %s\n", CREATE_URL1, szUrl);
|
|
|
|
/* valid username, NULL password */
|
|
fill_url_components(&urlComp);
|
|
SetLastError(0xdeadbeef);
|
|
urlComp.lpszPassword = NULL;
|
|
len = 42;
|
|
ret = InternetCreateUrlA(&urlComp, 0, szUrl, &len);
|
|
ok(ret, "Expected success\n");
|
|
ok(GetLastError() == 0xdeadbeef,
|
|
"Expected 0xdeadbeef, got %ld\n", GetLastError());
|
|
ok(len == 41, "Expected len 41, got %ld\n", len);
|
|
ok(!strcmp(szUrl, CREATE_URL2), "Expected %s, got %s\n", CREATE_URL2, szUrl);
|
|
|
|
/* valid username, empty password */
|
|
fill_url_components(&urlComp);
|
|
SetLastError(0xdeadbeef);
|
|
urlComp.lpszPassword = "";
|
|
len = 51;
|
|
ret = InternetCreateUrlA(&urlComp, 0, szUrl, &len);
|
|
ok(ret, "Expected success\n");
|
|
ok(GetLastError() == 0xdeadbeef,
|
|
"Expected 0xdeadbeef, got %ld\n", GetLastError());
|
|
ok(len == 50, "Expected len 50, got %ld\n", len);
|
|
ok(!strcmp(szUrl, CREATE_URL3), "Expected %s, got %s\n", CREATE_URL2, szUrl);
|
|
|
|
/* valid password, NULL username
|
|
* if password is provided, username has to exist
|
|
*/
|
|
fill_url_components(&urlComp);
|
|
SetLastError(0xdeadbeef);
|
|
urlComp.lpszUserName = NULL;
|
|
len = 42;
|
|
ret = InternetCreateUrlA(&urlComp, 0, szUrl, &len);
|
|
ok(!ret, "Expected failure\n");
|
|
ok(GetLastError() == ERROR_INVALID_PARAMETER,
|
|
"Expected ERROR_INVALID_PARAMETER, got %ld\n", GetLastError());
|
|
ok(len == 42, "Expected len 42, got %ld\n", len);
|
|
ok(!strcmp(szUrl, CREATE_URL3), "Expected %s, got %s\n", CREATE_URL2, szUrl);
|
|
|
|
/* valid password, empty username
|
|
* if password is provided, username has to exist
|
|
*/
|
|
fill_url_components(&urlComp);
|
|
SetLastError(0xdeadbeef);
|
|
urlComp.lpszUserName = "";
|
|
len = 51;
|
|
ret = InternetCreateUrlA(&urlComp, 0, szUrl, &len);
|
|
ok(ret, "Expected success\n");
|
|
ok(GetLastError() == 0xdeadbeef,
|
|
"Expected 0xdeadbeef, got %ld\n", GetLastError());
|
|
ok(len == 50, "Expected len 50, got %ld\n", len);
|
|
ok(!strcmp(szUrl, CREATE_URL5), "Expected %s, got %s\n", CREATE_URL4, szUrl);
|
|
|
|
/* NULL username, NULL password */
|
|
fill_url_components(&urlComp);
|
|
SetLastError(0xdeadbeef);
|
|
urlComp.lpszUserName = NULL;
|
|
urlComp.lpszPassword = NULL;
|
|
len = 42;
|
|
ret = InternetCreateUrlA(&urlComp, 0, szUrl, &len);
|
|
ok(ret, "Expected success\n");
|
|
ok(GetLastError() == 0xdeadbeef,
|
|
"Expected 0xdeadbeef, got %ld\n", GetLastError());
|
|
ok(len == 32, "Expected len 32, got %ld\n", len);
|
|
ok(!strcmp(szUrl, CREATE_URL4), "Expected %s, got %s\n", CREATE_URL3, szUrl);
|
|
|
|
/* empty username, empty password */
|
|
fill_url_components(&urlComp);
|
|
SetLastError(0xdeadbeef);
|
|
urlComp.lpszUserName = "";
|
|
urlComp.lpszPassword = "";
|
|
len = 51;
|
|
ret = InternetCreateUrlA(&urlComp, 0, szUrl, &len);
|
|
ok(ret, "Expected success\n");
|
|
ok(GetLastError() == 0xdeadbeef,
|
|
"Expected 0xdeadbeef, got %ld\n", GetLastError());
|
|
ok(len == 50, "Expected len 50, got %ld\n", len);
|
|
ok(!strcmp(szUrl, CREATE_URL5), "Expected %s, got %s\n", CREATE_URL4, szUrl);
|
|
|
|
/* if lpszScheme != "http" or nPort != 80, display nPort.
|
|
* depending on nScheme, displays only first x characters
|
|
* of lpszScheme:
|
|
* HTTP: x=4
|
|
* FTP: x=3 etc
|
|
*/
|
|
fill_url_components(&urlComp);
|
|
HeapFree(GetProcessHeap(), 0, szUrl);
|
|
urlComp.lpszScheme = "nhttp";
|
|
len = 54;
|
|
szUrl = HeapAlloc(GetProcessHeap(), 0, len);
|
|
ret = InternetCreateUrlA(&urlComp, ICU_ESCAPE, szUrl, &len);
|
|
ok(ret, "Expected success\n");
|
|
ok(len == 53, "Expected len 51, got %ld\n", len);
|
|
ok(strstr(szUrl, "80") != NULL, "Expected to find 80 in szUrl\n");
|
|
ok(!strncmp(szUrl, "nhtt://", 7), "Expected 'nhtt://'\n");
|
|
ok(!strcmp(szUrl, CREATE_URL6), "Expected %s, got %s\n", CREATE_URL5, szUrl);
|
|
|
|
/* if lpszScheme != "http" or nPort != 80, display nPort */
|
|
HeapFree(GetProcessHeap(), 0, szUrl);
|
|
urlComp.lpszScheme = "http";
|
|
urlComp.nPort = 42;
|
|
szUrl = HeapAlloc(GetProcessHeap(), 0, ++len);
|
|
ret = InternetCreateUrlA(&urlComp, ICU_ESCAPE, szUrl, &len);
|
|
ok(ret, "Expected success\n");
|
|
ok(len == 53, "Expected len 53, got %ld\n", len);
|
|
ok(strstr(szUrl, "42") != NULL, "Expected to find 42 in szUrl\n");
|
|
ok(!strcmp(szUrl, CREATE_URL7), "Expected %s, got %s\n", CREATE_URL6, szUrl);
|
|
|
|
HeapFree(GetProcessHeap(), 0, szUrl);
|
|
}
|
|
|
|
static void HttpSendRequestEx_test(void)
|
|
{
|
|
HINTERNET hSession;
|
|
HINTERNET hConnect;
|
|
HINTERNET hRequest;
|
|
|
|
INTERNET_BUFFERS BufferIn;
|
|
DWORD dwBytesWritten;
|
|
DWORD dwBytesRead;
|
|
CHAR szBuffer[256];
|
|
int i;
|
|
|
|
static const char szPostData[] = "mode=Test";
|
|
static const char szContentType[] = "Content-Type: application/x-www-form-urlencoded";
|
|
|
|
hSession = InternetOpen("Wine Regression Test",
|
|
INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,0);
|
|
ok( hSession != NULL ,"Unable to open Internet session\n");
|
|
hConnect = InternetConnect(hSession, "crossover.codeweavers.com",
|
|
INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0,
|
|
0);
|
|
ok( hConnect != NULL, "Unable to connect to http://crossover.codeweavers.com\n");
|
|
hRequest = HttpOpenRequest(hConnect, "POST", "/posttest.php",
|
|
NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
|
|
ok( hRequest != NULL, "Failed to open request handle\n");
|
|
|
|
|
|
BufferIn.dwStructSize = sizeof( INTERNET_BUFFERS);
|
|
BufferIn.Next = NULL;
|
|
BufferIn.lpcszHeader = szContentType;
|
|
BufferIn.dwHeadersLength = sizeof(szContentType);
|
|
BufferIn.dwHeadersTotal = sizeof(szContentType);
|
|
BufferIn.lpvBuffer = NULL;
|
|
BufferIn.dwBufferLength = 0;
|
|
BufferIn.dwBufferTotal = sizeof(szPostData)-1;
|
|
BufferIn.dwOffsetLow = 0;
|
|
BufferIn.dwOffsetHigh = 0;
|
|
|
|
ok(HttpSendRequestEx(hRequest, &BufferIn, NULL, 0 ,0),
|
|
"SendRequestEx Failed\n");
|
|
|
|
for (i = 0; szPostData[i]; i++)
|
|
ok(InternetWriteFile(hRequest, &szPostData[i], 1, &dwBytesWritten),
|
|
"InternetWriteFile failed\n");
|
|
|
|
ok(HttpEndRequest(hRequest, NULL, 0, 0), "HttpEndRequest Failed\n");
|
|
|
|
ok(InternetReadFile(hRequest, szBuffer, 255, &dwBytesRead),
|
|
"Unable to read responce\n");
|
|
szBuffer[dwBytesRead] = 0;
|
|
|
|
ok(dwBytesRead == 13,"Read %lu bytes instead of 13\n",dwBytesRead);
|
|
ok(strncmp(szBuffer,"mode => Test\n",dwBytesRead)==0,"Got string %s\n",szBuffer);
|
|
|
|
ok(InternetCloseHandle(hRequest), "Close request handle failed\n");
|
|
ok(InternetCloseHandle(hConnect), "Close connect handle failed\n");
|
|
ok(InternetCloseHandle(hSession), "Close session handle failed\n");
|
|
}
|
|
|
|
static void HttpHeaders_test(void)
|
|
{
|
|
HINTERNET hSession;
|
|
HINTERNET hConnect;
|
|
HINTERNET hRequest;
|
|
|
|
hSession = InternetOpen("Wine Regression Test",
|
|
INTERNET_OPEN_TYPE_PRECONFIG,NULL,NULL,0);
|
|
ok( hSession != NULL ,"Unable to open Internet session\n");
|
|
hConnect = InternetConnect(hSession, "crossover.codeweavers.com",
|
|
INTERNET_DEFAULT_HTTP_PORT, NULL, NULL, INTERNET_SERVICE_HTTP, 0,
|
|
0);
|
|
ok( hConnect != NULL, "Unable to connect to http://crossover.codeweavers.com\n");
|
|
hRequest = HttpOpenRequest(hConnect, "POST", "/posttest.php",
|
|
NULL, NULL, NULL, INTERNET_FLAG_NO_CACHE_WRITE, 0);
|
|
ok( hRequest != NULL, "Failed to open request handle\n");
|
|
|
|
ok(HttpAddRequestHeaders(hRequest,"Warning:test1",-1,HTTP_ADDREQ_FLAG_ADD), "Failed to add new header\n");
|
|
ok(HttpAddRequestHeaders(hRequest,"Warning:test2",-1,HTTP_ADDREQ_FLAG_ADD), "Failed to replace header using HTTP_ADDREQ_FLAG_ADD\n");
|
|
ok(HttpAddRequestHeaders(hRequest,"Warning:test3",-1,HTTP_ADDREQ_FLAG_REPLACE), "Failed to replace header using HTTP_ADDREQ_FLAG_REPLACE\n");
|
|
ok(HttpAddRequestHeaders(hRequest,"Warning:test4",-1,HTTP_ADDREQ_FLAG_ADD_IF_NEW)==0, "HTTP_ADDREQ_FLAG_ADD_IF_NEW replaced existing header\n");
|
|
|
|
ok(InternetCloseHandle(hRequest), "Close request handle failed\n");
|
|
ok(InternetCloseHandle(hConnect), "Close connect handle failed\n");
|
|
ok(InternetCloseHandle(hSession), "Close session handle failed\n");
|
|
}
|
|
|
|
|
|
|
|
START_TEST(http)
|
|
{
|
|
InternetReadFile_test(INTERNET_FLAG_ASYNC);
|
|
InternetReadFile_test(0);
|
|
InternetReadFileExA_test(INTERNET_FLAG_ASYNC);
|
|
InternetCrackUrl_test();
|
|
InternetOpenUrlA_test();
|
|
InternetCrackUrlW_test();
|
|
InternetTimeFromSystemTimeA_test();
|
|
InternetTimeFromSystemTimeW_test();
|
|
InternetTimeToSystemTimeA_test();
|
|
InternetTimeToSystemTimeW_test();
|
|
InternetCreateUrlA_test();
|
|
HttpSendRequestEx_test();
|
|
HttpHeaders_test();
|
|
}
|