[WINHTTP]
[reactos.git] / reactos / dll / win32 / winhttp / handle.c
1 /*
2 * Copyright 2008 Hans Leidekker for CodeWeavers
3 *
4 * Based on the handle implementation from wininet.
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 */
20
21 #include "config.h"
22 #include "wine/port.h"
23 #include "wine/debug.h"
24
25 #include <stdarg.h>
26
27 #include "windef.h"
28 #include "winbase.h"
29 #include "winhttp.h"
30
31 #include "winhttp_private.h"
32
33 WINE_DEFAULT_DEBUG_CHANNEL(winhttp);
34
35 #define HANDLE_CHUNK_SIZE 0x10
36
37 static CRITICAL_SECTION handle_cs;
38 static CRITICAL_SECTION_DEBUG handle_cs_debug =
39 {
40 0, 0, &handle_cs,
41 { &handle_cs_debug.ProcessLocksList, &handle_cs_debug.ProcessLocksList },
42 0, 0, { (ULONG_PTR)(__FILE__ ": handle_cs") }
43 };
44 static CRITICAL_SECTION handle_cs = { &handle_cs_debug, -1, 0, 0, 0, 0 };
45
46 static object_header_t **handles;
47 static ULONG_PTR next_handle;
48 static ULONG_PTR max_handles;
49
50 object_header_t *addref_object( object_header_t *hdr )
51 {
52 ULONG refs = InterlockedIncrement( &hdr->refs );
53 TRACE("%p -> refcount = %d\n", hdr, refs);
54 return hdr;
55 }
56
57 object_header_t *grab_object( HINTERNET hinternet )
58 {
59 object_header_t *hdr = NULL;
60 ULONG_PTR handle = (ULONG_PTR)hinternet;
61
62 EnterCriticalSection( &handle_cs );
63
64 if ((handle > 0) && (handle <= max_handles) && handles[handle - 1])
65 hdr = addref_object( handles[handle - 1] );
66
67 LeaveCriticalSection( &handle_cs );
68
69 TRACE("handle 0x%lx -> %p\n", handle, hdr);
70 return hdr;
71 }
72
73 void release_object( object_header_t *hdr )
74 {
75 ULONG refs = InterlockedDecrement( &hdr->refs );
76 TRACE("object %p refcount = %d\n", hdr, refs);
77 if (!refs)
78 {
79 if (hdr->type == WINHTTP_HANDLE_TYPE_REQUEST) close_connection( (request_t *)hdr );
80
81 send_callback( hdr, WINHTTP_CALLBACK_STATUS_HANDLE_CLOSING, &hdr->handle, sizeof(HINTERNET) );
82
83 TRACE("destroying object %p\n", hdr);
84 if (hdr->type != WINHTTP_HANDLE_TYPE_SESSION) list_remove( &hdr->entry );
85 hdr->vtbl->destroy( hdr );
86 }
87 }
88
89 HINTERNET alloc_handle( object_header_t *hdr )
90 {
91 object_header_t **p;
92 ULONG_PTR handle = 0, num;
93
94 list_init( &hdr->children );
95
96 EnterCriticalSection( &handle_cs );
97 if (!max_handles)
98 {
99 num = HANDLE_CHUNK_SIZE;
100 if (!(p = heap_alloc_zero( sizeof(ULONG_PTR) * num ))) goto end;
101 handles = p;
102 max_handles = num;
103 }
104 if (max_handles == next_handle)
105 {
106 num = max_handles * 2;
107 if (!(p = heap_realloc_zero( handles, sizeof(ULONG_PTR) * num ))) goto end;
108 handles = p;
109 max_handles = num;
110 }
111 handle = next_handle;
112 if (handles[handle]) ERR("handle isn't free but should be\n");
113
114 handles[handle] = addref_object( hdr );
115 while (handles[next_handle] && (next_handle < max_handles)) next_handle++;
116
117 end:
118 LeaveCriticalSection( &handle_cs );
119 return hdr->handle = (HINTERNET)(handle + 1);
120 }
121
122 BOOL free_handle( HINTERNET hinternet )
123 {
124 BOOL ret = FALSE;
125 ULONG_PTR handle = (ULONG_PTR)hinternet;
126 object_header_t *hdr = NULL, *child, *next;
127
128 EnterCriticalSection( &handle_cs );
129
130 if ((handle > 0) && (handle <= max_handles))
131 {
132 handle--;
133 if (handles[handle])
134 {
135 hdr = handles[handle];
136 TRACE("destroying handle 0x%lx for object %p\n", handle + 1, hdr);
137 handles[handle] = NULL;
138 ret = TRUE;
139 }
140 }
141
142 LeaveCriticalSection( &handle_cs );
143
144 if (hdr)
145 {
146 LIST_FOR_EACH_ENTRY_SAFE( child, next, &hdr->children, object_header_t, entry )
147 {
148 TRACE("freeing child handle %p for parent handle 0x%lx\n", child->handle, handle + 1);
149 free_handle( child->handle );
150 }
151 release_object( hdr );
152 }
153
154 EnterCriticalSection( &handle_cs );
155 if (next_handle > handle && !handles[handle]) next_handle = handle;
156 LeaveCriticalSection( &handle_cs );
157
158 return ret;
159 }