1*647f063dSAndrew Rist /**************************************************************
2cdf0e10cSrcweir *
3*647f063dSAndrew Rist * Licensed to the Apache Software Foundation (ASF) under one
4*647f063dSAndrew Rist * or more contributor license agreements. See the NOTICE file
5*647f063dSAndrew Rist * distributed with this work for additional information
6*647f063dSAndrew Rist * regarding copyright ownership. The ASF licenses this file
7*647f063dSAndrew Rist * to you under the Apache License, Version 2.0 (the
8*647f063dSAndrew Rist * "License"); you may not use this file except in compliance
9*647f063dSAndrew Rist * with the License. You may obtain a copy of the License at
10*647f063dSAndrew Rist *
11*647f063dSAndrew Rist * http://www.apache.org/licenses/LICENSE-2.0
12*647f063dSAndrew Rist *
13*647f063dSAndrew Rist * Unless required by applicable law or agreed to in writing,
14*647f063dSAndrew Rist * software distributed under the License is distributed on an
15*647f063dSAndrew Rist * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16*647f063dSAndrew Rist * KIND, either express or implied. See the License for the
17*647f063dSAndrew Rist * specific language governing permissions and limitations
18*647f063dSAndrew Rist * under the License.
19*647f063dSAndrew Rist *
20*647f063dSAndrew Rist *************************************************************/
21*647f063dSAndrew Rist
22*647f063dSAndrew Rist
23cdf0e10cSrcweir
24cdf0e10cSrcweir #include "system.h"
25cdf0e10cSrcweir
26cdf0e10cSrcweir #include <osl/diagnose.h>
27cdf0e10cSrcweir #include <osl/semaphor.h>
28cdf0e10cSrcweir
29cdf0e10cSrcweir /*
30cdf0e10cSrcweir Implemetation notes:
31cdf0e10cSrcweir The void* represented by oslSemaphore is used
32cdf0e10cSrcweir to store a OS/2 HANDLE.
33cdf0e10cSrcweir */
34cdf0e10cSrcweir
35cdf0e10cSrcweir typedef struct _oslSemaphoreImpl
36cdf0e10cSrcweir {
37cdf0e10cSrcweir HEV hevReachedZero;
38cdf0e10cSrcweir int nCount;
39cdf0e10cSrcweir } oslSemaphoreImpl;
40cdf0e10cSrcweir
41cdf0e10cSrcweir // static mutex to control access to private members of oslMutexImpl
42cdf0e10cSrcweir static HMTX MutexLock = NULL;
43cdf0e10cSrcweir
44cdf0e10cSrcweir /*****************************************************************************/
45cdf0e10cSrcweir /* osl_createSemaphore */
46cdf0e10cSrcweir /*****************************************************************************/
47cdf0e10cSrcweir
48cdf0e10cSrcweir /*
49cdf0e10cSrcweir - Erzeugen der Semaphore
50cdf0e10cSrcweir - Z�hler auf initialCount setzen
51cdf0e10cSrcweir */
osl_createSemaphore(sal_uInt32 initialCount)52cdf0e10cSrcweir oslSemaphore SAL_CALL osl_createSemaphore(sal_uInt32 initialCount)
53cdf0e10cSrcweir {
54cdf0e10cSrcweir APIRET rc;
55cdf0e10cSrcweir oslSemaphoreImpl * pSemaphoreImpl;
56cdf0e10cSrcweir
57cdf0e10cSrcweir /* alloc mem. for our internal data structure */
58cdf0e10cSrcweir pSemaphoreImpl = (oslSemaphoreImpl *) malloc(sizeof(oslSemaphoreImpl));
59cdf0e10cSrcweir if( pSemaphoreImpl == NULL )
60cdf0e10cSrcweir return NULL;
61cdf0e10cSrcweir
62cdf0e10cSrcweir /* create semaphore */
63cdf0e10cSrcweir rc = DosCreateEventSem( NULL,
64cdf0e10cSrcweir &pSemaphoreImpl->hevReachedZero,
65cdf0e10cSrcweir DC_SEM_SHARED,
66cdf0e10cSrcweir FALSE );
67cdf0e10cSrcweir if( rc != NO_ERROR )
68cdf0e10cSrcweir {
69cdf0e10cSrcweir free( pSemaphoreImpl );
70cdf0e10cSrcweir return NULL;
71cdf0e10cSrcweir }
72cdf0e10cSrcweir
73cdf0e10cSrcweir pSemaphoreImpl->nCount = initialCount;
74cdf0e10cSrcweir
75cdf0e10cSrcweir // create static mutex for private members
76cdf0e10cSrcweir if (MutexLock == NULL)
77cdf0e10cSrcweir DosCreateMutexSem( NULL, &MutexLock, 0, FALSE );
78cdf0e10cSrcweir
79cdf0e10cSrcweir return (oslSemaphore) pSemaphoreImpl;
80cdf0e10cSrcweir }
81cdf0e10cSrcweir
82cdf0e10cSrcweir /*****************************************************************************/
83cdf0e10cSrcweir /* osl_destroySemaphore */
84cdf0e10cSrcweir /*****************************************************************************/
85cdf0e10cSrcweir
86cdf0e10cSrcweir /*
87cdf0e10cSrcweir - Semaphore l�schen
88cdf0e10cSrcweir */
89cdf0e10cSrcweir
osl_destroySemaphore(oslSemaphore Semaphore)90cdf0e10cSrcweir void SAL_CALL osl_destroySemaphore(oslSemaphore Semaphore)
91cdf0e10cSrcweir {
92cdf0e10cSrcweir oslSemaphoreImpl* pSemaphoreImpl = (oslSemaphoreImpl*)Semaphore;
93cdf0e10cSrcweir OSL_ASSERT(Semaphore != 0);
94cdf0e10cSrcweir
95cdf0e10cSrcweir DosCloseEventSem( pSemaphoreImpl->hevReachedZero );
96cdf0e10cSrcweir
97cdf0e10cSrcweir free( pSemaphoreImpl );
98cdf0e10cSrcweir }
99cdf0e10cSrcweir
100cdf0e10cSrcweir /*****************************************************************************/
101cdf0e10cSrcweir /* osl_acquireSemaphore */
102cdf0e10cSrcweir /*****************************************************************************/
103cdf0e10cSrcweir /*
104cdf0e10cSrcweir - Z�hler -1
105cdf0e10cSrcweir - wenn Z�hler < 0: blockieren
106cdf0e10cSrcweir */
107cdf0e10cSrcweir
osl_acquireSemaphore(oslSemaphore Semaphore)108cdf0e10cSrcweir sal_Bool SAL_CALL osl_acquireSemaphore(oslSemaphore Semaphore)
109cdf0e10cSrcweir {
110cdf0e10cSrcweir APIRET rc;
111cdf0e10cSrcweir oslSemaphoreImpl* pSemaphoreImpl = (oslSemaphoreImpl*)Semaphore;
112cdf0e10cSrcweir int nCount;
113cdf0e10cSrcweir OSL_ASSERT(Semaphore != 0);
114cdf0e10cSrcweir
115cdf0e10cSrcweir DosRequestMutexSem( MutexLock, SEM_INDEFINITE_WAIT );
116cdf0e10cSrcweir
117cdf0e10cSrcweir while( pSemaphoreImpl->nCount < 1 )
118cdf0e10cSrcweir {
119cdf0e10cSrcweir sal_uInt32 nPostCount;
120cdf0e10cSrcweir
121cdf0e10cSrcweir DosReleaseMutexSem( MutexLock);
122cdf0e10cSrcweir
123cdf0e10cSrcweir rc = DosWaitEventSem(pSemaphoreImpl->hevReachedZero, SEM_INDEFINITE_WAIT );
124cdf0e10cSrcweir DosResetEventSem(pSemaphoreImpl->hevReachedZero, &nPostCount);
125cdf0e10cSrcweir
126cdf0e10cSrcweir DosRequestMutexSem( MutexLock, SEM_INDEFINITE_WAIT );
127cdf0e10cSrcweir }
128cdf0e10cSrcweir
129cdf0e10cSrcweir pSemaphoreImpl->nCount--;
130cdf0e10cSrcweir DosReleaseMutexSem( MutexLock);
131cdf0e10cSrcweir
132cdf0e10cSrcweir return( rc == NO_ERROR );
133cdf0e10cSrcweir }
134cdf0e10cSrcweir
135cdf0e10cSrcweir /*****************************************************************************/
136cdf0e10cSrcweir /* osl_tryToAcquireSemaphore */
137cdf0e10cSrcweir /*****************************************************************************/
138cdf0e10cSrcweir /*
139cdf0e10cSrcweir - Z�hler -1, wenn vorher > 0
140cdf0e10cSrcweir - wenn Z�hler < 0: mit FALSE zurueck
141cdf0e10cSrcweir */
osl_tryToAcquireSemaphore(oslSemaphore Semaphore)142cdf0e10cSrcweir sal_Bool SAL_CALL osl_tryToAcquireSemaphore(oslSemaphore Semaphore)
143cdf0e10cSrcweir {
144cdf0e10cSrcweir APIRET rc;
145cdf0e10cSrcweir oslSemaphoreImpl* pSemaphoreImpl = (oslSemaphoreImpl*)Semaphore;
146cdf0e10cSrcweir int nCount;
147cdf0e10cSrcweir OSL_ASSERT(Semaphore != 0);
148cdf0e10cSrcweir
149cdf0e10cSrcweir DosRequestMutexSem( MutexLock, SEM_INDEFINITE_WAIT );
150cdf0e10cSrcweir
151cdf0e10cSrcweir nCount = pSemaphoreImpl->nCount;
152cdf0e10cSrcweir if( pSemaphoreImpl->nCount > 0 )
153cdf0e10cSrcweir pSemaphoreImpl->nCount--;
154cdf0e10cSrcweir
155cdf0e10cSrcweir DosReleaseMutexSem( MutexLock);
156cdf0e10cSrcweir
157cdf0e10cSrcweir return( nCount > 0 );
158cdf0e10cSrcweir }
159cdf0e10cSrcweir
160cdf0e10cSrcweir /*****************************************************************************/
161cdf0e10cSrcweir /* osl_releaseSemaphore */
162cdf0e10cSrcweir /*****************************************************************************/
163cdf0e10cSrcweir /*
164cdf0e10cSrcweir - Z�hler +1
165cdf0e10cSrcweir */
osl_releaseSemaphore(oslSemaphore Semaphore)166cdf0e10cSrcweir sal_Bool SAL_CALL osl_releaseSemaphore(oslSemaphore Semaphore)
167cdf0e10cSrcweir {
168cdf0e10cSrcweir APIRET rc;
169cdf0e10cSrcweir oslSemaphoreImpl* pSemaphoreImpl = (oslSemaphoreImpl*)Semaphore;
170cdf0e10cSrcweir int nCount;
171cdf0e10cSrcweir OSL_ASSERT(Semaphore != 0);
172cdf0e10cSrcweir
173cdf0e10cSrcweir DosRequestMutexSem( MutexLock, SEM_INDEFINITE_WAIT );
174cdf0e10cSrcweir
175cdf0e10cSrcweir nCount = pSemaphoreImpl->nCount;
176cdf0e10cSrcweir pSemaphoreImpl->nCount++;
177cdf0e10cSrcweir
178cdf0e10cSrcweir DosReleaseMutexSem( MutexLock);
179cdf0e10cSrcweir
180cdf0e10cSrcweir if( nCount == 0 )
181cdf0e10cSrcweir DosPostEventSem(pSemaphoreImpl->hevReachedZero);
182cdf0e10cSrcweir
183cdf0e10cSrcweir return( rc == NO_ERROR );
184cdf0e10cSrcweir }
185cdf0e10cSrcweir
186cdf0e10cSrcweir
187