]> CyberLeo.Net >> Repos - FreeBSD/FreeBSD.git/blob - lib/libc/gen/_pthread_stubs.c
zfs: merge openzfs/zfs@229b9f4ed
[FreeBSD/FreeBSD.git] / lib / libc / gen / _pthread_stubs.c
1 /*-
2  * SPDX-License-Identifier: BSD-2-Clause
3  *
4  * Copyright (c) 2001 Daniel Eischen <deischen@FreeBSD.org>.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY DANIEL EISCHEN AND CONTRIBUTORS ``AS IS''
17  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  */
28
29 #include <signal.h>
30 #include <pthread.h>
31 #include <stdlib.h>
32 #include <errno.h>
33
34 #include "libc_private.h"
35
36 /*
37  * Weak symbols: All libc internal usage of these functions should
38  * use the weak symbol versions (_pthread_XXX).  If libpthread is
39  * linked, it will override these functions with (non-weak) routines.
40  * The _pthread_XXX functions are provided solely for internal libc
41  * usage to avoid unwanted cancellation points and to differentiate
42  * between application locks and libc locks (threads holding the
43  * latter can't be allowed to exit/terminate).
44  */
45
46 /* Define a null pthread structure just to satisfy _pthread_self. */
47 struct pthread {
48 };
49
50 static struct pthread   main_thread;
51
52 static int              stub_main(void);
53 static void             *stub_null(void);
54 static struct pthread   *stub_self(void);
55 static int              stub_zero(void);
56 static int              stub_fail(void);
57 static int              stub_true(void);
58 static void             stub_exit(void);
59 static int              stub_esrch(void);
60 static int              stub_getname_np(pthread_t, char *, size_t);
61
62 #define PJT_DUAL_ENTRY(entry)   \
63         (pthread_func_t)entry, (pthread_func_t)entry
64
65 pthread_func_entry_t __thr_jtable[PJT_MAX] = {
66         [PJT_ATFORK] =                  {PJT_DUAL_ENTRY(stub_zero)},
67         [PJT_ATTR_DESTROY] =            {PJT_DUAL_ENTRY(stub_zero)},
68         [PJT_ATTR_GETDETACHSTATE] =     {PJT_DUAL_ENTRY(stub_zero)},
69         [PJT_ATTR_GETGUARDSIZE] =       {PJT_DUAL_ENTRY(stub_zero)},
70         [PJT_ATTR_GETINHERITSCHED] =    {PJT_DUAL_ENTRY(stub_zero)},
71         [PJT_ATTR_GETSCHEDPARAM] =      {PJT_DUAL_ENTRY(stub_zero)},
72         [PJT_ATTR_GETSCHEDPOLICY] =     {PJT_DUAL_ENTRY(stub_zero)},
73         [PJT_ATTR_GETSCOPE] =           {PJT_DUAL_ENTRY(stub_zero)},
74         [PJT_ATTR_GETSTACKADDR] =       {PJT_DUAL_ENTRY(stub_zero)},
75         [PJT_ATTR_GETSTACKSIZE] =       {PJT_DUAL_ENTRY(stub_zero)},
76         [PJT_ATTR_INIT] =               {PJT_DUAL_ENTRY(stub_zero)},
77         [PJT_ATTR_SETDETACHSTATE] =     {PJT_DUAL_ENTRY(stub_zero)},
78         [PJT_ATTR_SETGUARDSIZE] =       {PJT_DUAL_ENTRY(stub_zero)},
79         [PJT_ATTR_SETINHERITSCHED] =    {PJT_DUAL_ENTRY(stub_zero)},
80         [PJT_ATTR_SETSCHEDPARAM] =      {PJT_DUAL_ENTRY(stub_zero)},
81         [PJT_ATTR_SETSCHEDPOLICY] =     {PJT_DUAL_ENTRY(stub_zero)},
82         [PJT_ATTR_SETSCOPE] =           {PJT_DUAL_ENTRY(stub_zero)},
83         [PJT_ATTR_SETSTACKADDR] =       {PJT_DUAL_ENTRY(stub_zero)},
84         [PJT_ATTR_SETSTACKSIZE] =       {PJT_DUAL_ENTRY(stub_zero)},
85         [PJT_CANCEL] =                  {PJT_DUAL_ENTRY(stub_zero)},
86         [PJT_CLEANUP_POP] =             {PJT_DUAL_ENTRY(stub_zero)},
87         [PJT_CLEANUP_PUSH] =            {PJT_DUAL_ENTRY(stub_zero)},
88         [PJT_COND_BROADCAST] =          {PJT_DUAL_ENTRY(stub_zero)},
89         [PJT_COND_DESTROY] =            {PJT_DUAL_ENTRY(stub_zero)},
90         [PJT_COND_INIT] =               {PJT_DUAL_ENTRY(stub_zero)},
91         [PJT_COND_SIGNAL] =             {PJT_DUAL_ENTRY(stub_zero)},
92         [PJT_COND_TIMEDWAIT] =          {PJT_DUAL_ENTRY(stub_zero)},
93         [PJT_COND_WAIT] =               {PJT_DUAL_ENTRY(stub_zero)},
94         [PJT_DETACH] =                  {PJT_DUAL_ENTRY(stub_zero)},
95         [PJT_EQUAL] =                   {PJT_DUAL_ENTRY(stub_true)},
96         [PJT_EXIT] =                    {PJT_DUAL_ENTRY(stub_exit)},
97         [PJT_GETSPECIFIC] =             {PJT_DUAL_ENTRY(stub_null)},
98         [PJT_JOIN] =                    {PJT_DUAL_ENTRY(stub_zero)},
99         [PJT_KEY_CREATE] =              {PJT_DUAL_ENTRY(stub_fail)},
100         [PJT_KEY_DELETE] =              {PJT_DUAL_ENTRY(stub_zero)},
101         [PJT_KILL] =                    {PJT_DUAL_ENTRY(stub_zero)},
102         [PJT_MAIN_NP] =                 {PJT_DUAL_ENTRY(stub_main)},
103         [PJT_MUTEXATTR_DESTROY] =       {PJT_DUAL_ENTRY(stub_zero)},
104         [PJT_MUTEXATTR_INIT] =          {PJT_DUAL_ENTRY(stub_zero)},
105         [PJT_MUTEXATTR_SETTYPE] =       {PJT_DUAL_ENTRY(stub_zero)},
106         [PJT_MUTEX_DESTROY] =           {PJT_DUAL_ENTRY(stub_zero)},
107         [PJT_MUTEX_INIT] =              {PJT_DUAL_ENTRY(stub_zero)},
108         [PJT_MUTEX_LOCK] =              {PJT_DUAL_ENTRY(stub_zero)},
109         [PJT_MUTEX_TRYLOCK] =           {PJT_DUAL_ENTRY(stub_zero)},
110         [PJT_MUTEX_UNLOCK] =            {PJT_DUAL_ENTRY(stub_zero)},
111         [PJT_ONCE] =                    {PJT_DUAL_ENTRY(stub_fail)},
112         [PJT_RWLOCK_DESTROY] =          {PJT_DUAL_ENTRY(stub_zero)},
113         [PJT_RWLOCK_INIT] =             {PJT_DUAL_ENTRY(stub_zero)},
114         [PJT_RWLOCK_RDLOCK] =           {PJT_DUAL_ENTRY(stub_zero)},
115         [PJT_RWLOCK_TRYRDLOCK] =        {PJT_DUAL_ENTRY(stub_zero)},
116         [PJT_RWLOCK_TRYWRLOCK] =        {PJT_DUAL_ENTRY(stub_zero)},
117         [PJT_RWLOCK_UNLOCK] =           {PJT_DUAL_ENTRY(stub_zero)},
118         [PJT_RWLOCK_WRLOCK] =           {PJT_DUAL_ENTRY(stub_zero)},
119         [PJT_SELF] =                    {PJT_DUAL_ENTRY(stub_self)},
120         [PJT_SETCANCELSTATE] =          {PJT_DUAL_ENTRY(stub_zero)},
121         [PJT_SETCANCELTYPE] =           {PJT_DUAL_ENTRY(stub_zero)},
122         [PJT_SETSPECIFIC] =             {PJT_DUAL_ENTRY(stub_zero)},
123         [PJT_SIGMASK] =                 {PJT_DUAL_ENTRY(stub_zero)},
124         [PJT_TESTCANCEL] =              {PJT_DUAL_ENTRY(stub_zero)},
125         [PJT_CLEANUP_POP_IMP] =         {PJT_DUAL_ENTRY(stub_zero)},
126         [PJT_CLEANUP_PUSH_IMP] =        {PJT_DUAL_ENTRY(stub_zero)},
127         [PJT_CANCEL_ENTER] =            {PJT_DUAL_ENTRY(stub_zero)},
128         [PJT_CANCEL_LEAVE] =            {PJT_DUAL_ENTRY(stub_zero)},
129         [PJT_MUTEX_CONSISTENT] =        {PJT_DUAL_ENTRY(stub_zero)},
130         [PJT_MUTEXATTR_GETROBUST] =     {PJT_DUAL_ENTRY(stub_zero)},
131         [PJT_MUTEXATTR_SETROBUST] =     {PJT_DUAL_ENTRY(stub_zero)},
132         [PJT_GETTHREADID_NP] =          {PJT_DUAL_ENTRY(stub_zero)},
133         [PJT_ATTR_GET_NP] =             {PJT_DUAL_ENTRY(stub_esrch)},
134         [PJT_GETNAME_NP] =              {PJT_DUAL_ENTRY(stub_getname_np)},
135 };
136
137 /*
138  * Weak aliases for exported (pthread_*) and internal (_pthread_*) routines.
139  */
140 #define WEAK_REF(sym, alias)    __weak_reference(sym, alias)
141
142 #define FUNC_TYPE(name)         __CONCAT(name, _func_t)
143 #define FUNC_INT(name)          __CONCAT(name, _int)
144 #define FUNC_EXP(name)          __CONCAT(name, _exp)
145
146 #define STUB_FUNC(name, idx, ret)                               \
147         static ret FUNC_EXP(name)(void) __used;                 \
148         static ret FUNC_INT(name)(void) __used;                 \
149         WEAK_REF(FUNC_EXP(name), name);                         \
150         WEAK_REF(FUNC_INT(name), __CONCAT(_, name));            \
151         typedef ret (*FUNC_TYPE(name))(void);                   \
152         static ret FUNC_EXP(name)(void)                         \
153         {                                                       \
154                 FUNC_TYPE(name) func;                           \
155                 func = (FUNC_TYPE(name))__thr_jtable[idx][0];   \
156                 return (func());                                \
157         }                                                       \
158         static ret FUNC_INT(name)(void)                         \
159         {                                                       \
160                 FUNC_TYPE(name) func;                           \
161                 func = (FUNC_TYPE(name))__thr_jtable[idx][1];   \
162                 return (func());                                \
163         }
164
165 #define STUB_FUNC1(name, idx, ret, p0_type)                     \
166         static ret FUNC_EXP(name)(p0_type) __used;              \
167         static ret FUNC_INT(name)(p0_type) __used;              \
168         WEAK_REF(FUNC_EXP(name), name);                         \
169         WEAK_REF(FUNC_INT(name), __CONCAT(_, name));            \
170         typedef ret (*FUNC_TYPE(name))(p0_type);                \
171         static ret FUNC_EXP(name)(p0_type p0)                   \
172         {                                                       \
173                 FUNC_TYPE(name) func;                           \
174                 func = (FUNC_TYPE(name))__thr_jtable[idx][0];   \
175                 return (func(p0));                              \
176         }                                                       \
177         static ret FUNC_INT(name)(p0_type p0)                   \
178         {                                                       \
179                 FUNC_TYPE(name) func;                           \
180                 func = (FUNC_TYPE(name))__thr_jtable[idx][1];   \
181                 return (func(p0));                              \
182         }
183
184 #define STUB_FUNC2(name, idx, ret, p0_type, p1_type)            \
185         static ret FUNC_EXP(name)(p0_type, p1_type) __used;     \
186         static ret FUNC_INT(name)(p0_type, p1_type) __used;     \
187         WEAK_REF(FUNC_EXP(name), name);                         \
188         WEAK_REF(FUNC_INT(name), __CONCAT(_, name));            \
189         typedef ret (*FUNC_TYPE(name))(p0_type, p1_type);       \
190         static ret FUNC_EXP(name)(p0_type p0, p1_type p1)       \
191         {                                                       \
192                 FUNC_TYPE(name) func;                           \
193                 func = (FUNC_TYPE(name))__thr_jtable[idx][0];   \
194                 return (func(p0, p1));                          \
195         }                                                       \
196         static ret FUNC_INT(name)(p0_type p0, p1_type p1)       \
197         {                                                       \
198                 FUNC_TYPE(name) func;                           \
199                 func = (FUNC_TYPE(name))__thr_jtable[idx][1];   \
200                 return (func(p0, p1));                          \
201         }
202
203 #define STUB_FUNC3(name, idx, ret, p0_type, p1_type, p2_type)   \
204         static ret FUNC_EXP(name)(p0_type, p1_type, p2_type) __used; \
205         static ret FUNC_INT(name)(p0_type, p1_type, p2_type) __used; \
206         WEAK_REF(FUNC_EXP(name), name);                         \
207         WEAK_REF(FUNC_INT(name), __CONCAT(_, name));            \
208         typedef ret (*FUNC_TYPE(name))(p0_type, p1_type, p2_type); \
209         static ret FUNC_EXP(name)(p0_type p0, p1_type p1, p2_type p2) \
210         {                                                       \
211                 FUNC_TYPE(name) func;                           \
212                 func = (FUNC_TYPE(name))__thr_jtable[idx][0];   \
213                 return (func(p0, p1, p2));                      \
214         }                                                       \
215         static ret FUNC_INT(name)(p0_type p0, p1_type p1, p2_type p2) \
216         {                                                       \
217                 FUNC_TYPE(name) func;                           \
218                 func = (FUNC_TYPE(name))__thr_jtable[idx][1];   \
219                 return (func(p0, p1, p2));                      \
220         }
221
222 STUB_FUNC1(pthread_cond_broadcast, PJT_COND_BROADCAST, int, void *)
223 STUB_FUNC1(pthread_cond_destroy, PJT_COND_DESTROY, int, void *)
224 STUB_FUNC2(pthread_cond_init,   PJT_COND_INIT, int, void *, void *)
225 STUB_FUNC1(pthread_cond_signal, PJT_COND_SIGNAL, int, void *)
226 STUB_FUNC2(pthread_cond_wait,   PJT_COND_WAIT, int, void *, void *)
227 STUB_FUNC1(pthread_getspecific, PJT_GETSPECIFIC, void *, pthread_key_t)
228 STUB_FUNC2(pthread_key_create,  PJT_KEY_CREATE, int, void *, void *)
229 STUB_FUNC1(pthread_key_delete,  PJT_KEY_DELETE, int, pthread_key_t)
230 STUB_FUNC(pthread_main_np,      PJT_MAIN_NP, int)
231 STUB_FUNC1(pthread_mutex_destroy, PJT_MUTEX_DESTROY, int, void *)
232 STUB_FUNC2(pthread_mutex_init,  PJT_MUTEX_INIT, int, void *, void *)
233 STUB_FUNC1(pthread_mutex_lock,  PJT_MUTEX_LOCK, int, void *)
234 STUB_FUNC1(pthread_mutex_trylock, PJT_MUTEX_TRYLOCK, int, void *)
235 STUB_FUNC1(pthread_mutex_unlock, PJT_MUTEX_UNLOCK, int, void *)
236 STUB_FUNC1(pthread_mutex_consistent, PJT_MUTEX_CONSISTENT, int, void *)
237 STUB_FUNC1(pthread_mutexattr_destroy, PJT_MUTEXATTR_DESTROY, int, void *)
238 STUB_FUNC1(pthread_mutexattr_init, PJT_MUTEXATTR_INIT, int, void *)
239 STUB_FUNC2(pthread_mutexattr_settype, PJT_MUTEXATTR_SETTYPE, int, void *, int)
240 STUB_FUNC2(pthread_mutexattr_getrobust, PJT_MUTEXATTR_GETROBUST, int, void *,
241     int *)
242 STUB_FUNC2(pthread_mutexattr_setrobust, PJT_MUTEXATTR_SETROBUST, int, void *,
243     int)
244 STUB_FUNC2(pthread_once,        PJT_ONCE, int, void *, void *)
245 STUB_FUNC1(pthread_rwlock_destroy, PJT_RWLOCK_DESTROY, int, void *)
246 STUB_FUNC2(pthread_rwlock_init, PJT_RWLOCK_INIT, int, void *, void *)
247 STUB_FUNC1(pthread_rwlock_rdlock, PJT_RWLOCK_RDLOCK, int, void *)
248 STUB_FUNC1(pthread_rwlock_tryrdlock, PJT_RWLOCK_TRYRDLOCK, int, void *)
249 STUB_FUNC1(pthread_rwlock_trywrlock, PJT_RWLOCK_TRYWRLOCK, int, void *)
250 STUB_FUNC1(pthread_rwlock_unlock, PJT_RWLOCK_UNLOCK, int, void *)
251 STUB_FUNC1(pthread_rwlock_wrlock, PJT_RWLOCK_WRLOCK, int, void *)
252 STUB_FUNC(pthread_self,         PJT_SELF, pthread_t)
253 STUB_FUNC(pthread_getthreadid_np, PJT_GETTHREADID_NP, int)
254 STUB_FUNC2(pthread_setspecific, PJT_SETSPECIFIC, int, pthread_key_t, void *)
255 STUB_FUNC3(pthread_sigmask, PJT_SIGMASK, int, int, void *, void *)
256 STUB_FUNC3(pthread_atfork, PJT_ATFORK, int, void *, void *, void*)
257 STUB_FUNC1(pthread_attr_destroy, PJT_ATTR_DESTROY, int, void *);
258 STUB_FUNC2(pthread_attr_getdetachstate, PJT_ATTR_GETDETACHSTATE, int, void *, void *)
259 STUB_FUNC2(pthread_attr_getguardsize, PJT_ATTR_GETGUARDSIZE, int, void *, void *)
260 STUB_FUNC2(pthread_attr_getstackaddr, PJT_ATTR_GETSTACKADDR, int, void *, void *)
261 STUB_FUNC2(pthread_attr_getstacksize, PJT_ATTR_GETSTACKSIZE, int, void *, void *)
262 STUB_FUNC2(pthread_attr_getinheritsched, PJT_ATTR_GETINHERITSCHED, int, void *, void *)
263 STUB_FUNC2(pthread_attr_getschedparam, PJT_ATTR_GETSCHEDPARAM, int, void *, void *)
264 STUB_FUNC2(pthread_attr_getschedpolicy, PJT_ATTR_GETSCHEDPOLICY, int, void *, void *)
265 STUB_FUNC2(pthread_attr_getscope, PJT_ATTR_GETSCOPE, int, void *, void *)
266 STUB_FUNC1(pthread_attr_init, PJT_ATTR_INIT, int, void *)
267 STUB_FUNC2(pthread_attr_setdetachstate, PJT_ATTR_SETDETACHSTATE, int, void *, int)
268 STUB_FUNC2(pthread_attr_setguardsize, PJT_ATTR_SETGUARDSIZE, int, void *, size_t)
269 STUB_FUNC2(pthread_attr_setstackaddr, PJT_ATTR_SETSTACKADDR, int, void *, void *)
270 STUB_FUNC2(pthread_attr_setstacksize, PJT_ATTR_SETSTACKSIZE, int, void *, size_t)
271 STUB_FUNC2(pthread_attr_setinheritsched, PJT_ATTR_SETINHERITSCHED, int, void *, int)
272 STUB_FUNC2(pthread_attr_setschedparam, PJT_ATTR_SETSCHEDPARAM, int, void *, void *)
273 STUB_FUNC2(pthread_attr_setschedpolicy, PJT_ATTR_SETSCHEDPOLICY, int, void *, int)
274 STUB_FUNC2(pthread_attr_setscope, PJT_ATTR_SETSCOPE, int, void *, int)
275 STUB_FUNC1(pthread_cancel, PJT_CANCEL, int, void *)
276 STUB_FUNC1(pthread_cleanup_pop, PJT_CLEANUP_POP, int, int)
277 STUB_FUNC2(pthread_cleanup_push, PJT_CLEANUP_PUSH, void, void *, void *)
278 STUB_FUNC3(pthread_cond_timedwait, PJT_COND_TIMEDWAIT, int, void *, void *, void *)
279 STUB_FUNC1(pthread_detach, PJT_DETACH, int, void *)
280 STUB_FUNC2(pthread_equal, PJT_EQUAL, int, void *, void *)
281 STUB_FUNC1(pthread_exit, PJT_EXIT, void, void *)
282 STUB_FUNC2(pthread_join, PJT_JOIN, int, void *, void *)
283 STUB_FUNC2(pthread_kill, PJT_KILL, int, void *, int)
284 STUB_FUNC2(pthread_setcancelstate, PJT_SETCANCELSTATE, int, int, void *)
285 STUB_FUNC2(pthread_setcanceltype, PJT_SETCANCELTYPE, int, int, void *)
286 STUB_FUNC(pthread_testcancel, PJT_TESTCANCEL, void)
287 STUB_FUNC1(__pthread_cleanup_pop_imp, PJT_CLEANUP_POP_IMP, void, int)
288 STUB_FUNC3(__pthread_cleanup_push_imp, PJT_CLEANUP_PUSH_IMP, void, void *,
289     void *, void *)
290 STUB_FUNC1(_pthread_cancel_enter, PJT_CANCEL_ENTER, void, int)
291 STUB_FUNC1(_pthread_cancel_leave, PJT_CANCEL_LEAVE, void, int)
292 STUB_FUNC2(pthread_attr_get_np, PJT_ATTR_GET_NP, int, pthread_t, pthread_attr_t *)
293 STUB_FUNC3(pthread_getname_np, PJT_GETNAME_NP, int, pthread_t, char *, size_t)
294
295 static int
296 stub_zero(void)
297 {
298         return (0);
299 }
300
301 static void *
302 stub_null(void)
303 {
304         return (NULL);
305 }
306
307 static struct pthread *
308 stub_self(void)
309 {
310         return (&main_thread);
311 }
312
313 static int
314 stub_fail(void)
315 {
316         return (ENOSYS);
317 }
318
319 static int
320 stub_main(void)
321 {
322         return (-1);
323 }
324
325 static int
326 stub_true(void)
327 {
328         return (1);
329 }
330
331 static void
332 stub_exit(void)
333 {
334         exit(0);
335 }
336
337 static int
338 stub_esrch(void)
339 {
340         return (ESRCH);
341 }
342
343 static int
344 stub_getname_np(pthread_t thread, char *buf, size_t len)
345 {
346         if (thread != &main_thread)
347                 return (ESRCH);
348         if (len >= 1)
349                 buf[0] = '\0';
350         return (0);
351 }