shell32: Updated French translation.
[wine] / dlls / 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 + HANDLE_CHUNK_SIZE;
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 }