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 **************************************************************************/
33 #include "c11/threads.h"
39 static inline thrd_t
u_thread_create(int (*routine
)(void *), void *param
)
43 sigset_t saved_set
, new_set
;
47 sigdelset(&new_set
, SIGSYS
);
48 pthread_sigmask(SIG_BLOCK
, &new_set
, &saved_set
);
49 ret
= thrd_create( &thread
, routine
, param
);
50 pthread_sigmask(SIG_SETMASK
, &saved_set
, NULL
);
53 ret
= thrd_create( &thread
, routine
, param
);
61 static inline void u_thread_setname( const char *name
)
63 #if defined(HAVE_PTHREAD)
64 # if defined(__GNU_LIBRARY__) && defined(__GLIBC__) && defined(__GLIBC_MINOR__) && \
65 (__GLIBC__ >= 3 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 12)) && \
67 pthread_setname_np(pthread_self(), name
);
74 * An AMD Zen CPU consists of multiple modules where each module has its own L3
75 * cache. Inter-thread communication such as locks and atomics between modules
76 * is very expensive. It's desirable to pin a group of closely cooperating
77 * threads to one group of cores sharing L3.
79 * \param thread thread
80 * \param L3_index index of the L3 cache
81 * \param cores_per_L3 number of CPU cores shared by one L3
84 util_pin_thread_to_L3(thrd_t thread
, unsigned L3_index
, unsigned cores_per_L3
)
86 #if defined(HAVE_PTHREAD_SETAFFINITY)
90 for (unsigned i
= 0; i
< cores_per_L3
; i
++)
91 CPU_SET(L3_index
* cores_per_L3
+ i
, &cpuset
);
92 pthread_setaffinity_np(thread
, sizeof(cpuset
), &cpuset
);
97 * Return the index of L3 that the thread is pinned to. If the thread is
98 * pinned to multiple L3 caches, return -1.
100 * \param thread thread
101 * \param cores_per_L3 number of CPU cores shared by one L3
104 util_get_L3_for_pinned_thread(thrd_t thread
, unsigned cores_per_L3
)
106 #if defined(HAVE_PTHREAD_SETAFFINITY)
109 if (pthread_getaffinity_np(thread
, sizeof(cpuset
), &cpuset
) == 0) {
112 for (unsigned i
= 0; i
< CPU_SETSIZE
; i
++) {
113 if (CPU_ISSET(i
, &cpuset
)) {
114 int x
= i
/ cores_per_L3
;
120 return -1; /* multiple L3s are set */
134 /* Return the time of a thread's CPU time clock. */
135 static inline int64_t
136 u_thread_get_time_nano(thrd_t thread
)
138 #if defined(__linux__) && defined(HAVE_PTHREAD)
142 pthread_getcpuclockid(thread
, &cid
);
143 clock_gettime(cid
, &ts
);
144 return (int64_t)ts
.tv_sec
* 1000000000 + ts
.tv_nsec
;
150 static inline bool u_thread_is_self(thrd_t thread
)
152 #if defined(HAVE_PTHREAD)
153 # if defined(__GNU_LIBRARY__) && defined(__GLIBC__) && defined(__GLIBC_MINOR__) && \
154 (__GLIBC__ >= 3 || (__GLIBC__ == 2 && __GLIBC_MINOR__ >= 12))
155 return pthread_equal(pthread_self(), thread
);
165 #if defined(HAVE_PTHREAD) && !defined(__APPLE__)
167 typedef pthread_barrier_t util_barrier
;
169 static inline void util_barrier_init(util_barrier
*barrier
, unsigned count
)
171 pthread_barrier_init(barrier
, NULL
, count
);
174 static inline void util_barrier_destroy(util_barrier
*barrier
)
176 pthread_barrier_destroy(barrier
);
179 static inline void util_barrier_wait(util_barrier
*barrier
)
181 pthread_barrier_wait(barrier
);
185 #else /* If the OS doesn't have its own, implement barriers using a mutex and a condvar */
195 static inline void util_barrier_init(util_barrier
*barrier
, unsigned count
)
197 barrier
->count
= count
;
198 barrier
->waiters
= 0;
199 barrier
->sequence
= 0;
200 (void) mtx_init(&barrier
->mutex
, mtx_plain
);
201 cnd_init(&barrier
->condvar
);
204 static inline void util_barrier_destroy(util_barrier
*barrier
)
206 assert(barrier
->waiters
== 0);
207 mtx_destroy(&barrier
->mutex
);
208 cnd_destroy(&barrier
->condvar
);
211 static inline void util_barrier_wait(util_barrier
*barrier
)
213 mtx_lock(&barrier
->mutex
);
215 assert(barrier
->waiters
< barrier
->count
);
218 if (barrier
->waiters
< barrier
->count
) {
219 uint64_t sequence
= barrier
->sequence
;
222 cnd_wait(&barrier
->condvar
, &barrier
->mutex
);
223 } while (sequence
== barrier
->sequence
);
225 barrier
->waiters
= 0;
227 cnd_broadcast(&barrier
->condvar
);
230 mtx_unlock(&barrier
->mutex
);
235 #endif /* U_THREAD_H_ */