1 /* Threads.c -- multithreading library
2 2009-09-20 : Igor Pavlov : Public domain */
3
4 #ifndef _WIN32_WCE
5 #include <process.h>
6 #endif
7
8 #include "Threads.h"
9
GetError()10 static WRes GetError()
11 {
12 DWORD res = GetLastError();
13 return (res) ? (WRes)(res) : 1;
14 }
15
HandleToWRes(HANDLE h)16 WRes HandleToWRes(HANDLE h) { return (h != 0) ? 0 : GetError(); }
BOOLToWRes(BOOL v)17 WRes BOOLToWRes(BOOL v) { return v ? 0 : GetError(); }
18
HandlePtr_Close(HANDLE * p)19 WRes HandlePtr_Close(HANDLE *p)
20 {
21 if (*p != NULL)
22 if (!CloseHandle(*p))
23 return GetError();
24 *p = NULL;
25 return 0;
26 }
27
Handle_WaitObject(HANDLE h)28 WRes Handle_WaitObject(HANDLE h) { return (WRes)WaitForSingleObject(h, INFINITE); }
29
Thread_Create(CThread * p,THREAD_FUNC_TYPE func,LPVOID param)30 WRes Thread_Create(CThread *p, THREAD_FUNC_TYPE func, LPVOID param)
31 {
32 unsigned threadId; /* Windows Me/98/95: threadId parameter may not be NULL in _beginthreadex/CreateThread functions */
33 *p =
34 #ifdef UNDER_CE
35 CreateThread(0, 0, func, param, 0, &threadId);
36 #else
37 (HANDLE)_beginthreadex(NULL, 0, func, param, 0, &threadId);
38 #endif
39 /* maybe we must use errno here, but probably GetLastError() is also OK. */
40 return HandleToWRes(*p);
41 }
42
Event_Create(CEvent * p,BOOL manualReset,int signaled)43 WRes Event_Create(CEvent *p, BOOL manualReset, int signaled)
44 {
45 *p = CreateEvent(NULL, manualReset, (signaled ? TRUE : FALSE), NULL);
46 return HandleToWRes(*p);
47 }
48
Event_Set(CEvent * p)49 WRes Event_Set(CEvent *p) { return BOOLToWRes(SetEvent(*p)); }
Event_Reset(CEvent * p)50 WRes Event_Reset(CEvent *p) { return BOOLToWRes(ResetEvent(*p)); }
51
ManualResetEvent_Create(CManualResetEvent * p,int signaled)52 WRes ManualResetEvent_Create(CManualResetEvent *p, int signaled) { return Event_Create(p, TRUE, signaled); }
AutoResetEvent_Create(CAutoResetEvent * p,int signaled)53 WRes AutoResetEvent_Create(CAutoResetEvent *p, int signaled) { return Event_Create(p, FALSE, signaled); }
ManualResetEvent_CreateNotSignaled(CManualResetEvent * p)54 WRes ManualResetEvent_CreateNotSignaled(CManualResetEvent *p) { return ManualResetEvent_Create(p, 0); }
AutoResetEvent_CreateNotSignaled(CAutoResetEvent * p)55 WRes AutoResetEvent_CreateNotSignaled(CAutoResetEvent *p) { return AutoResetEvent_Create(p, 0); }
56
57
Semaphore_Create(CSemaphore * p,UInt32 initCount,UInt32 maxCount)58 WRes Semaphore_Create(CSemaphore *p, UInt32 initCount, UInt32 maxCount)
59 {
60 *p = CreateSemaphore(NULL, (LONG)initCount, (LONG)maxCount, NULL);
61 return HandleToWRes(*p);
62 }
63
Semaphore_Release(CSemaphore * p,LONG releaseCount,LONG * previousCount)64 static WRes Semaphore_Release(CSemaphore *p, LONG releaseCount, LONG *previousCount)
65 { return BOOLToWRes(ReleaseSemaphore(*p, releaseCount, previousCount)); }
Semaphore_ReleaseN(CSemaphore * p,UInt32 num)66 WRes Semaphore_ReleaseN(CSemaphore *p, UInt32 num)
67 { return Semaphore_Release(p, (LONG)num, NULL); }
Semaphore_Release1(CSemaphore * p)68 WRes Semaphore_Release1(CSemaphore *p) { return Semaphore_ReleaseN(p, 1); }
69
CriticalSection_Init(CCriticalSection * p)70 WRes CriticalSection_Init(CCriticalSection *p)
71 {
72 /* InitializeCriticalSection can raise only STATUS_NO_MEMORY exception */
73 #ifdef _MSC_VER
74 __try
75 #endif
76 {
77 InitializeCriticalSection(p);
78 /* InitializeCriticalSectionAndSpinCount(p, 0); */
79 }
80 #ifdef _MSC_VER
81 __except (EXCEPTION_EXECUTE_HANDLER) { return 1; }
82 #endif
83 return 0;
84 }
85