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 pthread_setname_np(pthread_self(), name
);
70 * An AMD Zen CPU consists of multiple modules where each module has its own L3
71 * cache. Inter-thread communication such as locks and atomics between modules
72 * is very expensive. It's desirable to pin a group of closely cooperating
73 * threads to one group of cores sharing L3.
75 * \param thread thread
76 * \param L3_index index of the L3 cache
77 * \param cores_per_L3 number of CPU cores shared by one L3
80 util_pin_thread_to_L3(thrd_t thread
, unsigned L3_index
, unsigned cores_per_L3
)
82 #if defined(HAVE_PTHREAD_SETAFFINITY)
86 for (unsigned i
= 0; i
< cores_per_L3
; i
++)
87 CPU_SET(L3_index
* cores_per_L3
+ i
, &cpuset
);
88 pthread_setaffinity_np(thread
, sizeof(cpuset
), &cpuset
);
93 * Return the index of L3 that the thread is pinned to. If the thread is
94 * pinned to multiple L3 caches, return -1.
96 * \param thread thread
97 * \param cores_per_L3 number of CPU cores shared by one L3
100 util_get_L3_for_pinned_thread(thrd_t thread
, unsigned cores_per_L3
)
102 #if defined(HAVE_PTHREAD_SETAFFINITY)
105 if (pthread_getaffinity_np(thread
, sizeof(cpuset
), &cpuset
) == 0) {
108 for (unsigned i
= 0; i
< CPU_SETSIZE
; i
++) {
109 if (CPU_ISSET(i
, &cpuset
)) {
110 int x
= i
/ cores_per_L3
;
116 return -1; /* multiple L3s are set */
130 /* Return the time of a thread's CPU time clock. */
131 static inline int64_t
132 u_thread_get_time_nano(thrd_t thread
)
134 #if defined(__linux__) && defined(HAVE_PTHREAD)
138 pthread_getcpuclockid(thread
, &cid
);
139 clock_gettime(cid
, &ts
);
140 return (int64_t)ts
.tv_sec
* 1000000000 + ts
.tv_nsec
;
146 static inline bool u_thread_is_self(thrd_t thread
)
148 #if defined(HAVE_PTHREAD)
149 return pthread_equal(pthread_self(), thread
);
158 #if defined(HAVE_PTHREAD) && !defined(__APPLE__)
160 typedef pthread_barrier_t util_barrier
;
162 static inline void util_barrier_init(util_barrier
*barrier
, unsigned count
)
164 pthread_barrier_init(barrier
, NULL
, count
);
167 static inline void util_barrier_destroy(util_barrier
*barrier
)
169 pthread_barrier_destroy(barrier
);
172 static inline void util_barrier_wait(util_barrier
*barrier
)
174 pthread_barrier_wait(barrier
);
178 #else /* If the OS doesn't have its own, implement barriers using a mutex and a condvar */
188 static inline void util_barrier_init(util_barrier
*barrier
, unsigned count
)
190 barrier
->count
= count
;
191 barrier
->waiters
= 0;
192 barrier
->sequence
= 0;
193 (void) mtx_init(&barrier
->mutex
, mtx_plain
);
194 cnd_init(&barrier
->condvar
);
197 static inline void util_barrier_destroy(util_barrier
*barrier
)
199 assert(barrier
->waiters
== 0);
200 mtx_destroy(&barrier
->mutex
);
201 cnd_destroy(&barrier
->condvar
);
204 static inline void util_barrier_wait(util_barrier
*barrier
)
206 mtx_lock(&barrier
->mutex
);
208 assert(barrier
->waiters
< barrier
->count
);
211 if (barrier
->waiters
< barrier
->count
) {
212 uint64_t sequence
= barrier
->sequence
;
215 cnd_wait(&barrier
->condvar
, &barrier
->mutex
);
216 } while (sequence
== barrier
->sequence
);
218 barrier
->waiters
= 0;
220 cnd_broadcast(&barrier
->condvar
);
223 mtx_unlock(&barrier
->mutex
);
228 #endif /* U_THREAD_H_ */