update peek documentation to implementation
[python/dscho.git] / Python / thread_wince.h
blobe16f5d14155d387a84a15453a5cb2e2e6802f0b3
2 /* This code implemented by Mark Hammond (MHammond@skippinet.com.au) */
4 #include <windows.h>
5 #include <limits.h>
6 #include <pydebug.h>
8 long PyThread_get_thread_ident(void);
11 * Change all headers to pure ANSI as no one will use K&R style on an
12 * NT
16 * Initialization of the C package, should not be needed.
18 static void PyThread__init_thread(void)
23 * Thread support.
25 long PyThread_start_new_thread(void (*func)(void *), void *arg)
27 long rv;
28 int success = -1;
30 dprintf(("%ld: PyThread_start_new_thread called\n", PyThread_get_thread_ident()));
31 if (!initialized)
32 PyThread_init_thread();
34 rv = _beginthread(func, 0, arg); /* use default stack size */
36 if (rv != -1) {
37 success = 0;
38 dprintf(("%ld: PyThread_start_new_thread succeeded:\n", PyThread_get_thread_ident()));
41 return success;
45 * Return the thread Id instead of an handle. The Id is said to uniquely identify the
46 * thread in the system
48 long PyThread_get_thread_ident(void)
50 if (!initialized)
51 PyThread_init_thread();
53 return GetCurrentThreadId();
56 static void do_PyThread_exit_thread(int no_cleanup)
58 dprintf(("%ld: do_PyThread_exit_thread called\n", PyThread_get_thread_ident()));
59 if (!initialized)
60 if (no_cleanup)
61 exit(0); /* XXX - was _exit()!! */
62 else
63 exit(0);
64 _endthread();
67 void PyThread_exit_thread(void)
69 do_PyThread_exit_thread(0);
72 void PyThread__exit_thread(void)
74 do_PyThread_exit_thread(1);
77 #ifndef NO_EXIT_PROG
78 static void do_PyThread_exit_prog(int status, int no_cleanup)
80 dprintf(("PyThread_exit_prog(%d) called\n", status));
81 if (!initialized)
82 if (no_cleanup)
83 _exit(status);
84 else
85 exit(status);
88 void PyThread_exit_prog(int status)
90 do_PyThread_exit_prog(status, 0);
93 void PyThread__exit_prog(int status)
95 do_PyThread_exit_prog(status, 1);
97 #endif /* NO_EXIT_PROG */
100 * Lock support. It has to be implemented using Mutexes, as
101 * CE doesnt support semaphores. Therefore we use some hacks to
102 * simulate the non reentrant requirements of Python locks
104 PyThread_type_lock PyThread_allocate_lock(void)
106 HANDLE aLock;
108 dprintf(("PyThread_allocate_lock called\n"));
109 if (!initialized)
110 PyThread_init_thread();
112 aLock = CreateEvent(NULL, /* Security attributes */
113 0, /* Manual-Reset */
114 1, /* Is initially signalled */
115 NULL); /* Name of event */
117 dprintf(("%ld: PyThread_allocate_lock() -> %p\n", PyThread_get_thread_ident(), aLock));
119 return (PyThread_type_lock) aLock;
122 void PyThread_free_lock(PyThread_type_lock aLock)
124 dprintf(("%ld: PyThread_free_lock(%p) called\n", PyThread_get_thread_ident(),aLock));
126 CloseHandle(aLock);
130 * Return 1 on success if the lock was acquired
132 * and 0 if the lock was not acquired. This means a 0 is returned
133 * if the lock has already been acquired by this thread!
135 int PyThread_acquire_lock(PyThread_type_lock aLock, int waitflag)
137 int success = 1;
138 DWORD waitResult;
140 dprintf(("%ld: PyThread_acquire_lock(%p, %d) called\n", PyThread_get_thread_ident(),aLock, waitflag));
142 #ifndef DEBUG
143 waitResult = WaitForSingleObject(aLock, (waitflag ? INFINITE : 0));
144 #else
145 /* To aid in debugging, we regularly wake up. This allows us to
146 break into the debugger */
147 while (TRUE) {
148 waitResult = WaitForSingleObject(aLock, waitflag ? 3000 : 0);
149 if (waitflag==0 || (waitflag && waitResult == WAIT_OBJECT_0))
150 break;
152 #endif
154 if (waitResult != WAIT_OBJECT_0) {
155 success = 0; /* We failed */
158 dprintf(("%ld: PyThread_acquire_lock(%p, %d) -> %d\n", PyThread_get_thread_ident(),aLock, waitflag, success));
160 return success;
163 void PyThread_release_lock(PyThread_type_lock aLock)
165 dprintf(("%ld: PyThread_release_lock(%p) called\n", PyThread_get_thread_ident(),aLock));
167 if (!SetEvent(aLock))
168 dprintf(("%ld: Could not PyThread_release_lock(%p) error: %l\n", PyThread_get_thread_ident(), aLock, GetLastError()));