sdl-ios-xcode: src/thread/win32/win_ce

annotate src/thread/win32/win_ce_semaphore.c @ 4756:b99b1024607a

Changed markedText to have its own storage to resolve multiple bugs. Changed an odd strcpy to a more appropriate strcat.

author	dewyatt
date	Sat, 24 Jul 2010 20:48:50 -0400
parents	c121d94672cb
children

rev	line source
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	1 /* win_ce_semaphore.c
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	2
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	3 Copyright (c) 1998, Johnson M. Hart
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	4 (with corrections 2001 by Rainer Loritz)
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	5 Permission is granted for any and all use providing that this
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	6 copyright is properly acknowledged.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	7 There are no assurances of suitability for any use whatsoever.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	8
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	9 WINDOWS CE: There is a collection of Windows CE functions to simulate
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	10 semaphores using only a mutex and an event. As Windows CE events cannot
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	11 be named, these simulated semaphores cannot be named either.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	12
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	13 Implementation notes:
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	14 1. All required internal data structures are allocated on the process's heap.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	15 2. Where appropriate, a new error code is returned (see the header
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	16 file), or, if the error is a Win32 error, that code is unchanged.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	17 3. Notice the new handle type "SYNCHHANDLE" that has handles, counters,
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	18 and other information. This structure will grow as new objects are added
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	19 to this set; some members are specific to only one or two of the objects.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	20 4. Mutexes are used for critical sections. These could be replaced with
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	21 CRITICAL_SECTION objects but then this would give up the time out
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	22 capability.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	23 5. The implementation shows several interesting aspects of synchronization, some
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	24 of which are specific to Win32 and some of which are general. These are pointed
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	25 out in the comments as appropriate.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	26 6. The wait function emulates WaitForSingleObject only. An emulation of
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	27 WaitForMultipleObjects is much harder to implement outside the kernel,
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	28 and it is not clear how to handle a mixture of WCE semaphores and normal
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	29 events and mutexes. */
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	30
1433 bb6839704ed6 SDL_windows.h is no longer necessary Sam Lantinga <slouken@libsdl.org> parents: 1330 diff changeset	31 #define WIN32_LEAN_AND_MEAN
bb6839704ed6 SDL_windows.h is no longer necessary Sam Lantinga <slouken@libsdl.org> parents: 1330 diff changeset	32 #include <windows.h>
bb6839704ed6 SDL_windows.h is no longer necessary Sam Lantinga <slouken@libsdl.org> parents: 1330 diff changeset	33
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	34 #include "win_ce_semaphore.h"
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	35
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	36 static SYNCHHANDLE CleanUp(SYNCHHANDLE hSynch, DWORD Flags);
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	37
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	38 SYNCHHANDLE
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	39 CreateSemaphoreCE(LPSECURITY_ATTRIBUTES lpSemaphoreAttributes, /* pointer to security attributes */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	40 LONG lInitialCount, /* initial count */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	41 LONG lMaximumCount, /* maximum count */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	42 LPCTSTR lpName)
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	43 /* Semaphore for use with Windows CE that does not support them directly.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	44 Requires a counter, a mutex to protect the counter, and an
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	45 autoreset event.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	46
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	47 Here are the rules that must always hold between the autoreset event
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	48 and the mutex (any violation of these rules by the CE semaphore functions
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	49 will, in all likelihood, result in a defect):
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	50 1. No thread can set, pulse, or reset the event,
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	51 nor can it access any part of the SYNCHHANDLE structure,
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	52 without first gaining ownership of the mutex.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	53 BUT, a thread can wait on the event without owning the mutex
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	54 (this is clearly necessary or else the event could never be set).
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	55 2. The event is in a signaled state if and only if the current semaphore
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	56 count ("CurCount") is greater than zero.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	57 3. The semaphore count is always >= 0 and <= the maximum count */
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	58 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	59 SYNCHHANDLE hSynch = NULL, result = NULL;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	60
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	61 __try {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	62 if (lInitialCount > lMaximumCount \|\| lMaximumCount < 0
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	63 \|\| lInitialCount < 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	64 /* Bad parameters */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	65 SetLastError(SYNCH_ERROR);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	66 __leave;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	67 }
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	68
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	69 hSynch =
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	70 HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, SYNCH_HANDLE_SIZE);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	71 if (hSynch == NULL)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	72 __leave;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	73
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	74 hSynch->MaxCount = lMaximumCount;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	75 hSynch->CurCount = lInitialCount;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	76 hSynch->lpName = lpName;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	77
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	78 hSynch->hMutex = CreateMutex(lpSemaphoreAttributes, FALSE, NULL);
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	79
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	80 WaitForSingleObject(hSynch->hMutex, INFINITE);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	81 /* Create the event. It is initially signaled if and only if the
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	82 initial count is > 0 */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	83 hSynch->hEvent = CreateEvent(lpSemaphoreAttributes, FALSE,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	84 lInitialCount > 0, NULL);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	85 ReleaseMutex(hSynch->hMutex);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	86 hSynch->hSemph = NULL;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	87 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	88 __finally {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	89 /* Return with the handle, or, if there was any error, return
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	90 a null after closing any open handles and freeing any allocated memory. */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	91 result =
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	92 CleanUp(hSynch, 6 /* An event and a mutex, but no semaphore. */ );
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	93 }
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	94
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	95 return result;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	96 }
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	97
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	98 BOOL
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	99 ReleaseSemaphoreCE(SYNCHHANDLE hSemCE, LONG cReleaseCount,
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	100 LPLONG lpPreviousCount)
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	101 /* Windows CE equivalent to ReleaseSemaphore. */
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	102 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	103 BOOL Result = TRUE;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	104
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	105 /* Gain access to the object to assure that the release count
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	106 would not cause the total count to exceed the maximum. */
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	107
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	108 __try {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	109 WaitForSingleObject(hSemCE->hMutex, INFINITE);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	110 /* reply only if asked to */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	111 if (lpPreviousCount != NULL)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	112 *lpPreviousCount = hSemCE->CurCount;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	113 if (hSemCE->CurCount + cReleaseCount > hSemCE->MaxCount
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	114 \|\| cReleaseCount <= 0) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	115 SetLastError(SYNCH_ERROR);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	116 Result = FALSE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	117 __leave;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	118 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	119 hSemCE->CurCount += cReleaseCount;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	120
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	121 /* Set the autoreset event, releasing exactly one waiting thread, now or
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	122 in the future. */
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	123
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	124 SetEvent(hSemCE->hEvent);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	125 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	126 __finally {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	127 ReleaseMutex(hSemCE->hMutex);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	128 }
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	129
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	130 return Result;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	131 }
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	132
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	133 DWORD
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	134 WaitForSemaphoreCE(SYNCHHANDLE hSemCE, DWORD dwMilliseconds)
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	135 /* Windows CE semaphore equivalent of WaitForSingleObject. */
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	136 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	137 DWORD WaitResult;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	138
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	139 WaitResult = WaitForSingleObject(hSemCE->hMutex, dwMilliseconds);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	140 if (WaitResult != WAIT_OBJECT_0 && WaitResult != WAIT_ABANDONED_0)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	141 return WaitResult;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	142 while (hSemCE->CurCount <= 0) {
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	143
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	144 /* The count is 0, and the thread must wait on the event (which, by
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	145 the rules, is currently reset) for semaphore resources to become
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	146 available. First, of course, the mutex must be released so that another
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	147 thread will be capable of setting the event. */
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	148
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	149 ReleaseMutex(hSemCE->hMutex);
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	150
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	151 /* Wait for the event to be signaled, indicating a semaphore state change.
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	152 The event is autoreset and signaled with a SetEvent (not PulseEvent)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	153 so exactly one waiting thread (whether or not there is currently
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	154 a waiting thread) is released as a result of the SetEvent. */
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	155
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	156 WaitResult = WaitForSingleObject(hSemCE->hEvent, dwMilliseconds);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	157 if (WaitResult != WAIT_OBJECT_0)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	158 return WaitResult;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	159
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	160 /* This is where the properties of setting of an autoreset event is critical
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	161 to assure that, even if the semaphore state changes between the
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	162 preceding Wait and the next, and even if NO threads are waiting
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	163 on the event at the time of the SetEvent, at least one thread
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	164 will be released.
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	165 Pulsing a manual reset event would appear to work, but it would have
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	166 a defect which could appear if the semaphore state changed between
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	167 the two waits. */
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	168
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	169 WaitResult = WaitForSingleObject(hSemCE->hMutex, dwMilliseconds);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	170 if (WaitResult != WAIT_OBJECT_0 && WaitResult != WAIT_ABANDONED_0)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	171 return WaitResult;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	172
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	173 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	174 /* The count is not zero and this thread owns the mutex. */
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	175
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	176 hSemCE->CurCount--;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	177 /* The event is now unsignaled, BUT, the semaphore count may not be
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	178 zero, in which case the event should be signaled again
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	179 before releasing the mutex. */
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	180
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	181 if (hSemCE->CurCount > 0)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	182 SetEvent(hSemCE->hEvent);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	183 ReleaseMutex(hSemCE->hMutex);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	184 return WaitResult;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	185 }
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	186
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	187 BOOL
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	188 CloseSynchHandle(SYNCHHANDLE hSynch)
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	189 /* Close a synchronization handle.
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	190 Improvement: Test for a valid handle before dereferencing the handle. */
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	191 {
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	192 BOOL Result = TRUE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	193 if (hSynch->hEvent != NULL)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	194 Result = Result && CloseHandle(hSynch->hEvent);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	195 if (hSynch->hMutex != NULL)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	196 Result = Result && CloseHandle(hSynch->hMutex);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	197 if (hSynch->hSemph != NULL)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	198 Result = Result && CloseHandle(hSynch->hSemph);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	199 HeapFree(GetProcessHeap(), 0, hSynch);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	200 return (Result);
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	201 }
13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	202
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	203 static SYNCHHANDLE
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	204 CleanUp(SYNCHHANDLE hSynch, DWORD Flags)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	205 { /* Prepare to return from a create of a synchronization handle.
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	206 If there was any failure, free any allocated resources.
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	207 "Flags" indicates which Win32 objects are required in the
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	208 synchronization handle. */
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	209
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	210 BOOL ok = TRUE;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	211
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	212 if (hSynch == NULL)
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	213 return NULL;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	214 if ((Flags & 4) == 1 && (hSynch->hEvent == NULL))
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	215 ok = FALSE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	216 if ((Flags & 2) == 1 && (hSynch->hMutex == NULL))
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	217 ok = FALSE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	218 if ((Flags & 1) == 1 && (hSynch->hEvent == NULL))
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	219 ok = FALSE;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	220 if (!ok) {
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	221 CloseSynchHandle(hSynch);
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	222 return NULL;
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	223 }
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	224 /* Everything worked */
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	225 return hSynch;
36 13ee9f4834ea Windows CE patches contributed by Rainer Loritz Sam Lantinga <slouken@lokigames.com> parents: diff changeset	226 }
1895 c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	227
c121d94672cb SDL 1.2 is moving to a branch, and SDL 1.3 is becoming the head. Sam Lantinga <slouken@libsdl.org> parents: 1433 diff changeset	228 /* vi: set ts=4 sw=4 expandtab: */

Mercurial > sdl-ios-xcode

annotate src/thread/win32/win_ce_semaphore.c @ 4756:b99b1024607a