1 /* $Id: glthread.c,v 1.9 2001/11/12 23:50:12 brianp Exp $ */
4 * Mesa 3-D graphics library
7 * Copyright (C) 1999-2001 Brian Paul All Rights Reserved.
9 * Permission is hereby granted, free of charge, to any person obtaining a
10 * copy of this software and associated documentation files (the "Software"),
11 * to deal in the Software without restriction, including without limitation
12 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
13 * and/or sell copies of the Software, and to permit persons to whom the
14 * Software is furnished to do so, subject to the following conditions:
16 * The above copyright notice and this permission notice shall be included
17 * in all copies or substantial portions of the Software.
19 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
20 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
21 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
22 * BRIAN PAUL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
23 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
24 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
29 * XXX There's probably some work to do in order to make this file
30 * truly reusable outside of Mesa. First, the glheader.h include must go.
43 * This file should still compile even when THREADS is not defined.
44 * This is to make things easier to deal with on the makefile scene..
52 #define INIT_TSD_ERROR "_glthread_: failed to allocate key for thread specific data"
53 #define GET_TSD_ERROR "_glthread_: failed to get thread specific data"
54 #define SET_TSD_ERROR "_glthread_: thread failed to set thread specific data"
58 * Magic number to determine if a TSD object has been initialized.
59 * Kind of a hack but there doesn't appear to be a better cross-platform
62 #define INIT_MAGIC 0xff8adc98
67 * POSIX Threads -- The best way to go if your platform supports them.
68 * Solaris >= 2.5 have POSIX threads, IRIX >= 6.4 reportedly
69 * has them, and many of the free Unixes now have them.
70 * Be sure to use appropriate -mt or -D_REENTRANT type
71 * compile flags when building.
78 return (unsigned long) pthread_self();
83 _glthread_InitTSD(_glthread_TSD
*tsd
)
85 if (pthread_key_create(&tsd
->key
, NULL
/*free*/) != 0) {
86 perror(INIT_TSD_ERROR
);
89 tsd
->initMagic
= INIT_MAGIC
;
94 _glthread_GetTSD(_glthread_TSD
*tsd
)
96 if (tsd
->initMagic
!= (int) INIT_MAGIC
) {
97 _glthread_InitTSD(tsd
);
99 return pthread_getspecific(tsd
->key
);
104 _glthread_SetTSD(_glthread_TSD
*tsd
, void *ptr
)
106 if (tsd
->initMagic
!= (int) INIT_MAGIC
) {
107 _glthread_InitTSD(tsd
);
109 if (pthread_setspecific(tsd
->key
, ptr
) != 0) {
110 perror(SET_TSD_ERROR
);
115 #endif /* PTHREADS */
120 * Solaris/Unix International Threads -- Use only if POSIX threads
121 * aren't available on your Unix platform. Solaris 2.[34] are examples
122 * of platforms where this is the case. Be sure to use -mt and/or
123 * -D_REENTRANT when compiling.
125 #ifdef SOLARIS_THREADS
126 #define USE_LOCK_FOR_KEY /* undef this to try a version without
127 lock for the global key... */
130 _glthread_GetID(void)
132 abort(); /* XXX not implemented yet */
133 return (unsigned long) 0;
138 _glthread_InitTSD(_glthread_TSD
*tsd
)
140 if ((errno
= mutex_init(&tsd
->keylock
, 0, NULL
)) != 0 ||
141 (errno
= thr_keycreate(&(tsd
->key
), free
)) != 0) {
142 perror(INIT_TSD_ERROR
);
145 tsd
->initMagic
= INIT_MAGIC
;
150 _glthread_GetTSD(_glthread_TSD
*tsd
)
153 if (tsd
->initMagic
!= INIT_MAGIC
) {
154 _glthread_InitTSD(tsd
);
156 #ifdef USE_LOCK_FOR_KEY
157 mutex_lock(&tsd
->keylock
);
158 thr_getspecific(tsd
->key
, &ret
);
159 mutex_unlock(&tsd
->keylock
);
161 if ((errno
= thr_getspecific(tsd
->key
, &ret
)) != 0) {
162 perror(GET_TSD_ERROR
);
171 _glthread_SetTSD(_glthread_TSD
*tsd
, void *ptr
)
173 if (tsd
->initMagic
!= INIT_MAGIC
) {
174 _glthread_InitTSD(tsd
);
176 if ((errno
= thr_setspecific(tsd
->key
, ptr
)) != 0) {
177 perror(SET_TSD_ERROR
);
182 #undef USE_LOCK_FOR_KEY
183 #endif /* SOLARIS_THREADS */
188 * Win32 Threads. The only available option for Windows 95/NT.
189 * Be sure that you compile using the Multithreaded runtime, otherwise
190 * bad things will happen.
195 _glthread_GetID(void)
197 abort(); /* XXX not implemented yet */
198 return (unsigned long) 0;
203 _glthread_InitTSD(_glthread_TSD
*tsd
)
205 tsd
->key
= TlsAlloc();
206 if (tsd
->key
== 0xffffffff) {
207 /* Can Windows handle stderr messages for non-console
208 applications? Does Windows have perror? */
209 /* perror(SET_INIT_ERROR);*/
212 tsd
->initMagic
= INIT_MAGIC
;
217 _glthread_GetTSD(_glthread_TSD
*tsd
)
219 if (tsd
->initMagic
!= INIT_MAGIC
) {
220 _glthread_InitTSD(tsd
);
222 return TlsGetValue(tsd
->key
);
227 _glthread_SetTSD(_glthread_TSD
*tsd
, void *ptr
)
229 /* the following code assumes that the _glthread_TSD has been initialized
230 to zero at creation */
231 if (tsd
->initMagic
!= INIT_MAGIC
) {
232 _glthread_InitTSD(tsd
);
234 if (TlsSetValue(tsd
->key
, ptr
) == 0) {
235 /* Can Windows handle stderr messages for non-console
236 applications? Does Windows have perror? */
237 /* perror(SET_TSD_ERROR);*/
242 #endif /* WIN32_THREADS */
247 * XFree86 has its own thread wrapper, Xthreads.h
248 * We wrap it again for GL.
253 _glthread_GetID(void)
255 return (unsigned long) xthread_self();
260 _glthread_InitTSD(_glthread_TSD
*tsd
)
262 if (xthread_key_create(&tsd
->key
, NULL
) != 0) {
263 perror(INIT_TSD_ERROR
);
266 tsd
->initMagic
= INIT_MAGIC
;
271 _glthread_GetTSD(_glthread_TSD
*tsd
)
274 if (tsd
->initMagic
!= INIT_MAGIC
) {
275 _glthread_InitTSD(tsd
);
277 xthread_get_specific(tsd
->key
, &ptr
);
283 _glthread_SetTSD(_glthread_TSD
*tsd
, void *ptr
)
285 if (tsd
->initMagic
!= INIT_MAGIC
) {
286 _glthread_InitTSD(tsd
);
288 xthread_set_specific(tsd
->key
, ptr
);
301 _glthread_GetID(void)
303 return (unsigned long) find_thread(NULL
);
307 _glthread_InitTSD(_glthread_TSD
*tsd
)
309 tsd
->key
= tls_allocate();
310 tsd
->initMagic
= INIT_MAGIC
;
314 _glthread_GetTSD(_glthread_TSD
*tsd
)
316 if (tsd
->initMagic
!= (int) INIT_MAGIC
) {
317 _glthread_InitTSD(tsd
);
319 return tls_get(tsd
->key
);
323 _glthread_SetTSD(_glthread_TSD
*tsd
, void *ptr
)
325 if (tsd
->initMagic
!= (int) INIT_MAGIC
) {
326 _glthread_InitTSD(tsd
);
328 tls_set(tsd
->key
, ptr
);
331 #endif /* BEOS_THREADS */
343 _glthread_GetID(void)
350 _glthread_InitTSD(_glthread_TSD
*tsd
)
357 _glthread_GetTSD(_glthread_TSD
*tsd
)
365 _glthread_SetTSD(_glthread_TSD
*tsd
, void *ptr
)