| /* | |
| * Copyright 2008 Hans Leidekker for CodeWeavers | |
| * | |
| * 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., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA | |
| */ | |
| #include "config.h" | |
| #include "wine/port.h" | |
| #include "wine/debug.h" | |
| #include <stdarg.h> | |
| #include <stdlib.h> | |
| #ifdef HAVE_CORESERVICES_CORESERVICES_H | |
| #define GetCurrentThread MacGetCurrentThread | |
| #define LoadResource MacLoadResource | |
| #include <CoreServices/CoreServices.h> | |
| #undef GetCurrentThread | |
| #undef LoadResource | |
| #undef DPRINTF | |
| #endif | |
| #include "windef.h" | |
| #include "winbase.h" | |
| #ifndef __MINGW32__ | |
| #define USE_WS_PREFIX | |
| #endif | |
| #include "winsock2.h" | |
| #include "ws2ipdef.h" | |
| #include "winhttp.h" | |
| #include "wincrypt.h" | |
| #include "winreg.h" | |
| #define COBJMACROS | |
| #include "ole2.h" | |
| #include "dispex.h" | |
| #include "activscp.h" | |
| #include "winhttp_private.h" | |
| WINE_DEFAULT_DEBUG_CHANNEL(winhttp); | |
| #define DEFAULT_RESOLVE_TIMEOUT 0 | |
| #define DEFAULT_CONNECT_TIMEOUT 20000 | |
| #define DEFAULT_SEND_TIMEOUT 30000 | |
| #define DEFAULT_RECEIVE_TIMEOUT 30000 | |
| void set_last_error( DWORD error ) | |
| { | |
| /* FIXME */ | |
| SetLastError( error ); | |
| } | |
| DWORD get_last_error( void ) | |
| { | |
| /* FIXME */ | |
| return GetLastError(); | |
| } | |
| void send_callback( object_header_t *hdr, DWORD status, LPVOID info, DWORD buflen ) | |
| { | |
| if (hdr->callback && (hdr->notify_mask & status)) | |
| { | |
| TRACE("%p, 0x%08x, %p, %u\n", hdr, status, info, buflen); | |
| hdr->callback( hdr->handle, hdr->context, status, info, buflen ); | |
| TRACE("returning from 0x%08x callback\n", status); | |
| } | |
| } | |
| /*********************************************************************** | |
| * WinHttpCheckPlatform (winhttp.@) | |
| */ | |
| BOOL WINAPI WinHttpCheckPlatform( void ) | |
| { | |
| TRACE("\n"); | |
| return TRUE; | |
| } | |
| /*********************************************************************** | |
| * session_destroy (internal) | |
| */ | |
| static void session_destroy( object_header_t *hdr ) | |
| { | |
| session_t *session = (session_t *)hdr; | |
| struct list *item, *next; | |
| domain_t *domain; | |
| TRACE("%p\n", session); | |
| if (session->unload_event) SetEvent( session->unload_event ); | |
| if (session->cred_handle_initialized) FreeCredentialsHandle( &session->cred_handle ); | |
| LIST_FOR_EACH_SAFE( item, next, &session->cookie_cache ) | |
| { | |
| domain = LIST_ENTRY( item, domain_t, entry ); | |
| delete_domain( domain ); | |
| } | |
| heap_free( session->agent ); | |
| heap_free( session->proxy_server ); | |
| heap_free( session->proxy_bypass ); | |
| heap_free( session->proxy_username ); | |
| heap_free( session->proxy_password ); | |
| heap_free( session ); | |
| } | |
| static BOOL session_query_option( object_header_t *hdr, DWORD option, LPVOID buffer, LPDWORD buflen ) | |
| { | |
| session_t *session = (session_t *)hdr; | |
| switch (option) | |
| { | |
| case WINHTTP_OPTION_REDIRECT_POLICY: | |
| { | |
| if (!buffer || *buflen < sizeof(DWORD)) | |
| { | |
| *buflen = sizeof(DWORD); | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| *(DWORD *)buffer = hdr->redirect_policy; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_RESOLVE_TIMEOUT: | |
| *(DWORD *)buffer = session->resolve_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| case WINHTTP_OPTION_CONNECT_TIMEOUT: | |
| *(DWORD *)buffer = session->connect_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| case WINHTTP_OPTION_SEND_TIMEOUT: | |
| *(DWORD *)buffer = session->send_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| case WINHTTP_OPTION_RECEIVE_TIMEOUT: | |
| *(DWORD *)buffer = session->recv_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| default: | |
| FIXME("unimplemented option %u\n", option); | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| } | |
| static BOOL session_set_option( object_header_t *hdr, DWORD option, LPVOID buffer, DWORD buflen ) | |
| { | |
| session_t *session = (session_t *)hdr; | |
| switch (option) | |
| { | |
| case WINHTTP_OPTION_PROXY: | |
| { | |
| WINHTTP_PROXY_INFO *pi = buffer; | |
| FIXME("%u %s %s\n", pi->dwAccessType, debugstr_w(pi->lpszProxy), debugstr_w(pi->lpszProxyBypass)); | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_REDIRECT_POLICY: | |
| { | |
| DWORD policy; | |
| if (buflen != sizeof(policy)) | |
| { | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| policy = *(DWORD *)buffer; | |
| TRACE("0x%x\n", policy); | |
| hdr->redirect_policy = policy; | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_SECURE_PROTOCOLS: | |
| { | |
| if (buflen != sizeof(session->secure_protocols)) | |
| { | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| session->secure_protocols = *(DWORD *)buffer; | |
| TRACE("0x%x\n", session->secure_protocols); | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_DISABLE_FEATURE: | |
| set_last_error( ERROR_WINHTTP_INCORRECT_HANDLE_TYPE ); | |
| return FALSE; | |
| case WINHTTP_OPTION_RESOLVE_TIMEOUT: | |
| session->resolve_timeout = *(DWORD *)buffer; | |
| return TRUE; | |
| case WINHTTP_OPTION_CONNECT_TIMEOUT: | |
| session->connect_timeout = *(DWORD *)buffer; | |
| return TRUE; | |
| case WINHTTP_OPTION_SEND_TIMEOUT: | |
| session->send_timeout = *(DWORD *)buffer; | |
| return TRUE; | |
| case WINHTTP_OPTION_RECEIVE_TIMEOUT: | |
| session->recv_timeout = *(DWORD *)buffer; | |
| return TRUE; | |
| case WINHTTP_OPTION_CONFIGURE_PASSPORT_AUTH: | |
| FIXME("WINHTTP_OPTION_CONFIGURE_PASSPORT_AUTH: 0x%x\n", *(DWORD *)buffer); | |
| return TRUE; | |
| case WINHTTP_OPTION_UNLOAD_NOTIFY_EVENT: | |
| TRACE("WINHTTP_OPTION_UNLOAD_NOTIFY_EVENT: %p\n", *(HANDLE *)buffer); | |
| session->unload_event = *(HANDLE *)buffer; | |
| return TRUE; | |
| case WINHTTP_OPTION_MAX_CONNS_PER_SERVER: | |
| FIXME("WINHTTP_OPTION_MAX_CONNS_PER_SERVER: %d\n", *(DWORD *)buffer); | |
| return TRUE; | |
| case WINHTTP_OPTION_MAX_CONNS_PER_1_0_SERVER: | |
| FIXME("WINHTTP_OPTION_MAX_CONNS_PER_1_0_SERVER: %d\n", *(DWORD *)buffer); | |
| return TRUE; | |
| default: | |
| FIXME("unimplemented option %u\n", option); | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| } | |
| static const object_vtbl_t session_vtbl = | |
| { | |
| session_destroy, | |
| session_query_option, | |
| session_set_option | |
| }; | |
| /*********************************************************************** | |
| * WinHttpOpen (winhttp.@) | |
| */ | |
| HINTERNET WINAPI WinHttpOpen( LPCWSTR agent, DWORD access, LPCWSTR proxy, LPCWSTR bypass, DWORD flags ) | |
| { | |
| session_t *session; | |
| HINTERNET handle = NULL; | |
| TRACE("%s, %u, %s, %s, 0x%08x\n", debugstr_w(agent), access, debugstr_w(proxy), debugstr_w(bypass), flags); | |
| if (!(session = heap_alloc_zero( sizeof(session_t) ))) return NULL; | |
| session->hdr.type = WINHTTP_HANDLE_TYPE_SESSION; | |
| session->hdr.vtbl = &session_vtbl; | |
| session->hdr.flags = flags; | |
| session->hdr.refs = 1; | |
| session->hdr.redirect_policy = WINHTTP_OPTION_REDIRECT_POLICY_DISALLOW_HTTPS_TO_HTTP; | |
| list_init( &session->hdr.children ); | |
| session->resolve_timeout = DEFAULT_RESOLVE_TIMEOUT; | |
| session->connect_timeout = DEFAULT_CONNECT_TIMEOUT; | |
| session->send_timeout = DEFAULT_SEND_TIMEOUT; | |
| session->recv_timeout = DEFAULT_RECEIVE_TIMEOUT; | |
| list_init( &session->cookie_cache ); | |
| if (agent && !(session->agent = strdupW( agent ))) goto end; | |
| if (access == WINHTTP_ACCESS_TYPE_DEFAULT_PROXY) | |
| { | |
| WINHTTP_PROXY_INFO info; | |
| WinHttpGetDefaultProxyConfiguration( &info ); | |
| session->access = info.dwAccessType; | |
| if (info.lpszProxy && !(session->proxy_server = strdupW( info.lpszProxy ))) | |
| { | |
| GlobalFree( info.lpszProxy ); | |
| GlobalFree( info.lpszProxyBypass ); | |
| goto end; | |
| } | |
| if (info.lpszProxyBypass && !(session->proxy_bypass = strdupW( info.lpszProxyBypass ))) | |
| { | |
| GlobalFree( info.lpszProxy ); | |
| GlobalFree( info.lpszProxyBypass ); | |
| goto end; | |
| } | |
| } | |
| else if (access == WINHTTP_ACCESS_TYPE_NAMED_PROXY) | |
| { | |
| session->access = access; | |
| if (proxy && !(session->proxy_server = strdupW( proxy ))) goto end; | |
| if (bypass && !(session->proxy_bypass = strdupW( bypass ))) goto end; | |
| } | |
| if (!(handle = alloc_handle( &session->hdr ))) goto end; | |
| session->hdr.handle = handle; | |
| end: | |
| release_object( &session->hdr ); | |
| TRACE("returning %p\n", handle); | |
| if (handle) set_last_error( ERROR_SUCCESS ); | |
| return handle; | |
| } | |
| /*********************************************************************** | |
| * connect_destroy (internal) | |
| */ | |
| static void connect_destroy( object_header_t *hdr ) | |
| { | |
| connect_t *connect = (connect_t *)hdr; | |
| TRACE("%p\n", connect); | |
| release_object( &connect->session->hdr ); | |
| heap_free( connect->hostname ); | |
| heap_free( connect->servername ); | |
| heap_free( connect->username ); | |
| heap_free( connect->password ); | |
| heap_free( connect ); | |
| } | |
| static BOOL connect_query_option( object_header_t *hdr, DWORD option, LPVOID buffer, LPDWORD buflen ) | |
| { | |
| connect_t *connect = (connect_t *)hdr; | |
| switch (option) | |
| { | |
| case WINHTTP_OPTION_PARENT_HANDLE: | |
| { | |
| if (!buffer || *buflen < sizeof(HINTERNET)) | |
| { | |
| *buflen = sizeof(HINTERNET); | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| *(HINTERNET *)buffer = ((object_header_t *)connect->session)->handle; | |
| *buflen = sizeof(HINTERNET); | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_RESOLVE_TIMEOUT: | |
| *(DWORD *)buffer = connect->session->resolve_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| case WINHTTP_OPTION_CONNECT_TIMEOUT: | |
| *(DWORD *)buffer = connect->session->connect_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| case WINHTTP_OPTION_SEND_TIMEOUT: | |
| *(DWORD *)buffer = connect->session->send_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| case WINHTTP_OPTION_RECEIVE_TIMEOUT: | |
| *(DWORD *)buffer = connect->session->recv_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| default: | |
| FIXME("unimplemented option %u\n", option); | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| } | |
| static const object_vtbl_t connect_vtbl = | |
| { | |
| connect_destroy, | |
| connect_query_option, | |
| NULL | |
| }; | |
| static BOOL domain_matches(LPCWSTR server, LPCWSTR domain) | |
| { | |
| static const WCHAR localW[] = { '<','l','o','c','a','l','>',0 }; | |
| BOOL ret = FALSE; | |
| if (!strcmpiW( domain, localW ) && !strchrW( server, '.' )) | |
| ret = TRUE; | |
| else if (*domain == '*') | |
| { | |
| if (domain[1] == '.') | |
| { | |
| LPCWSTR dot; | |
| /* For a hostname to match a wildcard, the last domain must match | |
| * the wildcard exactly. E.g. if the wildcard is *.a.b, and the | |
| * hostname is www.foo.a.b, it matches, but a.b does not. | |
| */ | |
| dot = strchrW( server, '.' ); | |
| if (dot) | |
| { | |
| int len = strlenW( dot + 1 ); | |
| if (len > strlenW( domain + 2 )) | |
| { | |
| LPCWSTR ptr; | |
| /* The server's domain is longer than the wildcard, so it | |
| * could be a subdomain. Compare the last portion of the | |
| * server's domain. | |
| */ | |
| ptr = dot + len + 1 - strlenW( domain + 2 ); | |
| if (!strcmpiW( ptr, domain + 2 )) | |
| { | |
| /* This is only a match if the preceding character is | |
| * a '.', i.e. that it is a matching domain. E.g. | |
| * if domain is '*.b.c' and server is 'www.ab.c' they | |
| * do not match. | |
| */ | |
| ret = *(ptr - 1) == '.'; | |
| } | |
| } | |
| else | |
| ret = !strcmpiW( dot + 1, domain + 2 ); | |
| } | |
| } | |
| } | |
| else | |
| ret = !strcmpiW( server, domain ); | |
| return ret; | |
| } | |
| /* Matches INTERNET_MAX_HOST_NAME_LENGTH in wininet.h, also RFC 1035 */ | |
| #define MAX_HOST_NAME_LENGTH 256 | |
| static BOOL should_bypass_proxy(session_t *session, LPCWSTR server) | |
| { | |
| LPCWSTR ptr; | |
| BOOL ret = FALSE; | |
| if (!session->proxy_bypass) return FALSE; | |
| ptr = session->proxy_bypass; | |
| do { | |
| LPCWSTR tmp = ptr; | |
| ptr = strchrW( ptr, ';' ); | |
| if (!ptr) | |
| ptr = strchrW( tmp, ' ' ); | |
| if (ptr) | |
| { | |
| if (ptr - tmp < MAX_HOST_NAME_LENGTH) | |
| { | |
| WCHAR domain[MAX_HOST_NAME_LENGTH]; | |
| memcpy( domain, tmp, (ptr - tmp) * sizeof(WCHAR) ); | |
| domain[ptr - tmp] = 0; | |
| ret = domain_matches( server, domain ); | |
| } | |
| ptr += 1; | |
| } | |
| else if (*tmp) | |
| ret = domain_matches( server, tmp ); | |
| } while (ptr && !ret); | |
| return ret; | |
| } | |
| BOOL set_server_for_hostname( connect_t *connect, LPCWSTR server, INTERNET_PORT port ) | |
| { | |
| session_t *session = connect->session; | |
| BOOL ret = TRUE; | |
| if (session->proxy_server && !should_bypass_proxy(session, server)) | |
| { | |
| LPCWSTR colon; | |
| if ((colon = strchrW( session->proxy_server, ':' ))) | |
| { | |
| if (!connect->servername || strncmpiW( connect->servername, | |
| session->proxy_server, colon - session->proxy_server - 1 )) | |
| { | |
| heap_free( connect->servername ); | |
| connect->resolved = FALSE; | |
| if (!(connect->servername = heap_alloc( | |
| (colon - session->proxy_server + 1) * sizeof(WCHAR) ))) | |
| { | |
| ret = FALSE; | |
| goto end; | |
| } | |
| memcpy( connect->servername, session->proxy_server, | |
| (colon - session->proxy_server) * sizeof(WCHAR) ); | |
| connect->servername[colon - session->proxy_server] = 0; | |
| if (*(colon + 1)) | |
| connect->serverport = atoiW( colon + 1 ); | |
| else | |
| connect->serverport = INTERNET_DEFAULT_PORT; | |
| } | |
| } | |
| else | |
| { | |
| if (!connect->servername || strcmpiW( connect->servername, | |
| session->proxy_server )) | |
| { | |
| heap_free( connect->servername ); | |
| connect->resolved = FALSE; | |
| if (!(connect->servername = strdupW( session->proxy_server ))) | |
| { | |
| ret = FALSE; | |
| goto end; | |
| } | |
| connect->serverport = INTERNET_DEFAULT_PORT; | |
| } | |
| } | |
| } | |
| else if (server) | |
| { | |
| heap_free( connect->servername ); | |
| connect->resolved = FALSE; | |
| if (!(connect->servername = strdupW( server ))) | |
| { | |
| ret = FALSE; | |
| goto end; | |
| } | |
| connect->serverport = port; | |
| } | |
| end: | |
| return ret; | |
| } | |
| /*********************************************************************** | |
| * WinHttpConnect (winhttp.@) | |
| */ | |
| HINTERNET WINAPI WinHttpConnect( HINTERNET hsession, LPCWSTR server, INTERNET_PORT port, DWORD reserved ) | |
| { | |
| connect_t *connect; | |
| session_t *session; | |
| HINTERNET hconnect = NULL; | |
| TRACE("%p, %s, %u, %x\n", hsession, debugstr_w(server), port, reserved); | |
| if (!server) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return NULL; | |
| } | |
| if (!(session = (session_t *)grab_object( hsession ))) | |
| { | |
| set_last_error( ERROR_INVALID_HANDLE ); | |
| return NULL; | |
| } | |
| if (session->hdr.type != WINHTTP_HANDLE_TYPE_SESSION) | |
| { | |
| release_object( &session->hdr ); | |
| set_last_error( ERROR_WINHTTP_INCORRECT_HANDLE_TYPE ); | |
| return NULL; | |
| } | |
| if (!(connect = heap_alloc_zero( sizeof(connect_t) ))) | |
| { | |
| release_object( &session->hdr ); | |
| return NULL; | |
| } | |
| connect->hdr.type = WINHTTP_HANDLE_TYPE_CONNECT; | |
| connect->hdr.vtbl = &connect_vtbl; | |
| connect->hdr.refs = 1; | |
| connect->hdr.flags = session->hdr.flags; | |
| connect->hdr.callback = session->hdr.callback; | |
| connect->hdr.notify_mask = session->hdr.notify_mask; | |
| connect->hdr.context = session->hdr.context; | |
| connect->hdr.redirect_policy = session->hdr.redirect_policy; | |
| list_init( &connect->hdr.children ); | |
| addref_object( &session->hdr ); | |
| connect->session = session; | |
| list_add_head( &session->hdr.children, &connect->hdr.entry ); | |
| if (!(connect->hostname = strdupW( server ))) goto end; | |
| connect->hostport = port; | |
| if (!set_server_for_hostname( connect, server, port )) goto end; | |
| if (!(hconnect = alloc_handle( &connect->hdr ))) goto end; | |
| connect->hdr.handle = hconnect; | |
| send_callback( &session->hdr, WINHTTP_CALLBACK_STATUS_HANDLE_CREATED, &hconnect, sizeof(hconnect) ); | |
| end: | |
| release_object( &connect->hdr ); | |
| release_object( &session->hdr ); | |
| TRACE("returning %p\n", hconnect); | |
| if (hconnect) set_last_error( ERROR_SUCCESS ); | |
| return hconnect; | |
| } | |
| /*********************************************************************** | |
| * request_destroy (internal) | |
| */ | |
| static void request_destroy( object_header_t *hdr ) | |
| { | |
| request_t *request = (request_t *)hdr; | |
| unsigned int i, j; | |
| TRACE("%p\n", request); | |
| if (request->task_thread) | |
| { | |
| /* Signal to the task proc to quit. It will call | |
| this again when it does. */ | |
| HANDLE thread = request->task_thread; | |
| request->task_thread = 0; | |
| SetEvent( request->task_cancel ); | |
| CloseHandle( thread ); | |
| return; | |
| } | |
| release_object( &request->connect->hdr ); | |
| destroy_authinfo( request->authinfo ); | |
| destroy_authinfo( request->proxy_authinfo ); | |
| heap_free( request->verb ); | |
| heap_free( request->path ); | |
| heap_free( request->version ); | |
| heap_free( request->raw_headers ); | |
| heap_free( request->status_text ); | |
| for (i = 0; i < request->num_headers; i++) | |
| { | |
| heap_free( request->headers[i].field ); | |
| heap_free( request->headers[i].value ); | |
| } | |
| heap_free( request->headers ); | |
| for (i = 0; i < request->num_accept_types; i++) heap_free( request->accept_types[i] ); | |
| heap_free( request->accept_types ); | |
| for (i = 0; i < TARGET_MAX; i++) | |
| { | |
| for (j = 0; j < SCHEME_MAX; j++) | |
| { | |
| heap_free( request->creds[i][j].username ); | |
| heap_free( request->creds[i][j].password ); | |
| } | |
| } | |
| heap_free( request ); | |
| } | |
| static void str_to_buffer( WCHAR *buffer, const WCHAR *str, LPDWORD buflen ) | |
| { | |
| int len = 0; | |
| if (str) len = strlenW( str ); | |
| if (buffer && *buflen > len) | |
| { | |
| if (str) memcpy( buffer, str, len * sizeof(WCHAR) ); | |
| buffer[len] = 0; | |
| } | |
| *buflen = len * sizeof(WCHAR); | |
| } | |
| static WCHAR *blob_to_str( DWORD encoding, CERT_NAME_BLOB *blob ) | |
| { | |
| WCHAR *ret; | |
| DWORD size, format = CERT_SIMPLE_NAME_STR | CERT_NAME_STR_CRLF_FLAG; | |
| size = CertNameToStrW( encoding, blob, format, NULL, 0 ); | |
| if ((ret = LocalAlloc( 0, size * sizeof(WCHAR) ))) | |
| CertNameToStrW( encoding, blob, format, ret, size ); | |
| return ret; | |
| } | |
| static BOOL convert_sockaddr( const struct sockaddr *addr, SOCKADDR_STORAGE *addr_storage ) | |
| { | |
| #ifndef __MINGW32__ | |
| switch (addr->sa_family) | |
| { | |
| case AF_INET: | |
| { | |
| const struct sockaddr_in *addr_unix = (const struct sockaddr_in *)addr; | |
| struct WS_sockaddr_in *addr_win = (struct WS_sockaddr_in *)addr_storage; | |
| char *p; | |
| addr_win->sin_family = WS_AF_INET; | |
| addr_win->sin_port = addr_unix->sin_port; | |
| memcpy( &addr_win->sin_addr, &addr_unix->sin_addr, 4 ); | |
| p = (char *)&addr_win->sin_addr + 4; | |
| memset( p, 0, sizeof(*addr_storage) - (p - (char *)addr_win) ); | |
| return TRUE; | |
| } | |
| case AF_INET6: | |
| { | |
| const struct sockaddr_in6 *addr_unix = (const struct sockaddr_in6 *)addr; | |
| struct WS_sockaddr_in6 *addr_win = (struct WS_sockaddr_in6 *)addr_storage; | |
| addr_win->sin6_family = WS_AF_INET6; | |
| addr_win->sin6_port = addr_unix->sin6_port; | |
| addr_win->sin6_flowinfo = addr_unix->sin6_flowinfo; | |
| memcpy( &addr_win->sin6_addr, &addr_unix->sin6_addr, 16 ); | |
| #ifdef HAVE_STRUCT_SOCKADDR_IN6_SIN6_SCOPE_ID | |
| addr_win->sin6_scope_id = addr_unix->sin6_scope_id; | |
| #else | |
| addr_win->sin6_scope_id = 0; | |
| #endif | |
| memset( addr_win + 1, 0, sizeof(*addr_storage) - sizeof(*addr_win) ); | |
| return TRUE; | |
| } | |
| default: | |
| ERR("unhandled family %u\n", addr->sa_family); | |
| return FALSE; | |
| } | |
| #else | |
| switch (addr->sa_family) | |
| { | |
| case AF_INET: | |
| { | |
| struct sockaddr_in *addr_in = (struct sockaddr_in *)addr_storage; | |
| memcpy( addr_in, addr, sizeof(*addr_in) ); | |
| memset( addr_in + 1, 0, sizeof(*addr_storage) - sizeof(*addr_in) ); | |
| return TRUE; | |
| } | |
| case AF_INET6: | |
| { | |
| struct sockaddr_in6 *addr_in6 = (struct sockaddr_in6 *)addr_storage; | |
| memcpy( addr_in6, addr, sizeof(*addr_in6) ); | |
| memset( addr_in6 + 1, 0, sizeof(*addr_storage) - sizeof(*addr_in6) ); | |
| return TRUE; | |
| } | |
| default: | |
| ERR("unhandled family %u\n", addr->sa_family); | |
| return FALSE; | |
| } | |
| #endif | |
| } | |
| static BOOL request_query_option( object_header_t *hdr, DWORD option, LPVOID buffer, LPDWORD buflen ) | |
| { | |
| request_t *request = (request_t *)hdr; | |
| switch (option) | |
| { | |
| case WINHTTP_OPTION_SECURITY_FLAGS: | |
| { | |
| DWORD flags = 0; | |
| int bits; | |
| if (!buffer || *buflen < sizeof(flags)) | |
| { | |
| *buflen = sizeof(flags); | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| flags = 0; | |
| if (hdr->flags & WINHTTP_FLAG_SECURE) flags |= SECURITY_FLAG_SECURE; | |
| flags |= request->security_flags; | |
| if (request->netconn) | |
| { | |
| bits = netconn_get_cipher_strength( request->netconn ); | |
| if (bits >= 128) | |
| flags |= SECURITY_FLAG_STRENGTH_STRONG; | |
| else if (bits >= 56) | |
| flags |= SECURITY_FLAG_STRENGTH_MEDIUM; | |
| else | |
| flags |= SECURITY_FLAG_STRENGTH_WEAK; | |
| } | |
| *(DWORD *)buffer = flags; | |
| *buflen = sizeof(flags); | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_SERVER_CERT_CONTEXT: | |
| { | |
| const CERT_CONTEXT *cert; | |
| if (!buffer || *buflen < sizeof(cert)) | |
| { | |
| *buflen = sizeof(cert); | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| if (!request->netconn || !(cert = netconn_get_certificate( request->netconn ))) return FALSE; | |
| *(CERT_CONTEXT **)buffer = (CERT_CONTEXT *)cert; | |
| *buflen = sizeof(cert); | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_SECURITY_CERTIFICATE_STRUCT: | |
| { | |
| const CERT_CONTEXT *cert; | |
| const CRYPT_OID_INFO *oidInfo; | |
| WINHTTP_CERTIFICATE_INFO *ci = buffer; | |
| FIXME("partial stub\n"); | |
| if (!buffer || *buflen < sizeof(*ci)) | |
| { | |
| *buflen = sizeof(*ci); | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| if (!request->netconn || !(cert = netconn_get_certificate( request->netconn ))) return FALSE; | |
| ci->ftExpiry = cert->pCertInfo->NotAfter; | |
| ci->ftStart = cert->pCertInfo->NotBefore; | |
| ci->lpszSubjectInfo = blob_to_str( cert->dwCertEncodingType, &cert->pCertInfo->Subject ); | |
| ci->lpszIssuerInfo = blob_to_str( cert->dwCertEncodingType, &cert->pCertInfo->Issuer ); | |
| ci->lpszProtocolName = NULL; | |
| oidInfo = CryptFindOIDInfo( CRYPT_OID_INFO_OID_KEY, | |
| cert->pCertInfo->SignatureAlgorithm.pszObjId, | |
| 0 ); | |
| if (oidInfo) | |
| ci->lpszSignatureAlgName = (LPWSTR)oidInfo->pwszName; | |
| else | |
| ci->lpszSignatureAlgName = NULL; | |
| ci->lpszEncryptionAlgName = NULL; | |
| ci->dwKeySize = request->netconn ? netconn_get_cipher_strength( request->netconn ) : 0; | |
| CertFreeCertificateContext( cert ); | |
| *buflen = sizeof(*ci); | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_SECURITY_KEY_BITNESS: | |
| { | |
| if (!buffer || *buflen < sizeof(DWORD)) | |
| { | |
| *buflen = sizeof(DWORD); | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| *(DWORD *)buffer = request->netconn ? netconn_get_cipher_strength( request->netconn ) : 0; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_CONNECTION_INFO: | |
| { | |
| WINHTTP_CONNECTION_INFO *info = buffer; | |
| struct sockaddr local; | |
| socklen_t len = sizeof(local); | |
| const struct sockaddr *remote = (const struct sockaddr *)&request->connect->sockaddr; | |
| if (!buffer || *buflen < sizeof(*info)) | |
| { | |
| *buflen = sizeof(*info); | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| if (!request->netconn) | |
| { | |
| set_last_error( ERROR_WINHTTP_INCORRECT_HANDLE_STATE ); | |
| return FALSE; | |
| } | |
| if (getsockname( request->netconn->socket, &local, &len )) return FALSE; | |
| if (!convert_sockaddr( &local, &info->LocalAddress )) return FALSE; | |
| if (!convert_sockaddr( remote, &info->RemoteAddress )) return FALSE; | |
| info->cbSize = sizeof(*info); | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_RESOLVE_TIMEOUT: | |
| *(DWORD *)buffer = request->resolve_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| case WINHTTP_OPTION_CONNECT_TIMEOUT: | |
| *(DWORD *)buffer = request->connect_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| case WINHTTP_OPTION_SEND_TIMEOUT: | |
| *(DWORD *)buffer = request->send_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| case WINHTTP_OPTION_RECEIVE_TIMEOUT: | |
| *(DWORD *)buffer = request->recv_timeout; | |
| *buflen = sizeof(DWORD); | |
| return TRUE; | |
| case WINHTTP_OPTION_USERNAME: | |
| str_to_buffer( buffer, request->connect->username, buflen ); | |
| return TRUE; | |
| case WINHTTP_OPTION_PASSWORD: | |
| str_to_buffer( buffer, request->connect->password, buflen ); | |
| return TRUE; | |
| case WINHTTP_OPTION_PROXY_USERNAME: | |
| str_to_buffer( buffer, request->connect->session->proxy_username, buflen ); | |
| return TRUE; | |
| case WINHTTP_OPTION_PROXY_PASSWORD: | |
| str_to_buffer( buffer, request->connect->session->proxy_password, buflen ); | |
| return TRUE; | |
| default: | |
| FIXME("unimplemented option %u\n", option); | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| } | |
| static WCHAR *buffer_to_str( WCHAR *buffer, DWORD buflen ) | |
| { | |
| WCHAR *ret; | |
| if ((ret = heap_alloc( (buflen + 1) * sizeof(WCHAR)))) | |
| { | |
| memcpy( ret, buffer, buflen * sizeof(WCHAR) ); | |
| ret[buflen] = 0; | |
| return ret; | |
| } | |
| set_last_error( ERROR_OUTOFMEMORY ); | |
| return NULL; | |
| } | |
| static BOOL request_set_option( object_header_t *hdr, DWORD option, LPVOID buffer, DWORD buflen ) | |
| { | |
| request_t *request = (request_t *)hdr; | |
| switch (option) | |
| { | |
| case WINHTTP_OPTION_PROXY: | |
| { | |
| WINHTTP_PROXY_INFO *pi = buffer; | |
| FIXME("%u %s %s\n", pi->dwAccessType, debugstr_w(pi->lpszProxy), debugstr_w(pi->lpszProxyBypass)); | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_DISABLE_FEATURE: | |
| { | |
| DWORD disable; | |
| if (buflen != sizeof(DWORD)) | |
| { | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| disable = *(DWORD *)buffer; | |
| TRACE("0x%x\n", disable); | |
| hdr->disable_flags |= disable; | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_AUTOLOGON_POLICY: | |
| { | |
| DWORD policy; | |
| if (buflen != sizeof(DWORD)) | |
| { | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| policy = *(DWORD *)buffer; | |
| TRACE("0x%x\n", policy); | |
| hdr->logon_policy = policy; | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_REDIRECT_POLICY: | |
| { | |
| DWORD policy; | |
| if (buflen != sizeof(DWORD)) | |
| { | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| policy = *(DWORD *)buffer; | |
| TRACE("0x%x\n", policy); | |
| hdr->redirect_policy = policy; | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_SECURITY_FLAGS: | |
| { | |
| DWORD flags; | |
| if (buflen < sizeof(DWORD)) | |
| { | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| flags = *(DWORD *)buffer; | |
| TRACE("0x%x\n", flags); | |
| if (!(flags & (SECURITY_FLAG_IGNORE_CERT_CN_INVALID | | |
| SECURITY_FLAG_IGNORE_CERT_DATE_INVALID | | |
| SECURITY_FLAG_IGNORE_UNKNOWN_CA | | |
| SECURITY_FLAG_IGNORE_CERT_WRONG_USAGE))) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| request->security_flags = flags; | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_RESOLVE_TIMEOUT: | |
| request->resolve_timeout = *(DWORD *)buffer; | |
| return TRUE; | |
| case WINHTTP_OPTION_CONNECT_TIMEOUT: | |
| request->connect_timeout = *(DWORD *)buffer; | |
| return TRUE; | |
| case WINHTTP_OPTION_SEND_TIMEOUT: | |
| request->send_timeout = *(DWORD *)buffer; | |
| return TRUE; | |
| case WINHTTP_OPTION_RECEIVE_TIMEOUT: | |
| request->recv_timeout = *(DWORD *)buffer; | |
| return TRUE; | |
| case WINHTTP_OPTION_USERNAME: | |
| { | |
| connect_t *connect = request->connect; | |
| heap_free( connect->username ); | |
| if (!(connect->username = buffer_to_str( buffer, buflen ))) return FALSE; | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_PASSWORD: | |
| { | |
| connect_t *connect = request->connect; | |
| heap_free( connect->password ); | |
| if (!(connect->password = buffer_to_str( buffer, buflen ))) return FALSE; | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_PROXY_USERNAME: | |
| { | |
| session_t *session = request->connect->session; | |
| heap_free( session->proxy_username ); | |
| if (!(session->proxy_username = buffer_to_str( buffer, buflen ))) return FALSE; | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_PROXY_PASSWORD: | |
| { | |
| session_t *session = request->connect->session; | |
| heap_free( session->proxy_password ); | |
| if (!(session->proxy_password = buffer_to_str( buffer, buflen ))) return FALSE; | |
| return TRUE; | |
| } | |
| case WINHTTP_OPTION_CLIENT_CERT_CONTEXT: | |
| if (!(hdr->flags & WINHTTP_FLAG_SECURE)) | |
| { | |
| SetLastError( ERROR_WINHTTP_INCORRECT_HANDLE_STATE ); | |
| return FALSE; | |
| } | |
| FIXME("WINHTTP_OPTION_CLIENT_CERT_CONTEXT\n"); | |
| return TRUE; | |
| default: | |
| FIXME("unimplemented option %u\n", option); | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return TRUE; | |
| } | |
| } | |
| static const object_vtbl_t request_vtbl = | |
| { | |
| request_destroy, | |
| request_query_option, | |
| request_set_option | |
| }; | |
| static BOOL store_accept_types( request_t *request, const WCHAR **accept_types ) | |
| { | |
| const WCHAR **types = accept_types; | |
| DWORD i; | |
| if (!types) return TRUE; | |
| while (*types) | |
| { | |
| request->num_accept_types++; | |
| types++; | |
| } | |
| if (!request->num_accept_types) return TRUE; | |
| if (!(request->accept_types = heap_alloc( request->num_accept_types * sizeof(WCHAR *)))) | |
| { | |
| request->num_accept_types = 0; | |
| return FALSE; | |
| } | |
| types = accept_types; | |
| for (i = 0; i < request->num_accept_types; i++) | |
| { | |
| if (!(request->accept_types[i] = strdupW( *types ))) | |
| { | |
| for ( ; i > 0; --i) heap_free( request->accept_types[i - 1] ); | |
| heap_free( request->accept_types ); | |
| request->accept_types = NULL; | |
| request->num_accept_types = 0; | |
| return FALSE; | |
| } | |
| types++; | |
| } | |
| return TRUE; | |
| } | |
| /*********************************************************************** | |
| * WinHttpOpenRequest (winhttp.@) | |
| */ | |
| HINTERNET WINAPI WinHttpOpenRequest( HINTERNET hconnect, LPCWSTR verb, LPCWSTR object, LPCWSTR version, | |
| LPCWSTR referrer, LPCWSTR *types, DWORD flags ) | |
| { | |
| request_t *request; | |
| connect_t *connect; | |
| HINTERNET hrequest = NULL; | |
| TRACE("%p, %s, %s, %s, %s, %p, 0x%08x\n", hconnect, debugstr_w(verb), debugstr_w(object), | |
| debugstr_w(version), debugstr_w(referrer), types, flags); | |
| if(types && TRACE_ON(winhttp)) { | |
| const WCHAR **iter; | |
| TRACE("accept types:\n"); | |
| for(iter = types; *iter; iter++) | |
| TRACE(" %s\n", debugstr_w(*iter)); | |
| } | |
| if (!(connect = (connect_t *)grab_object( hconnect ))) | |
| { | |
| set_last_error( ERROR_INVALID_HANDLE ); | |
| return NULL; | |
| } | |
| if (connect->hdr.type != WINHTTP_HANDLE_TYPE_CONNECT) | |
| { | |
| release_object( &connect->hdr ); | |
| set_last_error( ERROR_WINHTTP_INCORRECT_HANDLE_TYPE ); | |
| return NULL; | |
| } | |
| if (!(request = heap_alloc_zero( sizeof(request_t) ))) | |
| { | |
| release_object( &connect->hdr ); | |
| return NULL; | |
| } | |
| request->hdr.type = WINHTTP_HANDLE_TYPE_REQUEST; | |
| request->hdr.vtbl = &request_vtbl; | |
| request->hdr.refs = 1; | |
| request->hdr.flags = flags; | |
| request->hdr.callback = connect->hdr.callback; | |
| request->hdr.notify_mask = connect->hdr.notify_mask; | |
| request->hdr.context = connect->hdr.context; | |
| request->hdr.redirect_policy = connect->hdr.redirect_policy; | |
| list_init( &request->hdr.children ); | |
| list_init( &request->task_queue ); | |
| addref_object( &connect->hdr ); | |
| request->connect = connect; | |
| list_add_head( &connect->hdr.children, &request->hdr.entry ); | |
| request->resolve_timeout = connect->session->resolve_timeout; | |
| request->connect_timeout = connect->session->connect_timeout; | |
| request->send_timeout = connect->session->send_timeout; | |
| request->recv_timeout = connect->session->recv_timeout; | |
| if (!verb || !verb[0]) verb = getW; | |
| if (!(request->verb = strdupW( verb ))) goto end; | |
| if (object) | |
| { | |
| WCHAR *path, *p; | |
| unsigned int len; | |
| len = strlenW( object ) + 1; | |
| if (object[0] != '/') len++; | |
| if (!(p = path = heap_alloc( len * sizeof(WCHAR) ))) goto end; | |
| if (object[0] != '/') *p++ = '/'; | |
| strcpyW( p, object ); | |
| request->path = path; | |
| } | |
| else if (!(request->path = strdupW( slashW ))) goto end; | |
| if (!version || !version[0]) version = http1_1; | |
| if (!(request->version = strdupW( version ))) goto end; | |
| if (!(store_accept_types( request, types ))) goto end; | |
| if (!(hrequest = alloc_handle( &request->hdr ))) goto end; | |
| request->hdr.handle = hrequest; | |
| send_callback( &request->hdr, WINHTTP_CALLBACK_STATUS_HANDLE_CREATED, &hrequest, sizeof(hrequest) ); | |
| end: | |
| release_object( &request->hdr ); | |
| release_object( &connect->hdr ); | |
| TRACE("returning %p\n", hrequest); | |
| if (hrequest) set_last_error( ERROR_SUCCESS ); | |
| return hrequest; | |
| } | |
| /*********************************************************************** | |
| * WinHttpCloseHandle (winhttp.@) | |
| */ | |
| BOOL WINAPI WinHttpCloseHandle( HINTERNET handle ) | |
| { | |
| object_header_t *hdr; | |
| TRACE("%p\n", handle); | |
| if (!(hdr = grab_object( handle ))) | |
| { | |
| set_last_error( ERROR_INVALID_HANDLE ); | |
| return FALSE; | |
| } | |
| release_object( hdr ); | |
| free_handle( handle ); | |
| set_last_error( ERROR_SUCCESS ); | |
| return TRUE; | |
| } | |
| static BOOL query_option( object_header_t *hdr, DWORD option, LPVOID buffer, LPDWORD buflen ) | |
| { | |
| BOOL ret = FALSE; | |
| if (!buflen) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| switch (option) | |
| { | |
| case WINHTTP_OPTION_CONTEXT_VALUE: | |
| { | |
| if (!buffer || *buflen < sizeof(DWORD_PTR)) | |
| { | |
| *buflen = sizeof(DWORD_PTR); | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| *(DWORD_PTR *)buffer = hdr->context; | |
| *buflen = sizeof(DWORD_PTR); | |
| return TRUE; | |
| } | |
| default: | |
| if (hdr->vtbl->query_option) ret = hdr->vtbl->query_option( hdr, option, buffer, buflen ); | |
| else | |
| { | |
| FIXME("unimplemented option %u\n", option); | |
| set_last_error( ERROR_WINHTTP_INCORRECT_HANDLE_TYPE ); | |
| return FALSE; | |
| } | |
| break; | |
| } | |
| return ret; | |
| } | |
| /*********************************************************************** | |
| * WinHttpQueryOption (winhttp.@) | |
| */ | |
| BOOL WINAPI WinHttpQueryOption( HINTERNET handle, DWORD option, LPVOID buffer, LPDWORD buflen ) | |
| { | |
| BOOL ret = FALSE; | |
| object_header_t *hdr; | |
| TRACE("%p, %u, %p, %p\n", handle, option, buffer, buflen); | |
| if (!(hdr = grab_object( handle ))) | |
| { | |
| set_last_error( ERROR_INVALID_HANDLE ); | |
| return FALSE; | |
| } | |
| ret = query_option( hdr, option, buffer, buflen ); | |
| release_object( hdr ); | |
| if (ret) set_last_error( ERROR_SUCCESS ); | |
| return ret; | |
| } | |
| static BOOL set_option( object_header_t *hdr, DWORD option, LPVOID buffer, DWORD buflen ) | |
| { | |
| BOOL ret = TRUE; | |
| if (!buffer && buflen) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| switch (option) | |
| { | |
| case WINHTTP_OPTION_CONTEXT_VALUE: | |
| { | |
| if (buflen != sizeof(DWORD_PTR)) | |
| { | |
| set_last_error( ERROR_INSUFFICIENT_BUFFER ); | |
| return FALSE; | |
| } | |
| hdr->context = *(DWORD_PTR *)buffer; | |
| return TRUE; | |
| } | |
| default: | |
| if (hdr->vtbl->set_option) ret = hdr->vtbl->set_option( hdr, option, buffer, buflen ); | |
| else | |
| { | |
| FIXME("unimplemented option %u\n", option); | |
| set_last_error( ERROR_WINHTTP_INCORRECT_HANDLE_TYPE ); | |
| return FALSE; | |
| } | |
| break; | |
| } | |
| return ret; | |
| } | |
| /*********************************************************************** | |
| * WinHttpSetOption (winhttp.@) | |
| */ | |
| BOOL WINAPI WinHttpSetOption( HINTERNET handle, DWORD option, LPVOID buffer, DWORD buflen ) | |
| { | |
| BOOL ret = FALSE; | |
| object_header_t *hdr; | |
| TRACE("%p, %u, %p, %u\n", handle, option, buffer, buflen); | |
| if (!(hdr = grab_object( handle ))) | |
| { | |
| set_last_error( ERROR_INVALID_HANDLE ); | |
| return FALSE; | |
| } | |
| ret = set_option( hdr, option, buffer, buflen ); | |
| release_object( hdr ); | |
| if (ret) set_last_error( ERROR_SUCCESS ); | |
| return ret; | |
| } | |
| static char *get_computer_name( COMPUTER_NAME_FORMAT format ) | |
| { | |
| char *ret; | |
| DWORD size = 0; | |
| GetComputerNameExA( format, NULL, &size ); | |
| if (GetLastError() != ERROR_MORE_DATA) return NULL; | |
| if (!(ret = heap_alloc( size ))) return NULL; | |
| if (!GetComputerNameExA( format, ret, &size )) | |
| { | |
| heap_free( ret ); | |
| return NULL; | |
| } | |
| return ret; | |
| } | |
| static BOOL is_domain_suffix( const char *domain, const char *suffix ) | |
| { | |
| int len_domain = strlen( domain ), len_suffix = strlen( suffix ); | |
| if (len_suffix > len_domain) return FALSE; | |
| if (!strcasecmp( domain + len_domain - len_suffix, suffix )) return TRUE; | |
| return FALSE; | |
| } | |
| static int reverse_lookup( const struct addrinfo *ai, char *hostname, size_t len ) | |
| { | |
| int ret = -1; | |
| #ifdef HAVE_GETNAMEINFO | |
| ret = getnameinfo( ai->ai_addr, ai->ai_addrlen, hostname, len, NULL, 0, 0 ); | |
| #endif | |
| return ret; | |
| } | |
| static WCHAR *build_wpad_url( const char *hostname, const struct addrinfo *ai ) | |
| { | |
| static const WCHAR httpW[] = {'h','t','t','p',':','/','/',0}; | |
| static const WCHAR wpadW[] = {'/','w','p','a','d','.','d','a','t',0}; | |
| char name[NI_MAXHOST]; | |
| WCHAR *ret, *p; | |
| int len; | |
| while (ai && ai->ai_family != AF_INET && ai->ai_family != AF_INET6) ai = ai->ai_next; | |
| if (!ai) return NULL; | |
| if (!reverse_lookup( ai, name, sizeof(name) )) hostname = name; | |
| len = strlenW( httpW ) + strlen( hostname ) + strlenW( wpadW ); | |
| if (!(ret = p = GlobalAlloc( 0, (len + 1) * sizeof(WCHAR) ))) return NULL; | |
| strcpyW( p, httpW ); | |
| p += strlenW( httpW ); | |
| while (*hostname) { *p++ = *hostname++; } | |
| strcpyW( p, wpadW ); | |
| return ret; | |
| } | |
| static BOOL get_system_proxy_autoconfig_url( char *buf, DWORD buflen ) | |
| { | |
| #if defined(MAC_OS_X_VERSION_10_6) && MAC_OS_X_VERSION_MAX_ALLOWED >= MAC_OS_X_VERSION_10_6 | |
| CFDictionaryRef settings = CFNetworkCopySystemProxySettings(); | |
| const void *ref; | |
| BOOL ret = FALSE; | |
| if (!settings) return FALSE; | |
| if (!(ref = CFDictionaryGetValue( settings, kCFNetworkProxiesProxyAutoConfigURLString ))) | |
| { | |
| CFRelease( settings ); | |
| return FALSE; | |
| } | |
| if (CFStringGetCString( ref, buf, buflen, kCFStringEncodingASCII )) | |
| { | |
| TRACE( "returning %s\n", debugstr_a(buf) ); | |
| ret = TRUE; | |
| } | |
| CFRelease( settings ); | |
| return ret; | |
| #else | |
| static BOOL first = TRUE; | |
| if (first) | |
| { | |
| FIXME( "no support on this platform\n" ); | |
| first = FALSE; | |
| } | |
| else | |
| TRACE( "no support on this platform\n" ); | |
| return FALSE; | |
| #endif | |
| } | |
| #define INTERNET_MAX_URL_LENGTH 2084 | |
| /*********************************************************************** | |
| * WinHttpDetectAutoProxyConfigUrl (winhttp.@) | |
| */ | |
| BOOL WINAPI WinHttpDetectAutoProxyConfigUrl( DWORD flags, LPWSTR *url ) | |
| { | |
| BOOL ret = FALSE; | |
| char system_url[INTERNET_MAX_URL_LENGTH + 1]; | |
| TRACE("0x%08x, %p\n", flags, url); | |
| if (!flags || !url) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| if (get_system_proxy_autoconfig_url( system_url, sizeof(system_url) )) | |
| { | |
| WCHAR *urlW; | |
| if (!(urlW = strdupAW( system_url ))) return FALSE; | |
| *url = urlW; | |
| set_last_error( ERROR_SUCCESS ); | |
| return TRUE; | |
| } | |
| if (flags & WINHTTP_AUTO_DETECT_TYPE_DHCP) | |
| { | |
| static int fixme_shown; | |
| if (!fixme_shown++) FIXME("discovery via DHCP not supported\n"); | |
| } | |
| if (flags & WINHTTP_AUTO_DETECT_TYPE_DNS_A) | |
| { | |
| #ifdef HAVE_GETADDRINFO | |
| char *fqdn, *domain, *p; | |
| if (!(fqdn = get_computer_name( ComputerNamePhysicalDnsFullyQualified ))) return FALSE; | |
| if (!(domain = get_computer_name( ComputerNamePhysicalDnsDomain ))) | |
| { | |
| heap_free( fqdn ); | |
| return FALSE; | |
| } | |
| p = fqdn; | |
| while ((p = strchr( p, '.' )) && is_domain_suffix( p + 1, domain )) | |
| { | |
| struct addrinfo *ai; | |
| char *name; | |
| int res; | |
| if (!(name = heap_alloc( sizeof("wpad") + strlen(p) ))) | |
| { | |
| heap_free( fqdn ); | |
| heap_free( domain ); | |
| return FALSE; | |
| } | |
| strcpy( name, "wpad" ); | |
| strcat( name, p ); | |
| res = getaddrinfo( name, NULL, NULL, &ai ); | |
| if (!res) | |
| { | |
| *url = build_wpad_url( name, ai ); | |
| freeaddrinfo( ai ); | |
| if (*url) | |
| { | |
| TRACE("returning %s\n", debugstr_w(*url)); | |
| heap_free( name ); | |
| ret = TRUE; | |
| break; | |
| } | |
| } | |
| heap_free( name ); | |
| p++; | |
| } | |
| heap_free( domain ); | |
| heap_free( fqdn ); | |
| #else | |
| FIXME("getaddrinfo not found at build time\n"); | |
| #endif | |
| } | |
| if (!ret) | |
| { | |
| set_last_error( ERROR_WINHTTP_AUTODETECTION_FAILED ); | |
| *url = NULL; | |
| } | |
| else set_last_error( ERROR_SUCCESS ); | |
| return ret; | |
| } | |
| static const WCHAR Connections[] = { | |
| 'S','o','f','t','w','a','r','e','\\', | |
| 'M','i','c','r','o','s','o','f','t','\\', | |
| 'W','i','n','d','o','w','s','\\', | |
| 'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\', | |
| 'I','n','t','e','r','n','e','t',' ','S','e','t','t','i','n','g','s','\\', | |
| 'C','o','n','n','e','c','t','i','o','n','s',0 }; | |
| static const WCHAR WinHttpSettings[] = { | |
| 'W','i','n','H','t','t','p','S','e','t','t','i','n','g','s',0 }; | |
| static const DWORD WINHTTP_SETTINGS_MAGIC = 0x18; | |
| static const DWORD WININET_SETTINGS_MAGIC = 0x46; | |
| static const DWORD PROXY_TYPE_DIRECT = 1; | |
| static const DWORD PROXY_TYPE_PROXY = 2; | |
| static const DWORD PROXY_USE_PAC_SCRIPT = 4; | |
| static const DWORD PROXY_AUTODETECT_SETTINGS = 8; | |
| struct connection_settings_header | |
| { | |
| DWORD magic; | |
| DWORD unknown; /* always zero? */ | |
| DWORD flags; /* one or more of PROXY_* */ | |
| }; | |
| static inline void copy_char_to_wchar_sz(const BYTE *src, DWORD len, WCHAR *dst) | |
| { | |
| const BYTE *begin; | |
| for (begin = src; src - begin < len; src++, dst++) | |
| *dst = *src; | |
| *dst = 0; | |
| } | |
| /*********************************************************************** | |
| * WinHttpGetDefaultProxyConfiguration (winhttp.@) | |
| */ | |
| BOOL WINAPI WinHttpGetDefaultProxyConfiguration( WINHTTP_PROXY_INFO *info ) | |
| { | |
| LONG l; | |
| HKEY key; | |
| BOOL got_from_reg = FALSE, direct = TRUE; | |
| char *envproxy; | |
| TRACE("%p\n", info); | |
| l = RegOpenKeyExW( HKEY_LOCAL_MACHINE, Connections, 0, KEY_READ, &key ); | |
| if (!l) | |
| { | |
| DWORD type, size = 0; | |
| l = RegQueryValueExW( key, WinHttpSettings, NULL, &type, NULL, &size ); | |
| if (!l && type == REG_BINARY && | |
| size >= sizeof(struct connection_settings_header) + 2 * sizeof(DWORD)) | |
| { | |
| BYTE *buf = heap_alloc( size ); | |
| if (buf) | |
| { | |
| struct connection_settings_header *hdr = | |
| (struct connection_settings_header *)buf; | |
| DWORD *len = (DWORD *)(hdr + 1); | |
| l = RegQueryValueExW( key, WinHttpSettings, NULL, NULL, buf, | |
| &size ); | |
| if (!l && hdr->magic == WINHTTP_SETTINGS_MAGIC && | |
| hdr->unknown == 0) | |
| { | |
| if (hdr->flags & PROXY_TYPE_PROXY) | |
| { | |
| BOOL sane = FALSE; | |
| LPWSTR proxy = NULL; | |
| LPWSTR proxy_bypass = NULL; | |
| /* Sanity-check length of proxy string */ | |
| if ((BYTE *)len - buf + *len <= size) | |
| { | |
| sane = TRUE; | |
| proxy = GlobalAlloc( 0, (*len + 1) * sizeof(WCHAR) ); | |
| if (proxy) | |
| copy_char_to_wchar_sz( (BYTE *)(len + 1), *len, proxy ); | |
| len = (DWORD *)((BYTE *)(len + 1) + *len); | |
| } | |
| if (sane) | |
| { | |
| /* Sanity-check length of proxy bypass string */ | |
| if ((BYTE *)len - buf + *len <= size) | |
| { | |
| proxy_bypass = GlobalAlloc( 0, (*len + 1) * sizeof(WCHAR) ); | |
| if (proxy_bypass) | |
| copy_char_to_wchar_sz( (BYTE *)(len + 1), *len, proxy_bypass ); | |
| } | |
| else | |
| { | |
| sane = FALSE; | |
| GlobalFree( proxy ); | |
| proxy = NULL; | |
| } | |
| } | |
| info->lpszProxy = proxy; | |
| info->lpszProxyBypass = proxy_bypass; | |
| if (sane) | |
| { | |
| got_from_reg = TRUE; | |
| direct = FALSE; | |
| info->dwAccessType = | |
| WINHTTP_ACCESS_TYPE_NAMED_PROXY; | |
| TRACE("http proxy (from registry) = %s, bypass = %s\n", | |
| debugstr_w(info->lpszProxy), | |
| debugstr_w(info->lpszProxyBypass)); | |
| } | |
| } | |
| } | |
| heap_free( buf ); | |
| } | |
| } | |
| RegCloseKey( key ); | |
| } | |
| if (!got_from_reg && (envproxy = getenv( "http_proxy" ))) | |
| { | |
| char *colon, *http_proxy; | |
| if ((colon = strchr( envproxy, ':' ))) | |
| { | |
| if (*(colon + 1) == '/' && *(colon + 2) == '/') | |
| { | |
| static const char http[] = "http://"; | |
| /* It's a scheme, check that it's http */ | |
| if (!strncmp( envproxy, http, strlen( http ) )) | |
| http_proxy = envproxy + strlen( http ); | |
| else | |
| { | |
| WARN("unsupported scheme in $http_proxy: %s\n", envproxy); | |
| http_proxy = NULL; | |
| } | |
| } | |
| else | |
| http_proxy = envproxy; | |
| } | |
| else | |
| http_proxy = envproxy; | |
| if (http_proxy) | |
| { | |
| WCHAR *http_proxyW; | |
| int len; | |
| len = MultiByteToWideChar( CP_UNIXCP, 0, http_proxy, -1, NULL, 0 ); | |
| if ((http_proxyW = GlobalAlloc( 0, len * sizeof(WCHAR)))) | |
| { | |
| MultiByteToWideChar( CP_UNIXCP, 0, http_proxy, -1, http_proxyW, len ); | |
| direct = FALSE; | |
| info->dwAccessType = WINHTTP_ACCESS_TYPE_NAMED_PROXY; | |
| info->lpszProxy = http_proxyW; | |
| info->lpszProxyBypass = NULL; | |
| TRACE("http proxy (from environment) = %s\n", | |
| debugstr_w(info->lpszProxy)); | |
| } | |
| } | |
| } | |
| if (direct) | |
| { | |
| info->dwAccessType = WINHTTP_ACCESS_TYPE_NO_PROXY; | |
| info->lpszProxy = NULL; | |
| info->lpszProxyBypass = NULL; | |
| } | |
| set_last_error( ERROR_SUCCESS ); | |
| return TRUE; | |
| } | |
| /*********************************************************************** | |
| * WinHttpGetIEProxyConfigForCurrentUser (winhttp.@) | |
| */ | |
| BOOL WINAPI WinHttpGetIEProxyConfigForCurrentUser( WINHTTP_CURRENT_USER_IE_PROXY_CONFIG *config ) | |
| { | |
| static const WCHAR settingsW[] = | |
| {'D','e','f','a','u','l','t','C','o','n','n','e','c','t','i','o','n','S','e','t','t','i','n','g','s',0}; | |
| HKEY hkey = NULL; | |
| struct connection_settings_header *hdr = NULL; | |
| DWORD type, offset, len, size = 0; | |
| BOOL ret = FALSE; | |
| TRACE("%p\n", config); | |
| if (!config) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| memset( config, 0, sizeof(*config) ); | |
| config->fAutoDetect = TRUE; | |
| if (RegOpenKeyExW( HKEY_CURRENT_USER, Connections, 0, KEY_READ, &hkey ) || | |
| RegQueryValueExW( hkey, settingsW, NULL, &type, NULL, &size ) || | |
| type != REG_BINARY || size < sizeof(struct connection_settings_header)) | |
| { | |
| ret = TRUE; | |
| goto done; | |
| } | |
| if (!(hdr = heap_alloc( size ))) goto done; | |
| if (RegQueryValueExW( hkey, settingsW, NULL, &type, (BYTE *)hdr, &size ) || | |
| hdr->magic != WININET_SETTINGS_MAGIC) | |
| { | |
| ret = TRUE; | |
| goto done; | |
| } | |
| config->fAutoDetect = (hdr->flags & PROXY_AUTODETECT_SETTINGS) != 0; | |
| offset = sizeof(*hdr); | |
| if (offset + sizeof(DWORD) > size) goto done; | |
| len = *(DWORD *)((char *)hdr + offset); | |
| offset += sizeof(DWORD); | |
| if (len && hdr->flags & PROXY_TYPE_PROXY) | |
| { | |
| if (!(config->lpszProxy = GlobalAlloc( 0, (len + 1) * sizeof(WCHAR) ))) goto done; | |
| copy_char_to_wchar_sz( (const BYTE *)hdr + offset , len, config->lpszProxy ); | |
| } | |
| offset += len; | |
| if (offset + sizeof(DWORD) > size) goto done; | |
| len = *(DWORD *)((char *)hdr + offset); | |
| offset += sizeof(DWORD); | |
| if (len && (hdr->flags & PROXY_TYPE_PROXY)) | |
| { | |
| if (!(config->lpszProxyBypass = GlobalAlloc( 0, (len + 1) * sizeof(WCHAR) ))) goto done; | |
| copy_char_to_wchar_sz( (const BYTE *)hdr + offset , len, config->lpszProxyBypass ); | |
| } | |
| offset += len; | |
| if (offset + sizeof(DWORD) > size) goto done; | |
| len = *(DWORD *)((char *)hdr + offset); | |
| offset += sizeof(DWORD); | |
| if (len && (hdr->flags & PROXY_USE_PAC_SCRIPT)) | |
| { | |
| if (!(config->lpszAutoConfigUrl = GlobalAlloc( 0, (len + 1) * sizeof(WCHAR) ))) goto done; | |
| copy_char_to_wchar_sz( (const BYTE *)hdr + offset , len, config->lpszAutoConfigUrl ); | |
| } | |
| ret = TRUE; | |
| done: | |
| RegCloseKey( hkey ); | |
| heap_free( hdr ); | |
| if (!ret) | |
| { | |
| GlobalFree( config->lpszAutoConfigUrl ); | |
| config->lpszAutoConfigUrl = NULL; | |
| GlobalFree( config->lpszProxy ); | |
| config->lpszProxy = NULL; | |
| GlobalFree( config->lpszProxyBypass ); | |
| config->lpszProxyBypass = NULL; | |
| } | |
| else set_last_error( ERROR_SUCCESS ); | |
| return ret; | |
| } | |
| static BOOL parse_script_result( const char *result, WINHTTP_PROXY_INFO *info ) | |
| { | |
| const char *p; | |
| WCHAR *q; | |
| int len; | |
| info->dwAccessType = WINHTTP_ACCESS_TYPE_NO_PROXY; | |
| info->lpszProxy = NULL; | |
| info->lpszProxyBypass = NULL; | |
| TRACE("%s\n", debugstr_a( result )); | |
| p = result; | |
| while (*p == ' ') p++; | |
| len = strlen( p ); | |
| if (len >= 5 && !strncasecmp( p, "PROXY", sizeof("PROXY") - 1 )) | |
| { | |
| p += 5; | |
| while (*p == ' ') p++; | |
| if (!*p || *p == ';') return TRUE; | |
| if (!(info->lpszProxy = q = strdupAW( p ))) return FALSE; | |
| info->dwAccessType = WINHTTP_ACCESS_TYPE_NAMED_PROXY; | |
| for (; *q; q++) | |
| { | |
| if (*q == ' ' || *q == ';') | |
| { | |
| *q = 0; | |
| break; | |
| } | |
| } | |
| } | |
| return TRUE; | |
| } | |
| static char *download_script( const WCHAR *url, DWORD *out_size ) | |
| { | |
| static const WCHAR typeW[] = {'*','/','*',0}; | |
| static const WCHAR *acceptW[] = {typeW, NULL}; | |
| HINTERNET ses, con = NULL, req = NULL; | |
| WCHAR *hostname; | |
| URL_COMPONENTSW uc; | |
| DWORD status, size = sizeof(status), offset, to_read, bytes_read, flags = 0; | |
| char *tmp, *buffer = NULL; | |
| *out_size = 0; | |
| memset( &uc, 0, sizeof(uc) ); | |
| uc.dwStructSize = sizeof(uc); | |
| uc.dwHostNameLength = -1; | |
| uc.dwUrlPathLength = -1; | |
| if (!WinHttpCrackUrl( url, 0, 0, &uc )) return NULL; | |
| if (!(hostname = heap_alloc( (uc.dwHostNameLength + 1) * sizeof(WCHAR) ))) return NULL; | |
| memcpy( hostname, uc.lpszHostName, uc.dwHostNameLength * sizeof(WCHAR) ); | |
| hostname[uc.dwHostNameLength] = 0; | |
| if (!(ses = WinHttpOpen( NULL, WINHTTP_ACCESS_TYPE_NO_PROXY, NULL, NULL, 0 ))) goto done; | |
| if (!(con = WinHttpConnect( ses, hostname, uc.nPort, 0 ))) goto done; | |
| if (uc.nScheme == INTERNET_SCHEME_HTTPS) flags |= WINHTTP_FLAG_SECURE; | |
| if (!(req = WinHttpOpenRequest( con, NULL, uc.lpszUrlPath, NULL, NULL, acceptW, flags ))) goto done; | |
| if (!WinHttpSendRequest( req, NULL, 0, NULL, 0, 0, 0 )) goto done; | |
| if (!(WinHttpReceiveResponse( req, 0 ))) goto done; | |
| if (!WinHttpQueryHeaders( req, WINHTTP_QUERY_STATUS_CODE|WINHTTP_QUERY_FLAG_NUMBER, NULL, &status, | |
| &size, NULL ) || status != HTTP_STATUS_OK) goto done; | |
| size = 4096; | |
| if (!(buffer = heap_alloc( size ))) goto done; | |
| to_read = size; | |
| offset = 0; | |
| for (;;) | |
| { | |
| if (!WinHttpReadData( req, buffer + offset, to_read, &bytes_read )) goto done; | |
| if (!bytes_read) break; | |
| to_read -= bytes_read; | |
| offset += bytes_read; | |
| *out_size += bytes_read; | |
| if (!to_read) | |
| { | |
| to_read = size; | |
| size *= 2; | |
| if (!(tmp = heap_realloc( buffer, size ))) goto done; | |
| buffer = tmp; | |
| } | |
| } | |
| done: | |
| WinHttpCloseHandle( req ); | |
| WinHttpCloseHandle( con ); | |
| WinHttpCloseHandle( ses ); | |
| heap_free( hostname ); | |
| if (!buffer) set_last_error( ERROR_WINHTTP_UNABLE_TO_DOWNLOAD_SCRIPT ); | |
| return buffer; | |
| } | |
| struct AUTO_PROXY_SCRIPT_BUFFER | |
| { | |
| DWORD dwStructSize; | |
| LPSTR lpszScriptBuffer; | |
| DWORD dwScriptBufferSize; | |
| }; | |
| BOOL WINAPI InternetDeInitializeAutoProxyDll(LPSTR, DWORD); | |
| BOOL WINAPI InternetGetProxyInfo(LPCSTR, DWORD, LPSTR, DWORD, LPSTR *, LPDWORD); | |
| BOOL WINAPI InternetInitializeAutoProxyDll(DWORD, LPSTR, LPSTR, void *, struct AUTO_PROXY_SCRIPT_BUFFER *); | |
| static BOOL run_script( char *script, DWORD size, const WCHAR *url, WINHTTP_PROXY_INFO *info ) | |
| { | |
| BOOL ret; | |
| char *result, *urlA; | |
| DWORD len_result; | |
| struct AUTO_PROXY_SCRIPT_BUFFER buffer; | |
| URL_COMPONENTSW uc; | |
| buffer.dwStructSize = sizeof(buffer); | |
| buffer.lpszScriptBuffer = script; | |
| buffer.dwScriptBufferSize = size; | |
| if (!(urlA = strdupWA( url ))) return FALSE; | |
| if (!(ret = InternetInitializeAutoProxyDll( 0, NULL, NULL, NULL, &buffer ))) | |
| { | |
| heap_free( urlA ); | |
| return FALSE; | |
| } | |
| memset( &uc, 0, sizeof(uc) ); | |
| uc.dwStructSize = sizeof(uc); | |
| uc.dwHostNameLength = -1; | |
| if (WinHttpCrackUrl( url, 0, 0, &uc )) | |
| { | |
| char *hostnameA = strdupWA_sized( uc.lpszHostName, uc.dwHostNameLength ); | |
| if ((ret = InternetGetProxyInfo( urlA, strlen(urlA), | |
| hostnameA, strlen(hostnameA), &result, &len_result ))) | |
| { | |
| ret = parse_script_result( result, info ); | |
| heap_free( result ); | |
| } | |
| heap_free( hostnameA ); | |
| } | |
| heap_free( urlA ); | |
| return InternetDeInitializeAutoProxyDll( NULL, 0 ); | |
| } | |
| /*********************************************************************** | |
| * WinHttpGetProxyForUrl (winhttp.@) | |
| */ | |
| BOOL WINAPI WinHttpGetProxyForUrl( HINTERNET hsession, LPCWSTR url, WINHTTP_AUTOPROXY_OPTIONS *options, | |
| WINHTTP_PROXY_INFO *info ) | |
| { | |
| WCHAR *detected_pac_url = NULL; | |
| const WCHAR *pac_url; | |
| session_t *session; | |
| char *script; | |
| DWORD size; | |
| BOOL ret = FALSE; | |
| TRACE("%p, %s, %p, %p\n", hsession, debugstr_w(url), options, info); | |
| if (!(session = (session_t *)grab_object( hsession ))) | |
| { | |
| set_last_error( ERROR_INVALID_HANDLE ); | |
| return FALSE; | |
| } | |
| if (session->hdr.type != WINHTTP_HANDLE_TYPE_SESSION) | |
| { | |
| release_object( &session->hdr ); | |
| set_last_error( ERROR_WINHTTP_INCORRECT_HANDLE_TYPE ); | |
| return FALSE; | |
| } | |
| if (!url || !options || !info || | |
| !(options->dwFlags & (WINHTTP_AUTOPROXY_AUTO_DETECT|WINHTTP_AUTOPROXY_CONFIG_URL)) || | |
| ((options->dwFlags & WINHTTP_AUTOPROXY_AUTO_DETECT) && !options->dwAutoDetectFlags) || | |
| ((options->dwFlags & WINHTTP_AUTOPROXY_AUTO_DETECT) && | |
| (options->dwFlags & WINHTTP_AUTOPROXY_CONFIG_URL))) | |
| { | |
| release_object( &session->hdr ); | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| if (options->dwFlags & WINHTTP_AUTOPROXY_AUTO_DETECT && | |
| !WinHttpDetectAutoProxyConfigUrl( options->dwAutoDetectFlags, &detected_pac_url )) | |
| goto done; | |
| if (options->dwFlags & WINHTTP_AUTOPROXY_CONFIG_URL) pac_url = options->lpszAutoConfigUrl; | |
| else pac_url = detected_pac_url; | |
| if ((script = download_script( pac_url, &size ))) | |
| { | |
| ret = run_script( script, size, url, info ); | |
| heap_free( script ); | |
| } | |
| done: | |
| GlobalFree( detected_pac_url ); | |
| release_object( &session->hdr ); | |
| if (ret) set_last_error( ERROR_SUCCESS ); | |
| return ret; | |
| } | |
| /*********************************************************************** | |
| * WinHttpSetDefaultProxyConfiguration (winhttp.@) | |
| */ | |
| BOOL WINAPI WinHttpSetDefaultProxyConfiguration( WINHTTP_PROXY_INFO *info ) | |
| { | |
| LONG l; | |
| HKEY key; | |
| BOOL ret = FALSE; | |
| const WCHAR *src; | |
| TRACE("%p\n", info); | |
| if (!info) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| switch (info->dwAccessType) | |
| { | |
| case WINHTTP_ACCESS_TYPE_NO_PROXY: | |
| break; | |
| case WINHTTP_ACCESS_TYPE_NAMED_PROXY: | |
| if (!info->lpszProxy) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| /* Only ASCII characters are allowed */ | |
| for (src = info->lpszProxy; *src; src++) | |
| if (*src > 0x7f) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| if (info->lpszProxyBypass) | |
| { | |
| for (src = info->lpszProxyBypass; *src; src++) | |
| if (*src > 0x7f) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| } | |
| break; | |
| default: | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| l = RegCreateKeyExW( HKEY_LOCAL_MACHINE, Connections, 0, NULL, 0, | |
| KEY_WRITE, NULL, &key, NULL ); | |
| if (!l) | |
| { | |
| DWORD size = sizeof(struct connection_settings_header) + 2 * sizeof(DWORD); | |
| BYTE *buf; | |
| if (info->dwAccessType == WINHTTP_ACCESS_TYPE_NAMED_PROXY) | |
| { | |
| size += strlenW( info->lpszProxy ); | |
| if (info->lpszProxyBypass) | |
| size += strlenW( info->lpszProxyBypass ); | |
| } | |
| buf = heap_alloc( size ); | |
| if (buf) | |
| { | |
| struct connection_settings_header *hdr = | |
| (struct connection_settings_header *)buf; | |
| DWORD *len = (DWORD *)(hdr + 1); | |
| hdr->magic = WINHTTP_SETTINGS_MAGIC; | |
| hdr->unknown = 0; | |
| if (info->dwAccessType == WINHTTP_ACCESS_TYPE_NAMED_PROXY) | |
| { | |
| BYTE *dst; | |
| hdr->flags = PROXY_TYPE_PROXY; | |
| *len++ = strlenW( info->lpszProxy ); | |
| for (dst = (BYTE *)len, src = info->lpszProxy; *src; | |
| src++, dst++) | |
| *dst = *src; | |
| len = (DWORD *)dst; | |
| if (info->lpszProxyBypass) | |
| { | |
| *len++ = strlenW( info->lpszProxyBypass ); | |
| for (dst = (BYTE *)len, src = info->lpszProxyBypass; *src; | |
| src++, dst++) | |
| *dst = *src; | |
| } | |
| else | |
| *len++ = 0; | |
| } | |
| else | |
| { | |
| hdr->flags = PROXY_TYPE_DIRECT; | |
| *len++ = 0; | |
| *len++ = 0; | |
| } | |
| l = RegSetValueExW( key, WinHttpSettings, 0, REG_BINARY, buf, size ); | |
| if (!l) | |
| ret = TRUE; | |
| heap_free( buf ); | |
| } | |
| RegCloseKey( key ); | |
| } | |
| if (ret) set_last_error( ERROR_SUCCESS ); | |
| return ret; | |
| } | |
| /*********************************************************************** | |
| * WinHttpSetStatusCallback (winhttp.@) | |
| */ | |
| WINHTTP_STATUS_CALLBACK WINAPI WinHttpSetStatusCallback( HINTERNET handle, WINHTTP_STATUS_CALLBACK callback, | |
| DWORD flags, DWORD_PTR reserved ) | |
| { | |
| object_header_t *hdr; | |
| WINHTTP_STATUS_CALLBACK ret; | |
| TRACE("%p, %p, 0x%08x, 0x%lx\n", handle, callback, flags, reserved); | |
| if (!(hdr = grab_object( handle ))) | |
| { | |
| set_last_error( ERROR_INVALID_HANDLE ); | |
| return WINHTTP_INVALID_STATUS_CALLBACK; | |
| } | |
| ret = hdr->callback; | |
| hdr->callback = callback; | |
| hdr->notify_mask = flags; | |
| release_object( hdr ); | |
| set_last_error( ERROR_SUCCESS ); | |
| return ret; | |
| } | |
| /*********************************************************************** | |
| * WinHttpSetTimeouts (winhttp.@) | |
| */ | |
| BOOL WINAPI WinHttpSetTimeouts( HINTERNET handle, int resolve, int connect, int send, int receive ) | |
| { | |
| BOOL ret = TRUE; | |
| object_header_t *hdr; | |
| request_t *request; | |
| session_t *session; | |
| TRACE("%p, %d, %d, %d, %d\n", handle, resolve, connect, send, receive); | |
| if (resolve < -1 || connect < -1 || send < -1 || receive < -1) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| if (!(hdr = grab_object( handle ))) | |
| { | |
| set_last_error( ERROR_INVALID_HANDLE ); | |
| return FALSE; | |
| } | |
| switch(hdr->type) | |
| { | |
| case WINHTTP_HANDLE_TYPE_REQUEST: | |
| request = (request_t *)hdr; | |
| request->connect_timeout = connect; | |
| if (resolve < 0) resolve = 0; | |
| request->resolve_timeout = resolve; | |
| if (send < 0) send = 0; | |
| request->send_timeout = send; | |
| if (receive < 0) receive = 0; | |
| request->recv_timeout = receive; | |
| if (request->netconn) | |
| { | |
| if (netconn_set_timeout( request->netconn, TRUE, send )) ret = FALSE; | |
| if (netconn_set_timeout( request->netconn, FALSE, receive )) ret = FALSE; | |
| } | |
| break; | |
| case WINHTTP_HANDLE_TYPE_SESSION: | |
| session = (session_t *)hdr; | |
| session->connect_timeout = connect; | |
| if (resolve < 0) resolve = 0; | |
| session->resolve_timeout = resolve; | |
| if (send < 0) send = 0; | |
| session->send_timeout = send; | |
| if (receive < 0) receive = 0; | |
| session->recv_timeout = receive; | |
| break; | |
| default: | |
| set_last_error( ERROR_WINHTTP_INCORRECT_HANDLE_TYPE ); | |
| ret = FALSE; | |
| } | |
| release_object( hdr ); | |
| if (ret) set_last_error( ERROR_SUCCESS ); | |
| return ret; | |
| } | |
| static const WCHAR wkday[7][4] = | |
| {{'S','u','n', 0}, {'M','o','n', 0}, {'T','u','e', 0}, {'W','e','d', 0}, | |
| {'T','h','u', 0}, {'F','r','i', 0}, {'S','a','t', 0}}; | |
| static const WCHAR month[12][4] = | |
| {{'J','a','n', 0}, {'F','e','b', 0}, {'M','a','r', 0}, {'A','p','r', 0}, | |
| {'M','a','y', 0}, {'J','u','n', 0}, {'J','u','l', 0}, {'A','u','g', 0}, | |
| {'S','e','p', 0}, {'O','c','t', 0}, {'N','o','v', 0}, {'D','e','c', 0}}; | |
| /*********************************************************************** | |
| * WinHttpTimeFromSystemTime (WININET.@) | |
| */ | |
| BOOL WINAPI WinHttpTimeFromSystemTime( const SYSTEMTIME *time, LPWSTR string ) | |
| { | |
| static const WCHAR format[] = | |
| {'%','s',',',' ','%','0','2','d',' ','%','s',' ','%','4','d',' ','%','0', | |
| '2','d',':','%','0','2','d',':','%','0','2','d',' ','G','M','T', 0}; | |
| TRACE("%p, %p\n", time, string); | |
| if (!time || !string) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| sprintfW( string, format, | |
| wkday[time->wDayOfWeek], | |
| time->wDay, | |
| month[time->wMonth - 1], | |
| time->wYear, | |
| time->wHour, | |
| time->wMinute, | |
| time->wSecond ); | |
| set_last_error( ERROR_SUCCESS ); | |
| return TRUE; | |
| } | |
| /*********************************************************************** | |
| * WinHttpTimeToSystemTime (WININET.@) | |
| */ | |
| BOOL WINAPI WinHttpTimeToSystemTime( LPCWSTR string, SYSTEMTIME *time ) | |
| { | |
| unsigned int i; | |
| const WCHAR *s = string; | |
| WCHAR *end; | |
| TRACE("%s, %p\n", debugstr_w(string), time); | |
| if (!string || !time) | |
| { | |
| set_last_error( ERROR_INVALID_PARAMETER ); | |
| return FALSE; | |
| } | |
| /* Windows does this too */ | |
| GetSystemTime( time ); | |
| /* Convert an RFC1123 time such as 'Fri, 07 Jan 2005 12:06:35 GMT' into | |
| * a SYSTEMTIME structure. | |
| */ | |
| set_last_error( ERROR_SUCCESS ); | |
| while (*s && !isalphaW( *s )) s++; | |
| if (s[0] == '\0' || s[1] == '\0' || s[2] == '\0') return TRUE; | |
| time->wDayOfWeek = 7; | |
| for (i = 0; i < 7; i++) | |
| { | |
| if (toupperW( wkday[i][0] ) == toupperW( s[0] ) && | |
| toupperW( wkday[i][1] ) == toupperW( s[1] ) && | |
| toupperW( wkday[i][2] ) == toupperW( s[2] ) ) | |
| { | |
| time->wDayOfWeek = i; | |
| break; | |
| } | |
| } | |
| if (time->wDayOfWeek > 6) return TRUE; | |
| while (*s && !isdigitW( *s )) s++; | |
| time->wDay = strtolW( s, &end, 10 ); | |
| s = end; | |
| while (*s && !isalphaW( *s )) s++; | |
| if (s[0] == '\0' || s[1] == '\0' || s[2] == '\0') return TRUE; | |
| time->wMonth = 0; | |
| for (i = 0; i < 12; i++) | |
| { | |
| if (toupperW( month[i][0]) == toupperW( s[0] ) && | |
| toupperW( month[i][1]) == toupperW( s[1] ) && | |
| toupperW( month[i][2]) == toupperW( s[2] ) ) | |
| { | |
| time->wMonth = i + 1; | |
| break; | |
| } | |
| } | |
| if (time->wMonth == 0) return TRUE; | |
| while (*s && !isdigitW( *s )) s++; | |
| if (*s == '\0') return TRUE; | |
| time->wYear = strtolW( s, &end, 10 ); | |
| s = end; | |
| while (*s && !isdigitW( *s )) s++; | |
| if (*s == '\0') return TRUE; | |
| time->wHour = strtolW( s, &end, 10 ); | |
| s = end; | |
| while (*s && !isdigitW( *s )) s++; | |
| if (*s == '\0') return TRUE; | |
| time->wMinute = strtolW( s, &end, 10 ); | |
| s = end; | |
| while (*s && !isdigitW( *s )) s++; | |
| if (*s == '\0') return TRUE; | |
| time->wSecond = strtolW( s, &end, 10 ); | |
| time->wMilliseconds = 0; | |
| return TRUE; | |
| } |