2 /* This code implemented by Mark Hammond (MHammond@skippinet.com.au) */
8 long PyThread_get_thread_ident(void);
11 * Change all headers to pure ANSI as no one will use K&R style on an
16 * Initialization of the C package, should not be needed.
18 static void PyThread__init_thread(void)
25 long PyThread_start_new_thread(void (*func
)(void *), void *arg
)
30 dprintf(("%ld: PyThread_start_new_thread called\n", PyThread_get_thread_ident()));
32 PyThread_init_thread();
34 rv
= _beginthread(func
, 0, arg
); /* use default stack size */
38 dprintf(("%ld: PyThread_start_new_thread succeeded:\n", PyThread_get_thread_ident()));
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)
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()));
61 exit(0); /* XXX - was _exit()!! */
67 void PyThread_exit_thread(void)
69 do_PyThread_exit_thread(0);
72 void PyThread__exit_thread(void)
74 do_PyThread_exit_thread(1);
78 static void do_PyThread_exit_prog(int status
, int no_cleanup
)
80 dprintf(("PyThread_exit_prog(%d) called\n", 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)
108 dprintf(("PyThread_allocate_lock called\n"));
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
));
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
)
140 dprintf(("%ld: PyThread_acquire_lock(%p, %d) called\n", PyThread_get_thread_ident(),aLock
, waitflag
));
143 waitResult
= WaitForSingleObject(aLock
, (waitflag
? INFINITE
: 0));
145 /* To aid in debugging, we regularly wake up. This allows us to
146 break into the debugger */
148 waitResult
= WaitForSingleObject(aLock
, waitflag
? 3000 : 0);
149 if (waitflag
==0 || (waitflag
&& waitResult
== WAIT_OBJECT_0
))
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
));
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()));