update from main archive 961207
[kopensolaris-gnu/glibc.git] / malloc / thread-m.h
1 /* Basic platform-independent macro definitions for mutexes and
2    thread-specific data.
3    Copyright (C) 1996 Free Software Foundation, Inc.
4    This file is part of the GNU C Library.
5    Contributed by Wolfram Gloger <wmglo@dent.med.uni-muenchen.de>, 1996.
6
7    The GNU C Library is free software; you can redistribute it and/or
8    modify it under the terms of the GNU Library General Public License as
9    published by the Free Software Foundation; either version 2 of the
10    License, or (at your option) any later version.
11
12    The GNU C Library is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15    Library General Public License for more details.
16
17    You should have received a copy of the GNU Library General Public
18    License along with the GNU C Library; see the file COPYING.LIB.  If not,
19    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
20    Boston, MA 02111-1307, USA.  */
21
22 /* One out of _LIBC, USE_PTHREADS, USE_THR * or USE_SPROC should be
23    defined, otherwise the token NO_THREADS * and dummy implementations
24    of the macros will be defined.  */
25
26 #ifndef _THREAD_M_H
27 #define _THREAD_M_H
28
29 #if defined(_LIBC) /* The GNU C library, a special case of Posix threads */
30
31 #include <libc-lock.h>
32
33 #ifdef PTHREAD_MUTEX_INITIALIZER
34
35 typedef pthread_t thread_id;
36
37 /* mutex */
38 typedef pthread_mutex_t mutex_t;
39
40 /* thread specific data */
41 typedef pthread_key_t tsd_key_t;
42
43 #define MUTEX_INITIALIZER       PTHREAD_MUTEX_INITIALIZER
44
45 #define tsd_key_create(key, destr)      \
46   if (__pthread_key_create != NULL) { \
47    __pthread_key_create(key, destr); } else { *(key) = (tsd_key_t) 0; }
48 #define tsd_setspecific(key, data)      \
49   if (__pthread_setspecific != NULL) { \
50    __pthread_setspecific(key, data); } else { (key) = (tsd_key_t) data; }
51 #define tsd_getspecific(key, vptr)      \
52   (vptr = (__pthread_getspecific != NULL ? \
53    __pthread_getspecific(key) : (tsd_key_t *) (key)))
54
55 #define mutex_init(m)           \
56    (__pthread_mutex_init != NULL ? __pthread_mutex_init (m, NULL) : 0)
57 #define mutex_lock(m)           \
58    (__pthread_mutex_lock != NULL ? __pthread_mutex_lock (m) : 0)
59 #define mutex_trylock(m)        \
60    (__pthread_mutex_trylock != NULL ? __pthread_mutex_trylock (m) : 0)
61 #define mutex_unlock(m)         \
62    (__pthread_mutex_unlock != NULL ? __pthread_mutex_unlock (m) : 0)
63
64 #elif defined(MUTEX_INITIALIZER)
65
66 typedef thread_t thread_id;
67
68 /* mutex */
69 typedef mutex_t mutex_t;
70
71 /* thread specific data */
72 typedef pthread_key_t tsd_key_t;
73
74 #define mutex_init(m)           __mutex_init (m)
75 #define mutex_lock(m)           __mutex_lock (m)
76 #define mutex_trylock(m)        __mutex_trylock (m)
77 #define mutex_unlock(m)         __mutex_unlock (m)
78
79 #else
80
81 #define NO_THREADS
82
83 #endif /* MUTEX_INITIALIZER && PTHREAD_MUTEX_INITIALIZER */
84
85 #elif defined(USE_PTHREADS) /* Posix threads */
86
87 #include <pthread.h>
88
89 typedef pthread_t thread_id;
90
91 /* mutex */
92 typedef pthread_mutex_t mutex_t;
93
94 #define MUTEX_INITIALIZER          PTHREAD_MUTEX_INITIALIZER
95 #define mutex_init(m)              pthread_mutex_init(m, NULL)
96 #define mutex_lock(m)              pthread_mutex_lock(m)
97 #define mutex_trylock(m)           pthread_mutex_trylock(m)
98 #define mutex_unlock(m)            pthread_mutex_unlock(m)
99
100 /* thread specific data */
101 typedef pthread_key_t tsd_key_t;
102
103 #define tsd_key_create(key, destr) pthread_key_create(key, destr)
104 #define tsd_setspecific(key, data) pthread_setspecific(key, data)
105 #define tsd_getspecific(key, vptr) (vptr = pthread_getspecific(key))
106
107 #elif USE_THR /* Solaris threads */
108
109 #include <thread.h>
110
111 typedef thread_t thread_id;
112
113 #define MUTEX_INITIALIZER          { 0 }
114 #define mutex_init(m)              mutex_init(m, USYNC_THREAD, NULL)
115
116 /*
117  * Hack for thread-specific data on Solaris.  We can't use thr_setspecific
118  * because that function calls malloc() itself.
119  */
120 typedef void *tsd_key_t[256];
121 #define tsd_key_create(key, destr) do { \
122   int i; \
123   for(i=0; i<256; i++) (*key)[i] = 0; \
124 } while(0)
125 #define tsd_setspecific(key, data) (key[(unsigned)thr_self() % 256] = (data))
126 #define tsd_getspecific(key, vptr) (vptr = key[(unsigned)thr_self() % 256])
127
128 #elif USE_SPROC /* SGI sproc() threads */
129
130 #include <sys/wait.h>
131 #include <sys/types.h>
132 #include <sys/prctl.h>
133 #include <abi_mutex.h>
134
135 typedef int thread_id;
136
137 typedef abilock_t mutex_t;
138
139 #define MUTEX_INITIALIZER          { 0 }
140 #define mutex_init(m)              init_lock(m)
141 #define mutex_lock(m)              (spin_lock(m), 0)
142 #define mutex_trylock(m)           acquire_lock(m)
143 #define mutex_unlock(m)            release_lock(m)
144
145 typedef int tsd_key_t;
146 int tsd_key_next;
147 #define tsd_key_create(key, destr) ((*key) = tsd_key_next++)
148 #define tsd_setspecific(key, data) (((void **)(&PRDA->usr_prda))[key] = data)
149 #define tsd_getspecific(key, vptr) (vptr = ((void **)(&PRDA->usr_prda))[key])
150
151 #else /* no _LIBC or USE_... are defined */
152
153 #define NO_THREADS
154
155 #endif /* defined(_LIBC) */
156
157 #ifdef NO_THREADS /* No threads, provide dummy macros */
158
159 typedef int thread_id;
160
161 typedef int mutex_t;
162
163 #define MUTEX_INITIALIZER          0
164 #define mutex_init(m)              (*(m) = 0)
165 #define mutex_lock(m)              (0)
166 #define mutex_trylock(m)           (0)
167 #define mutex_unlock(m)            (0)
168
169 typedef void *tsd_key_t;
170 #define tsd_key_create(key, destr) (*(key) = NULL)
171 #define tsd_setspecific(key, data) ((key) = data)
172 #define tsd_getspecific(key, vptr) (vptr = (key))
173
174 #endif /* defined(NO_THREADS) */
175
176 #endif /* !defined(_THREAD_M_H) */