1/*
2 * Copyright (c) 2008-2012 Niels Provos, Nick Mathewson
3 *
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
6 * are met:
7 * 1. Redistributions of source code must retain the above copyright
8 *    notice, this list of conditions and the following disclaimer.
9 * 2. Redistributions in binary form must reproduce the above copyright
10 *    notice, this list of conditions and the following disclaimer in the
11 *    documentation and/or other materials provided with the distribution.
12 * 3. The name of the author may not be used to endorse or promote products
13 *    derived from this software without specific prior written permission.
14 *
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25 */
26#ifndef EVTHREAD_INTERNAL_H_INCLUDED_
27#define EVTHREAD_INTERNAL_H_INCLUDED_
28
29#ifdef __cplusplus
30extern "C" {
31#endif
32
33#include "event2/event-config.h"
34#include "evconfig-private.h"
35
36#include "event2/thread.h"
37#include "util-internal.h"
38
39struct event_base;
40
41#if !defined(_WIN32) && !defined(__CYGWIN__)
42/* On Windows, the way we currently make DLLs, it's not allowed for us to
43 * have shared global structures.  Thus, we only do the direct-call-to-function
44 * code path if we know that the local shared library system supports it.
45 */
46#define EVTHREAD_EXPOSE_STRUCTS
47#endif
48
49#if ! defined(EVENT__DISABLE_THREAD_SUPPORT) && defined(EVTHREAD_EXPOSE_STRUCTS)
50/* Global function pointers to lock-related functions. NULL if locking isn't
51   enabled. */
52EVENT2_EXPORT_SYMBOL
53extern struct evthread_lock_callbacks evthread_lock_fns_;
54EVENT2_EXPORT_SYMBOL
55extern struct evthread_condition_callbacks evthread_cond_fns_;
56extern unsigned long (*evthread_id_fn_)(void);
57EVENT2_EXPORT_SYMBOL
58extern int evthread_lock_debugging_enabled_;
59
60/** Return the ID of the current thread, or 1 if threading isn't enabled. */
61#define EVTHREAD_GET_ID() \
62	(evthread_id_fn_ ? evthread_id_fn_() : 1)
63
64/** Return true iff we're in the thread that is currently (or most recently)
65 * running a given event_base's loop. Requires lock. */
66#define EVBASE_IN_THREAD(base)				 \
67	(evthread_id_fn_ == NULL ||			 \
68	(base)->th_owner_id == evthread_id_fn_())
69
70/** Return true iff we need to notify the base's main thread about changes to
71 * its state, because it's currently running the main loop in another
72 * thread. Requires lock. */
73#define EVBASE_NEED_NOTIFY(base)			 \
74	(evthread_id_fn_ != NULL &&			 \
75	    (base)->running_loop &&			 \
76	    (base)->th_owner_id != evthread_id_fn_())
77
78/** Allocate a new lock, and store it in lockvar, a void*.  Sets lockvar to
79    NULL if locking is not enabled. */
80#define EVTHREAD_ALLOC_LOCK(lockvar, locktype)		\
81	((lockvar) = evthread_lock_fns_.alloc ?		\
82	    evthread_lock_fns_.alloc(locktype) : NULL)
83
84/** Free a given lock, if it is present and locking is enabled. */
85#define EVTHREAD_FREE_LOCK(lockvar, locktype)				\
86	do {								\
87		void *lock_tmp_ = (lockvar);				\
88		if (lock_tmp_ && evthread_lock_fns_.free)		\
89			evthread_lock_fns_.free(lock_tmp_, (locktype)); \
90	} while (0)
91
92/** Acquire a lock. */
93#define EVLOCK_LOCK(lockvar,mode)					\
94	do {								\
95		if (lockvar)						\
96			evthread_lock_fns_.lock(mode, lockvar);		\
97	} while (0)
98
99/** Release a lock */
100#define EVLOCK_UNLOCK(lockvar,mode)					\
101	do {								\
102		if (lockvar)						\
103			evthread_lock_fns_.unlock(mode, lockvar);	\
104	} while (0)
105
106/** Helper: put lockvar1 and lockvar2 into pointerwise ascending order. */
107#define EVLOCK_SORTLOCKS_(lockvar1, lockvar2)				\
108	do {								\
109		if (lockvar1 && lockvar2 && lockvar1 > lockvar2) {	\
110			void *tmp = lockvar1;				\
111			lockvar1 = lockvar2;				\
112			lockvar2 = tmp;					\
113		}							\
114	} while (0)
115
116/** Lock an event_base, if it is set up for locking.  Acquires the lock
117    in the base structure whose field is named 'lockvar'. */
118#define EVBASE_ACQUIRE_LOCK(base, lockvar) do {				\
119		EVLOCK_LOCK((base)->lockvar, 0);			\
120	} while (0)
121
122/** Unlock an event_base, if it is set up for locking. */
123#define EVBASE_RELEASE_LOCK(base, lockvar) do {				\
124		EVLOCK_UNLOCK((base)->lockvar, 0);			\
125	} while (0)
126
127/** If lock debugging is enabled, and lock is non-null, assert that 'lock' is
128 * locked and held by us. */
129#define EVLOCK_ASSERT_LOCKED(lock)					\
130	do {								\
131		if ((lock) && evthread_lock_debugging_enabled_) {	\
132			EVUTIL_ASSERT(evthread_is_debug_lock_held_(lock)); \
133		}							\
134	} while (0)
135
136/** Try to grab the lock for 'lockvar' without blocking, and return 1 if we
137 * manage to get it. */
138static inline int EVLOCK_TRY_LOCK_(void *lock);
139static inline int
140EVLOCK_TRY_LOCK_(void *lock)
141{
142	if (lock && evthread_lock_fns_.lock) {
143		int r = evthread_lock_fns_.lock(EVTHREAD_TRY, lock);
144		return !r;
145	} else {
146		/* Locking is disabled either globally or for this thing;
147		 * of course we count as having the lock. */
148		return 1;
149	}
150}
151
152/** Allocate a new condition variable and store it in the void *, condvar */
153#define EVTHREAD_ALLOC_COND(condvar)					\
154	do {								\
155		(condvar) = evthread_cond_fns_.alloc_condition ?	\
156		    evthread_cond_fns_.alloc_condition(0) : NULL;	\
157	} while (0)
158/** Deallocate and free a condition variable in condvar */
159#define EVTHREAD_FREE_COND(cond)					\
160	do {								\
161		if (cond)						\
162			evthread_cond_fns_.free_condition((cond));	\
163	} while (0)
164/** Signal one thread waiting on cond */
165#define EVTHREAD_COND_SIGNAL(cond)					\
166	( (cond) ? evthread_cond_fns_.signal_condition((cond), 0) : 0 )
167/** Signal all threads waiting on cond */
168#define EVTHREAD_COND_BROADCAST(cond)					\
169	( (cond) ? evthread_cond_fns_.signal_condition((cond), 1) : 0 )
170/** Wait until the condition 'cond' is signalled.  Must be called while
171 * holding 'lock'.  The lock will be released until the condition is
172 * signalled, at which point it will be acquired again.  Returns 0 for
173 * success, -1 for failure. */
174#define EVTHREAD_COND_WAIT(cond, lock)					\
175	( (cond) ? evthread_cond_fns_.wait_condition((cond), (lock), NULL) : 0 )
176/** As EVTHREAD_COND_WAIT, but gives up after 'tv' has elapsed.  Returns 1
177 * on timeout. */
178#define EVTHREAD_COND_WAIT_TIMED(cond, lock, tv)			\
179	( (cond) ? evthread_cond_fns_.wait_condition((cond), (lock), (tv)) : 0 )
180
181/** True iff locking functions have been configured. */
182#define EVTHREAD_LOCKING_ENABLED()		\
183	(evthread_lock_fns_.lock != NULL)
184
185#elif ! defined(EVENT__DISABLE_THREAD_SUPPORT)
186
187unsigned long evthreadimpl_get_id_(void);
188EVENT2_EXPORT_SYMBOL
189int evthreadimpl_is_lock_debugging_enabled_(void);
190EVENT2_EXPORT_SYMBOL
191void *evthreadimpl_lock_alloc_(unsigned locktype);
192EVENT2_EXPORT_SYMBOL
193void evthreadimpl_lock_free_(void *lock, unsigned locktype);
194EVENT2_EXPORT_SYMBOL
195int evthreadimpl_lock_lock_(unsigned mode, void *lock);
196EVENT2_EXPORT_SYMBOL
197int evthreadimpl_lock_unlock_(unsigned mode, void *lock);
198EVENT2_EXPORT_SYMBOL
199void *evthreadimpl_cond_alloc_(unsigned condtype);
200EVENT2_EXPORT_SYMBOL
201void evthreadimpl_cond_free_(void *cond);
202EVENT2_EXPORT_SYMBOL
203int evthreadimpl_cond_signal_(void *cond, int broadcast);
204EVENT2_EXPORT_SYMBOL
205int evthreadimpl_cond_wait_(void *cond, void *lock, const struct timeval *tv);
206int evthreadimpl_locking_enabled_(void);
207
208#define EVTHREAD_GET_ID() evthreadimpl_get_id_()
209#define EVBASE_IN_THREAD(base)				\
210	((base)->th_owner_id == evthreadimpl_get_id_())
211#define EVBASE_NEED_NOTIFY(base)			 \
212	((base)->running_loop &&			 \
213	    ((base)->th_owner_id != evthreadimpl_get_id_()))
214
215#define EVTHREAD_ALLOC_LOCK(lockvar, locktype)		\
216	((lockvar) = evthreadimpl_lock_alloc_(locktype))
217
218#define EVTHREAD_FREE_LOCK(lockvar, locktype)				\
219	do {								\
220		void *lock_tmp_ = (lockvar);				\
221		if (lock_tmp_)						\
222			evthreadimpl_lock_free_(lock_tmp_, (locktype)); \
223	} while (0)
224
225/** Acquire a lock. */
226#define EVLOCK_LOCK(lockvar,mode)					\
227	do {								\
228		if (lockvar)						\
229			evthreadimpl_lock_lock_(mode, lockvar);		\
230	} while (0)
231
232/** Release a lock */
233#define EVLOCK_UNLOCK(lockvar,mode)					\
234	do {								\
235		if (lockvar)						\
236			evthreadimpl_lock_unlock_(mode, lockvar);	\
237	} while (0)
238
239/** Lock an event_base, if it is set up for locking.  Acquires the lock
240    in the base structure whose field is named 'lockvar'. */
241#define EVBASE_ACQUIRE_LOCK(base, lockvar) do {				\
242		EVLOCK_LOCK((base)->lockvar, 0);			\
243	} while (0)
244
245/** Unlock an event_base, if it is set up for locking. */
246#define EVBASE_RELEASE_LOCK(base, lockvar) do {				\
247		EVLOCK_UNLOCK((base)->lockvar, 0);			\
248	} while (0)
249
250/** If lock debugging is enabled, and lock is non-null, assert that 'lock' is
251 * locked and held by us. */
252#define EVLOCK_ASSERT_LOCKED(lock)					\
253	do {								\
254		if ((lock) && evthreadimpl_is_lock_debugging_enabled_()) { \
255			EVUTIL_ASSERT(evthread_is_debug_lock_held_(lock)); \
256		}							\
257	} while (0)
258
259/** Try to grab the lock for 'lockvar' without blocking, and return 1 if we
260 * manage to get it. */
261static inline int EVLOCK_TRY_LOCK_(void *lock);
262static inline int
263EVLOCK_TRY_LOCK_(void *lock)
264{
265	if (lock) {
266		int r = evthreadimpl_lock_lock_(EVTHREAD_TRY, lock);
267		return !r;
268	} else {
269		/* Locking is disabled either globally or for this thing;
270		 * of course we count as having the lock. */
271		return 1;
272	}
273}
274
275/** Allocate a new condition variable and store it in the void *, condvar */
276#define EVTHREAD_ALLOC_COND(condvar)					\
277	do {								\
278		(condvar) = evthreadimpl_cond_alloc_(0);		\
279	} while (0)
280/** Deallocate and free a condition variable in condvar */
281#define EVTHREAD_FREE_COND(cond)					\
282	do {								\
283		if (cond)						\
284			evthreadimpl_cond_free_((cond));		\
285	} while (0)
286/** Signal one thread waiting on cond */
287#define EVTHREAD_COND_SIGNAL(cond)					\
288	( (cond) ? evthreadimpl_cond_signal_((cond), 0) : 0 )
289/** Signal all threads waiting on cond */
290#define EVTHREAD_COND_BROADCAST(cond)					\
291	( (cond) ? evthreadimpl_cond_signal_((cond), 1) : 0 )
292/** Wait until the condition 'cond' is signalled.  Must be called while
293 * holding 'lock'.  The lock will be released until the condition is
294 * signalled, at which point it will be acquired again.  Returns 0 for
295 * success, -1 for failure. */
296#define EVTHREAD_COND_WAIT(cond, lock)					\
297	( (cond) ? evthreadimpl_cond_wait_((cond), (lock), NULL) : 0 )
298/** As EVTHREAD_COND_WAIT, but gives up after 'tv' has elapsed.  Returns 1
299 * on timeout. */
300#define EVTHREAD_COND_WAIT_TIMED(cond, lock, tv)			\
301	( (cond) ? evthreadimpl_cond_wait_((cond), (lock), (tv)) : 0 )
302
303#define EVTHREAD_LOCKING_ENABLED()		\
304	(evthreadimpl_locking_enabled_())
305
306#else /* EVENT__DISABLE_THREAD_SUPPORT */
307
308#define EVTHREAD_GET_ID()	1
309#define EVTHREAD_ALLOC_LOCK(lockvar, locktype) EVUTIL_NIL_STMT_
310#define EVTHREAD_FREE_LOCK(lockvar, locktype) EVUTIL_NIL_STMT_
311
312#define EVLOCK_LOCK(lockvar, mode) EVUTIL_NIL_STMT_
313#define EVLOCK_UNLOCK(lockvar, mode) EVUTIL_NIL_STMT_
314#define EVLOCK_LOCK2(lock1,lock2,mode1,mode2) EVUTIL_NIL_STMT_
315#define EVLOCK_UNLOCK2(lock1,lock2,mode1,mode2) EVUTIL_NIL_STMT_
316
317#define EVBASE_IN_THREAD(base)	1
318#define EVBASE_NEED_NOTIFY(base) 0
319#define EVBASE_ACQUIRE_LOCK(base, lock) EVUTIL_NIL_STMT_
320#define EVBASE_RELEASE_LOCK(base, lock) EVUTIL_NIL_STMT_
321#define EVLOCK_ASSERT_LOCKED(lock) EVUTIL_NIL_STMT_
322
323#define EVLOCK_TRY_LOCK_(lock) 1
324
325#define EVTHREAD_ALLOC_COND(condvar) EVUTIL_NIL_STMT_
326#define EVTHREAD_FREE_COND(cond) EVUTIL_NIL_STMT_
327#define EVTHREAD_COND_SIGNAL(cond) EVUTIL_NIL_STMT_
328#define EVTHREAD_COND_BROADCAST(cond) EVUTIL_NIL_STMT_
329#define EVTHREAD_COND_WAIT(cond, lock) EVUTIL_NIL_STMT_
330#define EVTHREAD_COND_WAIT_TIMED(cond, lock, howlong) EVUTIL_NIL_STMT_
331
332#define EVTHREAD_LOCKING_ENABLED() 0
333
334#endif
335
336/* This code is shared between both lock impls */
337#if ! defined(EVENT__DISABLE_THREAD_SUPPORT)
338/** Helper: put lockvar1 and lockvar2 into pointerwise ascending order. */
339#define EVLOCK_SORTLOCKS_(lockvar1, lockvar2)				\
340	do {								\
341		if (lockvar1 && lockvar2 && lockvar1 > lockvar2) {	\
342			void *tmp = lockvar1;				\
343			lockvar1 = lockvar2;				\
344			lockvar2 = tmp;					\
345		}							\
346	} while (0)
347
348/** Acquire both lock1 and lock2.  Always allocates locks in the same order,
349 * so that two threads locking two locks with LOCK2 will not deadlock. */
350#define EVLOCK_LOCK2(lock1,lock2,mode1,mode2)				\
351	do {								\
352		void *lock1_tmplock_ = (lock1);				\
353		void *lock2_tmplock_ = (lock2);				\
354		EVLOCK_SORTLOCKS_(lock1_tmplock_,lock2_tmplock_);	\
355		EVLOCK_LOCK(lock1_tmplock_,mode1);			\
356		if (lock2_tmplock_ != lock1_tmplock_)			\
357			EVLOCK_LOCK(lock2_tmplock_,mode2);		\
358	} while (0)
359/** Release both lock1 and lock2.  */
360#define EVLOCK_UNLOCK2(lock1,lock2,mode1,mode2)				\
361	do {								\
362		void *lock1_tmplock_ = (lock1);				\
363		void *lock2_tmplock_ = (lock2);				\
364		EVLOCK_SORTLOCKS_(lock1_tmplock_,lock2_tmplock_);	\
365		if (lock2_tmplock_ != lock1_tmplock_)			\
366			EVLOCK_UNLOCK(lock2_tmplock_,mode2);		\
367		EVLOCK_UNLOCK(lock1_tmplock_,mode1);			\
368	} while (0)
369
370EVENT2_EXPORT_SYMBOL
371int evthread_is_debug_lock_held_(void *lock);
372void *evthread_debug_get_real_lock_(void *lock);
373
374void *evthread_setup_global_lock_(void *lock_, unsigned locktype,
375    int enable_locks);
376
377#define EVTHREAD_SETUP_GLOBAL_LOCK(lockvar, locktype)			\
378	do {								\
379		lockvar = evthread_setup_global_lock_(lockvar,		\
380		    (locktype), enable_locks);				\
381		if (!lockvar) {						\
382			event_warn("Couldn't allocate %s", #lockvar);	\
383			return -1;					\
384		}							\
385	} while (0);
386
387int event_global_setup_locks_(const int enable_locks);
388int evsig_global_setup_locks_(const int enable_locks);
389int evutil_global_setup_locks_(const int enable_locks);
390int evutil_secure_rng_global_setup_locks_(const int enable_locks);
391
392/** Return current evthread_lock_callbacks */
393EVENT2_EXPORT_SYMBOL
394struct evthread_lock_callbacks *evthread_get_lock_callbacks(void);
395/** Return current evthread_condition_callbacks */
396struct evthread_condition_callbacks *evthread_get_condition_callbacks(void);
397/** Disable locking for internal usage (like global shutdown) */
398void evthreadimpl_disable_lock_debugging_(void);
399
400#endif
401
402#ifdef __cplusplus
403}
404#endif
405
406#endif /* EVTHREAD_INTERNAL_H_INCLUDED_ */
407