| /* |
| * 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; |
| } |
