ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/BDB/xthread.h
(Generate patch)

Comparing BDB/xthread.h (file contents):
Revision 1.5 by root, Sat Apr 12 23:33:16 2008 UTC vs.
Revision 1.8 by root, Tue Jul 29 03:33:16 2008 UTC

1#ifndef XTHREAD_H_
2#define XTHREAD_H_
3
1/* wether word reads are potentially non-atomic. 4/* whether word reads are potentially non-atomic.
2 * this is conservatice, likely most arches this runs 5 * this is conservatice, likely most arches this runs
3 * on have atomic word read/writes. 6 * on have atomic word read/writes.
4 */ 7 */
5#ifndef WORDACCESS_UNSAFE 8#ifndef WORDACCESS_UNSAFE
6# if __i386 || __x86_64 9# if __i386 || __x86_64
32#define sigemptyset(s) 35#define sigemptyset(s)
33#define sigfillset(s) 36#define sigfillset(s)
34 37
35typedef pthread_mutex_t mutex_t; 38typedef pthread_mutex_t mutex_t;
36#define X_MUTEX_INIT PTHREAD_MUTEX_INITIALIZER 39#define X_MUTEX_INIT PTHREAD_MUTEX_INITIALIZER
37#define X_MUTEX_CHECK(mutex)
38#define X_LOCK(mutex) pthread_mutex_lock (&(mutex)) 40#define X_LOCK(mutex) pthread_mutex_lock (&(mutex))
39#define X_UNLOCK(mutex) pthread_mutex_unlock (&(mutex)) 41#define X_UNLOCK(mutex) pthread_mutex_unlock (&(mutex))
40 42
41typedef pthread_cond_t cond_t; 43typedef pthread_cond_t cond_t;
42#define X_COND_INIT PTHREAD_COND_INITIALIZER 44#define X_COND_INIT PTHREAD_COND_INITIALIZER
43#define X_COND_CHECK(cond)
44#define X_COND_SIGNAL(cond) pthread_cond_signal (&(cond)) 45#define X_COND_SIGNAL(cond) pthread_cond_signal (&(cond))
45#define X_COND_WAIT(cond,mutex) pthread_cond_wait (&(cond), &(mutex)) 46#define X_COND_WAIT(cond,mutex) pthread_cond_wait (&(cond), &(mutex))
46#define X_COND_TIMEDWAIT(cond,mutex,to) pthread_cond_timedwait (&(cond), &(mutex), &(to)) 47#define X_COND_TIMEDWAIT(cond,mutex,to) pthread_cond_timedwait (&(cond), &(mutex), &(to))
47 48
48typedef pthread_t thread_t; 49typedef pthread_t thread_t;
50#define X_THREAD_ATFORK(a,b,c) 51#define X_THREAD_ATFORK(a,b,c)
51 52
52static int 53static int
53thread_create (thread_t *tid, void *(*proc)(void *), void *arg) 54thread_create (thread_t *tid, void *(*proc)(void *), void *arg)
54{ 55{
56 int retval;
55 pthread_attr_t attr; 57 pthread_attr_t attr;
56 58
57 pthread_attr_init (&attr); 59 pthread_attr_init (&attr);
58 pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED); 60 pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED);
59 61
60 return pthread_create (tid, &attr, proc, arg) == 0; 62 retval = pthread_create (tid, &attr, proc, arg) == 0;
63
64 pthread_attr_destroy (&attr);
65
66 return retval;
61} 67}
62 68
63#define respipe_read(a,b,c) PerlSock_recv ((a), (b), (c), 0) 69#define respipe_read(a,b,c) PerlSock_recv ((a), (b), (c), 0)
64#define respipe_write(a,b,c) send ((a), (b), (c), 0) 70#define respipe_write(a,b,c) send ((a), (b), (c), 0)
65#define respipe_close(a) PerlSock_closesocket ((a)) 71#define respipe_close(a) PerlSock_closesocket ((a))
66 72
67#else 73#else
68///////////////////////////////////////////////////////////////////////////// 74/////////////////////////////////////////////////////////////////////////////
69 75
70/* solaris */
71#define _POSIX_PTHREAD_SEMANTICS 1
72
73#if __linux && !defined(_GNU_SOURCE) 76#if __linux && !defined(_GNU_SOURCE)
74# define _GNU_SOURCE 77# define _GNU_SOURCE
75#endif 78#endif
76 79
77/* just in case */ 80/* just in case */
78#define _REENTRANT 1 81#define _REENTRANT 1
82
83#if __solaris
84# define _POSIX_PTHREAD_SEMANTICS 1
85/* try to bribe solaris headers into providing a current pthread API
86 * despite environment being configured for an older version.
87 */
88# define __EXTENSIONS__ 1
89#endif
79 90
80#include <unistd.h> 91#include <unistd.h>
81#include <fcntl.h> 92#include <fcntl.h>
82#include <signal.h> 93#include <signal.h>
83#include <limits.h> 94#include <limits.h>
100 111
101typedef pthread_t thread_t; 112typedef pthread_t thread_t;
102#define X_THREAD_PROC(name) static void *name (void *thr_arg) 113#define X_THREAD_PROC(name) static void *name (void *thr_arg)
103#define X_THREAD_ATFORK(prepare,parent,child) pthread_atfork (prepare, parent, child) 114#define X_THREAD_ATFORK(prepare,parent,child) pthread_atfork (prepare, parent, child)
104 115
116// the broken bsd's once more
117#ifndef PTHREAD_STACK_MIN
118# define PTHREAD_STACK_MIN 0
119#endif
120
121#ifndef X_STACKSIZE
122# define X_STACKSIZE sizeof (long) * 4096
123#endif
124
105static int 125static int
106thread_create (thread_t *tid, void *(*proc)(void *), void *arg) 126thread_create (thread_t *tid, void *(*proc)(void *), void *arg)
107{ 127{
108 int retval; 128 int retval;
109 sigset_t fullsigset, oldsigset; 129 sigset_t fullsigset, oldsigset;
110 pthread_attr_t attr; 130 pthread_attr_t attr;
111 131
112 pthread_attr_init (&attr); 132 pthread_attr_init (&attr);
113 pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED); 133 pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED);
114 pthread_attr_setstacksize (&attr, PTHREAD_STACK_MIN < sizeof (long) * 4096 134 pthread_attr_setstacksize (&attr, PTHREAD_STACK_MIN < X_STACKSIZE ? X_STACKSIZE : PTHREAD_STACK_MIN);
115 ? sizeof (long) * 4096 : PTHREAD_STACK_MIN);
116#ifdef PTHREAD_SCOPE_PROCESS 135#ifdef PTHREAD_SCOPE_PROCESS
117 pthread_attr_setscope (&attr, PTHREAD_SCOPE_PROCESS); 136 pthread_attr_setscope (&attr, PTHREAD_SCOPE_PROCESS);
118#endif 137#endif
119 138
120 sigfillset (&fullsigset); 139 sigfillset (&fullsigset);
121 140
122 pthread_sigmask (SIG_SETMASK, &fullsigset, &oldsigset); 141 pthread_sigmask (SIG_SETMASK, &fullsigset, &oldsigset);
123 retval = pthread_create (tid, &attr, proc, arg) == 0; 142 retval = pthread_create (tid, &attr, proc, arg) == 0;
124 pthread_sigmask (SIG_SETMASK, &oldsigset, 0); 143 pthread_sigmask (SIG_SETMASK, &oldsigset, 0);
125 144
145 pthread_attr_destroy (&attr);
146
126 return retval; 147 return retval;
127} 148}
128 149
129#define respipe_read(a,b,c) read ((a), (b), (c)) 150#define respipe_read(a,b,c) read ((a), (b), (c))
130#define respipe_write(a,b,c) write ((a), (b), (c)) 151#define respipe_write(a,b,c) write ((a), (b), (c))
131#define respipe_close(a) close ((a)) 152#define respipe_close(a) close ((a))
132 153
133#endif 154#endif
134 155
156#endif
135 157
136

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines