1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
|
/*
* Copyright (C) 2010
* Free Software Foundation, Inc.
*
* Author: Nikos Mavrogiannopoulos
*
* This file is part of GnuTLS.
*
* The GnuTLS 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 Street, Fifth Floor, Boston, MA 02110-1301,
* USA
*
*/
#include <gnutls_int.h>
#include <gnutls_errors.h>
#include <libtasn1.h>
#include <gnutls_dh.h>
#include <random.h>
#include <locks.h>
#ifdef HAVE_WIN32_LOCKS
# include <windows.h>
/* FIXME: win32 locks are untested */
static int gnutls_system_mutex_init (void **priv)
{
CRITICAL_SECTION *lock = malloc (sizeof (CRITICAL_SECTION));
int ret;
if (lock==NULL)
return GNUTLS_E_MEMORY_ERROR;
InitializeCriticalSection(lock);
*priv = lock;
return 0;
}
static void gnutls_system_mutex_deinit (void *priv)
{
DeleteCriticalSection(priv);
free(priv);
}
static int gnutls_system_mutex_lock (void *priv)
{
EnterCriticalSection(priv);
return 0;
}
static int gnutls_system_mutex_unlock (void *priv)
{
LeaveCriticalSection(priv);
return 0;
}
int _gnutls_atfork(void (*prepare)(void), void (*parent)(void), void (*child)(void))
{
return 0;
}
#endif /* WIN32_LOCKS */
#ifdef HAVE_PTHREAD_LOCKS
# include <pthread.h>
static int gnutls_system_mutex_init (void **priv)
{
pthread_mutex_t *lock = malloc (sizeof (pthread_mutex_t));
int ret;
if (lock==NULL)
return GNUTLS_E_MEMORY_ERROR;
ret = pthread_mutex_init (lock, NULL);
if (ret)
{
free(lock);
gnutls_assert();
return GNUTLS_E_LOCKING_ERROR;
}
*priv = lock;
return 0;
}
static void gnutls_system_mutex_deinit (void *priv)
{
pthread_mutex_destroy(priv);
free(priv);
}
static int gnutls_system_mutex_lock (void *priv)
{
if (pthread_mutex_lock(priv))
{
gnutls_assert();
return GNUTLS_E_LOCKING_ERROR;
}
return 0;
}
static int gnutls_system_mutex_unlock (void *priv)
{
if (pthread_mutex_unlock(priv))
{
gnutls_assert();
return GNUTLS_E_LOCKING_ERROR;
}
return 0;
}
int _gnutls_atfork(void (*prepare)(void), void (*parent)(void), void (*child)(void))
{
return pthread_atfork(prepare, parent, child);
}
#endif /* PTHREAD_LOCKS */
#ifdef HAVE_NO_LOCKS
static int gnutls_system_mutex_init (void **priv)
{
return 0;
}
static void gnutls_system_mutex_deinit (void *priv)
{
return;
}
static int gnutls_system_mutex_lock (void *priv)
{
return 0;
}
static int gnutls_system_mutex_unlock (void *priv)
{
return 0;
}
int _gnutls_atfork(void (*prepare)(void), void (*parent)(void), void (*child)(void))
{
return 0;
}
#endif /* NO_LOCKS */
mutex_init_func gnutls_mutex_init = gnutls_system_mutex_init;
mutex_deinit_func gnutls_mutex_deinit = gnutls_system_mutex_deinit;
mutex_lock_func gnutls_mutex_lock = gnutls_system_mutex_lock;
mutex_unlock_func gnutls_mutex_unlock = gnutls_system_mutex_unlock;
/**
* gnutls_global_set_mutex:
* @init: mutex initialization function
* @deinit: mutex deinitialization function
* @lock: mutex locking function
* @unlock: mutex unlocking function
*
* With this function you are allowed to override the default mutex
* locks used in some parts of gnutls and dependent libraries. This function
* should be used if you have complete control of your program and libraries.
* Do not call this function from a library. Instead only initialize gnutls and
* the default OS mutex locks will be used.
*
* This function must be called before gnutls_global_init().
*
**/
void gnutls_global_set_mutex(mutex_init_func init, mutex_deinit_func deinit,
mutex_lock_func lock, mutex_unlock_func unlock)
{
if (init == NULL || deinit == NULL || lock == NULL || unlock == NULL)
return;
gnutls_mutex_init = init;
gnutls_mutex_deinit = deinit;
gnutls_mutex_lock = lock;
gnutls_mutex_unlock = unlock;
}
|
