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 | |
Matthias Klose | a2542be | 2004-08-16 11:35:51 +0000 | [diff] [blame] | 10 | |
| 11 | #ifndef _POSIX_THREADS |
| 12 | /* This means pthreads are not implemented in libc headers, hence the macro |
| 13 | not present in unistd.h. But they still can be implemented as an external |
| 14 | library (e.g. gnu pth in pthread emulation) */ |
| 15 | # ifdef HAVE_PTHREAD_H |
| 16 | # include <pthread.h> /* _POSIX_THREADS */ |
| 17 | # endif |
| 18 | #endif |
| 19 | |
Guido van Rossum | 2571cc8 | 1999-04-07 16:07:23 +0000 | [diff] [blame] | 20 | #ifndef DONT_HAVE_STDIO_H |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 21 | #include <stdio.h> |
Guido van Rossum | 2571cc8 | 1999-04-07 16:07:23 +0000 | [diff] [blame] | 22 | #endif |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 23 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 24 | #include <stdlib.h> |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 25 | |
Guido van Rossum | 49b5606 | 1998-10-01 20:42:43 +0000 | [diff] [blame] | 26 | #include "pythread.h" |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 27 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 28 | #ifndef _POSIX_THREADS |
| 29 | |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 30 | #ifdef __sgi |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 31 | #define SGI_THREADS |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 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 | #ifdef HAVE_THREAD_H |
| 35 | #define SOLARIS_THREADS |
| 36 | #endif |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 37 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 38 | #if defined(sun) && !defined(SOLARIS_THREADS) |
| 39 | #define SUN_LWP |
| 40 | #endif |
| 41 | |
Guido van Rossum | 539c662 | 2005-09-14 17:49:54 +0000 | [diff] [blame] | 42 | /* Check if we're running on HP-UX and _SC_THREADS is defined. If so, then |
| 43 | enough of the Posix threads package is implimented to support python |
| 44 | threads. |
| 45 | |
| 46 | This is valid for HP-UX 11.23 running on an ia64 system. If needed, add |
| 47 | a check of __ia64 to verify that we're running on a ia64 system instead |
| 48 | of a pa-risc system. |
| 49 | */ |
| 50 | #ifdef __hpux |
| 51 | #ifdef _SC_THREADS |
| 52 | #define _POSIX_THREADS |
| 53 | #endif |
| 54 | #endif |
| 55 | |
Sjoerd Mullender | 66bca32 | 1993-12-03 16:54:45 +0000 | [diff] [blame] | 56 | #endif /* _POSIX_THREADS */ |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 57 | |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 58 | |
Guido van Rossum | 408027e | 1996-12-30 16:17:54 +0000 | [diff] [blame] | 59 | #ifdef Py_DEBUG |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 60 | static int thread_debug = 0; |
Jeremy Hylton | bd23289 | 2002-06-25 19:26:34 +0000 | [diff] [blame] | 61 | #define dprintf(args) (void)((thread_debug & 1) && printf args) |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 62 | #define d2printf(args) ((thread_debug & 8) && printf args) |
| 63 | #else |
| 64 | #define dprintf(args) |
| 65 | #define d2printf(args) |
| 66 | #endif |
| 67 | |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 68 | static int initialized; |
| 69 | |
Thomas Wouters | 8ec68fd | 2000-07-24 14:39:50 +0000 | [diff] [blame] | 70 | static void PyThread__init_thread(void); /* Forward */ |
Sjoerd Mullender | aee8bc1 | 1992-09-02 11:25:37 +0000 | [diff] [blame] | 71 | |
Thomas Wouters | 73e5a5b | 2006-06-08 15:35:45 +0000 | [diff] [blame] | 72 | void |
| 73 | PyThread_init_thread(void) |
Sjoerd Mullender | aee8bc1 | 1992-09-02 11:25:37 +0000 | [diff] [blame] | 74 | { |
Guido van Rossum | 408027e | 1996-12-30 16:17:54 +0000 | [diff] [blame] | 75 | #ifdef Py_DEBUG |
Christian Heimes | 790c823 | 2008-01-07 21:14:23 +0000 | [diff] [blame] | 76 | char *p = Py_GETENV("PYTHONTHREADDEBUG"); |
Sjoerd Mullender | 66bca32 | 1993-12-03 16:54:45 +0000 | [diff] [blame] | 77 | |
| 78 | if (p) { |
| 79 | if (*p) |
| 80 | thread_debug = atoi(p); |
| 81 | else |
| 82 | thread_debug = 1; |
| 83 | } |
Guido van Rossum | 408027e | 1996-12-30 16:17:54 +0000 | [diff] [blame] | 84 | #endif /* Py_DEBUG */ |
Sjoerd Mullender | aee8bc1 | 1992-09-02 11:25:37 +0000 | [diff] [blame] | 85 | if (initialized) |
| 86 | return; |
| 87 | initialized = 1; |
Guido van Rossum | 65d5b57 | 1998-12-21 19:32:43 +0000 | [diff] [blame] | 88 | dprintf(("PyThread_init_thread called\n")); |
| 89 | PyThread__init_thread(); |
Sjoerd Mullender | aee8bc1 | 1992-09-02 11:25:37 +0000 | [diff] [blame] | 90 | } |
| 91 | |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 92 | /* Support for runtime thread stack size tuning. |
| 93 | A value of 0 means using the platform's default stack size |
| 94 | or the size specified by the THREAD_STACK_SIZE macro. */ |
| 95 | static size_t _pythread_stacksize = 0; |
| 96 | |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 97 | #ifdef SGI_THREADS |
Antoine Pitrou | 2a9c2bb | 2009-10-24 20:43:49 +0000 | [diff] [blame] | 98 | #error SGI Irix threads are now unsupported, and code will be removed in 3.3. |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 99 | #include "thread_sgi.h" |
Sjoerd Mullender | 66bca32 | 1993-12-03 16:54:45 +0000 | [diff] [blame] | 100 | #endif |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 101 | |
| 102 | #ifdef SOLARIS_THREADS |
| 103 | #include "thread_solaris.h" |
| 104 | #endif |
| 105 | |
| 106 | #ifdef SUN_LWP |
Antoine Pitrou | 1b8c783 | 2009-10-24 20:30:34 +0000 | [diff] [blame] | 107 | #error SunOS lightweight processes are now unsupported, and code will be removed in 3.3. |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 108 | #include "thread_lwp.h" |
| 109 | #endif |
| 110 | |
Guido van Rossum | 9e8181b | 2000-09-19 00:46:46 +0000 | [diff] [blame] | 111 | #ifdef HAVE_PTH |
Antoine Pitrou | db6c567 | 2009-10-24 20:35:52 +0000 | [diff] [blame] | 112 | #error GNU pth threads are now unsupported, and code will be removed in 3.3. |
Guido van Rossum | 07bd90e | 2000-05-08 13:41:38 +0000 | [diff] [blame] | 113 | #include "thread_pth.h" |
Martin v. Löwis | 70849f8 | 2003-09-20 11:13:36 +0000 | [diff] [blame] | 114 | #undef _POSIX_THREADS |
Guido van Rossum | 9e8181b | 2000-09-19 00:46:46 +0000 | [diff] [blame] | 115 | #endif |
| 116 | |
Sjoerd Mullender | 66bca32 | 1993-12-03 16:54:45 +0000 | [diff] [blame] | 117 | #ifdef _POSIX_THREADS |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 118 | #include "thread_pthread.h" |
Sjoerd Mullender | e893412 | 1993-01-13 12:08:48 +0000 | [diff] [blame] | 119 | #endif |
Guido van Rossum | f9f2e82 | 1992-08-17 08:59:08 +0000 | [diff] [blame] | 120 | |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 121 | #ifdef C_THREADS |
Antoine Pitrou | 86b21c1 | 2009-10-24 20:24:16 +0000 | [diff] [blame] | 122 | #error Mach C Threads are now unsupported, and code will be removed in 3.3. |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 123 | #include "thread_cthread.h" |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 124 | #endif |
Guido van Rossum | f9f2e82 | 1992-08-17 08:59:08 +0000 | [diff] [blame] | 125 | |
Guido van Rossum | c3f82b6 | 1995-01-17 16:29:31 +0000 | [diff] [blame] | 126 | #ifdef NT_THREADS |
| 127 | #include "thread_nt.h" |
| 128 | #endif |
| 129 | |
Guido van Rossum | 8e9ebfd | 1997-11-22 21:53:48 +0000 | [diff] [blame] | 130 | #ifdef OS2_THREADS |
| 131 | #include "thread_os2.h" |
| 132 | #endif |
| 133 | |
Martin v. Löwis | 7d1cd69 | 2002-03-09 12:10:54 +0000 | [diff] [blame] | 134 | #ifdef PLAN9_THREADS |
| 135 | #include "thread_plan9.h" |
| 136 | #endif |
| 137 | |
Guido van Rossum | f9f2e82 | 1992-08-17 08:59:08 +0000 | [diff] [blame] | 138 | /* |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 139 | #ifdef FOOBAR_THREADS |
| 140 | #include "thread_foobar.h" |
Guido van Rossum | 1984f1e | 1992-08-04 12:41:02 +0000 | [diff] [blame] | 141 | #endif |
Guido van Rossum | 1d5735e | 1994-08-30 08:27:36 +0000 | [diff] [blame] | 142 | */ |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 143 | |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 144 | /* return the current thread stack size */ |
| 145 | size_t |
| 146 | PyThread_get_stacksize(void) |
| 147 | { |
| 148 | return _pythread_stacksize; |
| 149 | } |
| 150 | |
| 151 | /* Only platforms defining a THREAD_SET_STACKSIZE() macro |
| 152 | in thread_<platform>.h support changing the stack size. |
| 153 | Return 0 if stack size is valid, |
| 154 | -1 if stack size value is invalid, |
| 155 | -2 if setting stack size is not supported. */ |
| 156 | int |
| 157 | PyThread_set_stacksize(size_t size) |
| 158 | { |
| 159 | #if defined(THREAD_SET_STACKSIZE) |
| 160 | return THREAD_SET_STACKSIZE(size); |
| 161 | #else |
| 162 | return -2; |
| 163 | #endif |
| 164 | } |
| 165 | |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 166 | #ifndef Py_HAVE_NATIVE_TLS |
| 167 | /* If the platform has not supplied a platform specific |
| 168 | TLS implementation, provide our own. |
| 169 | |
| 170 | This code stolen from "thread_sgi.h", where it was the only |
| 171 | implementation of an existing Python TLS API. |
| 172 | */ |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 173 | /* ------------------------------------------------------------------------ |
| 174 | Per-thread data ("key") support. |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 175 | |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 176 | Use PyThread_create_key() to create a new key. This is typically shared |
| 177 | across threads. |
| 178 | |
| 179 | Use PyThread_set_key_value(thekey, value) to associate void* value with |
| 180 | thekey in the current thread. Each thread has a distinct mapping of thekey |
| 181 | to a void* value. Caution: if the current thread already has a mapping |
| 182 | for thekey, value is ignored. |
| 183 | |
| 184 | Use PyThread_get_key_value(thekey) to retrieve the void* value associated |
| 185 | with thekey in the current thread. This returns NULL if no value is |
| 186 | associated with thekey in the current thread. |
| 187 | |
| 188 | Use PyThread_delete_key_value(thekey) to forget the current thread's associated |
| 189 | value for thekey. PyThread_delete_key(thekey) forgets the values associated |
| 190 | with thekey across *all* threads. |
| 191 | |
| 192 | While some of these functions have error-return values, none set any |
| 193 | Python exception. |
| 194 | |
| 195 | None of the functions does memory management on behalf of the void* values. |
| 196 | You need to allocate and deallocate them yourself. If the void* values |
| 197 | happen to be PyObject*, these functions don't do refcount operations on |
| 198 | them either. |
| 199 | |
| 200 | The GIL does not need to be held when calling these functions; they supply |
| 201 | their own locking. This isn't true of PyThread_create_key(), though (see |
| 202 | next paragraph). |
| 203 | |
| 204 | There's a hidden assumption that PyThread_create_key() will be called before |
| 205 | any of the other functions are called. There's also a hidden assumption |
| 206 | that calls to PyThread_create_key() are serialized externally. |
| 207 | ------------------------------------------------------------------------ */ |
| 208 | |
| 209 | /* A singly-linked list of struct key objects remembers all the key->value |
| 210 | * associations. File static keyhead heads the list. keymutex is used |
| 211 | * to enforce exclusion internally. |
| 212 | */ |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 213 | struct key { |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 214 | /* Next record in the list, or NULL if this is the last record. */ |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 215 | struct key *next; |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 216 | |
| 217 | /* The thread id, according to PyThread_get_thread_ident(). */ |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 218 | long id; |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 219 | |
| 220 | /* The key and its associated value. */ |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 221 | int key; |
| 222 | void *value; |
| 223 | }; |
| 224 | |
| 225 | static struct key *keyhead = NULL; |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 226 | static PyThread_type_lock keymutex = NULL; |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 227 | static int nkeys = 0; /* PyThread_create_key() hands out nkeys+1 next */ |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 228 | |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 229 | /* Internal helper. |
| 230 | * If the current thread has a mapping for key, the appropriate struct key* |
| 231 | * is returned. NB: value is ignored in this case! |
| 232 | * If there is no mapping for key in the current thread, then: |
| 233 | * If value is NULL, NULL is returned. |
| 234 | * Else a mapping of key to value is created for the current thread, |
| 235 | * and a pointer to a new struct key* is returned; except that if |
| 236 | * malloc() can't find room for a new struct key*, NULL is returned. |
| 237 | * So when value==NULL, this acts like a pure lookup routine, and when |
| 238 | * value!=NULL, this acts like dict.setdefault(), returning an existing |
| 239 | * mapping if one exists, else creating a new mapping. |
Tim Peters | 263091e | 2004-10-10 01:58:44 +0000 | [diff] [blame] | 240 | * |
| 241 | * Caution: this used to be too clever, trying to hold keymutex only |
| 242 | * around the "p->next = keyhead; keyhead = p" pair. That allowed |
| 243 | * another thread to mutate the list, via key deletion, concurrent with |
| 244 | * find_key() crawling over the list. Hilarity ensued. For example, when |
| 245 | * the for-loop here does "p = p->next", p could end up pointing at a |
| 246 | * record that PyThread_delete_key_value() was concurrently free()'ing. |
| 247 | * That could lead to anything, from failing to find a key that exists, to |
| 248 | * segfaults. Now we lock the whole routine. |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 249 | */ |
Tim Peters | 19717fa | 2004-10-09 17:38:29 +0000 | [diff] [blame] | 250 | static struct key * |
| 251 | find_key(int key, void *value) |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 252 | { |
Georg Brandl | 6aa2d1f | 2008-08-12 08:35:52 +0000 | [diff] [blame] | 253 | struct key *p, *prev_p; |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 254 | long id = PyThread_get_thread_ident(); |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 255 | |
Thomas Wouters | 0e3f591 | 2006-08-11 14:57:12 +0000 | [diff] [blame] | 256 | if (!keymutex) |
| 257 | return NULL; |
Tim Peters | 263091e | 2004-10-10 01:58:44 +0000 | [diff] [blame] | 258 | PyThread_acquire_lock(keymutex, 1); |
Georg Brandl | 6aa2d1f | 2008-08-12 08:35:52 +0000 | [diff] [blame] | 259 | prev_p = NULL; |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 260 | for (p = keyhead; p != NULL; p = p->next) { |
| 261 | if (p->id == id && p->key == key) |
Tim Peters | 263091e | 2004-10-10 01:58:44 +0000 | [diff] [blame] | 262 | goto Done; |
Georg Brandl | 6aa2d1f | 2008-08-12 08:35:52 +0000 | [diff] [blame] | 263 | /* Sanity check. These states should never happen but if |
| 264 | * they do we must abort. Otherwise we'll end up spinning in |
| 265 | * in a tight loop with the lock held. A similar check is done |
| 266 | * in pystate.c tstate_delete_common(). */ |
| 267 | if (p == prev_p) |
| 268 | Py_FatalError("tls find_key: small circular list(!)"); |
| 269 | prev_p = p; |
| 270 | if (p->next == keyhead) |
| 271 | Py_FatalError("tls find_key: circular list(!)"); |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 272 | } |
Tim Peters | 263091e | 2004-10-10 01:58:44 +0000 | [diff] [blame] | 273 | if (value == NULL) { |
| 274 | assert(p == NULL); |
| 275 | goto Done; |
| 276 | } |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 277 | p = (struct key *)malloc(sizeof(struct key)); |
| 278 | if (p != NULL) { |
| 279 | p->id = id; |
| 280 | p->key = key; |
| 281 | p->value = value; |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 282 | p->next = keyhead; |
| 283 | keyhead = p; |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 284 | } |
Tim Peters | 263091e | 2004-10-10 01:58:44 +0000 | [diff] [blame] | 285 | Done: |
| 286 | PyThread_release_lock(keymutex); |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 287 | return p; |
| 288 | } |
| 289 | |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 290 | /* Return a new key. This must be called before any other functions in |
| 291 | * this family, and callers must arrange to serialize calls to this |
| 292 | * function. No violations are detected. |
| 293 | */ |
Tim Peters | 19717fa | 2004-10-09 17:38:29 +0000 | [diff] [blame] | 294 | int |
| 295 | PyThread_create_key(void) |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 296 | { |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 297 | /* All parts of this function are wrong if it's called by multiple |
| 298 | * threads simultaneously. |
| 299 | */ |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 300 | if (keymutex == NULL) |
| 301 | keymutex = PyThread_allocate_lock(); |
| 302 | return ++nkeys; |
| 303 | } |
| 304 | |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 305 | /* Forget the associations for key across *all* threads. */ |
Tim Peters | 19717fa | 2004-10-09 17:38:29 +0000 | [diff] [blame] | 306 | void |
| 307 | PyThread_delete_key(int key) |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 308 | { |
| 309 | struct key *p, **q; |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 310 | |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 311 | PyThread_acquire_lock(keymutex, 1); |
| 312 | q = &keyhead; |
| 313 | while ((p = *q) != NULL) { |
| 314 | if (p->key == key) { |
| 315 | *q = p->next; |
| 316 | free((void *)p); |
| 317 | /* NB This does *not* free p->value! */ |
| 318 | } |
| 319 | else |
| 320 | q = &p->next; |
| 321 | } |
| 322 | PyThread_release_lock(keymutex); |
| 323 | } |
| 324 | |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 325 | /* Confusing: If the current thread has an association for key, |
| 326 | * value is ignored, and 0 is returned. Else an attempt is made to create |
| 327 | * an association of key to value for the current thread. 0 is returned |
| 328 | * if that succeeds, but -1 is returned if there's not enough memory |
| 329 | * to create the association. value must not be NULL. |
| 330 | */ |
Tim Peters | 19717fa | 2004-10-09 17:38:29 +0000 | [diff] [blame] | 331 | int |
| 332 | PyThread_set_key_value(int key, void *value) |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 333 | { |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 334 | struct key *p; |
| 335 | |
| 336 | assert(value != NULL); |
| 337 | p = find_key(key, value); |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 338 | if (p == NULL) |
| 339 | return -1; |
| 340 | else |
| 341 | return 0; |
| 342 | } |
| 343 | |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 344 | /* Retrieve the value associated with key in the current thread, or NULL |
| 345 | * if the current thread doesn't have an association for key. |
| 346 | */ |
Tim Peters | 19717fa | 2004-10-09 17:38:29 +0000 | [diff] [blame] | 347 | void * |
| 348 | PyThread_get_key_value(int key) |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 349 | { |
| 350 | struct key *p = find_key(key, NULL); |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 351 | |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 352 | if (p == NULL) |
| 353 | return NULL; |
| 354 | else |
| 355 | return p->value; |
| 356 | } |
| 357 | |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 358 | /* Forget the current thread's association for key, if any. */ |
Tim Peters | 19717fa | 2004-10-09 17:38:29 +0000 | [diff] [blame] | 359 | void |
| 360 | PyThread_delete_key_value(int key) |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 361 | { |
| 362 | long id = PyThread_get_thread_ident(); |
| 363 | struct key *p, **q; |
Tim Peters | fda787f | 2004-10-09 22:33:09 +0000 | [diff] [blame] | 364 | |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 365 | PyThread_acquire_lock(keymutex, 1); |
| 366 | q = &keyhead; |
| 367 | while ((p = *q) != NULL) { |
| 368 | if (p->key == key && p->id == id) { |
| 369 | *q = p->next; |
| 370 | free((void *)p); |
| 371 | /* NB This does *not* free p->value! */ |
| 372 | break; |
| 373 | } |
| 374 | else |
| 375 | q = &p->next; |
| 376 | } |
| 377 | PyThread_release_lock(keymutex); |
| 378 | } |
| 379 | |
Benjamin Peterson | e68df0f | 2008-06-13 00:26:50 +0000 | [diff] [blame] | 380 | /* Forget everything not associated with the current thread id. |
| 381 | * This function is called from PyOS_AfterFork(). It is necessary |
| 382 | * because other thread ids which were in use at the time of the fork |
| 383 | * may be reused for new threads created in the forked process. |
| 384 | */ |
| 385 | void |
| 386 | PyThread_ReInitTLS(void) |
| 387 | { |
| 388 | long id = PyThread_get_thread_ident(); |
| 389 | struct key *p, **q; |
| 390 | |
| 391 | if (!keymutex) |
| 392 | return; |
| 393 | |
| 394 | /* As with interpreter_lock in PyEval_ReInitThreads() |
| 395 | we just create a new lock without freeing the old one */ |
| 396 | keymutex = PyThread_allocate_lock(); |
| 397 | |
| 398 | /* Delete all keys which do not match the current thread id */ |
| 399 | q = &keyhead; |
| 400 | while ((p = *q) != NULL) { |
| 401 | if (p->id != id) { |
| 402 | *q = p->next; |
| 403 | free((void *)p); |
| 404 | /* NB This does *not* free p->value! */ |
| 405 | } |
| 406 | else |
| 407 | q = &p->next; |
| 408 | } |
| 409 | } |
| 410 | |
Mark Hammond | 8d98d2c | 2003-04-19 15:41:53 +0000 | [diff] [blame] | 411 | #endif /* Py_HAVE_NATIVE_TLS */ |