1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 22 /* 23 * Copyright 2006 Sun Microsystems, Inc. All rights reserved. 24 * Use is subject to license terms. 25 */ 26 27 #ifndef _THR_UBERDATA_H 28 #define _THR_UBERDATA_H 29 30 #pragma ident "%Z%%M% %I% %E% SMI" 31 32 #include <stdlib.h> 33 #include <unistd.h> 34 #include <sys/types.h> 35 #include <fcntl.h> 36 #include <string.h> 37 #include <signal.h> 38 #include <ucontext.h> 39 #include <thread.h> 40 #include <pthread.h> 41 #include <link.h> 42 #include <sys/resource.h> 43 #include <sys/lwp.h> 44 #include <errno.h> 45 #include <sys/asm_linkage.h> 46 #include <sys/regset.h> 47 #include <sys/fcntl.h> 48 #include <sys/mman.h> 49 #include <synch.h> 50 #include <door.h> 51 #include <limits.h> 52 #include <sys/synch32.h> 53 #include <schedctl.h> 54 #include <sys/priocntl.h> 55 #include <thread_db.h> 56 #include <setjmp.h> 57 #include "libc_int.h" 58 #include "tdb_agent.h" 59 #include "thr_debug.h" 60 61 /* 62 * This is an implementation-specific include file for threading support. 63 * It is not to be seen by the clients of the library. 64 * 65 * This file also describes uberdata in libc. 66 * 67 * The term "uberdata" refers to data that is unique and visible across 68 * all link maps. The name is meant to imply that such data is truly 69 * global, not just locally global to a particular link map. 70 * 71 * See the Linker and Libraries Guide for a full description of alternate 72 * link maps and how they are set up and used. 73 * 74 * Alternate link maps implement multiple global namespaces within a single 75 * process. There may be multiple instances of identical dynamic libraries 76 * loaded in a process's address space at the same time, each on a different 77 * link map (as determined by the dynamic linker), each with its own set of 78 * global variables. Which particular instance of a global variable is seen 79 * by a thread running in the process is determined by the link map on which 80 * the thread happens to be executing at the time. 81 * 82 * However, there are aspects of a process that are unique across all 83 * link maps, in particular the structures used to implement threads 84 * of control (in Sparc terminology, there is only one %g7 regardless 85 * of the link map on which the thread is executing). 86 * 87 * All uberdata is referenced from a base pointer in the thread's ulwp_t 88 * structure (which is also uberdata). All allocations and deallocations 89 * of uberdata are made via the uberdata-aware lmalloc() and lfree() 90 * interfaces (malloc() and free() are simply locally-global). 91 */ 92 93 /* 94 * Special libc-private access to errno. 95 * We do this so that references to errno do not invoke the dynamic linker. 96 */ 97 #undef errno 98 #define errno (*curthread->ul_errnop) 99 100 /* 101 * See <sys/synch32.h> for the reasons for these values 102 * and why they are different for sparc and intel. 103 */ 104 #if defined(__sparc) 105 /* lock.lock64.pad[x] 4 5 6 7 */ 106 #define LOCKMASK 0xff000000 107 #define WAITERMASK 0x000000ff 108 #define WAITER 0x00000001 109 #define LOCKSET 0xff 110 #define LOCKCLEAR 0 111 #elif defined(__x86) 112 /* lock.lock64.pad[x] 7 6 5 4 */ 113 #define LOCKMASK 0xff000000 114 #define WAITERMASK 0x00ff0000 115 #define WAITER 0x00010000 116 #define LOCKSET 0x01 117 #define LOCKCLEAR 0 118 #else 119 #error "neither __sparc nor __x86 is defined" 120 #endif 121 122 /* 123 * Fetch the owner of a USYNC_THREAD mutex. 124 * Don't use this with process-shared mutexes; 125 * the owing thread may be in a different process. 126 */ 127 #define MUTEX_OWNER(mp) ((ulwp_t *)(uintptr_t)(mp)->mutex_owner) 128 129 /* 130 * Test if a thread owns a USYNC_THREAD mutex. This is inappropriate 131 * for a process-shared (USYNC_PROCESS | USYNC_PROCESS_ROBUST) mutex. 132 * The 'mp' argument must not have side-effects since it is evaluated twice. 133 */ 134 #define MUTEX_OWNED(mp, thrp) \ 135 ((mp)->mutex_lockw != 0 && MUTEX_OWNER(mp) == thrp) 136 137 138 /* 139 * uberflags.uf_tdb_register_sync is an interface with libc_db to enable the 140 * collection of lock statistics by a debugger or other collecting tool. 141 * 142 * uberflags.uf_thread_error_detection is set by an environment variable: 143 * _THREAD_ERROR_DETECTION 144 * 0 == no detection of locking primitive errors. 145 * 1 == detect errors and issue a warning message. 146 * 2 == detect errors, issue a warning message, and dump core. 147 * 148 * We bundle these together in uberflags.uf_trs_ted to make a test of either 149 * being non-zero a single memory reference (for speed of mutex_lock(), etc). 150 * 151 * uberflags.uf_mt is set non-zero when the first thread (in addition 152 * to the main thread) is created. 153 * 154 * We bundle all these flags together in uberflags.uf_all to make a test 155 * of any being non-zero a single memory reference (again, for speed). 156 */ 157 typedef union { 158 int uf_all; /* combined all flags */ 159 struct { 160 short h_pad; 161 short h_trs_ted; /* combined reg sync & error detect */ 162 } uf_h; 163 struct { 164 char x_mt; 165 char x_pad; 166 char x_tdb_register_sync; 167 char x_thread_error_detection; 168 } uf_x; 169 } uberflags_t; 170 171 #define uf_mt uf_x.x_mt 172 #define uf_tdb_register_sync uf_x.x_tdb_register_sync 173 #define uf_thread_error_detection uf_x.x_thread_error_detection 174 #define uf_trs_ted uf_h.h_trs_ted /* both of the above */ 175 176 /* 177 * NOTE WELL: 178 * To enable further optimization, the "ul_schedctl_called" member 179 * of the ulwp_t structure (below) serves double-duty: 180 * 1. If NULL, it means that the thread must call __schedctl() 181 * to set up its schedctl mappings before acquiring a mutex. 182 * This is required by the implementation of adaptive mutex locking. 183 * 2. If non-NULL, it points to uberdata.uberflags, so that tests of 184 * uberflags can be made without additional memory references. 185 * This allows the common case of _mutex_lock() and _mutex_unlock() for 186 * USYNC_THREAD mutexes with no error detection and no lock statistics 187 * to be optimized for speed. 188 */ 189 190 191 /* double the default stack size for 64-bit processes */ 192 #ifdef _LP64 193 #define MINSTACK (8 * 1024) 194 #define DEFAULTSTACK (2 * 1024 * 1024) 195 #else 196 #define MINSTACK (4 * 1024) 197 #define DEFAULTSTACK (1024 * 1024) 198 #endif 199 #define TSD_NKEYS _POSIX_THREAD_KEYS_MAX 200 201 #define THREAD_MIN_PRIORITY 0 202 #define THREAD_MAX_PRIORITY 127 203 204 #define PRIO_SET 0 /* set priority and policy */ 205 #define PRIO_SET_PRIO 1 /* set priority only */ 206 #define PRIO_INHERIT 2 207 #define PRIO_DISINHERIT 3 208 209 #define MUTEX_TRY 0 210 #define MUTEX_LOCK 1 211 212 #if defined(__x86) 213 214 typedef struct { /* structure returned by fnstenv */ 215 int fctrl; /* control word */ 216 int fstat; /* status word (flags, etc) */ 217 int ftag; /* tag of which regs busy */ 218 int misc[4]; /* other stuff, 28 bytes total */ 219 } fpuenv_t; 220 221 #ifdef _SYSCALL32 222 typedef fpuenv_t fpuenv32_t; 223 #endif /* _SYSCALL32 */ 224 225 #elif defined(__sparc) 226 227 typedef struct { /* fp state structure */ 228 greg_t fsr; 229 greg_t fpu_en; 230 } fpuenv_t; 231 232 #ifdef _SYSCALL32 233 typedef struct { 234 greg32_t fsr; 235 greg32_t fpu_en; 236 } fpuenv32_t; 237 #endif /* _SYSCALL32 */ 238 239 #endif /* __x86 */ 240 241 #if defined(__x86) 242 extern void ht_pause(void); /* "pause" instruction */ 243 #define SMT_PAUSE() ht_pause() 244 #else 245 #define SMT_PAUSE() 246 #endif /* __x86 */ 247 248 /* 249 * Cleanup handler related data. 250 * This structure is exported as _cleanup_t in pthread.h. 251 * pthread.h exports only the size of this structure, so check 252 * _cleanup_t in pthread.h before making any change here. 253 */ 254 typedef struct __cleanup { 255 struct __cleanup *next; /* pointer to next handler */ 256 caddr_t fp; /* current frame pointer */ 257 void (*func)(void *); /* cleanup handler address */ 258 void *arg; /* handler's argument */ 259 } __cleanup_t; 260 261 /* 262 * Thread-Specific Data (TSD) 263 * TSD_NFAST includes the invalid key zero, so there 264 * are really only (TSD_NFAST - 1) fast key slots. 265 */ 266 typedef void (*PFrV)(void *); 267 #define TSD_UNALLOCATED ((PFrV)1) 268 #define TSD_NFAST 9 269 270 /* 271 * The tsd union is designed to burn a little memory (9 words) to make 272 * lookups blindingly fast. Note that tsd_nalloc could be placed at the 273 * end of the pad region to increase the likelihood that it falls on the 274 * same cache line as the data. 275 */ 276 typedef union tsd { 277 uint_t tsd_nalloc; /* Amount of allocated storage */ 278 void *tsd_pad[TSD_NFAST]; 279 void *tsd_data[1]; 280 } tsd_t; 281 282 typedef struct { 283 mutex_t tsdm_lock; /* Lock protecting the data */ 284 uint_t tsdm_nkeys; /* Number of allocated keys */ 285 uint_t tsdm_nused; /* Number of used keys */ 286 PFrV *tsdm_destro; /* Per-key destructors */ 287 char tsdm_pad[64 - /* pad to 64 bytes */ 288 (sizeof (mutex_t) + 2 * sizeof (uint_t) + sizeof (PFrV *))]; 289 } tsd_metadata_t; 290 291 #ifdef _SYSCALL32 292 typedef union tsd32 { 293 uint_t tsd_nalloc; /* Amount of allocated storage */ 294 caddr32_t tsd_pad[TSD_NFAST]; 295 caddr32_t tsd_data[1]; 296 } tsd32_t; 297 298 typedef struct { 299 mutex_t tsdm_lock; /* Lock protecting the data */ 300 uint_t tsdm_nkeys; /* Number of allocated keys */ 301 uint_t tsdm_nused; /* Number of used keys */ 302 caddr32_t tsdm_destro; /* Per-key destructors */ 303 char tsdm_pad[64 - /* pad to 64 bytes */ 304 (sizeof (mutex_t) + 2 * sizeof (uint_t) + sizeof (caddr32_t))]; 305 } tsd_metadata32_t; 306 #endif /* _SYSCALL32 */ 307 308 309 /* 310 * Thread-Local Storage (TLS) 311 */ 312 typedef struct { 313 void *tls_data; 314 size_t tls_size; 315 } tls_t; 316 317 typedef struct { 318 mutex_t tls_lock; /* Lock protecting the data */ 319 tls_t tls_modinfo; /* Root of all TLS_modinfo data */ 320 tls_t static_tls; /* Template for static TLS */ 321 char tls_pad[64 - /* pad to 64 bytes */ 322 (sizeof (mutex_t) + 2 * sizeof (tls_t))]; 323 } tls_metadata_t; 324 325 #ifdef _SYSCALL32 326 typedef struct { 327 caddr32_t tls_data; 328 size32_t tls_size; 329 } tls32_t; 330 331 typedef struct { 332 mutex_t tls_lock; /* Lock protecting the data */ 333 tls32_t tls_modinfo; /* Root of all TLS_modinfo data */ 334 tls32_t static_tls; /* Template for static TLS */ 335 char tls_pad[64 - /* pad to 64 bytes */ 336 (sizeof (mutex_t) + 2 * sizeof (tls32_t))]; 337 } tls_metadata32_t; 338 #endif /* _SYSCALL32 */ 339 340 341 /* 342 * Sleep queues for USYNC_THREAD condvars and mutexes. 343 * The size and alignment is 64 bytes to reduce cache conflicts. 344 */ 345 typedef union { 346 uint64_t qh_64[8]; 347 struct { 348 mutex_t q_lock; 349 uint8_t q_qcnt; 350 uint8_t q_pad[7]; 351 uint64_t q_lockcount; 352 uint32_t q_qlen; 353 uint32_t q_qmax; 354 struct ulwp *q_head; 355 struct ulwp *q_tail; 356 } qh_qh; 357 } queue_head_t; 358 359 #define qh_lock qh_qh.q_lock 360 #define qh_qcnt qh_qh.q_qcnt 361 #define qh_lockcount qh_qh.q_lockcount 362 #define qh_qlen qh_qh.q_qlen 363 #define qh_qmax qh_qh.q_qmax 364 #define qh_head qh_qh.q_head 365 #define qh_tail qh_qh.q_tail 366 367 /* queue types passed to queue_lock() and enqueue() */ 368 #define MX 0 369 #define CV 1 370 #define FIFOQ 0x10 /* or'ing with FIFOQ asks for FIFO queueing */ 371 #define QHASHSIZE 512 372 #define QUEUE_HASH(wchan, type) \ 373 ((uint_t)((((uintptr_t)(wchan) >> 3) ^ ((uintptr_t)(wchan) >> 12)) \ 374 & (QHASHSIZE - 1)) + (((type) == MX)? 0 : QHASHSIZE)) 375 376 extern queue_head_t *queue_lock(void *, int); 377 extern void queue_unlock(queue_head_t *); 378 extern void enqueue(queue_head_t *, struct ulwp *, void *, int); 379 extern struct ulwp *dequeue(queue_head_t *, void *, int *); 380 extern struct ulwp *queue_waiter(queue_head_t *, void *); 381 extern uint8_t dequeue_self(queue_head_t *, void *); 382 extern void unsleep_self(void); 383 extern void spin_lock_set(mutex_t *); 384 extern void spin_lock_clear(mutex_t *); 385 386 /* 387 * Memory block for chain of owned ceiling mutexes. 388 */ 389 typedef struct mxchain { 390 struct mxchain *mxchain_next; 391 mutex_t *mxchain_mx; 392 } mxchain_t; 393 394 /* 395 * Pointer to an rwlock that is held for reading. 396 * Used in rw_rdlock() to allow a thread that already holds a read 397 * lock to acquire another read lock on the same rwlock even if 398 * there are writers waiting. This to avoid deadlock when acquiring 399 * a read lock more than once in the presence of pending writers. 400 * POSIX mandates this behavior. 401 */ 402 typedef struct { 403 void *rd_rwlock; /* the rwlock held for reading */ 404 size_t rd_count; /* count of read locks applied */ 405 } readlock_t; 406 407 #ifdef _SYSCALL32 408 typedef struct { 409 caddr32_t rd_rwlock; 410 size32_t rd_count; 411 } readlock32_t; 412 #endif /* _SYSCALL32 */ 413 414 /* 415 * Maximum number of read locks allowed for one thread on one rwlock. 416 * This could be as large as INT_MAX, but the SUSV3 test suite would 417 * take an inordinately long time to complete. This is big enough. 418 */ 419 #define READ_LOCK_MAX 100000 420 421 #define ul_tlsent ul_tls.tls_data /* array of pointers to dynamic TLS */ 422 #define ul_ntlsent ul_tls.tls_size /* number of entries in ul_tlsent */ 423 424 /* 425 * Round up an integral value to a multiple of 64 426 */ 427 #define roundup64(x) (-(-(x) & -64)) 428 429 /* 430 * NOTE: Whatever changes are made to ulwp_t must be 431 * reflected in $SRC/cmd/mdb/common/modules/libc/libc.c 432 * 433 * NOTE: ul_self *must* be the first member of ulwp_t on x86 434 * Low-level x86 code relies on this. 435 */ 436 typedef struct ulwp { 437 /* 438 * These members always need to come first on sparc. 439 * For dtrace, a ulwp_t must be aligned on a 64-byte boundary. 440 */ 441 #if defined(__sparc) 442 uint32_t ul_dinstr; /* scratch space for dtrace */ 443 uint32_t ul_padsparc0[15]; 444 uint32_t ul_dsave; /* dtrace: save %g1, %g0, %sp */ 445 uint32_t ul_drestore; /* dtrace: restore %g0, %g0, %g0 */ 446 uint32_t ul_dftret; /* dtrace: return probe fasttrap */ 447 uint32_t ul_dreturn; /* dtrace: return %o0 */ 448 #endif 449 struct ulwp *ul_self; /* pointer to self */ 450 #if defined(__i386) 451 uint8_t ul_dinstr[40]; /* scratch space for dtrace */ 452 #elif defined(__amd64) 453 uint8_t ul_dinstr[56]; /* scratch space for dtrace */ 454 #endif 455 struct uberdata *ul_uberdata; /* uber (super-global) data */ 456 tls_t ul_tls; /* dynamic thread-local storage base */ 457 struct ulwp *ul_forw; /* forw, back all_lwps list, */ 458 struct ulwp *ul_back; /* protected by link_lock */ 459 struct ulwp *ul_next; /* list to keep track of stacks */ 460 struct ulwp *ul_hash; /* hash chain linked list */ 461 void *ul_rval; /* return value from thr_exit() */ 462 caddr_t ul_stk; /* mapping base of the stack */ 463 size_t ul_mapsiz; /* mapping size of the stack */ 464 size_t ul_guardsize; /* normally _lpagesize */ 465 uintptr_t ul_stktop; /* broken thr_stksegment() interface */ 466 size_t ul_stksiz; /* broken thr_stksegment() interface */ 467 stack_t ul_ustack; /* current stack boundaries */ 468 int ul_ix; /* hash index */ 469 lwpid_t ul_lwpid; /* thread id, aka the lwp id */ 470 pri_t ul_pri; /* priority known to the library */ 471 pri_t ul_mappedpri; /* priority known to the application */ 472 char ul_policy; /* scheduling policy */ 473 char ul_pri_mapped; /* != 0 means ul_mappedpri is valid */ 474 union { 475 struct { 476 char cursig; /* deferred signal number */ 477 char pleasestop; /* lwp requested to stop itself */ 478 } s; 479 short curplease; /* for testing both at once */ 480 } ul_cp; 481 char ul_stop; /* reason for stopping */ 482 char ul_signalled; /* this lwp was cond_signal()d */ 483 char ul_dead; /* this lwp has called thr_exit */ 484 char ul_unwind; /* posix: unwind C++ stack */ 485 char ul_detached; /* THR_DETACHED at thread_create() */ 486 /* or pthread_detach() was called */ 487 char ul_writer; /* sleeping in rw_wrlock() */ 488 char ul_stopping; /* set by curthread: stopping self */ 489 char ul_cancel_prologue; /* for _cancel_prologue() */ 490 short ul_preempt; /* no_preempt()/preempt() */ 491 short ul_savpreempt; /* pre-existing preempt value */ 492 char ul_sigsuspend; /* thread is in sigsuspend/pollsys */ 493 char ul_main; /* thread is the main thread */ 494 char ul_fork; /* thread is performing a fork */ 495 char ul_primarymap; /* primary link-map is initialized */ 496 /* per-thread copies of the corresponding global variables */ 497 uchar_t ul_max_spinners; /* thread_max_spinners */ 498 char ul_door_noreserve; /* thread_door_noreserve */ 499 char ul_queue_fifo; /* thread_queue_fifo */ 500 char ul_cond_wait_defer; /* thread_cond_wait_defer */ 501 char ul_error_detection; /* thread_error_detection */ 502 char ul_async_safe; /* thread_async_safe */ 503 char ul_pad1[2]; 504 int ul_adaptive_spin; /* thread_adaptive_spin */ 505 int ul_release_spin; /* thread_release_spin */ 506 int ul_queue_spin; /* thread_queue_spin */ 507 volatile int ul_critical; /* non-zero == in a critical region */ 508 int ul_sigdefer; /* non-zero == defer signals */ 509 int ul_vfork; /* thread is the child of vfork() */ 510 int ul_cancelable; /* _cancelon()/_canceloff() */ 511 char ul_cancel_pending; /* pthread_cancel() was called */ 512 char ul_cancel_disabled; /* PTHREAD_CANCEL_DISABLE */ 513 char ul_cancel_async; /* PTHREAD_CANCEL_ASYNCHRONOUS */ 514 char ul_save_async; /* saved copy of ul_cancel_async */ 515 char ul_mutator; /* lwp is a mutator (java interface) */ 516 char ul_created; /* created suspended */ 517 char ul_replace; /* replacement; must be free()d */ 518 uchar_t ul_nocancel; /* cancellation can't happen */ 519 int ul_errno; /* per-thread errno */ 520 int *ul_errnop; /* pointer to errno or self->ul_errno */ 521 __cleanup_t *ul_clnup_hdr; /* head of cleanup handlers list */ 522 uberflags_t *volatile ul_schedctl_called; /* ul_schedctl is set up */ 523 volatile sc_shared_t *volatile ul_schedctl; /* schedctl data */ 524 int ul_bindflags; /* bind_guard() interface to ld.so.1 */ 525 int ul_gs; /* x86 only: value of %gs/%fs */ 526 tsd_t *ul_stsd; /* slow TLS for keys >= TSD_NFAST */ 527 void *ul_ftsd[TSD_NFAST]; /* fast TLS for keys < TSD_NFAST */ 528 td_evbuf_t ul_td_evbuf; /* event buffer */ 529 char ul_td_events_enable; /* event mechanism enabled */ 530 char ul_sync_obj_reg; /* tdb_sync_obj_register() */ 531 char ul_qtype; /* MX or CV */ 532 char ul_cv_wake; /* != 0: just wake up, don't requeue */ 533 int ul_usropts; /* flags given to thr_create() */ 534 void *(*ul_startpc)(void *); /* start func (thr_create()) */ 535 void *ul_startarg; /* argument for start function */ 536 void *ul_wchan; /* synch object when sleeping */ 537 struct ulwp *ul_link; /* sleep queue link */ 538 queue_head_t *ul_sleepq; /* sleep queue thread is waiting on */ 539 mutex_t *ul_cvmutex; /* mutex dropped when waiting on a cv */ 540 mxchain_t *ul_mxchain; /* chain of owned ceiling mutexes */ 541 pri_t ul_epri; /* effective scheduling priority */ 542 pri_t ul_emappedpri; /* effective mapped priority */ 543 uint_t ul_rdlocks; /* # of entries in ul_readlock array */ 544 /* 0 means there is but a single lock */ 545 union { /* single rwlock or pointer to array */ 546 readlock_t single; 547 readlock_t *array; 548 } ul_readlock; 549 /* PROBE_SUPPORT begin */ 550 void *ul_tpdp; 551 /* PROBE_SUPPORT end */ 552 ucontext_t *ul_siglink; /* pointer to previous context */ 553 uint_t ul_spin_lock_spin; /* spin lock statistics */ 554 uint_t ul_spin_lock_spin2; 555 uint_t ul_spin_lock_sleep; 556 uint_t ul_spin_lock_wakeup; 557 /* the following members *must* be last in the structure */ 558 /* they are discarded when ulwp is replaced on thr_exit() */ 559 sigset_t ul_sigmask; /* thread's current signal mask */ 560 sigset_t ul_tmpmask; /* signal mask for sigsuspend/pollsys */ 561 siginfo_t ul_siginfo; /* deferred siginfo */ 562 mutex_t ul_spinlock; /* used when suspending/continuing */ 563 fpuenv_t ul_fpuenv; /* floating point state */ 564 uintptr_t ul_sp; /* stack pointer when blocked */ 565 void *ul_ex_unwind; /* address of _ex_unwind() or -1 */ 566 #if defined(sparc) 567 void *ul_unwind_ret; /* used only by _ex_clnup_handler() */ 568 #endif 569 } ulwp_t; 570 571 #define ul_cursig ul_cp.s.cursig /* deferred signal number */ 572 #define ul_pleasestop ul_cp.s.pleasestop /* lwp requested to stop */ 573 #define ul_curplease ul_cp.curplease /* for testing both at once */ 574 575 /* 576 * This is the size of a replacement ulwp, retained only for the benefit 577 * of thr_join(). The trailing members are unneeded for this purpose. 578 */ 579 #define REPLACEMENT_SIZE ((size_t)&((ulwp_t *)NULL)->ul_sigmask) 580 581 /* 582 * Definitions for static initialization of signal sets, 583 * plus some sneaky optimizations in various places. 584 */ 585 586 #define SIGMASK(sig) ((uint32_t)1 << (((sig) - 1) & (32 - 1))) 587 588 #if (MAXSIG > 32 && MAXSIG <= 64) 589 #define FILLSET0 0xffffffffu 590 #define FILLSET1 ((1u << (MAXSIG - 32)) - 1) 591 #else 592 #error "fix me: MAXSIG out of bounds" 593 #endif 594 595 #define CANTMASK0 (SIGMASK(SIGKILL) | SIGMASK(SIGSTOP)) 596 #define CANTMASK1 0 597 598 #define MASKSET0 (FILLSET0 & ~CANTMASK0) 599 #define MASKSET1 (FILLSET1 & ~CANTMASK1) 600 601 extern const sigset_t maskset; /* set of all maskable signals */ 602 603 extern int thread_adaptive_spin; 604 extern uint_t thread_max_spinners; 605 extern int thread_release_spin; 606 extern int thread_queue_spin; 607 extern int thread_queue_fifo; 608 extern int thread_queue_dump; 609 extern int thread_cond_wait_defer; 610 extern int thread_async_safe; 611 extern int thread_queue_verify; 612 613 /* 614 * pthread_atfork() related data, used to store atfork handlers. 615 */ 616 typedef struct atfork { 617 struct atfork *forw; /* forward pointer */ 618 struct atfork *back; /* backward pointer */ 619 void (*prepare)(void); /* pre-fork handler */ 620 void (*parent)(void); /* post-fork parent handler */ 621 void (*child)(void); /* post-fork child handler */ 622 } atfork_t; 623 624 /* 625 * Make our hot locks reside on private cache lines (64 bytes). 626 * pad_cond, pad_owner, and pad_count (aka fork_cond, fork_owner, 627 * and fork_count for _fork_lock) are used only in fork_lock_enter() 628 * to implement the special form of mutual exclusion therein. 629 */ 630 typedef struct { 631 mutex_t pad_lock; 632 cond_t pad_cond; 633 ulwp_t *pad_owner; 634 size_t pad_count; 635 char pad_pad[64 - (sizeof (mutex_t) + sizeof (cond_t) + 636 sizeof (ulwp_t *) + sizeof (size_t))]; 637 } pad_lock_t; 638 639 /* 640 * The threads hash table is used for fast lookup and locking of an active 641 * thread structure (ulwp_t) given a thread-id. It is an N-element array of 642 * thr_hash_table_t structures, where N == 1 before the main thread creates 643 * the first additional thread and N == 1024 afterwards. Each element of the 644 * table is 64 bytes in size and alignment to reduce cache conflicts. 645 */ 646 typedef struct { 647 mutex_t hash_lock; /* lock per bucket */ 648 cond_t hash_cond; /* convar per bucket */ 649 ulwp_t *hash_bucket; /* hash bucket points to the list of ulwps */ 650 char hash_pad[64 - /* pad out to 64 bytes */ 651 (sizeof (mutex_t) + sizeof (cond_t) + sizeof (ulwp_t *))]; 652 } thr_hash_table_t; 653 654 #ifdef _SYSCALL32 655 typedef struct { 656 mutex_t hash_lock; 657 cond_t hash_cond; 658 caddr32_t hash_bucket; 659 char hash_pad[64 - 660 (sizeof (mutex_t) + sizeof (cond_t) + sizeof (caddr32_t))]; 661 } thr_hash_table32_t; 662 #endif /* _SYSCALL32 */ 663 664 665 /* 666 * siguaction members have 64-byte size and alignment. 667 * We know that sizeof (struct sigaction) is 32 bytes for 668 * both _ILP32 and _LP64, so we put the padding in the middle. 669 */ 670 typedef struct { 671 mutex_t sig_lock; 672 char sig_pad[64 - (sizeof (mutex_t) + sizeof (struct sigaction))]; 673 struct sigaction sig_uaction; 674 } siguaction_t; 675 676 #ifdef _SYSCALL32 677 typedef struct { 678 mutex_t sig_lock; 679 char sig_pad[64 - (sizeof (mutex_t) + sizeof (struct sigaction32))]; 680 struct sigaction32 sig_uaction; 681 } siguaction32_t; 682 #endif /* _SYSCALL32 */ 683 684 685 /* 686 * Bucket structures, used by lmalloc()/lfree(). 687 * See port/threads/alloc.c for details. 688 * A bucket's size and alignment is 64 bytes. 689 */ 690 typedef struct { 691 mutex_t bucket_lock; /* protects the free list allocations */ 692 void *free_list; /* LIFO list of blocks to allocate/free */ 693 size_t chunks; /* number of 64K blocks mmap()ed last time */ 694 char pad64[64 - /* pad out to 64 bytes */ 695 (sizeof (mutex_t) + sizeof (void *) + sizeof (size_t))]; 696 } bucket_t; 697 698 #ifdef _SYSCALL32 699 typedef struct { 700 mutex_t bucket_lock; 701 caddr32_t free_list; 702 size32_t chunks; 703 char pad64[64 - /* pad out to 64 bytes */ 704 (sizeof (mutex_t) + sizeof (caddr32_t) + sizeof (size32_t))]; 705 } bucket32_t; 706 #endif /* _SYSCALL32 */ 707 708 #define NBUCKETS 10 /* sizes ranging from 64 to 32768 */ 709 710 711 /* 712 * atexit() data structures. 713 * See port/gen/atexit.c for details. 714 */ 715 typedef void (*_exithdlr_func_t) (void); 716 717 typedef struct _exthdlr { 718 struct _exthdlr *next; /* next in handler list */ 719 _exithdlr_func_t hdlr; /* handler itself */ 720 } _exthdlr_t; 721 722 typedef struct { 723 mutex_t exitfns_lock; 724 _exthdlr_t *head; 725 void *exit_frame_monitor; 726 char exit_pad[64 - /* pad out to 64 bytes */ 727 (sizeof (mutex_t) + sizeof (_exthdlr_t *) + sizeof (void *))]; 728 } atexit_root_t; 729 730 #ifdef _SYSCALL32 731 typedef struct { 732 mutex_t exitfns_lock; 733 caddr32_t head; 734 caddr32_t exit_frame_monitor; 735 char exit_pad[64 - /* pad out to 64 bytes */ 736 (sizeof (mutex_t) + sizeof (caddr32_t) + sizeof (caddr32_t))]; 737 } atexit_root32_t; 738 #endif /* _SYSCALL32 */ 739 740 741 /* 742 * This is data that is global to all link maps (uberdata, aka super-global). 743 */ 744 typedef struct uberdata { 745 pad_lock_t _link_lock; 746 pad_lock_t _fork_lock; 747 pad_lock_t _tdb_hash_lock; 748 tdb_sync_stats_t tdb_hash_lock_stats; 749 siguaction_t siguaction[NSIG]; 750 bucket_t bucket[NBUCKETS]; 751 atexit_root_t atexit_root; 752 tsd_metadata_t tsd_metadata; 753 tls_metadata_t tls_metadata; 754 /* 755 * Every object before this point has size and alignment of 64 bytes. 756 * Don't add any other type of data before this point. 757 */ 758 char primary_map; /* set when primary link map is initialized */ 759 char bucket_init; /* set when bucket[NBUCKETS] is initialized */ 760 char pad[2]; 761 uberflags_t uberflags; 762 queue_head_t *queue_head; 763 thr_hash_table_t *thr_hash_table; 764 uint_t hash_size; /* # of entries in thr_hash_table[] */ 765 uint_t hash_mask; /* hash_size - 1 */ 766 ulwp_t *ulwp_one; /* main thread */ 767 ulwp_t *all_lwps; /* circular ul_forw/ul_back list of live lwps */ 768 ulwp_t *all_zombies; /* circular ul_forw/ul_back list of zombies */ 769 int nthreads; /* total number of live threads/lwps */ 770 int nzombies; /* total number of zombie threads */ 771 int ndaemons; /* total number of THR_DAEMON threads/lwps */ 772 pid_t pid; /* the current process's pid */ 773 void (*sigacthandler)(int, siginfo_t *, void *); 774 ulwp_t *lwp_stacks; 775 ulwp_t *lwp_laststack; 776 int nfreestack; 777 int thread_stack_cache; 778 ulwp_t *ulwp_freelist; 779 ulwp_t *ulwp_lastfree; 780 ulwp_t *ulwp_replace_free; 781 ulwp_t *ulwp_replace_last; 782 atfork_t *atforklist; /* circular Q for fork handlers */ 783 struct uberdata **tdb_bootstrap; 784 tdb_t tdb; /* thread debug interfaces (for libc_db) */ 785 } uberdata_t; 786 787 #define link_lock _link_lock.pad_lock 788 #define fork_lock _fork_lock.pad_lock 789 #define fork_cond _fork_lock.pad_cond 790 #define fork_owner _fork_lock.pad_owner 791 #define fork_count _fork_lock.pad_count 792 #define tdb_hash_lock _tdb_hash_lock.pad_lock 793 794 #pragma align 64(__uberdata) 795 extern uberdata_t __uberdata; 796 extern uberdata_t **__tdb_bootstrap; /* known to libc_db and mdb */ 797 extern int primary_link_map; 798 799 #define ulwp_mutex(ulwp, udp) \ 800 (&(udp)->thr_hash_table[(ulwp)->ul_ix].hash_lock) 801 #define ulwp_condvar(ulwp, udp) \ 802 (&(udp)->thr_hash_table[(ulwp)->ul_ix].hash_cond) 803 804 /* 805 * Grab and release the hash table lock for the specified lwp. 806 */ 807 #define ulwp_lock(ulwp, udp) lmutex_lock(ulwp_mutex(ulwp, udp)) 808 #define ulwp_unlock(ulwp, udp) lmutex_unlock(ulwp_mutex(ulwp, udp)) 809 810 #ifdef _SYSCALL32 /* needed by libc_db */ 811 812 typedef struct ulwp32 { 813 #if defined(__sparc) 814 uint32_t ul_dinstr; /* scratch space for dtrace */ 815 uint32_t ul_padsparc0[15]; 816 uint32_t ul_dsave; /* dtrace: save %g1, %g0, %sp */ 817 uint32_t ul_drestore; /* dtrace: restore %g0, %g0, %g0 */ 818 uint32_t ul_dftret; /* dtrace: return probe fasttrap */ 819 uint32_t ul_dreturn; /* dtrace: return %o0 */ 820 #endif 821 caddr32_t ul_self; /* pointer to self */ 822 #if defined(__x86) 823 uint8_t ul_dinstr[40]; /* scratch space for dtrace */ 824 #endif 825 caddr32_t ul_uberdata; /* uber (super-global) data */ 826 tls32_t ul_tls; /* dynamic thread-local storage base */ 827 caddr32_t ul_forw; /* forw, back all_lwps list, */ 828 caddr32_t ul_back; /* protected by link_lock */ 829 caddr32_t ul_next; /* list to keep track of stacks */ 830 caddr32_t ul_hash; /* hash chain linked list */ 831 caddr32_t ul_rval; /* return value from thr_exit() */ 832 caddr32_t ul_stk; /* mapping base of the stack */ 833 size32_t ul_mapsiz; /* mapping size of the stack */ 834 size32_t ul_guardsize; /* normally _lpagesize */ 835 caddr32_t ul_stktop; /* broken thr_stksegment() interface */ 836 size32_t ul_stksiz; /* broken thr_stksegment() interface */ 837 stack32_t ul_ustack; /* current stack boundaries */ 838 int ul_ix; /* hash index */ 839 lwpid_t ul_lwpid; /* thread id, aka the lwp id */ 840 pri_t ul_pri; /* priority known to the library */ 841 pri_t ul_mappedpri; /* priority known to the application */ 842 char ul_policy; /* scheduling policy */ 843 char ul_pri_mapped; /* != 0 means ul_mappedpri is valid */ 844 union { 845 struct { 846 char cursig; /* deferred signal number */ 847 char pleasestop; /* lwp requested to stop itself */ 848 } s; 849 short curplease; /* for testing both at once */ 850 } ul_cp; 851 char ul_stop; /* reason for stopping */ 852 char ul_signalled; /* this lwp was cond_signal()d */ 853 char ul_dead; /* this lwp has called thr_exit */ 854 char ul_unwind; /* posix: unwind C++ stack */ 855 char ul_detached; /* THR_DETACHED at thread_create() */ 856 /* or pthread_detach() was called */ 857 char ul_writer; /* sleeping in rw_wrlock() */ 858 char ul_stopping; /* set by curthread: stopping self */ 859 char ul_cancel_prologue; /* for _cancel_prologue() */ 860 short ul_preempt; /* no_preempt()/preempt() */ 861 short ul_savpreempt; /* pre-existing preempt value */ 862 char ul_sigsuspend; /* thread is in sigsuspend/pollsys */ 863 char ul_main; /* thread is the main thread */ 864 char ul_fork; /* thread is performing a fork */ 865 char ul_primarymap; /* primary link-map is initialized */ 866 /* per-thread copies of the corresponding global variables */ 867 uchar_t ul_max_spinners; /* thread_max_spinners */ 868 char ul_door_noreserve; /* thread_door_noreserve */ 869 char ul_queue_fifo; /* thread_queue_fifo */ 870 char ul_cond_wait_defer; /* thread_cond_wait_defer */ 871 char ul_error_detection; /* thread_error_detection */ 872 char ul_async_safe; /* thread_async_safe */ 873 char ul_pad1[2]; 874 int ul_adaptive_spin; /* thread_adaptive_spin */ 875 int ul_release_spin; /* thread_release_spin */ 876 int ul_queue_spin; /* thread_queue_spin */ 877 int ul_critical; /* non-zero == in a critical region */ 878 int ul_sigdefer; /* non-zero == defer signals */ 879 int ul_vfork; /* thread is the child of vfork() */ 880 int ul_cancelable; /* _cancelon()/_canceloff() */ 881 char ul_cancel_pending; /* pthread_cancel() was called */ 882 char ul_cancel_disabled; /* PTHREAD_CANCEL_DISABLE */ 883 char ul_cancel_async; /* PTHREAD_CANCEL_ASYNCHRONOUS */ 884 char ul_save_async; /* saved copy of ul_cancel_async */ 885 char ul_mutator; /* lwp is a mutator (java interface) */ 886 char ul_created; /* created suspended */ 887 char ul_replace; /* replacement; must be free()d */ 888 uchar_t ul_nocancel; /* cancellation can't happen */ 889 int ul_errno; /* per-thread errno */ 890 caddr32_t ul_errnop; /* pointer to errno or self->ul_errno */ 891 caddr32_t ul_clnup_hdr; /* head of cleanup handlers list */ 892 caddr32_t ul_schedctl_called; /* ul_schedctl is set up */ 893 caddr32_t ul_schedctl; /* schedctl data */ 894 int ul_bindflags; /* bind_guard() interface to ld.so.1 */ 895 int ul_gs; /* x86 only: value of %gs/%fs */ 896 caddr32_t ul_stsd; /* slow TLS for keys >= TSD_NFAST */ 897 caddr32_t ul_ftsd[TSD_NFAST]; /* fast TLS for keys < TSD_NFAST */ 898 td_evbuf32_t ul_td_evbuf; /* event buffer */ 899 char ul_td_events_enable; /* event mechanism enabled */ 900 char ul_sync_obj_reg; /* tdb_sync_obj_register() */ 901 char ul_qtype; /* MX or CV */ 902 char ul_cv_wake; /* != 0: just wake up, don't requeue */ 903 int ul_usropts; /* flags given to thr_create() */ 904 caddr32_t ul_startpc; /* start func (thr_create()) */ 905 caddr32_t ul_startarg; /* argument for start function */ 906 caddr32_t ul_wchan; /* synch object when sleeping */ 907 caddr32_t ul_link; /* sleep queue link */ 908 caddr32_t ul_sleepq; /* sleep queue thread is waiting on */ 909 caddr32_t ul_cvmutex; /* mutex dropped when waiting on a cv */ 910 caddr32_t ul_mxchain; /* chain of owned ceiling mutexes */ 911 pri_t ul_epri; /* effective scheduling priority */ 912 pri_t ul_emappedpri; /* effective mapped priority */ 913 uint_t ul_rdlocks; /* # of entries in ul_readlock array */ 914 /* 0 means there is but a single lock */ 915 union { /* single rwlock or pointer to array */ 916 readlock32_t single; 917 caddr32_t array; 918 } ul_readlock; 919 /* PROBE_SUPPORT begin */ 920 caddr32_t ul_tpdp; 921 /* PROBE_SUPPORT end */ 922 caddr32_t ul_siglink; /* pointer to previous context */ 923 uint_t ul_spin_lock_spin; /* spin lock statistics */ 924 uint_t ul_spin_lock_spin2; 925 uint_t ul_spin_lock_sleep; 926 uint_t ul_spin_lock_wakeup; 927 /* the following members *must* be last in the structure */ 928 /* they are discarded when ulwp is replaced on thr_exit() */ 929 sigset32_t ul_sigmask; /* thread's current signal mask */ 930 sigset32_t ul_tmpmask; /* signal mask for sigsuspend/pollsys */ 931 siginfo32_t ul_siginfo; /* deferred siginfo */ 932 mutex_t ul_spinlock; /* used when suspending/continuing */ 933 fpuenv32_t ul_fpuenv; /* floating point state */ 934 caddr32_t ul_sp; /* stack pointer when blocked */ 935 #if defined(sparc) 936 caddr32_t ul_unwind_ret; /* used only by _ex_clnup_handler() */ 937 #endif 938 } ulwp32_t; 939 940 #define REPLACEMENT_SIZE32 ((size_t)&((ulwp32_t *)NULL)->ul_sigmask) 941 942 typedef struct uberdata32 { 943 pad_lock_t _link_lock; 944 pad_lock_t _fork_lock; 945 pad_lock_t _tdb_hash_lock; 946 tdb_sync_stats_t tdb_hash_lock_stats; 947 siguaction32_t siguaction[NSIG]; 948 bucket32_t bucket[NBUCKETS]; 949 atexit_root32_t atexit_root; 950 tsd_metadata32_t tsd_metadata; 951 tls_metadata32_t tls_metadata; 952 char primary_map; 953 char bucket_init; 954 char pad[2]; 955 uberflags_t uberflags; 956 caddr32_t queue_head; 957 caddr32_t thr_hash_table; 958 uint_t hash_size; 959 uint_t hash_mask; 960 caddr32_t ulwp_one; 961 caddr32_t all_lwps; 962 caddr32_t all_zombies; 963 int nthreads; 964 int nzombies; 965 int ndaemons; 966 int pid; 967 caddr32_t sigacthandler; 968 caddr32_t lwp_stacks; 969 caddr32_t lwp_laststack; 970 int nfreestack; 971 int thread_stack_cache; 972 caddr32_t ulwp_freelist; 973 caddr32_t ulwp_lastfree; 974 caddr32_t ulwp_replace_free; 975 caddr32_t ulwp_replace_last; 976 caddr32_t atforklist; 977 caddr32_t tdb_bootstrap; 978 tdb32_t tdb; 979 } uberdata32_t; 980 981 #endif /* _SYSCALL32 */ 982 983 /* ul_stop values */ 984 #define TSTP_REGULAR 0x01 /* Stopped by thr_suspend() */ 985 #define TSTP_MUTATOR 0x08 /* stopped by thr_suspend_*mutator*() */ 986 #define TSTP_FORK 0x20 /* stopped by suspend_fork() */ 987 988 /* 989 * Implementation-specific attribute types for pthread_mutexattr_init() etc. 990 */ 991 992 typedef struct _cvattr { 993 int pshared; 994 clockid_t clockid; 995 } cvattr_t; 996 997 typedef struct _mattr { 998 int pshared; 999 int protocol; 1000 int prioceiling; 1001 int type; 1002 int robustness; 1003 } mattr_t; 1004 1005 typedef struct _thrattr { 1006 size_t stksize; 1007 void *stkaddr; 1008 int detachstate; 1009 int daemonstate; 1010 int scope; 1011 int prio; 1012 int policy; 1013 int inherit; 1014 size_t guardsize; 1015 } thrattr_t; 1016 1017 typedef struct _rwlattr { 1018 int pshared; 1019 } rwlattr_t; 1020 1021 /* _curthread() is inline for speed */ 1022 extern ulwp_t *_curthread(void); 1023 #define curthread (_curthread()) 1024 1025 /* this version (also inline) can be tested for NULL */ 1026 extern ulwp_t *__curthread(void); 1027 1028 /* get the current stack pointer (also inline) */ 1029 extern greg_t stkptr(void); 1030 1031 /* 1032 * Suppress __attribute__((...)) if we are not compiling with gcc 1033 */ 1034 #if !defined(__GNUC__) 1035 #define __attribute__(string) 1036 #endif 1037 1038 /* 1039 * Implementation functions. Not visible outside of the library itself. 1040 */ 1041 extern int __nanosleep(const timespec_t *, timespec_t *); 1042 extern void getgregs(ulwp_t *, gregset_t); 1043 extern void setgregs(ulwp_t *, gregset_t); 1044 extern void thr_panic(const char *); 1045 #pragma rarely_called(thr_panic) 1046 extern ulwp_t *find_lwp(thread_t); 1047 extern int real_priority(ulwp_t *); 1048 extern void finish_init(void); 1049 extern void queue_alloc(void); 1050 extern void tsd_exit(void); 1051 extern void tsd_free(ulwp_t *); 1052 extern void tls_setup(void); 1053 extern void tls_exit(void); 1054 extern void tls_free(ulwp_t *); 1055 extern void rwl_free(ulwp_t *); 1056 extern void sigacthandler(int, siginfo_t *, void *); 1057 extern void signal_init(void); 1058 extern int sigequalset(const sigset_t *, const sigset_t *); 1059 extern void mutex_setup(void); 1060 extern void take_deferred_signal(int); 1061 extern int setup_context(ucontext_t *, void *(*func)(ulwp_t *), 1062 ulwp_t *ulwp, caddr_t stk, size_t stksize); 1063 extern volatile sc_shared_t *setup_schedctl(void); 1064 extern void *lmalloc(size_t); 1065 extern void lfree(void *, size_t); 1066 extern void *libc_malloc(size_t); 1067 extern void *libc_realloc(void *, size_t); 1068 extern void libc_free(void *); 1069 extern char *libc_strdup(const char *); 1070 extern void ultos(uint64_t, int, char *); 1071 extern void lock_error(const mutex_t *, const char *, void *, const char *); 1072 extern void rwlock_error(const rwlock_t *, const char *, const char *); 1073 extern void thread_error(const char *); 1074 extern void grab_assert_lock(void); 1075 extern void dump_queue_statistics(void); 1076 extern void collect_queue_statistics(void); 1077 extern void record_spin_locks(ulwp_t *); 1078 #if defined(__sparc) 1079 extern void _flush_windows(void); 1080 #else 1081 #define _flush_windows() 1082 #endif 1083 extern void set_curthread(void *); 1084 1085 /* enter a critical section */ 1086 #define enter_critical(self) (self->ul_critical++) 1087 1088 /* exit a critical section, take deferred actions if necessary */ 1089 extern void do_exit_critical(void); 1090 #define exit_critical(self) \ 1091 (void) (self->ul_critical--, \ 1092 ((self->ul_curplease && self->ul_critical == 0)? \ 1093 (do_exit_critical(), 0) : 0)) 1094 1095 /* 1096 * Like enter_critical()/exit_critical() but just for deferring signals. 1097 * Unlike enter_critical()/exit_critical(), ul_sigdefer may be set while 1098 * calling application functions like constructors and destructors. 1099 * Care must be taken if the application function attempts to set 1100 * the signal mask while a deferred signal is present; the setting 1101 * of the signal mask must also be deferred. 1102 */ 1103 #define sigoff(self) (self->ul_sigdefer++) 1104 extern void sigon(ulwp_t *); 1105 1106 /* these are exported functions */ 1107 extern void _sigoff(void); 1108 extern void _sigon(void); 1109 1110 #define sigorset(s1, s2) \ 1111 (((s1)->__sigbits[0] |= (s2)->__sigbits[0]), \ 1112 ((s1)->__sigbits[1] |= (s2)->__sigbits[1]), \ 1113 ((s1)->__sigbits[2] |= (s2)->__sigbits[2]), \ 1114 ((s1)->__sigbits[3] |= (s2)->__sigbits[3])) 1115 1116 #define sigandset(s1, s2) \ 1117 (((s1)->__sigbits[0] &= (s2)->__sigbits[0]), \ 1118 ((s1)->__sigbits[1] &= (s2)->__sigbits[1]), \ 1119 ((s1)->__sigbits[2] &= (s2)->__sigbits[2]), \ 1120 ((s1)->__sigbits[3] &= (s2)->__sigbits[3])) 1121 1122 #define sigdiffset(s1, s2) \ 1123 (((s1)->__sigbits[0] &= ~(s2)->__sigbits[0]), \ 1124 ((s1)->__sigbits[1] &= ~(s2)->__sigbits[1]), \ 1125 ((s1)->__sigbits[2] &= ~(s2)->__sigbits[2]), \ 1126 ((s1)->__sigbits[3] &= ~(s2)->__sigbits[3])) 1127 1128 #define delete_reserved_signals(s) \ 1129 (((s)->__sigbits[0] &= MASKSET0), \ 1130 ((s)->__sigbits[1] &= (MASKSET1 & ~SIGMASK(SIGCANCEL))),\ 1131 ((s)->__sigbits[2] = 0), \ 1132 ((s)->__sigbits[3] = 0)) 1133 1134 extern void block_all_signals(ulwp_t *self); 1135 1136 /* 1137 * When restoring the signal mask after having previously called 1138 * block_all_signals(), if we have a deferred signal present then 1139 * do nothing other than ASSERT() that we are in a critical region. 1140 * The signal mask will be set when we emerge from the critical region 1141 * and call take_deferred_signal(). There is no race condition here 1142 * because the kernel currently has all signals blocked for this thread. 1143 */ 1144 #define restore_signals(self) \ 1145 ((void) ((self)->ul_cursig? \ 1146 (ASSERT((self)->ul_critical + (self)->ul_sigdefer != 0), 0) : \ 1147 __lwp_sigmask(SIG_SETMASK, &(self)->ul_sigmask, NULL))) 1148 1149 extern void set_parking_flag(ulwp_t *, int); 1150 1151 extern void *_thr_setup(ulwp_t *); 1152 extern void _fpinherit(ulwp_t *); 1153 extern void _lwp_start(void); 1154 extern void _lwp_terminate(void); 1155 extern void lmutex_lock(mutex_t *); 1156 extern void lmutex_unlock(mutex_t *); 1157 extern void sig_mutex_lock(mutex_t *); 1158 extern void sig_mutex_unlock(mutex_t *); 1159 extern int sig_mutex_trylock(mutex_t *); 1160 extern int sig_cond_wait(cond_t *, mutex_t *); 1161 extern int sig_cond_reltimedwait(cond_t *, mutex_t *, const timespec_t *); 1162 extern void _prefork_handler(void); 1163 extern void _postfork_parent_handler(void); 1164 extern void _postfork_child_handler(void); 1165 extern void postfork1_child(void); 1166 extern void postfork1_child_aio(void); 1167 extern void postfork1_child_sigev_aio(void); 1168 extern void postfork1_child_sigev_mq(void); 1169 extern void postfork1_child_sigev_timer(void); 1170 extern void postfork1_child_tpool(void); 1171 extern int fork_lock_enter(const char *); 1172 extern void fork_lock_exit(void); 1173 extern void suspend_fork(void); 1174 extern void continue_fork(int); 1175 extern void do_sigcancel(void); 1176 extern void setup_cancelsig(int); 1177 extern void init_sigev_thread(void); 1178 extern void init_aio(void); 1179 extern void _cancelon(void); 1180 extern void _canceloff(void); 1181 extern void _canceloff_nocancel(void); 1182 extern void _cancel_prologue(void); 1183 extern void _cancel_epilogue(void); 1184 extern void no_preempt(ulwp_t *); 1185 extern void preempt(ulwp_t *); 1186 extern void _thrp_unwind(void *); 1187 1188 /* 1189 * Prototypes for the strong versions of the interface functions 1190 */ 1191 extern pid_t _fork(void); 1192 extern pid_t _fork1(void); 1193 extern pid_t __fork1(void); 1194 extern pid_t _forkall(void); 1195 extern pid_t __forkall(void); 1196 extern pid_t _private_getpid(void); 1197 extern uid_t _private_geteuid(void); 1198 extern int _kill(pid_t, int); 1199 extern int _open(const char *, int, ...); 1200 extern int _close(int); 1201 extern ssize_t _read(int, void *, size_t); 1202 extern ssize_t _write(int, const void *, size_t); 1203 extern void *_memcpy(void *, const void *, size_t); 1204 extern void *_memset(void *, int, size_t); 1205 extern int _memcmp(const void *, const void *, size_t); 1206 extern void *_private_memcpy(void *, const void *, size_t); 1207 extern void *_private_memset(void *, int, size_t); 1208 extern int _private_sigfillset(sigset_t *); 1209 extern int _private_sigemptyset(sigset_t *); 1210 extern int _private_sigaddset(sigset_t *, int); 1211 extern int _private_sigdelset(sigset_t *, int); 1212 extern int _private_sigismember(sigset_t *, int); 1213 extern void *_private_mmap(void *, size_t, int, int, int, off_t); 1214 extern int _private_mprotect(void *, size_t, int); 1215 extern int _private_munmap(void *, size_t); 1216 extern int _private_getrlimit(int, struct rlimit *); 1217 extern int __lwp_continue(lwpid_t); 1218 extern int __lwp_create(ucontext_t *, uint_t, lwpid_t *); 1219 extern int __lwp_kill(lwpid_t, int); 1220 extern lwpid_t __lwp_self(void); 1221 extern int ___lwp_suspend(lwpid_t); 1222 extern void lwp_yield(void); 1223 extern int lwp_wait(lwpid_t, lwpid_t *); 1224 extern int __lwp_wait(lwpid_t, lwpid_t *); 1225 extern int __lwp_detach(lwpid_t); 1226 extern sc_shared_t *__schedctl(void); 1227 1228 extern int _private_setcontext(const ucontext_t *); 1229 extern int _private_getcontext(ucontext_t *); 1230 #pragma unknown_control_flow(_private_getcontext) 1231 /* actual system call traps */ 1232 extern int __setcontext_syscall(const ucontext_t *); 1233 extern int __getcontext_syscall(ucontext_t *); 1234 extern int _private_setustack(stack_t *); 1235 extern int __clock_gettime(clockid_t, timespec_t *); 1236 extern void abstime_to_reltime(clockid_t, const timespec_t *, timespec_t *); 1237 extern void hrt2ts(hrtime_t, timespec_t *); 1238 1239 extern int __sigaction(int, const struct sigaction *, struct sigaction *); 1240 extern int __lwp_sigmask(int, const sigset_t *, sigset_t *); 1241 extern void __sighndlr(int, siginfo_t *, ucontext_t *, void (*)()); 1242 extern caddr_t __sighndlrend; 1243 #pragma unknown_control_flow(__sighndlr) 1244 extern void _siglongjmp(sigjmp_buf, int); 1245 1246 extern int _pthread_setspecific(pthread_key_t, const void *); 1247 extern void *_pthread_getspecific(pthread_key_t); 1248 extern void _pthread_exit(void *); 1249 extern void _private_testcancel(void); 1250 1251 /* belongs in <pthread.h> */ 1252 #define PTHREAD_CREATE_DAEMON_NP 0x100 /* = THR_DAEMON */ 1253 #define PTHREAD_CREATE_NONDAEMON_NP 0 1254 extern int _pthread_attr_setdaemonstate_np(pthread_attr_t *, int); 1255 extern int _pthread_attr_getdaemonstate_np(const pthread_attr_t *, int *); 1256 1257 /* these are private to the library */ 1258 extern int _private_mutex_init(mutex_t *, int, void *); 1259 extern int _private_mutex_destroy(mutex_t *); 1260 extern int _private_mutex_lock(mutex_t *); 1261 extern int _private_mutex_trylock(mutex_t *); 1262 extern int _private_mutex_unlock(mutex_t *); 1263 1264 extern int _mutex_init(mutex_t *, int, void *); 1265 extern int _mutex_destroy(mutex_t *); 1266 extern int _mutex_lock(mutex_t *); 1267 extern int _mutex_trylock(mutex_t *); 1268 extern int _mutex_unlock(mutex_t *); 1269 extern void _mutex_set_typeattr(mutex_t *, int); 1270 extern int __mutex_init(mutex_t *, int, void *); 1271 extern int __mutex_destroy(mutex_t *); 1272 extern int __mutex_lock(mutex_t *); 1273 extern int __mutex_trylock(mutex_t *); 1274 extern int __mutex_unlock(mutex_t *); 1275 extern int mutex_is_held(mutex_t *); 1276 extern int mutex_lock_internal(mutex_t *, timespec_t *, int); 1277 extern int mutex_trylock_adaptive(mutex_t *); 1278 extern int mutex_queuelock_adaptive(mutex_t *); 1279 extern int mutex_lock_impl(mutex_t *mp, timespec_t *tsp); 1280 1281 extern int _cond_init(cond_t *, int, void *); 1282 extern int _cond_wait(cond_t *, mutex_t *); 1283 extern int _cond_timedwait(cond_t *, mutex_t *, const timespec_t *); 1284 extern int _cond_reltimedwait(cond_t *, mutex_t *, const timespec_t *); 1285 extern int _cond_signal(cond_t *); 1286 extern int _cond_broadcast(cond_t *); 1287 extern int _cond_destroy(cond_t *); 1288 extern int cond_sleep_queue(cond_t *, mutex_t *, timespec_t *); 1289 extern int cond_sleep_kernel(cond_t *, mutex_t *, timespec_t *); 1290 extern int cond_signal_internal(cond_t *); 1291 extern int cond_broadcast_internal(cond_t *); 1292 1293 extern int __rwlock_init(rwlock_t *, int, void *); 1294 extern int rw_read_is_held(rwlock_t *); 1295 extern int rw_write_is_held(rwlock_t *); 1296 1297 extern int _thr_continue(thread_t); 1298 extern int _thr_create(void *, size_t, void *(*)(void *), void *, long, 1299 thread_t *); 1300 extern int _thrp_create(void *, size_t, void *(*)(void *), void *, long, 1301 thread_t *, pri_t, int, size_t); 1302 extern int _thr_getprio(thread_t, int *); 1303 extern int _thr_getspecific(thread_key_t, void **); 1304 extern int _thr_join(thread_t, thread_t *, void **); 1305 extern int _thr_keycreate(thread_key_t *, PFrV); 1306 extern int _thr_key_delete(thread_key_t); 1307 extern int _thr_main(void); 1308 extern thread_t _thr_self(void); 1309 extern int _thr_getconcurrency(void); 1310 extern int _thr_setconcurrency(int); 1311 extern int _thr_setprio(thread_t, int); 1312 extern int _thr_setspecific(thread_key_t, void *); 1313 extern int _thr_stksegment(stack_t *); 1314 extern int _thrp_suspend(thread_t, uchar_t); 1315 extern int _thrp_continue(thread_t, uchar_t); 1316 extern int _thr_sigsetmask(int, const sigset_t *, sigset_t *); 1317 1318 extern void _thr_terminate(void *); 1319 extern void _thr_exit(void *); 1320 extern void _thrp_exit(void); 1321 1322 extern const thrattr_t *def_thrattr(void); 1323 extern int _thread_setschedparam_main(pthread_t, int, 1324 const struct sched_param *, int); 1325 extern int _validate_rt_prio(int, int); 1326 extern int _thrp_setlwpprio(lwpid_t, int, int); 1327 extern pri_t map_rtpri_to_gp(pri_t); 1328 extern int get_info_by_policy(int); 1329 1330 /* 1331 * System call wrappers (direct interfaces to the kernel) 1332 */ 1333 extern int ___lwp_mutex_init(mutex_t *, int); 1334 extern int ___lwp_mutex_trylock(mutex_t *); 1335 extern int ___lwp_mutex_timedlock(mutex_t *, timespec_t *); 1336 extern int ___lwp_mutex_unlock(mutex_t *); 1337 extern int ___lwp_mutex_wakeup(mutex_t *); 1338 extern int ___lwp_cond_wait(cond_t *, mutex_t *, timespec_t *, int); 1339 extern int __lwp_cond_signal(lwp_cond_t *); 1340 extern int __lwp_cond_broadcast(lwp_cond_t *); 1341 extern int ___lwp_sema_timedwait(lwp_sema_t *, timespec_t *, int); 1342 extern int __lwp_sema_trywait(lwp_sema_t *); 1343 extern int __lwp_sema_post(lwp_sema_t *); 1344 extern int __lwp_rwlock_rdlock(rwlock_t *, timespec_t *); 1345 extern int __lwp_rwlock_wrlock(rwlock_t *, timespec_t *); 1346 extern int __lwp_rwlock_tryrdlock(rwlock_t *); 1347 extern int __lwp_rwlock_trywrlock(rwlock_t *); 1348 extern int __lwp_rwlock_unlock(rwlock_t *); 1349 extern int __lwp_park(timespec_t *, lwpid_t); 1350 extern int __lwp_unpark(lwpid_t); 1351 extern int __lwp_unpark_all(lwpid_t *, int); 1352 #if defined(__x86) 1353 extern int ___lwp_private(int, int, void *); 1354 #endif /* __x86 */ 1355 1356 extern int _private_lwp_mutex_lock(mutex_t *); 1357 extern int _private_lwp_mutex_unlock(mutex_t *); 1358 1359 /* 1360 * inlines 1361 */ 1362 extern int set_lock_byte(volatile uint8_t *); 1363 extern uint32_t swap32(volatile uint32_t *, uint32_t); 1364 extern uint32_t cas32(volatile uint32_t *, uint32_t, uint32_t); 1365 extern void incr32(volatile uint32_t *); 1366 extern void decr32(volatile uint32_t *); 1367 #if defined(__sparc) 1368 extern ulong_t caller(void); 1369 extern ulong_t getfp(void); 1370 #endif /* __sparc */ 1371 1372 #include "thr_inlines.h" 1373 1374 #endif /* _THR_UBERDATA_H */ 1375