123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353 |
- /* libc-internal interface for mutex locks. LinuxThreads version.
- Copyright (C) 1996,1997,1998,1999,2000,2001,2002,2003
- Free Software Foundation, Inc.
- This file is part of the GNU C Library.
- The GNU C Library is free software; you can redistribute it and/or
- modify it under the terms of the GNU Lesser General Public License as
- published by the Free Software Foundation; either version 2.1 of the
- License, or (at your option) any later version.
- The GNU C Library is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- Lesser General Public License for more details.
- You should have received a copy of the GNU Lesser General Public
- License along with the GNU C Library; see the file COPYING.LIB. If
- not, see <http://www.gnu.org/licenses/>. */
- #ifndef _BITS_LIBC_LOCK_H
- #define _BITS_LIBC_LOCK_H 1
- #include <pthread.h>
- #if defined _LIBC && !defined NOT_IN_libc
- #include <linuxthreads/internals.h>
- #endif
- /* Mutex type. */
- #if defined(_LIBC) || defined(_IO_MTSAFE_IO)
- typedef pthread_mutex_t __libc_lock_t;
- typedef pthread_mutex_t __libc_lock_recursive_t;
- # ifdef __USE_UNIX98
- typedef pthread_rwlock_t __libc_rwlock_t;
- # else
- typedef struct __libc_rwlock_opaque__ __libc_rwlock_t;
- # endif
- typedef __libc_lock_recursive_t __rtld_lock_recursive_t;
- #else
- typedef struct __libc_lock_opaque__ __libc_lock_t;
- typedef struct __libc_lock_recursive_opaque__ __libc_lock_recursive_t;
- typedef struct __libc_rwlock_opaque__ __libc_rwlock_t;
- #endif
- /* Type for key to thread-specific data. */
- typedef pthread_key_t __libc_key_t;
- /* Define a lock variable NAME with storage class CLASS. The lock must be
- initialized with __libc_lock_init before it can be used (or define it
- with __libc_lock_define_initialized, below). Use `extern' for CLASS to
- declare a lock defined in another module. In public structure
- definitions you must use a pointer to the lock structure (i.e., NAME
- begins with a `*'), because its storage size will not be known outside
- of libc. */
- #define __libc_lock_define(CLASS,NAME) \
- CLASS __libc_lock_t NAME;
- #define __libc_rwlock_define(CLASS,NAME) \
- CLASS __libc_rwlock_t NAME;
- #define __libc_lock_define_recursive(CLASS,NAME) \
- CLASS __libc_lock_recursive_t NAME;
- #define __rtld_lock_define_recursive(CLASS,NAME) \
- CLASS __rtld_lock_recursive_t NAME;
- /* Define an initialized lock variable NAME with storage class CLASS.
- For the C library we take a deeper look at the initializer. For
- this implementation all fields are initialized to zero. Therefore
- we don't initialize the variable which allows putting it into the
- BSS section. (Except on PA-RISC and other odd architectures, where
- initialized locks must be set to one due to the lack of normal
- atomic operations.) */
- #if __LT_SPINLOCK_INIT == 0
- # define __libc_lock_define_initialized(CLASS,NAME) \
- CLASS __libc_lock_t NAME;
- #else
- # define __libc_lock_define_initialized(CLASS,NAME) \
- CLASS __libc_lock_t NAME = PTHREAD_MUTEX_INITIALIZER;
- #endif
- #define __libc_rwlock_define_initialized(CLASS,NAME) \
- CLASS __libc_rwlock_t NAME = PTHREAD_RWLOCK_INITIALIZER;
- /* Define an initialized recursive lock variable NAME with storage
- class CLASS. */
- #define __libc_lock_define_initialized_recursive(CLASS,NAME) \
- CLASS __libc_lock_recursive_t NAME = _LIBC_LOCK_RECURSIVE_INITIALIZER;
- #define _LIBC_LOCK_RECURSIVE_INITIALIZER \
- {PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP}
- #define __rtld_lock_define_initialized_recursive(CLASS,NAME) \
- CLASS __rtld_lock_recursive_t NAME = _RTLD_LOCK_RECURSIVE_INITIALIZER;
- #define _RTLD_LOCK_RECURSIVE_INITIALIZER \
- {PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP}
- #if defined _LIBC && defined IS_IN_libpthread
- # define __libc_maybe_call(FUNC, ARGS, ELSE) FUNC ARGS
- #else
- # if defined __PIC__ || (defined _LIBC && defined SHARED)
- # define __libc_maybe_call(FUNC, ARGS, ELSE) \
- (__extension__ ({ __typeof (FUNC) *_fn = (FUNC); \
- _fn != NULL ? (*_fn) ARGS : ELSE; }))
- # else
- # define __libc_maybe_call(FUNC, ARGS, ELSE) \
- (FUNC != NULL ? FUNC ARGS : ELSE)
- # endif
- #endif
- #define __libc_maybe_call2(FUNC, ARGS, ELSE) __libc_maybe_call (__##FUNC, ARGS, ELSE)
- /* Initialize the named lock variable, leaving it in a consistent, unlocked
- state. */
- #if defined _LIBC && !defined NOT_IN_libc && defined SHARED
- #define __libc_lock_init(NAME) \
- ({ \
- (NAME).__m_count = 0; \
- (NAME).__m_owner = NULL; \
- (NAME).__m_kind = PTHREAD_MUTEX_TIMED_NP; \
- (NAME).__m_lock.__status = 0; \
- (NAME).__m_lock.__spinlock = __LT_SPINLOCK_INIT; \
- 0; })
- #else
- #define __libc_lock_init(NAME) \
- (__libc_maybe_call2 (pthread_mutex_init, (&(NAME), NULL), 0))
- #endif
- #define __libc_rwlock_init(NAME) \
- (__libc_maybe_call (__pthread_rwlock_init, (&(NAME), NULL), 0));
- /* Same as last but this time we initialize an adaptive mutex. */
- #if defined _LIBC && !defined NOT_IN_libc && defined SHARED
- #define __libc_lock_init_adaptive(NAME) \
- ({ \
- (NAME).__m_count = 0; \
- (NAME).__m_owner = NULL; \
- (NAME).__m_kind = PTHREAD_MUTEX_ADAPTIVE_NP; \
- (NAME).__m_lock.__status = 0; \
- (NAME).__m_lock.__spinlock = __LT_SPINLOCK_INIT; \
- 0; })
- #else
- #define __libc_lock_init_adaptive(NAME) \
- do { \
- if (__pthread_mutex_init != NULL) \
- { \
- pthread_mutexattr_t __attr; \
- __pthread_mutexattr_init (&__attr); \
- __pthread_mutexattr_settype (&__attr, PTHREAD_MUTEX_ADAPTIVE_NP); \
- __pthread_mutex_init (&(NAME), &__attr); \
- __pthread_mutexattr_destroy (&__attr); \
- } \
- } while (0);
- #endif
- /* Same as last but this time we initialize a recursive mutex. */
- #if defined _LIBC && !defined NOT_IN_libc && defined SHARED
- #define __libc_lock_init_recursive(NAME) \
- ({ \
- (NAME).__m_count = 0; \
- (NAME).__m_owner = NULL; \
- (NAME).__m_kind = PTHREAD_MUTEX_RECURSIVE_NP; \
- (NAME).__m_lock.__status = 0; \
- (NAME).__m_lock.__spinlock = __LT_SPINLOCK_INIT; \
- 0; })
- #else
- #define __libc_lock_init_recursive(NAME) \
- do { \
- if (__pthread_mutex_init != NULL) \
- { \
- pthread_mutexattr_t __attr; \
- __pthread_mutexattr_init (&__attr); \
- __pthread_mutexattr_settype (&__attr, PTHREAD_MUTEX_RECURSIVE_NP); \
- __pthread_mutex_init (&(NAME), &__attr); \
- __pthread_mutexattr_destroy (&__attr); \
- } \
- } while (0);
- #endif
- #define __rtld_lock_init_recursive(NAME) \
- __libc_lock_init_recursive (NAME)
- /* Finalize the named lock variable, which must be locked. It cannot be
- used again until __libc_lock_init is called again on it. This must be
- called on a lock variable before the containing storage is reused. */
- #define __libc_lock_fini(NAME) \
- (__libc_maybe_call2 (pthread_mutex_destroy, (&(NAME)), 0));
- #define __libc_rwlock_fini(NAME) \
- (__libc_maybe_call (__pthread_rwlock_destroy, (&(NAME)), 0));
- /* Finalize recursive named lock. */
- #define __libc_lock_fini_recursive(NAME) __libc_lock_fini ((NAME).mutex)
- #define __rtld_lock_fini_recursive(NAME) __libc_lock_fini_recursive (NAME)
- /* Lock the named lock variable. */
- #define __libc_lock_lock(NAME) \
- (__libc_maybe_call2 (pthread_mutex_lock, (&(NAME)), 0));
- #define __libc_rwlock_rdlock(NAME) \
- (__libc_maybe_call (__pthread_rwlock_rdlock, (&(NAME)), 0));
- #define __libc_rwlock_wrlock(NAME) \
- (__libc_maybe_call (__pthread_rwlock_wrlock, (&(NAME)), 0));
- /* Lock the recursive named lock variable. */
- #define __libc_lock_lock_recursive(NAME) __libc_lock_lock ((NAME).mutex)
- /* Try to lock the named lock variable. */
- #define __libc_lock_trylock(NAME) \
- (__libc_maybe_call2 (pthread_mutex_trylock, (&(NAME)), 0))
- #define __libc_rwlock_tryrdlock(NAME) \
- (__libc_maybe_call (__pthread_rwlock_tryrdlock, (&(NAME)), 0))
- #define __libc_rwlock_trywrlock(NAME) \
- (__libc_maybe_call (__pthread_rwlock_trywrlock, (&(NAME)), 0))
- /* Try to lock the recursive named lock variable. */
- #define __libc_lock_trylock_recursive(NAME) __libc_lock_trylock ((NAME).mutex)
- #define __rtld_lock_trylock_recursive(NAME) \
- __libc_lock_trylock_recursive (NAME)
- /* Unlock the named lock variable. */
- #define __libc_lock_unlock(NAME) \
- (__libc_maybe_call2 (pthread_mutex_unlock, (&(NAME)), 0));
- #define __libc_rwlock_unlock(NAME) \
- (__libc_maybe_call (__pthread_rwlock_unlock, (&(NAME)), 0));
- /* Unlock the recursive named lock variable. */
- #define __libc_lock_unlock_recursive(NAME) __libc_lock_unlock ((NAME).mutex)
- /* Define once control variable. */
- #if PTHREAD_ONCE_INIT == 0
- /* Special case for static variables where we can avoid the initialization
- if it is zero. */
- # define __libc_once_define(CLASS, NAME) \
- CLASS pthread_once_t NAME
- #else
- # define __libc_once_define(CLASS, NAME) \
- CLASS pthread_once_t NAME = PTHREAD_ONCE_INIT
- #endif
- /* Call handler iff the first call. */
- #define __libc_once(ONCE_CONTROL, INIT_FUNCTION) \
- do { \
- if (__pthread_once != NULL) \
- __pthread_once (&(ONCE_CONTROL), (INIT_FUNCTION)); \
- else if ((ONCE_CONTROL) == PTHREAD_ONCE_INIT) { \
- INIT_FUNCTION (); \
- (ONCE_CONTROL) = !PTHREAD_ONCE_INIT; \
- } \
- } while (0)
- /* Start critical region with cleanup. */
- #define __libc_cleanup_region_start(DOIT, FCT, ARG) \
- { struct _pthread_cleanup_buffer _buffer; \
- int _avail = (DOIT) && _pthread_cleanup_push_defer != NULL; \
- if (_avail) { \
- _pthread_cleanup_push_defer (&_buffer, (FCT), (ARG)); \
- }
- /* End critical region with cleanup. */
- #define __libc_cleanup_region_end(DOIT) \
- if (_avail) { \
- _pthread_cleanup_pop_restore (&_buffer, (DOIT)); \
- } \
- }
- /* Sometimes we have to exit the block in the middle. */
- #define __libc_cleanup_end(DOIT) \
- if (_avail) { \
- _pthread_cleanup_pop_restore (&_buffer, (DOIT)); \
- }
- #if 0
- #define __libc_cleanup_push(fct, arg) \
- { struct _pthread_cleanup_buffer _buffer; \
- __libc_maybe_call (_pthread_cleanup_push, (&_buffer, (fct), (arg)), 0)
- #define __libc_cleanup_pop(execute) \
- __libc_maybe_call (_pthread_cleanup_pop, (&_buffer, execute), 0); \
- }
- #endif
- /* Create thread-specific key. */
- #define __libc_key_create(KEY, DESTRUCTOR) \
- (__libc_maybe_call (__pthread_key_create, (KEY, DESTRUCTOR), 1))
- /* Get thread-specific data. */
- #define __libc_getspecific(KEY) \
- (__libc_maybe_call (__pthread_getspecific, (KEY), NULL))
- /* Set thread-specific data. */
- #define __libc_setspecific(KEY, VALUE) \
- (__libc_maybe_call (__pthread_setspecific, (KEY, VALUE), 0))
- /* Register handlers to execute before and after `fork'. */
- #define __libc_atfork(PREPARE, PARENT, CHILD) \
- (__libc_maybe_call (__pthread_atfork, (PREPARE, PARENT, CHILD), 0))
- /* Functions that are used by this file and are internal to the GNU C
- library. */
- extern int __pthread_mutex_init (pthread_mutex_t *__mutex,
- const pthread_mutexattr_t *__mutex_attr);
- extern int __pthread_mutex_destroy (pthread_mutex_t *__mutex);
- extern int __pthread_mutex_trylock (pthread_mutex_t *__mutex);
- extern int __pthread_mutex_lock (pthread_mutex_t *__mutex);
- extern int __pthread_mutex_unlock (pthread_mutex_t *__mutex);
- extern int __pthread_mutexattr_init (pthread_mutexattr_t *__attr);
- extern int __pthread_mutexattr_destroy (pthread_mutexattr_t *__attr);
- extern int __pthread_mutexattr_settype (pthread_mutexattr_t *__attr,
- int __kind);
- #ifdef __USE_UNIX98
- extern int __pthread_rwlock_init (pthread_rwlock_t *__rwlock,
- const pthread_rwlockattr_t *__attr);
- extern int __pthread_rwlock_destroy (pthread_rwlock_t *__rwlock);
- extern int __pthread_rwlock_rdlock (pthread_rwlock_t *__rwlock);
- extern int __pthread_rwlock_tryrdlock (pthread_rwlock_t *__rwlock);
- extern int __pthread_rwlock_wrlock (pthread_rwlock_t *__rwlock);
- extern int __pthread_rwlock_trywrlock (pthread_rwlock_t *__rwlock);
- extern int __pthread_rwlock_unlock (pthread_rwlock_t *__rwlock);
- #endif
- extern int __pthread_key_create (pthread_key_t *__key,
- void (*__destr_function) (void *));
- extern int __pthread_setspecific (pthread_key_t __key,
- const void *__pointer);
- extern void *__pthread_getspecific (pthread_key_t __key);
- extern int __pthread_once (pthread_once_t *__once_control,
- void (*__init_routine) (void));
- extern int __pthread_atfork (void (*__prepare) (void),
- void (*__parent) (void),
- void (*__child) (void));
- /* We need portable names for some functions. E.g., when they are
- used as argument to __libc_cleanup_region_start. */
- #define __libc_mutex_unlock __pthread_mutex_unlock
- #endif /* bits/libc-lock.h */
|