Fix copyright year.
[gpgme.git] / gpgme / ath-pth.c
1 /* ath-pth.c - Pth module for self-adapting thread-safeness library
2  *      Copyright (C) 2002 g10 Code GmbH
3  *
4  * This file is part of GPGME.
5  *
6  * GPGME is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * GPGME is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
19  */
20
21 #include <stdlib.h>
22 #include <errno.h>
23 #include <pth.h>
24
25 #include "ath.h"
26
27 #pragma weak pth_mutex_init
28 #pragma weak pth_mutex_acquire
29 #pragma weak pth_mutex_release
30 #pragma weak pth_read
31 #pragma weak pth_write
32 #pragma weak pth_select
33 #pragma weak pth_waitpid
34
35 /* The lock we take while checking for lazy lock initialization.  */
36 static pth_mutex_t check_init_lock = PTH_MUTEX_INIT;
37
38 /* Initialize the mutex *PRIV.  If JUST_CHECK is true, only do this if
39    it is not already initialized.  */
40 static int
41 mutex_pth_init (void **priv, int just_check)
42 {
43   int err = 0;
44
45   if (just_check)
46     pth_mutex_acquire (&check_init_lock, 0, NULL);
47   if (!*priv || !just_check)
48     {
49       pth_mutex_t *lock = malloc (sizeof (pth_mutex_t));
50       if (!lock)
51         err = ENOMEM;
52       if (!err)
53         {
54           err = pth_mutex_init (lock);
55           if (err == FALSE)
56             err = errno;
57           else
58             err = 0;
59
60           if (err)
61             free (lock);
62           else
63             *priv = lock;
64         }
65     }
66   if (just_check)
67     pth_mutex_release (&check_init_lock);
68   return err;
69 }
70
71
72 static int
73 mutex_pth_destroy (void *priv)
74 {
75   free (priv);
76   return 0;
77 }
78
79
80 static int
81 mutex_pth_lock (void *priv)
82 {
83   int ret = pth_mutex_acquire ((pth_mutex_t *) priv, 0, NULL);
84   return ret == FALSE ? errno : 0;
85 }
86
87
88 static int
89 mutex_pth_unlock (void *priv)
90 {
91   int ret = pth_mutex_release ((pth_mutex_t *) priv);
92   return ret == FALSE ? errno : 0;
93 }
94
95
96 static struct ath_ops ath_pth_ops =
97   {
98     mutex_pth_init,
99     mutex_pth_destroy,
100     mutex_pth_lock,
101     mutex_pth_unlock,
102     pth_read,
103     pth_write,
104     pth_select,
105     pth_waitpid
106   };
107
108
109 struct ath_ops *
110 ath_pth_available (void)
111 {
112   if (pth_mutex_init && pth_mutex_acquire && pth_mutex_release
113       && pth_read && pth_write && pth_select && pth_waitpid)
114     return &ath_pth_ops;
115   else
116     return 0;
117 }