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

Comparing BDB/xthread.h (file contents):
Revision 1.1 by root, Sat May 12 21:18:13 2007 UTC vs.
Revision 1.9 by root, Wed Mar 31 00:44:51 2010 UTC

1/* solaris */ 1#ifndef XTHREAD_H_
2#define _POSIX_PTHREAD_SEMANTICS 1 2#define XTHREAD_H_
3 3
4#if __linux && !defined(_GNU_SOURCE)
5# define _GNU_SOURCE
6#endif
7
8/* just in case */
9#define _REENTRANT 1
10
11#include <signal.h>
12#include <pthread.h>
13
14#ifndef PTHREAD_STACK_MIN
15/* care for broken platforms, e.g. windows */
16# define PTHREAD_STACK_MIN 16384
17#endif
18
19#if __ia64
20# define STACKSIZE 65536
21#elif __i386 || __x86_64 /* 16k is unreasonably high :( */
22# define STACKSIZE PTHREAD_STACK_MIN
23#else
24# define STACKSIZE 16384
25#endif
26
27/* wether word reads are potentially non-atomic. 4/* whether word reads are potentially non-atomic.
28 * this is conservatice, likely most arches this runs 5 * this is conservatice, likely most arches this runs
29 * on have atomic word read/writes. 6 * on have atomic word read/writes.
30 */ 7 */
31#ifndef WORDACCESS_UNSAFE 8#ifndef WORDACCESS_UNSAFE
32# if __i386 || __x86_64 9# if __i386 || __x86_64
34# else 11# else
35# define WORDACCESS_UNSAFE 1 12# define WORDACCESS_UNSAFE 1
36# endif 13# endif
37#endif 14#endif
38 15
16/////////////////////////////////////////////////////////////////////////////
17
18#ifdef _WIN32
19typedef int ssize_t;
20
21#define NTDDI_VERSION NTDDI_WIN2K // needed to get win2000 api calls
22#define _WIN32_WINNT 0x400
23#include <stdio.h>//D
24#include <fcntl.h>
25#include <io.h>
26#include <time.h>
27#include <winsock2.h>
28#include <process.h>
29#include <windows.h>
30#include <pthread.h>
31#define sigset_t int
32#define sigfillset(a)
33#define pthread_sigmask(a,b,c)
34#define sigaddset(a,b)
35#define sigemptyset(s)
36#define sigfillset(s)
37
39typedef pthread_mutex_t mutex_t; 38typedef pthread_mutex_t xmutex_t;
40#if __linux && defined (PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP)
41# define MUTEX_INIT PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP 39#define X_MUTEX_INIT PTHREAD_MUTEX_INITIALIZER
40#define X_LOCK(mutex) pthread_mutex_lock (&(mutex))
41#define X_UNLOCK(mutex) pthread_mutex_unlock (&(mutex))
42
43typedef pthread_cond_t xcond_t;
44#define X_COND_INIT PTHREAD_COND_INITIALIZER
45#define X_COND_SIGNAL(cond) pthread_cond_signal (&(cond))
46#define X_COND_WAIT(cond,mutex) pthread_cond_wait (&(cond), &(mutex))
47#define X_COND_TIMEDWAIT(cond,mutex,to) pthread_cond_timedwait (&(cond), &(mutex), &(to))
48
49typedef pthread_t xthread_t;
50#define X_THREAD_PROC(name) void *name (void *thr_arg)
51#define X_THREAD_ATFORK(a,b,c)
52
53static int
54thread_create (xthread_t *tid, void *(*proc)(void *), void *arg)
55{
56 int retval;
57 pthread_attr_t attr;
58
59 pthread_attr_init (&attr);
60 pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED);
61
62 retval = pthread_create (tid, &attr, proc, arg) == 0;
63
64 pthread_attr_destroy (&attr);
65
66 return retval;
67}
68
69#define respipe_read(a,b,c) PerlSock_recv ((a), (b), (c), 0)
70#define respipe_write(a,b,c) send ((a), (b), (c), 0)
71#define respipe_close(a) PerlSock_closesocket ((a))
72
42#else 73#else
43# define MUTEX_INIT PTHREAD_MUTEX_INITIALIZER 74/////////////////////////////////////////////////////////////////////////////
75
76#if __linux && !defined(_GNU_SOURCE)
77# define _GNU_SOURCE
44#endif 78#endif
45 79
46typedef pthread_cond_t cond_t; 80/* just in case */
47#define COND_INIT PTHREAD_COND_INITIALIZER 81#define _REENTRANT 1
48 82
49#define LOCK(mutex) pthread_mutex_lock (&(mutex)) 83#if __solaris
50#define UNLOCK(mutex) pthread_mutex_unlock (&(mutex)) 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
51 90
52#define COND_SIGNAL(cond) pthread_cond_signal (&(cond)) 91#include <unistd.h>
53#define COND_WAIT(cond,mutex) pthread_cond_wait (&(cond), &(mutex)) 92#include <fcntl.h>
54#define COND_TIMEDWAIT(cond,mutex,to) pthread_cond_timedwait (&(cond), &(mutex), &(to)) 93#include <signal.h>
94#include <limits.h>
95#include <pthread.h>
55 96
56typedef pthread_t thread_t; 97typedef pthread_mutex_t xmutex_t;
98#if __linux && defined (PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP)
99# define X_MUTEX_INIT PTHREAD_ADAPTIVE_MUTEX_INITIALIZER_NP
100#else
101# define X_MUTEX_INIT PTHREAD_MUTEX_INITIALIZER
102#endif
103#define X_LOCK(mutex) pthread_mutex_lock (&(mutex))
104#define X_UNLOCK(mutex) pthread_mutex_unlock (&(mutex))
57 105
106typedef pthread_cond_t xcond_t;
107#define X_COND_INIT PTHREAD_COND_INITIALIZER
108#define X_COND_SIGNAL(cond) pthread_cond_signal (&(cond))
109#define X_COND_WAIT(cond,mutex) pthread_cond_wait (&(cond), &(mutex))
110#define X_COND_TIMEDWAIT(cond,mutex,to) pthread_cond_timedwait (&(cond), &(mutex), &(to))
111
112typedef pthread_t xthread_t;
113#define X_THREAD_PROC(name) static void *name (void *thr_arg)
114#define X_THREAD_ATFORK(prepare,parent,child) pthread_atfork (prepare, parent, child)
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
125static int
58static int thread_create (thread_t *tid, void *(*proc)(void *), void *arg) 126thread_create (xthread_t *tid, void *(*proc)(void *), void *arg)
59{ 127{
60 int retval; 128 int retval;
61 sigset_t fullsigset, oldsigset; 129 sigset_t fullsigset, oldsigset;
62 pthread_attr_t attr; 130 pthread_attr_t attr;
63 131
64 pthread_attr_init (&attr); 132 pthread_attr_init (&attr);
65 pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED); 133 pthread_attr_setdetachstate (&attr, PTHREAD_CREATE_DETACHED);
134 pthread_attr_setstacksize (&attr, PTHREAD_STACK_MIN < X_STACKSIZE ? X_STACKSIZE : PTHREAD_STACK_MIN);
66#ifdef PTHREAD_SCOPE_PROCESS 135#ifdef PTHREAD_SCOPE_PROCESS
67 pthread_attr_setscope (&attr, PTHREAD_SCOPE_PROCESS); 136 pthread_attr_setscope (&attr, PTHREAD_SCOPE_PROCESS);
68#endif 137#endif
69 138
70 sigfillset (&fullsigset); 139 sigfillset (&fullsigset);
71 140
72 pthread_sigmask (SIG_SETMASK, &fullsigset, &oldsigset); 141 pthread_sigmask (SIG_SETMASK, &fullsigset, &oldsigset);
73 retval = pthread_create (tid, &attr, proc, arg) == 0; 142 retval = pthread_create (tid, &attr, proc, arg) == 0;
74 pthread_sigmask (SIG_SETMASK, &oldsigset, 0); 143 pthread_sigmask (SIG_SETMASK, &oldsigset, 0);
75 144
145 pthread_attr_destroy (&attr);
146
76 return retval; 147 return retval;
77} 148}
78 149
79#define ATFORK(prepare,parent,child) pthread_atfork (prepare, parent, child) 150#define respipe_read(a,b,c) read ((a), (b), (c))
151#define respipe_write(a,b,c) write ((a), (b), (c))
152#define respipe_close(a) close ((a))
80 153
154#endif
155
156#endif
157

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines