1*062c5bc4SJason Schmidlapp /*
2*062c5bc4SJason Schmidlapp * -------------------------------------------------------------
3*062c5bc4SJason Schmidlapp *
4*062c5bc4SJason Schmidlapp * Module: sem_init.c
5*062c5bc4SJason Schmidlapp *
6*062c5bc4SJason Schmidlapp * Purpose:
7*062c5bc4SJason Schmidlapp * Semaphores aren't actually part of PThreads.
8*062c5bc4SJason Schmidlapp * They are defined by the POSIX Standard:
9*062c5bc4SJason Schmidlapp *
10*062c5bc4SJason Schmidlapp * POSIX 1003.1-2001
11*062c5bc4SJason Schmidlapp *
12*062c5bc4SJason Schmidlapp * -------------------------------------------------------------
13*062c5bc4SJason Schmidlapp *
14*062c5bc4SJason Schmidlapp * Based upon Pthreads-win32 - POSIX Threads Library for Win32
15*062c5bc4SJason Schmidlapp * Copyright(C) 1998 John E. Bossom
16*062c5bc4SJason Schmidlapp * Copyright(C) 1999,2005 Pthreads-win32 contributors
17*062c5bc4SJason Schmidlapp *
18*062c5bc4SJason Schmidlapp * Contact Email: rpj@callisto.canberra.edu.au
19*062c5bc4SJason Schmidlapp *
20*062c5bc4SJason Schmidlapp * The original list of contributors to the Pthreads-win32 project
21*062c5bc4SJason Schmidlapp * is contained in the file CONTRIBUTORS.ptw32 included with the
22*062c5bc4SJason Schmidlapp * source code distribution. The list can also be seen at the
23*062c5bc4SJason Schmidlapp * following World Wide Web location:
24*062c5bc4SJason Schmidlapp * http://sources.redhat.com/pthreads-win32/contributors.html
25*062c5bc4SJason Schmidlapp *
26*062c5bc4SJason Schmidlapp * This library is free software; you can redistribute it and/or
27*062c5bc4SJason Schmidlapp * modify it under the terms of the GNU Lesser General Public
28*062c5bc4SJason Schmidlapp * License as published by the Free Software Foundation; either
29*062c5bc4SJason Schmidlapp * version 2 of the License, or (at your option) any later version.
30*062c5bc4SJason Schmidlapp *
31*062c5bc4SJason Schmidlapp * This library is distributed in the hope that it will be useful,
32*062c5bc4SJason Schmidlapp * but WITHOUT ANY WARRANTY; without even the implied warranty of
33*062c5bc4SJason Schmidlapp * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
34*062c5bc4SJason Schmidlapp * Lesser General Public License for more details.
35*062c5bc4SJason Schmidlapp *
36*062c5bc4SJason Schmidlapp * You should have received a copy of the GNU Lesser General Public
37*062c5bc4SJason Schmidlapp * License along with this library in the file COPYING.LIB;
38*062c5bc4SJason Schmidlapp * if not, write to the Free Software Foundation, Inc.,
39*062c5bc4SJason Schmidlapp * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
40*062c5bc4SJason Schmidlapp */
41*062c5bc4SJason Schmidlapp
42*062c5bc4SJason Schmidlapp #include <stdio.h>
43*062c5bc4SJason Schmidlapp #include <stdlib.h>
44*062c5bc4SJason Schmidlapp
45*062c5bc4SJason Schmidlapp #include "pthread.h"
46*062c5bc4SJason Schmidlapp #include "semaphore.h"
47*062c5bc4SJason Schmidlapp #include "implement.h"
48*062c5bc4SJason Schmidlapp
49*062c5bc4SJason Schmidlapp
50*062c5bc4SJason Schmidlapp int
sem_init(sem_t * sem,int pshared,unsigned int value)51*062c5bc4SJason Schmidlapp sem_init (sem_t * sem, int pshared, unsigned int value)
52*062c5bc4SJason Schmidlapp /*
53*062c5bc4SJason Schmidlapp * ------------------------------------------------------
54*062c5bc4SJason Schmidlapp * DOCPUBLIC
55*062c5bc4SJason Schmidlapp * This function initializes a semaphore. The
56*062c5bc4SJason Schmidlapp * initial value of the semaphore is 'value'
57*062c5bc4SJason Schmidlapp *
58*062c5bc4SJason Schmidlapp * PARAMETERS
59*062c5bc4SJason Schmidlapp * sem
60*062c5bc4SJason Schmidlapp * pointer to an instance of sem_t
61*062c5bc4SJason Schmidlapp *
62*062c5bc4SJason Schmidlapp * pshared
63*062c5bc4SJason Schmidlapp * if zero, this semaphore may only be shared between
64*062c5bc4SJason Schmidlapp * threads in the same process.
65*062c5bc4SJason Schmidlapp * if nonzero, the semaphore can be shared between
66*062c5bc4SJason Schmidlapp * processes
67*062c5bc4SJason Schmidlapp *
68*062c5bc4SJason Schmidlapp * value
69*062c5bc4SJason Schmidlapp * initial value of the semaphore counter
70*062c5bc4SJason Schmidlapp *
71*062c5bc4SJason Schmidlapp * DESCRIPTION
72*062c5bc4SJason Schmidlapp * This function initializes a semaphore. The
73*062c5bc4SJason Schmidlapp * initial value of the semaphore is set to 'value'.
74*062c5bc4SJason Schmidlapp *
75*062c5bc4SJason Schmidlapp * RESULTS
76*062c5bc4SJason Schmidlapp * 0 successfully created semaphore,
77*062c5bc4SJason Schmidlapp * -1 failed, error in errno
78*062c5bc4SJason Schmidlapp * ERRNO
79*062c5bc4SJason Schmidlapp * EINVAL 'sem' is not a valid semaphore, or
80*062c5bc4SJason Schmidlapp * 'value' >= SEM_VALUE_MAX
81*062c5bc4SJason Schmidlapp * ENOMEM out of memory,
82*062c5bc4SJason Schmidlapp * ENOSPC a required resource has been exhausted,
83*062c5bc4SJason Schmidlapp * ENOSYS semaphores are not supported,
84*062c5bc4SJason Schmidlapp * EPERM the process lacks appropriate privilege
85*062c5bc4SJason Schmidlapp *
86*062c5bc4SJason Schmidlapp * ------------------------------------------------------
87*062c5bc4SJason Schmidlapp */
88*062c5bc4SJason Schmidlapp {
89*062c5bc4SJason Schmidlapp int result = 0;
90*062c5bc4SJason Schmidlapp sem_t s = NULL;
91*062c5bc4SJason Schmidlapp
92*062c5bc4SJason Schmidlapp
93*062c5bc4SJason Schmidlapp if (pshared != 0)
94*062c5bc4SJason Schmidlapp {
95*062c5bc4SJason Schmidlapp /*
96*062c5bc4SJason Schmidlapp * Creating a semaphore that can be shared between
97*062c5bc4SJason Schmidlapp * processes
98*062c5bc4SJason Schmidlapp */
99*062c5bc4SJason Schmidlapp result = EPERM;
100*062c5bc4SJason Schmidlapp }
101*062c5bc4SJason Schmidlapp else if (value > (unsigned int)SEM_VALUE_MAX)
102*062c5bc4SJason Schmidlapp {
103*062c5bc4SJason Schmidlapp result = EINVAL;
104*062c5bc4SJason Schmidlapp }
105*062c5bc4SJason Schmidlapp else
106*062c5bc4SJason Schmidlapp {
107*062c5bc4SJason Schmidlapp s = (sem_t) calloc (1, sizeof (*s));
108*062c5bc4SJason Schmidlapp
109*062c5bc4SJason Schmidlapp if (NULL == s)
110*062c5bc4SJason Schmidlapp {
111*062c5bc4SJason Schmidlapp result = ENOMEM;
112*062c5bc4SJason Schmidlapp }
113*062c5bc4SJason Schmidlapp else
114*062c5bc4SJason Schmidlapp {
115*062c5bc4SJason Schmidlapp
116*062c5bc4SJason Schmidlapp s->value = value;
117*062c5bc4SJason Schmidlapp if (pthread_mutex_init(&s->lock, NULL) == 0)
118*062c5bc4SJason Schmidlapp {
119*062c5bc4SJason Schmidlapp
120*062c5bc4SJason Schmidlapp pte_osResult osResult = pte_osSemaphoreCreate(0, &s->sem);
121*062c5bc4SJason Schmidlapp
122*062c5bc4SJason Schmidlapp
123*062c5bc4SJason Schmidlapp
124*062c5bc4SJason Schmidlapp if (osResult != PTE_OS_OK)
125*062c5bc4SJason Schmidlapp {
126*062c5bc4SJason Schmidlapp (void) pthread_mutex_destroy(&s->lock);
127*062c5bc4SJason Schmidlapp result = ENOSPC;
128*062c5bc4SJason Schmidlapp }
129*062c5bc4SJason Schmidlapp
130*062c5bc4SJason Schmidlapp }
131*062c5bc4SJason Schmidlapp else
132*062c5bc4SJason Schmidlapp {
133*062c5bc4SJason Schmidlapp result = ENOSPC;
134*062c5bc4SJason Schmidlapp }
135*062c5bc4SJason Schmidlapp
136*062c5bc4SJason Schmidlapp if (result != 0)
137*062c5bc4SJason Schmidlapp {
138*062c5bc4SJason Schmidlapp free(s);
139*062c5bc4SJason Schmidlapp }
140*062c5bc4SJason Schmidlapp }
141*062c5bc4SJason Schmidlapp }
142*062c5bc4SJason Schmidlapp
143*062c5bc4SJason Schmidlapp if (result != 0)
144*062c5bc4SJason Schmidlapp {
145*062c5bc4SJason Schmidlapp errno = result;
146*062c5bc4SJason Schmidlapp return -1;
147*062c5bc4SJason Schmidlapp }
148*062c5bc4SJason Schmidlapp
149*062c5bc4SJason Schmidlapp *sem = s;
150*062c5bc4SJason Schmidlapp
151*062c5bc4SJason Schmidlapp return 0;
152*062c5bc4SJason Schmidlapp
153*062c5bc4SJason Schmidlapp } /* sem_init */
154