Guido van Rossum | 34679b7 | 1993-01-26 13:33:44 +0000 | [diff] [blame] | 1 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 2 | /* Thread package. |
| 3 | This is intended to be usable independently from Python. |
| 4 | The implementation for system foobar is in a file thread_foobar.h |
| 5 | which is included by this file dependent on config settings. |
| 6 | Stuff shared by all thread_*.h files is collected here. */ |
| 7 | |
Martin v. Löwis | cdc4451 | 2002-01-12 11:05:12 +0000 | [diff] [blame] | 8 | #include "Python.h" |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 9 | |
Guido van Rossum | 2571cc8 | 1999-04-07 16:07:23 +0000 | [diff] [blame] | 10 | #ifndef DONT_HAVE_STDIO_H |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 11 | #include <stdio.h> |
Guido van Rossum | 2571cc8 | 1999-04-07 16:07:23 +0000 | [diff] [blame] | 12 | #endif |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 13 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 14 | #include <stdlib.h> |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 15 | |
Guido van Rossum | d11bfdd | 1997-04-29 21:48:34 +0000 | [diff] [blame] | 16 | #ifdef __sgi |
| 17 | #ifndef HAVE_PTHREAD_H /* XXX Need to check in configure.in */ |
| 18 | #undef _POSIX_THREADS |
| 19 | #endif |
| 20 | #endif |
| 21 | |
Guido van Rossum | 49b5606 | 1998-10-01 20:42:43 +0000 | [diff] [blame] | 22 | #include "pythread.h" |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 23 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 24 | #ifndef _POSIX_THREADS |
| 25 | |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 26 | #ifdef __sgi |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 27 | #define SGI_THREADS |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 28 | #endif |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 29 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 30 | #ifdef HAVE_THREAD_H |
| 31 | #define SOLARIS_THREADS |
| 32 | #endif |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 33 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 34 | #if defined(sun) && !defined(SOLARIS_THREADS) |
| 35 | #define SUN_LWP |
| 36 | #endif |
| 37 | |
Sjoerd Mullender | 66bca32 | 1993-12-03 16:54:45 +0000 | [diff] [blame] | 38 | #endif /* _POSIX_THREADS */ |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 39 | |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 40 | |
Guido van Rossum | 408027e | 1996-12-30 16:17:54 +0000 | [diff] [blame] | 41 | #ifdef Py_DEBUG |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 42 | static int thread_debug = 0; |
Jeremy Hylton | bd23289 | 2002-06-25 19:26:34 +0000 | [diff] [blame] | 43 | #define dprintf(args) (void)((thread_debug & 1) && printf args) |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 44 | #define d2printf(args) ((thread_debug & 8) && printf args) |
| 45 | #else |
| 46 | #define dprintf(args) |
| 47 | #define d2printf(args) |
| 48 | #endif |
| 49 | |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 50 | static int initialized; |
| 51 | |
Thomas Wouters | 8ec68fd | 2000-07-24 14:39:50 +0000 | [diff] [blame] | 52 | static void PyThread__init_thread(void); /* Forward */ |
Sjoerd Mullender | aee8bc1 | 1992-09-02 11:25:37 +0000 | [diff] [blame] | 53 | |
Thomas Wouters | f70ef4f | 2000-07-22 18:47:25 +0000 | [diff] [blame] | 54 | void PyThread_init_thread(void) |
Sjoerd Mullender | aee8bc1 | 1992-09-02 11:25:37 +0000 | [diff] [blame] | 55 | { |
Guido van Rossum | 408027e | 1996-12-30 16:17:54 +0000 | [diff] [blame] | 56 | #ifdef Py_DEBUG |
Sjoerd Mullender | 66bca32 | 1993-12-03 16:54:45 +0000 | [diff] [blame] | 57 | char *p = getenv("THREADDEBUG"); |
| 58 | |
| 59 | if (p) { |
| 60 | if (*p) |
| 61 | thread_debug = atoi(p); |
| 62 | else |
| 63 | thread_debug = 1; |
| 64 | } |
Guido van Rossum | 408027e | 1996-12-30 16:17:54 +0000 | [diff] [blame] | 65 | #endif /* Py_DEBUG */ |
Sjoerd Mullender | aee8bc1 | 1992-09-02 11:25:37 +0000 | [diff] [blame] | 66 | if (initialized) |
| 67 | return; |
| 68 | initialized = 1; |
Guido van Rossum | 65d5b57 | 1998-12-21 19:32:43 +0000 | [diff] [blame] | 69 | dprintf(("PyThread_init_thread called\n")); |
| 70 | PyThread__init_thread(); |
Sjoerd Mullender | aee8bc1 | 1992-09-02 11:25:37 +0000 | [diff] [blame] | 71 | } |
| 72 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 73 | #ifdef SGI_THREADS |
| 74 | #include "thread_sgi.h" |
Sjoerd Mullender | 66bca32 | 1993-12-03 16:54:45 +0000 | [diff] [blame] | 75 | #endif |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 76 | |
| 77 | #ifdef SOLARIS_THREADS |
| 78 | #include "thread_solaris.h" |
| 79 | #endif |
| 80 | |
| 81 | #ifdef SUN_LWP |
| 82 | #include "thread_lwp.h" |
| 83 | #endif |
| 84 | |
Guido van Rossum | 9e8181b | 2000-09-19 00:46:46 +0000 | [diff] [blame] | 85 | #ifdef HAVE_PTH |
Guido van Rossum | 07bd90e | 2000-05-08 13:41:38 +0000 | [diff] [blame] | 86 | #include "thread_pth.h" |
Martin v. Löwis | 70849f8 | 2003-09-20 11:13:36 +0000 | [diff] [blame] | 87 | #undef _POSIX_THREADS |
Guido van Rossum | 9e8181b | 2000-09-19 00:46:46 +0000 | [diff] [blame] | 88 | #endif |
| 89 | |
Sjoerd Mullender | 66bca32 | 1993-12-03 16:54:45 +0000 | [diff] [blame] | 90 | #ifdef _POSIX_THREADS |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 91 | #include "thread_pthread.h" |
Sjoerd Mullender | e893412 | 1993-01-13 12:08:48 +0000 | [diff] [blame] | 92 | #endif |
Guido van Rossum | f9f2e82 | 1992-08-17 08:59:08 +0000 | [diff] [blame] | 93 | |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 94 | #ifdef C_THREADS |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 95 | #include "thread_cthread.h" |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 96 | #endif |
Guido van Rossum | f9f2e82 | 1992-08-17 08:59:08 +0000 | [diff] [blame] | 97 | |
Guido van Rossum | c3f82b6 | 1995-01-17 16:29:31 +0000 | [diff] [blame] | 98 | #ifdef NT_THREADS |
| 99 | #include "thread_nt.h" |
| 100 | #endif |
| 101 | |
Guido van Rossum | 8e9ebfd | 1997-11-22 21:53:48 +0000 | [diff] [blame] | 102 | #ifdef OS2_THREADS |
| 103 | #include "thread_os2.h" |
| 104 | #endif |
| 105 | |
Guido van Rossum | 1a8791e | 1998-08-04 22:46:29 +0000 | [diff] [blame] | 106 | #ifdef BEOS_THREADS |
| 107 | #include "thread_beos.h" |
| 108 | #endif |
| 109 | |
Guido van Rossum | 2571cc8 | 1999-04-07 16:07:23 +0000 | [diff] [blame] | 110 | #ifdef WINCE_THREADS |
| 111 | #include "thread_wince.h" |
| 112 | #endif |
| 113 | |
Martin v. Löwis | 7d1cd69 | 2002-03-09 12:10:54 +0000 | [diff] [blame] | 114 | #ifdef PLAN9_THREADS |
| 115 | #include "thread_plan9.h" |
| 116 | #endif |
| 117 | |
Martin v. Löwis | f90ae20 | 2002-06-11 06:22:31 +0000 | [diff] [blame] | 118 | #ifdef ATHEOS_THREADS |
| 119 | #include "thread_atheos.h" |
| 120 | #endif |
| 121 | |
Guido van Rossum | f9f2e82 | 1992-08-17 08:59:08 +0000 | [diff] [blame] | 122 | /* |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 123 | #ifdef FOOBAR_THREADS |
| 124 | #include "thread_foobar.h" |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 125 | #endif |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 126 | */ |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 127 | |
| 128 | #ifndef Py_HAVE_NATIVE_TLS |
| 129 | /* If the platform has not supplied a platform specific |
| 130 | TLS implementation, provide our own. |
| 131 | |
| 132 | This code stolen from "thread_sgi.h", where it was the only |
| 133 | implementation of an existing Python TLS API. |
| 134 | */ |
| 135 | /* |
| 136 | * Per-thread data ("key") support. |
| 137 | */ |
| 138 | |
| 139 | struct key { |
| 140 | struct key *next; |
| 141 | long id; |
| 142 | int key; |
| 143 | void *value; |
| 144 | }; |
| 145 | |
| 146 | static struct key *keyhead = NULL; |
| 147 | static int nkeys = 0; |
| 148 | static PyThread_type_lock keymutex = NULL; |
| 149 | |
| 150 | static struct key *find_key(int key, void *value) |
| 151 | { |
| 152 | struct key *p; |
| 153 | long id = PyThread_get_thread_ident(); |
| 154 | for (p = keyhead; p != NULL; p = p->next) { |
| 155 | if (p->id == id && p->key == key) |
| 156 | return p; |
| 157 | } |
| 158 | if (value == NULL) |
| 159 | return NULL; |
| 160 | p = (struct key *)malloc(sizeof(struct key)); |
| 161 | if (p != NULL) { |
| 162 | p->id = id; |
| 163 | p->key = key; |
| 164 | p->value = value; |
| 165 | PyThread_acquire_lock(keymutex, 1); |
| 166 | p->next = keyhead; |
| 167 | keyhead = p; |
| 168 | PyThread_release_lock(keymutex); |
| 169 | } |
| 170 | return p; |
| 171 | } |
| 172 | |
| 173 | int PyThread_create_key(void) |
| 174 | { |
| 175 | if (keymutex == NULL) |
| 176 | keymutex = PyThread_allocate_lock(); |
| 177 | return ++nkeys; |
| 178 | } |
| 179 | |
| 180 | void PyThread_delete_key(int key) |
| 181 | { |
| 182 | struct key *p, **q; |
| 183 | PyThread_acquire_lock(keymutex, 1); |
| 184 | q = &keyhead; |
| 185 | while ((p = *q) != NULL) { |
| 186 | if (p->key == key) { |
| 187 | *q = p->next; |
| 188 | free((void *)p); |
| 189 | /* NB This does *not* free p->value! */ |
| 190 | } |
| 191 | else |
| 192 | q = &p->next; |
| 193 | } |
| 194 | PyThread_release_lock(keymutex); |
| 195 | } |
| 196 | |
| 197 | int PyThread_set_key_value(int key, void *value) |
| 198 | { |
| 199 | struct key *p = find_key(key, value); |
| 200 | if (p == NULL) |
| 201 | return -1; |
| 202 | else |
| 203 | return 0; |
| 204 | } |
| 205 | |
| 206 | void *PyThread_get_key_value(int key) |
| 207 | { |
| 208 | struct key *p = find_key(key, NULL); |
| 209 | if (p == NULL) |
| 210 | return NULL; |
| 211 | else |
| 212 | return p->value; |
| 213 | } |
| 214 | |
| 215 | void PyThread_delete_key_value(int key) |
| 216 | { |
| 217 | long id = PyThread_get_thread_ident(); |
| 218 | struct key *p, **q; |
| 219 | PyThread_acquire_lock(keymutex, 1); |
| 220 | q = &keyhead; |
| 221 | while ((p = *q) != NULL) { |
| 222 | if (p->key == key && p->id == id) { |
| 223 | *q = p->next; |
| 224 | free((void *)p); |
| 225 | /* NB This does *not* free p->value! */ |
| 226 | break; |
| 227 | } |
| 228 | else |
| 229 | q = &p->next; |
| 230 | } |
| 231 | PyThread_release_lock(keymutex); |
| 232 | } |
| 233 | |
| 234 | #endif /* Py_HAVE_NATIVE_TLS */ |