1*ae771770SStanislav Sedov /*
2*ae771770SStanislav Sedov  * Copyright (c) 2003 Kungliga Tekniska Högskolan
3*ae771770SStanislav Sedov  * (Royal Institute of Technology, Stockholm, Sweden).
4*ae771770SStanislav Sedov  * All rights reserved.
5*ae771770SStanislav Sedov  *
6*ae771770SStanislav Sedov  * Redistribution and use in source and binary forms, with or without
7*ae771770SStanislav Sedov  * modification, are permitted provided that the following conditions
8*ae771770SStanislav Sedov  * are met:
9*ae771770SStanislav Sedov  *
10*ae771770SStanislav Sedov  * 1. Redistributions of source code must retain the above copyright
11*ae771770SStanislav Sedov  *    notice, this list of conditions and the following disclaimer.
12*ae771770SStanislav Sedov  *
13*ae771770SStanislav Sedov  * 2. Redistributions in binary form must reproduce the above copyright
14*ae771770SStanislav Sedov  *    notice, this list of conditions and the following disclaimer in the
15*ae771770SStanislav Sedov  *    documentation and/or other materials provided with the distribution.
16*ae771770SStanislav Sedov  *
17*ae771770SStanislav Sedov  * 3. Neither the name of the Institute nor the names of its contributors
18*ae771770SStanislav Sedov  *    may be used to endorse or promote products derived from this software
19*ae771770SStanislav Sedov  *    without specific prior written permission.
20*ae771770SStanislav Sedov  *
21*ae771770SStanislav Sedov  * THIS SOFTWARE IS PROVIDED BY THE INSTITUTE AND CONTRIBUTORS ``AS IS'' AND
22*ae771770SStanislav Sedov  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23*ae771770SStanislav Sedov  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24*ae771770SStanislav Sedov  * ARE DISCLAIMED.  IN NO EVENT SHALL THE INSTITUTE OR CONTRIBUTORS BE LIABLE
25*ae771770SStanislav Sedov  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26*ae771770SStanislav Sedov  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27*ae771770SStanislav Sedov  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28*ae771770SStanislav Sedov  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29*ae771770SStanislav Sedov  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30*ae771770SStanislav Sedov  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31*ae771770SStanislav Sedov  * SUCH DAMAGE.
32*ae771770SStanislav Sedov  */
33*ae771770SStanislav Sedov 
34*ae771770SStanislav Sedov /* $Id$ */
35*ae771770SStanislav Sedov 
36*ae771770SStanislav Sedov /*
37*ae771770SStanislav Sedov  * Provide wrapper macros for thread synchronization primitives so we
38*ae771770SStanislav Sedov  * can use native thread functions for those operating system that
39*ae771770SStanislav Sedov  * supports it.
40*ae771770SStanislav Sedov  *
41*ae771770SStanislav Sedov  * This is so libkrb5.so (or more importantly, libgssapi.so) can have
42*ae771770SStanislav Sedov  * thread support while the program that that dlopen(3)s the library
43*ae771770SStanislav Sedov  * don't need to be linked to libpthread.
44*ae771770SStanislav Sedov  */
45*ae771770SStanislav Sedov 
46*ae771770SStanislav Sedov #ifndef HEIM_THREADS_H
47*ae771770SStanislav Sedov #define HEIM_THREADS_H 1
48*ae771770SStanislav Sedov 
49*ae771770SStanislav Sedov /* assume headers already included */
50*ae771770SStanislav Sedov 
51*ae771770SStanislav Sedov #if defined(__NetBSD__) && __NetBSD_Version__ >= 106120000 && __NetBSD_Version__< 299001200 && defined(ENABLE_PTHREAD_SUPPORT)
52*ae771770SStanislav Sedov 
53*ae771770SStanislav Sedov /*
54*ae771770SStanislav Sedov  * NetBSD have a thread lib that we can use that part of libc that
55*ae771770SStanislav Sedov  * works regardless if application are linked to pthreads or not.
56*ae771770SStanislav Sedov  * NetBSD newer then 2.99.11 just use pthread.h, and the same thing
57*ae771770SStanislav Sedov  * will happen.
58*ae771770SStanislav Sedov  */
59*ae771770SStanislav Sedov #include <threadlib.h>
60*ae771770SStanislav Sedov 
61*ae771770SStanislav Sedov #define HEIMDAL_MUTEX mutex_t
62*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_INITIALIZER MUTEX_INITIALIZER
63*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_init(m) mutex_init(m, NULL)
64*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_lock(m) mutex_lock(m)
65*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_unlock(m) mutex_unlock(m)
66*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_destroy(m) mutex_destroy(m)
67*ae771770SStanislav Sedov 
68*ae771770SStanislav Sedov #define HEIMDAL_RWLOCK rwlock_t
69*ae771770SStanislav Sedov #define HEIMDAL_RWLOCK_INITIALIZER RWLOCK_INITIALIZER
70*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_init(l) rwlock_init(l, NULL)
71*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_rdlock(l) rwlock_rdlock(l)
72*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_wrlock(l) rwlock_wrlock(l)
73*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_tryrdlock(l) rwlock_tryrdlock(l)
74*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_trywrlock(l) rwlock_trywrlock(l)
75*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_unlock(l) rwlock_unlock(l)
76*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_destroy(l) rwlock_destroy(l)
77*ae771770SStanislav Sedov 
78*ae771770SStanislav Sedov #define HEIMDAL_thread_key thread_key_t
79*ae771770SStanislav Sedov #define HEIMDAL_key_create(k,d,r) do { r = thr_keycreate(k,d); } while(0)
80*ae771770SStanislav Sedov #define HEIMDAL_setspecific(k,s,r) do { r = thr_setspecific(k,s); } while(0)
81*ae771770SStanislav Sedov #define HEIMDAL_getspecific(k) thr_getspecific(k)
82*ae771770SStanislav Sedov #define HEIMDAL_key_delete(k) thr_keydelete(k)
83*ae771770SStanislav Sedov 
84*ae771770SStanislav Sedov #elif defined(ENABLE_PTHREAD_SUPPORT) && (!defined(__NetBSD__) || __NetBSD_Version__ >= 299001200)
85*ae771770SStanislav Sedov 
86*ae771770SStanislav Sedov #include <pthread.h>
87*ae771770SStanislav Sedov 
88*ae771770SStanislav Sedov #define HEIMDAL_MUTEX pthread_mutex_t
89*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_INITIALIZER PTHREAD_MUTEX_INITIALIZER
90*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_init(m) pthread_mutex_init(m, NULL)
91*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_lock(m) pthread_mutex_lock(m)
92*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_unlock(m) pthread_mutex_unlock(m)
93*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_destroy(m) pthread_mutex_destroy(m)
94*ae771770SStanislav Sedov 
95*ae771770SStanislav Sedov #define HEIMDAL_RWLOCK rwlock_t
96*ae771770SStanislav Sedov #define HEIMDAL_RWLOCK_INITIALIZER RWLOCK_INITIALIZER
97*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_init(l) pthread_rwlock_init(l, NULL)
98*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_rdlock(l) pthread_rwlock_rdlock(l)
99*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_wrlock(l) pthread_rwlock_wrlock(l)
100*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_tryrdlock(l) pthread_rwlock_tryrdlock(l)
101*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_trywrlock(l) pthread_rwlock_trywrlock(l)
102*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_unlock(l) pthread_rwlock_unlock(l)
103*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_destroy(l) pthread_rwlock_destroy(l)
104*ae771770SStanislav Sedov 
105*ae771770SStanislav Sedov #define HEIMDAL_thread_key pthread_key_t
106*ae771770SStanislav Sedov #define HEIMDAL_key_create(k,d,r) do { r = pthread_key_create(k,d); } while(0)
107*ae771770SStanislav Sedov #define HEIMDAL_setspecific(k,s,r) do { r = pthread_setspecific(k,s); } while(0)
108*ae771770SStanislav Sedov #define HEIMDAL_getspecific(k) pthread_getspecific(k)
109*ae771770SStanislav Sedov #define HEIMDAL_key_delete(k) pthread_key_delete(k)
110*ae771770SStanislav Sedov 
111*ae771770SStanislav Sedov #elif defined(HEIMDAL_DEBUG_THREADS)
112*ae771770SStanislav Sedov 
113*ae771770SStanislav Sedov /* no threads support, just do consistency checks */
114*ae771770SStanislav Sedov #include <stdlib.h>
115*ae771770SStanislav Sedov 
116*ae771770SStanislav Sedov #define HEIMDAL_MUTEX int
117*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_INITIALIZER 0
118*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_init(m)  do { (*(m)) = 0; } while(0)
119*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_lock(m)  do { if ((*(m))++ != 0) abort(); } while(0)
120*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_unlock(m) do { if ((*(m))-- != 1) abort(); } while(0)
121*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_destroy(m) do {if ((*(m)) != 0) abort(); } while(0)
122*ae771770SStanislav Sedov 
123*ae771770SStanislav Sedov #define HEIMDAL_RWLOCK rwlock_t int
124*ae771770SStanislav Sedov #define HEIMDAL_RWLOCK_INITIALIZER 0
125*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_init(l) do { } while(0)
126*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_rdlock(l) do { } while(0)
127*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_wrlock(l) do { } while(0)
128*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_tryrdlock(l) do { } while(0)
129*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_trywrlock(l) do { } while(0)
130*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_unlock(l) do { } while(0)
131*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_destroy(l) do { } while(0)
132*ae771770SStanislav Sedov 
133*ae771770SStanislav Sedov #define HEIMDAL_internal_thread_key 1
134*ae771770SStanislav Sedov 
135*ae771770SStanislav Sedov #else /* no thread support, no debug case */
136*ae771770SStanislav Sedov 
137*ae771770SStanislav Sedov #define HEIMDAL_MUTEX int
138*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_INITIALIZER 0
139*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_init(m)  do { (void)(m); } while(0)
140*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_lock(m)  do { (void)(m); } while(0)
141*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_unlock(m) do { (void)(m); } while(0)
142*ae771770SStanislav Sedov #define HEIMDAL_MUTEX_destroy(m) do { (void)(m); } while(0)
143*ae771770SStanislav Sedov 
144*ae771770SStanislav Sedov #define HEIMDAL_RWLOCK rwlock_t int
145*ae771770SStanislav Sedov #define HEIMDAL_RWLOCK_INITIALIZER 0
146*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_init(l) do { } while(0)
147*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_rdlock(l) do { } while(0)
148*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_wrlock(l) do { } while(0)
149*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_tryrdlock(l) do { } while(0)
150*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_trywrlock(l) do { } while(0)
151*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_unlock(l) do { } while(0)
152*ae771770SStanislav Sedov #define	HEIMDAL_RWLOCK_destroy(l) do { } while(0)
153*ae771770SStanislav Sedov 
154*ae771770SStanislav Sedov #define HEIMDAL_internal_thread_key 1
155*ae771770SStanislav Sedov 
156*ae771770SStanislav Sedov #endif /* no thread support */
157*ae771770SStanislav Sedov 
158*ae771770SStanislav Sedov #ifdef HEIMDAL_internal_thread_key
159*ae771770SStanislav Sedov 
160*ae771770SStanislav Sedov typedef struct heim_thread_key {
161*ae771770SStanislav Sedov     void *value;
162*ae771770SStanislav Sedov     void (*destructor)(void *);
163*ae771770SStanislav Sedov } heim_thread_key;
164*ae771770SStanislav Sedov 
165*ae771770SStanislav Sedov #define HEIMDAL_thread_key heim_thread_key
166*ae771770SStanislav Sedov #define HEIMDAL_key_create(k,d,r) \
167*ae771770SStanislav Sedov 	do { (k)->value = NULL; (k)->destructor = (d); r = 0; } while(0)
168*ae771770SStanislav Sedov #define HEIMDAL_setspecific(k,s,r) do { (k).value = s ; r = 0; } while(0)
169*ae771770SStanislav Sedov #define HEIMDAL_getspecific(k) ((k).value)
170*ae771770SStanislav Sedov #define HEIMDAL_key_delete(k) do { (*(k).destructor)((k).value); } while(0)
171*ae771770SStanislav Sedov 
172*ae771770SStanislav Sedov #undef HEIMDAL_internal_thread_key
173*ae771770SStanislav Sedov #endif /* HEIMDAL_internal_thread_key */
174*ae771770SStanislav Sedov 
175*ae771770SStanislav Sedov #endif /* HEIM_THREADS_H */
176