2002-03-17 Marcus Brinkmann <marcus@g10code.de>
[gpgme.git] / gpgme / posix-sema.c
1 /* posix-sema.c 
2  *      Copyright (C) 2001 Werner Koch (dd9jn)
3  *      Copyright (C) 2001, 2002 g10 Code GmbH
4  *
5  * This file is part of GPGME.
6  *
7  * GPGME is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 2 of the License, or
10  * (at your option) any later version.
11  *
12  * GPGME is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
20  */
21
22 #ifdef HAVE_CONFIG_H
23 #include <config.h>
24 #endif
25 #include <stdio.h>
26 #include <stdlib.h>
27 #include <string.h>
28 #include <assert.h>
29 #include <errno.h>
30 #include <signal.h>
31 #include <fcntl.h>
32 #include <unistd.h>
33 #include <sys/time.h>
34 #include <sys/types.h>
35
36 #include "util.h"
37 #include "sema.h"
38 #include "mutex.h"
39
40 static void
41 sema_fatal (const char *text)
42 {
43   fprintf (stderr, "sema.c: %s\n", text);
44   abort ();
45 }
46
47
48 static void
49 critsect_init (struct critsect_s *s)
50 {
51   static mutex_t init_lock;
52   static int initialized;
53   mutex_t *mp;
54     
55   if (!initialized)
56     {
57       /* The very first time we call this function, we assume that
58          only one thread is running, so that we can bootstrap the
59          semaphore code.  */
60       mutex_init (init_lock);
61       initialized = 1;
62     }
63   if (!s)
64     return;     /* We just want to initialize ourself.  */
65   
66   /* First test whether it is really not initialized.  */
67   mutex_lock (init_lock);
68   if (s->private)
69     {
70       mutex_unlock (init_lock);
71       return;
72     }
73   /* Now initialize it.  */
74   mp = xtrymalloc (sizeof *mp);
75   if (!mp)
76     {
77       mutex_unlock (init_lock);
78       sema_fatal ("out of core while creating critical section lock");
79     }
80   mutex_init (*mp);
81   s->private = mp;
82   mutex_unlock (init_lock);
83 }
84
85
86 void
87 _gpgme_sema_subsystem_init ()
88 {
89   /* FIXME: we should check that there is only one thread running */
90   critsect_init (NULL);
91 }
92
93
94 void
95 _gpgme_sema_cs_enter (struct critsect_s *s)
96 {
97   if (!s->private)
98     critsect_init (s);
99   mutex_lock (*((mutex_t *) s->private));
100 }
101
102 void
103 _gpgme_sema_cs_leave (struct critsect_s *s)
104 {
105   if (!s->private)
106     critsect_init (s);
107   mutex_unlock (*((mutex_t *) s->private));
108 }
109
110 void
111 _gpgme_sema_cs_destroy (struct critsect_s *s)
112 {
113   if (s && s->private)
114     {
115       mutex_destroy (*((mutex_t *) s->private));
116       xfree (s->private);
117       s->private = NULL;
118     }
119 }