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_void(void); 54 static void *stub_null(void); 55 static struct pthread *stub_self(void); 56 static int stub_zero(void); 57 static int stub_fail(void); 58 static int stub_true(void); 59 static void stub_exit(void); 60 static int stub_esrch(void); 61 static int stub_getname_np(pthread_t, char *, size_t); 62 63 #define PJT_DUAL_ENTRY(entry) \ 64 (pthread_func_t)entry, (pthread_func_t)entry 65 66 pthread_func_entry_t __thr_jtable[PJT_MAX] = { 67 [PJT_ATFORK] = {PJT_DUAL_ENTRY(stub_zero)}, 68 [PJT_ATTR_DESTROY] = {PJT_DUAL_ENTRY(stub_zero)}, 69 [PJT_ATTR_GETDETACHSTATE] = {PJT_DUAL_ENTRY(stub_zero)}, 70 [PJT_ATTR_GETGUARDSIZE] = {PJT_DUAL_ENTRY(stub_zero)}, 71 [PJT_ATTR_GETINHERITSCHED] = {PJT_DUAL_ENTRY(stub_zero)}, 72 [PJT_ATTR_GETSCHEDPARAM] = {PJT_DUAL_ENTRY(stub_zero)}, 73 [PJT_ATTR_GETSCHEDPOLICY] = {PJT_DUAL_ENTRY(stub_zero)}, 74 [PJT_ATTR_GETSCOPE] = {PJT_DUAL_ENTRY(stub_zero)}, 75 [PJT_ATTR_GETSTACKADDR] = {PJT_DUAL_ENTRY(stub_zero)}, 76 [PJT_ATTR_GETSTACKSIZE] = {PJT_DUAL_ENTRY(stub_zero)}, 77 [PJT_ATTR_INIT] = {PJT_DUAL_ENTRY(stub_zero)}, 78 [PJT_ATTR_SETDETACHSTATE] = {PJT_DUAL_ENTRY(stub_zero)}, 79 [PJT_ATTR_SETGUARDSIZE] = {PJT_DUAL_ENTRY(stub_zero)}, 80 [PJT_ATTR_SETINHERITSCHED] = {PJT_DUAL_ENTRY(stub_zero)}, 81 [PJT_ATTR_SETSCHEDPARAM] = {PJT_DUAL_ENTRY(stub_zero)}, 82 [PJT_ATTR_SETSCHEDPOLICY] = {PJT_DUAL_ENTRY(stub_zero)}, 83 [PJT_ATTR_SETSCOPE] = {PJT_DUAL_ENTRY(stub_zero)}, 84 [PJT_ATTR_SETSTACKADDR] = {PJT_DUAL_ENTRY(stub_zero)}, 85 [PJT_ATTR_SETSTACKSIZE] = {PJT_DUAL_ENTRY(stub_zero)}, 86 [PJT_CANCEL] = {PJT_DUAL_ENTRY(stub_zero)}, 87 [PJT_CLEANUP_POP] = {PJT_DUAL_ENTRY(stub_zero)}, 88 [PJT_CLEANUP_PUSH] = {PJT_DUAL_ENTRY(stub_zero)}, 89 [PJT_COND_BROADCAST] = {PJT_DUAL_ENTRY(stub_zero)}, 90 [PJT_COND_DESTROY] = {PJT_DUAL_ENTRY(stub_zero)}, 91 [PJT_COND_INIT] = {PJT_DUAL_ENTRY(stub_zero)}, 92 [PJT_COND_SIGNAL] = {PJT_DUAL_ENTRY(stub_zero)}, 93 [PJT_COND_TIMEDWAIT] = {PJT_DUAL_ENTRY(stub_zero)}, 94 [PJT_COND_WAIT] = {PJT_DUAL_ENTRY(stub_zero)}, 95 [PJT_DETACH] = {PJT_DUAL_ENTRY(stub_zero)}, 96 [PJT_EQUAL] = {PJT_DUAL_ENTRY(stub_true)}, 97 [PJT_EXIT] = {PJT_DUAL_ENTRY(stub_exit)}, 98 [PJT_GETSPECIFIC] = {PJT_DUAL_ENTRY(stub_null)}, 99 [PJT_JOIN] = {PJT_DUAL_ENTRY(stub_zero)}, 100 [PJT_KEY_CREATE] = {PJT_DUAL_ENTRY(stub_fail)}, 101 [PJT_KEY_DELETE] = {PJT_DUAL_ENTRY(stub_zero)}, 102 [PJT_KILL] = {PJT_DUAL_ENTRY(stub_zero)}, 103 [PJT_MAIN_NP] = {PJT_DUAL_ENTRY(stub_main)}, 104 [PJT_MUTEXATTR_DESTROY] = {PJT_DUAL_ENTRY(stub_zero)}, 105 [PJT_MUTEXATTR_INIT] = {PJT_DUAL_ENTRY(stub_zero)}, 106 [PJT_MUTEXATTR_SETTYPE] = {PJT_DUAL_ENTRY(stub_zero)}, 107 [PJT_MUTEX_DESTROY] = {PJT_DUAL_ENTRY(stub_zero)}, 108 [PJT_MUTEX_INIT] = {PJT_DUAL_ENTRY(stub_zero)}, 109 [PJT_MUTEX_LOCK] = {PJT_DUAL_ENTRY(stub_zero)}, 110 [PJT_MUTEX_TRYLOCK] = {PJT_DUAL_ENTRY(stub_zero)}, 111 [PJT_MUTEX_UNLOCK] = {PJT_DUAL_ENTRY(stub_zero)}, 112 [PJT_ONCE] = {PJT_DUAL_ENTRY(stub_fail)}, 113 [PJT_RWLOCK_DESTROY] = {PJT_DUAL_ENTRY(stub_zero)}, 114 [PJT_RWLOCK_INIT] = {PJT_DUAL_ENTRY(stub_zero)}, 115 [PJT_RWLOCK_RDLOCK] = {PJT_DUAL_ENTRY(stub_zero)}, 116 [PJT_RWLOCK_TRYRDLOCK] = {PJT_DUAL_ENTRY(stub_zero)}, 117 [PJT_RWLOCK_TRYWRLOCK] = {PJT_DUAL_ENTRY(stub_zero)}, 118 [PJT_RWLOCK_UNLOCK] = {PJT_DUAL_ENTRY(stub_zero)}, 119 [PJT_RWLOCK_WRLOCK] = {PJT_DUAL_ENTRY(stub_zero)}, 120 [PJT_SELF] = {PJT_DUAL_ENTRY(stub_self)}, 121 [PJT_SETCANCELSTATE] = {PJT_DUAL_ENTRY(stub_zero)}, 122 [PJT_SETCANCELTYPE] = {PJT_DUAL_ENTRY(stub_zero)}, 123 [PJT_SETSPECIFIC] = {PJT_DUAL_ENTRY(stub_zero)}, 124 [PJT_SIGMASK] = {PJT_DUAL_ENTRY(stub_zero)}, 125 [PJT_TESTCANCEL] = {PJT_DUAL_ENTRY(stub_zero)}, 126 [PJT_CLEANUP_POP_IMP] = {PJT_DUAL_ENTRY(stub_zero)}, 127 [PJT_CLEANUP_PUSH_IMP] = {PJT_DUAL_ENTRY(stub_zero)}, 128 [PJT_CANCEL_ENTER] = {PJT_DUAL_ENTRY(stub_zero)}, 129 [PJT_CANCEL_LEAVE] = {PJT_DUAL_ENTRY(stub_zero)}, 130 [PJT_MUTEX_CONSISTENT] = {PJT_DUAL_ENTRY(stub_zero)}, 131 [PJT_MUTEXATTR_GETROBUST] = {PJT_DUAL_ENTRY(stub_zero)}, 132 [PJT_MUTEXATTR_SETROBUST] = {PJT_DUAL_ENTRY(stub_zero)}, 133 [PJT_GETTHREADID_NP] = {PJT_DUAL_ENTRY(stub_zero)}, 134 [PJT_ATTR_GET_NP] = {PJT_DUAL_ENTRY(stub_esrch)}, 135 [PJT_GETNAME_NP] = {PJT_DUAL_ENTRY(stub_getname_np)}, 136 [PJT_SUSPEND_ALL_NP] = {PJT_DUAL_ENTRY(stub_void)}, 137 [PJT_RESUME_ALL_NP] = {PJT_DUAL_ENTRY(stub_void)}, 138 }; 139 140 /* 141 * Weak aliases for exported (pthread_*) and internal (_pthread_*) routines. 142 */ 143 #define WEAK_REF(sym, alias) __weak_reference(sym, alias) 144 145 #define FUNC_TYPE(name) __CONCAT(name, _func_t) 146 #define FUNC_INT(name) __CONCAT(name, _int) 147 #define FUNC_EXP(name) __CONCAT(name, _exp) 148 149 #define STUB_FUNC(name, idx, ret) \ 150 static ret FUNC_EXP(name)(void) __used; \ 151 static ret FUNC_INT(name)(void) __used; \ 152 WEAK_REF(FUNC_EXP(name), name); \ 153 WEAK_REF(FUNC_INT(name), __CONCAT(_, name)); \ 154 typedef ret (*FUNC_TYPE(name))(void); \ 155 static ret FUNC_EXP(name)(void) \ 156 { \ 157 FUNC_TYPE(name) func; \ 158 func = (FUNC_TYPE(name))__thr_jtable[idx][0]; \ 159 return (func()); \ 160 } \ 161 static ret FUNC_INT(name)(void) \ 162 { \ 163 FUNC_TYPE(name) func; \ 164 func = (FUNC_TYPE(name))__thr_jtable[idx][1]; \ 165 return (func()); \ 166 } 167 168 #define STUB_FUNC1(name, idx, ret, p0_type) \ 169 static ret FUNC_EXP(name)(p0_type) __used; \ 170 static ret FUNC_INT(name)(p0_type) __used; \ 171 WEAK_REF(FUNC_EXP(name), name); \ 172 WEAK_REF(FUNC_INT(name), __CONCAT(_, name)); \ 173 typedef ret (*FUNC_TYPE(name))(p0_type); \ 174 static ret FUNC_EXP(name)(p0_type p0) \ 175 { \ 176 FUNC_TYPE(name) func; \ 177 func = (FUNC_TYPE(name))__thr_jtable[idx][0]; \ 178 return (func(p0)); \ 179 } \ 180 static ret FUNC_INT(name)(p0_type p0) \ 181 { \ 182 FUNC_TYPE(name) func; \ 183 func = (FUNC_TYPE(name))__thr_jtable[idx][1]; \ 184 return (func(p0)); \ 185 } 186 187 #define STUB_FUNC2(name, idx, ret, p0_type, p1_type) \ 188 static ret FUNC_EXP(name)(p0_type, p1_type) __used; \ 189 static ret FUNC_INT(name)(p0_type, p1_type) __used; \ 190 WEAK_REF(FUNC_EXP(name), name); \ 191 WEAK_REF(FUNC_INT(name), __CONCAT(_, name)); \ 192 typedef ret (*FUNC_TYPE(name))(p0_type, p1_type); \ 193 static ret FUNC_EXP(name)(p0_type p0, p1_type p1) \ 194 { \ 195 FUNC_TYPE(name) func; \ 196 func = (FUNC_TYPE(name))__thr_jtable[idx][0]; \ 197 return (func(p0, p1)); \ 198 } \ 199 static ret FUNC_INT(name)(p0_type p0, p1_type p1) \ 200 { \ 201 FUNC_TYPE(name) func; \ 202 func = (FUNC_TYPE(name))__thr_jtable[idx][1]; \ 203 return (func(p0, p1)); \ 204 } 205 206 #define STUB_FUNC3(name, idx, ret, p0_type, p1_type, p2_type) \ 207 static ret FUNC_EXP(name)(p0_type, p1_type, p2_type) __used; \ 208 static ret FUNC_INT(name)(p0_type, p1_type, p2_type) __used; \ 209 WEAK_REF(FUNC_EXP(name), name); \ 210 WEAK_REF(FUNC_INT(name), __CONCAT(_, name)); \ 211 typedef ret (*FUNC_TYPE(name))(p0_type, p1_type, p2_type); \ 212 static ret FUNC_EXP(name)(p0_type p0, p1_type p1, p2_type p2) \ 213 { \ 214 FUNC_TYPE(name) func; \ 215 func = (FUNC_TYPE(name))__thr_jtable[idx][0]; \ 216 return (func(p0, p1, p2)); \ 217 } \ 218 static ret FUNC_INT(name)(p0_type p0, p1_type p1, p2_type p2) \ 219 { \ 220 FUNC_TYPE(name) func; \ 221 func = (FUNC_TYPE(name))__thr_jtable[idx][1]; \ 222 return (func(p0, p1, p2)); \ 223 } 224 225 STUB_FUNC1(pthread_cond_broadcast, PJT_COND_BROADCAST, int, void *) 226 STUB_FUNC1(pthread_cond_destroy, PJT_COND_DESTROY, int, void *) 227 STUB_FUNC2(pthread_cond_init, PJT_COND_INIT, int, void *, void *) 228 STUB_FUNC1(pthread_cond_signal, PJT_COND_SIGNAL, int, void *) 229 STUB_FUNC2(pthread_cond_wait, PJT_COND_WAIT, int, void *, void *) 230 STUB_FUNC1(pthread_getspecific, PJT_GETSPECIFIC, void *, pthread_key_t) 231 STUB_FUNC2(pthread_key_create, PJT_KEY_CREATE, int, void *, void *) 232 STUB_FUNC1(pthread_key_delete, PJT_KEY_DELETE, int, pthread_key_t) 233 STUB_FUNC(pthread_main_np, PJT_MAIN_NP, int) 234 STUB_FUNC1(pthread_mutex_destroy, PJT_MUTEX_DESTROY, int, void *) 235 STUB_FUNC2(pthread_mutex_init, PJT_MUTEX_INIT, int, void *, void *) 236 STUB_FUNC1(pthread_mutex_lock, PJT_MUTEX_LOCK, int, void *) 237 STUB_FUNC1(pthread_mutex_trylock, PJT_MUTEX_TRYLOCK, int, void *) 238 STUB_FUNC1(pthread_mutex_unlock, PJT_MUTEX_UNLOCK, int, void *) 239 STUB_FUNC1(pthread_mutex_consistent, PJT_MUTEX_CONSISTENT, int, void *) 240 STUB_FUNC1(pthread_mutexattr_destroy, PJT_MUTEXATTR_DESTROY, int, void *) 241 STUB_FUNC1(pthread_mutexattr_init, PJT_MUTEXATTR_INIT, int, void *) 242 STUB_FUNC2(pthread_mutexattr_settype, PJT_MUTEXATTR_SETTYPE, int, void *, int) 243 STUB_FUNC2(pthread_mutexattr_getrobust, PJT_MUTEXATTR_GETROBUST, int, void *, 244 int *) 245 STUB_FUNC2(pthread_mutexattr_setrobust, PJT_MUTEXATTR_SETROBUST, int, void *, 246 int) 247 STUB_FUNC2(pthread_once, PJT_ONCE, int, void *, void *) 248 STUB_FUNC1(pthread_rwlock_destroy, PJT_RWLOCK_DESTROY, int, void *) 249 STUB_FUNC2(pthread_rwlock_init, PJT_RWLOCK_INIT, int, void *, void *) 250 STUB_FUNC1(pthread_rwlock_rdlock, PJT_RWLOCK_RDLOCK, int, void *) 251 STUB_FUNC1(pthread_rwlock_tryrdlock, PJT_RWLOCK_TRYRDLOCK, int, void *) 252 STUB_FUNC1(pthread_rwlock_trywrlock, PJT_RWLOCK_TRYWRLOCK, int, void *) 253 STUB_FUNC1(pthread_rwlock_unlock, PJT_RWLOCK_UNLOCK, int, void *) 254 STUB_FUNC1(pthread_rwlock_wrlock, PJT_RWLOCK_WRLOCK, int, void *) 255 STUB_FUNC(pthread_self, PJT_SELF, pthread_t) 256 STUB_FUNC(pthread_getthreadid_np, PJT_GETTHREADID_NP, int) 257 STUB_FUNC2(pthread_setspecific, PJT_SETSPECIFIC, int, pthread_key_t, void *) 258 STUB_FUNC3(pthread_sigmask, PJT_SIGMASK, int, int, void *, void *) 259 STUB_FUNC3(pthread_atfork, PJT_ATFORK, int, void *, void *, void*) 260 STUB_FUNC1(pthread_attr_destroy, PJT_ATTR_DESTROY, int, void *); 261 STUB_FUNC2(pthread_attr_getdetachstate, PJT_ATTR_GETDETACHSTATE, int, void *, void *) 262 STUB_FUNC2(pthread_attr_getguardsize, PJT_ATTR_GETGUARDSIZE, int, void *, void *) 263 STUB_FUNC2(pthread_attr_getstackaddr, PJT_ATTR_GETSTACKADDR, int, void *, void *) 264 STUB_FUNC2(pthread_attr_getstacksize, PJT_ATTR_GETSTACKSIZE, int, void *, void *) 265 STUB_FUNC2(pthread_attr_getinheritsched, PJT_ATTR_GETINHERITSCHED, int, void *, void *) 266 STUB_FUNC2(pthread_attr_getschedparam, PJT_ATTR_GETSCHEDPARAM, int, void *, void *) 267 STUB_FUNC2(pthread_attr_getschedpolicy, PJT_ATTR_GETSCHEDPOLICY, int, void *, void *) 268 STUB_FUNC2(pthread_attr_getscope, PJT_ATTR_GETSCOPE, int, void *, void *) 269 STUB_FUNC1(pthread_attr_init, PJT_ATTR_INIT, int, void *) 270 STUB_FUNC2(pthread_attr_setdetachstate, PJT_ATTR_SETDETACHSTATE, int, void *, int) 271 STUB_FUNC2(pthread_attr_setguardsize, PJT_ATTR_SETGUARDSIZE, int, void *, size_t) 272 STUB_FUNC2(pthread_attr_setstackaddr, PJT_ATTR_SETSTACKADDR, int, void *, void *) 273 STUB_FUNC2(pthread_attr_setstacksize, PJT_ATTR_SETSTACKSIZE, int, void *, size_t) 274 STUB_FUNC2(pthread_attr_setinheritsched, PJT_ATTR_SETINHERITSCHED, int, void *, int) 275 STUB_FUNC2(pthread_attr_setschedparam, PJT_ATTR_SETSCHEDPARAM, int, void *, void *) 276 STUB_FUNC2(pthread_attr_setschedpolicy, PJT_ATTR_SETSCHEDPOLICY, int, void *, int) 277 STUB_FUNC2(pthread_attr_setscope, PJT_ATTR_SETSCOPE, int, void *, int) 278 STUB_FUNC1(pthread_cancel, PJT_CANCEL, int, void *) 279 STUB_FUNC1(pthread_cleanup_pop, PJT_CLEANUP_POP, int, int) 280 STUB_FUNC2(pthread_cleanup_push, PJT_CLEANUP_PUSH, void, void *, void *) 281 STUB_FUNC3(pthread_cond_timedwait, PJT_COND_TIMEDWAIT, int, void *, void *, void *) 282 STUB_FUNC1(pthread_detach, PJT_DETACH, int, void *) 283 STUB_FUNC2(pthread_equal, PJT_EQUAL, int, void *, void *) 284 STUB_FUNC1(pthread_exit, PJT_EXIT, void, void *) 285 STUB_FUNC2(pthread_join, PJT_JOIN, int, void *, void *) 286 STUB_FUNC2(pthread_kill, PJT_KILL, int, void *, int) 287 STUB_FUNC2(pthread_setcancelstate, PJT_SETCANCELSTATE, int, int, void *) 288 STUB_FUNC2(pthread_setcanceltype, PJT_SETCANCELTYPE, int, int, void *) 289 STUB_FUNC(pthread_testcancel, PJT_TESTCANCEL, void) 290 STUB_FUNC1(__pthread_cleanup_pop_imp, PJT_CLEANUP_POP_IMP, void, int) 291 STUB_FUNC3(__pthread_cleanup_push_imp, PJT_CLEANUP_PUSH_IMP, void, void *, 292 void *, void *) 293 STUB_FUNC1(_pthread_cancel_enter, PJT_CANCEL_ENTER, void, int) 294 STUB_FUNC1(_pthread_cancel_leave, PJT_CANCEL_LEAVE, void, int) 295 STUB_FUNC2(pthread_attr_get_np, PJT_ATTR_GET_NP, int, pthread_t, pthread_attr_t *) 296 STUB_FUNC3(pthread_getname_np, PJT_GETNAME_NP, int, pthread_t, char *, size_t) 297 STUB_FUNC(pthread_suspend_all_np, PJT_SUSPEND_ALL_NP, void); 298 STUB_FUNC(pthread_resume_all_np, PJT_RESUME_ALL_NP, void); 299 300 static int 301 stub_zero(void) 302 { 303 return (0); 304 } 305 306 static void 307 stub_void(void) 308 { 309 310 } 311 312 static void * 313 stub_null(void) 314 { 315 return (NULL); 316 } 317 318 static struct pthread * 319 stub_self(void) 320 { 321 return (&main_thread); 322 } 323 324 static int 325 stub_fail(void) 326 { 327 return (ENOSYS); 328 } 329 330 static int 331 stub_main(void) 332 { 333 return (-1); 334 } 335 336 static int 337 stub_true(void) 338 { 339 return (1); 340 } 341 342 static void 343 stub_exit(void) 344 { 345 exit(0); 346 } 347 348 static int 349 stub_esrch(void) 350 { 351 return (ESRCH); 352 } 353 354 static int 355 stub_getname_np(pthread_t thread, char *buf, size_t len) 356 { 357 if (thread != &main_thread) 358 return (ESRCH); 359 if (len >= 1) 360 buf[0] = '\0'; 361 return (0); 362 } 363