1 /**************************************************************************
3 * Copyright 1999-2006 Brian Paul
4 * Copyright 2008 VMware, Inc.
7 * Permission is hereby granted, free of charge, to any person obtaining a
8 * copy of this software and associated documentation files (the "Software"),
9 * to deal in the Software without restriction, including without limitation
10 * the rights to use, copy, modify, merge, publish, distribute, sublicense,
11 * and/or sell copies of the Software, and to permit persons to whom the
12 * Software is furnished to do so, subject to the following conditions:
14 * The above copyright notice and this permission notice shall be included
15 * in all copies or substantial portions of the Software.
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
18 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
21 * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
22 * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
23 * OTHER DEALINGS IN THE SOFTWARE.
25 **************************************************************************/
31 * Thread, mutex, condition variable, barrier, semaphore and
32 * thread-specific data functions.
40 #include "pipe/p_compiler.h"
41 #include "util/u_debug.h" /* for assert */
43 #include "c11/threads.h"
52 typedef thrd_t pipe_thread
;
54 #define PIPE_THREAD_ROUTINE( name, param ) \
55 int name( void *param )
57 static inline pipe_thread
pipe_thread_create( PIPE_THREAD_ROUTINE((*routine
), ), void *param
)
61 sigset_t saved_set
, new_set
;
65 pthread_sigmask(SIG_SETMASK
, &new_set
, &saved_set
);
66 ret
= thrd_create( &thread
, routine
, param
);
67 pthread_sigmask(SIG_SETMASK
, &saved_set
, NULL
);
70 ret
= thrd_create( &thread
, routine
, param
);
78 static inline int pipe_thread_wait( pipe_thread thread
)
80 return thrd_join( thread
, NULL
);
83 static inline int pipe_thread_destroy( pipe_thread thread
)
85 return thrd_detach( thread
);
88 static inline void pipe_thread_setname( const char *name
)
90 #if defined(HAVE_PTHREAD)
91 # if defined(__GNU_LIBRARY__) && defined(__GLIBC__) && defined(__GLIBC_MINOR__) && \
92 (__GLIBC__ >= 3 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 12))
93 pthread_setname_np(pthread_self(), name
);
100 static inline int pipe_thread_is_self( pipe_thread thread
)
102 #if defined(HAVE_PTHREAD)
103 # if defined(__GNU_LIBRARY__) && defined(__GLIBC__) && defined(__GLIBC_MINOR__) && \
104 (__GLIBC__ >= 3 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 12))
105 return pthread_equal(pthread_self(), thread
);
113 typedef mtx_t pipe_mutex
;
115 #define pipe_static_mutex(mutex) \
116 static pipe_mutex mutex = _MTX_INITIALIZER_NP
118 #define pipe_mutex_init(mutex) \
119 (void) mtx_init(&(mutex), mtx_plain)
121 #define pipe_mutex_destroy(mutex) \
122 mtx_destroy(&(mutex))
124 #define pipe_mutex_lock(mutex) \
125 (void) mtx_lock(&(mutex))
127 #define pipe_mutex_unlock(mutex) \
128 (void) mtx_unlock(&(mutex))
130 #define pipe_mutex_assert_locked(mutex) \
131 __pipe_mutex_assert_locked(&(mutex))
134 __pipe_mutex_assert_locked(pipe_mutex
*mutex
)
137 /* NOTE: this would not work for recursive mutexes, but
138 * pipe_mutex doesn't support those
140 int ret
= mtx_trylock(mutex
);
141 assert(ret
== thrd_busy
);
142 if (ret
== thrd_success
)
149 typedef cnd_t pipe_condvar
;
156 #if (defined(PIPE_OS_LINUX) || defined(PIPE_OS_BSD) || defined(PIPE_OS_SOLARIS) || defined(PIPE_OS_HURD)) && !defined(PIPE_OS_ANDROID)
158 typedef pthread_barrier_t pipe_barrier
;
160 static inline void pipe_barrier_init(pipe_barrier
*barrier
, unsigned count
)
162 pthread_barrier_init(barrier
, NULL
, count
);
165 static inline void pipe_barrier_destroy(pipe_barrier
*barrier
)
167 pthread_barrier_destroy(barrier
);
170 static inline void pipe_barrier_wait(pipe_barrier
*barrier
)
172 pthread_barrier_wait(barrier
);
176 #else /* If the OS doesn't have its own, implement barriers using a mutex and a condvar */
183 pipe_condvar condvar
;
186 static inline void pipe_barrier_init(pipe_barrier
*barrier
, unsigned count
)
188 barrier
->count
= count
;
189 barrier
->waiters
= 0;
190 barrier
->sequence
= 0;
191 pipe_mutex_init(barrier
->mutex
);
192 cnd_init(&barrier
->condvar
);
195 static inline void pipe_barrier_destroy(pipe_barrier
*barrier
)
197 assert(barrier
->waiters
== 0);
198 pipe_mutex_destroy(barrier
->mutex
);
199 cnd_destroy(&barrier
->condvar
);
202 static inline void pipe_barrier_wait(pipe_barrier
*barrier
)
204 pipe_mutex_lock(barrier
->mutex
);
206 assert(barrier
->waiters
< barrier
->count
);
209 if (barrier
->waiters
< barrier
->count
) {
210 uint64_t sequence
= barrier
->sequence
;
213 cnd_wait(&barrier
->condvar
, &barrier
->mutex
);
214 } while (sequence
== barrier
->sequence
);
216 barrier
->waiters
= 0;
218 cnd_broadcast(&barrier
->condvar
);
221 pipe_mutex_unlock(barrier
->mutex
);
241 pipe_semaphore_init(pipe_semaphore
*sema
, int init_val
)
243 pipe_mutex_init(sema
->mutex
);
244 cnd_init(&sema
->cond
);
245 sema
->counter
= init_val
;
249 pipe_semaphore_destroy(pipe_semaphore
*sema
)
251 pipe_mutex_destroy(sema
->mutex
);
252 cnd_destroy(&sema
->cond
);
255 /** Signal/increment semaphore counter */
257 pipe_semaphore_signal(pipe_semaphore
*sema
)
259 pipe_mutex_lock(sema
->mutex
);
261 cnd_signal(&sema
->cond
);
262 pipe_mutex_unlock(sema
->mutex
);
265 /** Wait for semaphore counter to be greater than zero */
267 pipe_semaphore_wait(pipe_semaphore
*sema
)
269 pipe_mutex_lock(sema
->mutex
);
270 while (sema
->counter
<= 0) {
271 cnd_wait(&sema
->cond
, &sema
->mutex
);
274 pipe_mutex_unlock(sema
->mutex
);
280 * Thread-specific data.
289 #define PIPE_TSD_INIT_MAGIC 0xff8adc98
293 pipe_tsd_init(pipe_tsd
*tsd
)
295 if (tss_create(&tsd
->key
, NULL
/*free*/) != 0) {
298 tsd
->initMagic
= PIPE_TSD_INIT_MAGIC
;
302 pipe_tsd_get(pipe_tsd
*tsd
)
304 if (tsd
->initMagic
!= (int) PIPE_TSD_INIT_MAGIC
) {
307 return tss_get(tsd
->key
);
311 pipe_tsd_set(pipe_tsd
*tsd
, void *value
)
313 if (tsd
->initMagic
!= (int) PIPE_TSD_INIT_MAGIC
) {
316 if (tss_set(tsd
->key
, value
) != 0) {
327 /* Return the time of a thread's CPU time clock. */
328 static inline int64_t
329 pipe_thread_get_time_nano(pipe_thread thread
)
331 #if defined(PIPE_OS_LINUX) && defined(HAVE_PTHREAD)
335 pthread_getcpuclockid(thread
, &cid
);
336 clock_gettime(cid
, &ts
);
337 return (int64_t)ts
.tv_sec
* 1000000000 + ts
.tv_nsec
;
343 /* Return the time of the current thread's CPU time clock. */
344 static inline int64_t
345 pipe_current_thread_get_time_nano(void)
347 #if defined(HAVE_PTHREAD)
348 return pipe_thread_get_time_nano(pthread_self());
354 #endif /* OS_THREAD_H_ */