2009-06-15 Marcus Brinkmann <marcus@g10code.de>
[gpgme.git] / src / op-support.c
1 /* op-support.c - Supporting functions.
2    Copyright (C) 2002, 2003, 2004, 2007 g10 Code GmbH
3
4    This file is part of GPGME.
5  
6    GPGME is free software; you can redistribute it and/or modify it
7    under the terms of the GNU Lesser General Public License as
8    published by the Free Software Foundation; either version 2.1 of
9    the License, or (at your option) any later version.
10    
11    GPGME is distributed in the hope that it will be useful, but
12    WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
15    
16    You should have received a copy of the GNU Lesser General Public
17    License along with this program; if not, see <http://www.gnu.org/licenses/>.
18  */
19
20 #if HAVE_CONFIG_H
21 #include <config.h>
22 #endif
23 #include <stdlib.h>
24 #include <errno.h>
25 #include <string.h>
26 #include <locale.h>
27
28 #include "gpgme.h"
29 #include "context.h"
30 #include "ops.h"
31
32 \f
33 gpgme_error_t
34 _gpgme_op_data_lookup (gpgme_ctx_t ctx, ctx_op_data_id_t type, void **hook,
35                        int size, void (*cleanup) (void *))
36 {
37   struct ctx_op_data *data = ctx->op_data;
38   while (data && data->type != type)
39     data = data->next;
40   if (!data)
41     {
42       if (size < 0)
43         {
44           *hook = NULL;
45           return 0;
46         }
47
48       data = calloc (1, sizeof (struct ctx_op_data) + size);
49       if (!data)
50         return gpg_error_from_errno (errno);
51       data->next = ctx->op_data;
52       data->type = type;
53       data->cleanup = cleanup;
54       data->hook = (void *) (((char *) data) + sizeof (struct ctx_op_data));
55       data->references = 1;
56       ctx->op_data = data;
57     }
58   *hook = data->hook;
59   return 0;
60 }
61
62
63 /* type is: 0: asynchronous operation (use global or user event loop).
64             1: synchronous operation (always use private event loop).
65             2: asynchronous private operation (use private or user
66             event loop).  
67             256: Modification flag to suppress the engine reset.
68 */
69 gpgme_error_t
70 _gpgme_op_reset (gpgme_ctx_t ctx, int type)
71 {
72   gpgme_error_t err = 0;
73   struct gpgme_io_cbs io_cbs;
74   int no_reset = (type & 256);
75   int reuse_engine = 0;
76
77   type &= 255;
78
79   _gpgme_release_result (ctx);
80   LOCK (ctx->lock);
81   ctx->canceled = 0;
82   UNLOCK (ctx->lock);
83
84   if (ctx->engine && no_reset)
85     reuse_engine = 1;
86   else if (ctx->engine)
87     {
88       /* Attempt to reset an existing engine.  */
89
90       err = _gpgme_engine_reset (ctx->engine);
91       if (gpg_err_code (err) == GPG_ERR_NOT_IMPLEMENTED)
92         {
93           _gpgme_engine_release (ctx->engine);
94           ctx->engine = NULL;
95         }
96     }
97
98   if (!ctx->engine)
99     {
100       gpgme_engine_info_t info;
101       info = ctx->engine_info;
102       while (info && info->protocol != ctx->protocol)
103         info = info->next;
104
105       if (!info)
106         return gpg_error (GPG_ERR_UNSUPPORTED_PROTOCOL);
107
108       /* Create an engine object.  */
109       err = _gpgme_engine_new (info, &ctx->engine);
110       if (err)
111         return err;
112     }
113
114   if (!reuse_engine)
115     {
116       err = _gpgme_engine_set_locale (ctx->engine, LC_CTYPE, ctx->lc_ctype);
117 #ifdef LC_MESSAGES
118       if (!err)
119         err = _gpgme_engine_set_locale (ctx->engine,
120                                         LC_MESSAGES, ctx->lc_messages);
121 #endif
122       if (gpg_err_code (err) == GPG_ERR_NOT_IMPLEMENTED)
123         err = 0;
124       if (err)
125         {
126           _gpgme_engine_release (ctx->engine);
127           ctx->engine = NULL;
128           return err;
129         }
130     }
131
132   if (type == 1 || (type == 2 && !ctx->io_cbs.add))
133     {
134       /* Use private event loop.  */
135       io_cbs.add = _gpgme_add_io_cb;
136       io_cbs.add_priv = ctx;
137       io_cbs.remove = _gpgme_remove_io_cb;
138       io_cbs.event = _gpgme_wait_private_event_cb;
139       io_cbs.event_priv = ctx;
140     }
141   else if (! ctx->io_cbs.add)
142     {
143       /* Use global event loop.  */
144       io_cbs.add = _gpgme_add_io_cb;
145       io_cbs.add_priv = ctx;
146       io_cbs.remove = _gpgme_remove_io_cb;
147       io_cbs.event = _gpgme_wait_global_event_cb;
148       io_cbs.event_priv = ctx;
149     }
150   else
151     {
152       /* Use user event loop.  */
153       io_cbs.add = _gpgme_wait_user_add_io_cb;
154       io_cbs.add_priv = ctx;
155       io_cbs.remove = _gpgme_wait_user_remove_io_cb;
156       io_cbs.event = _gpgme_wait_user_event_cb;
157       io_cbs.event_priv = ctx;
158     }
159   _gpgme_engine_set_io_cbs (ctx->engine, &io_cbs);
160   return err;
161 }
162
163 \f
164 /* Parse the INV_RECP status line in ARGS and return the result in
165    KEY.  */
166 gpgme_error_t
167 _gpgme_parse_inv_recp (char *args, gpgme_invalid_key_t *key)
168 {
169   gpgme_invalid_key_t inv_key;
170   char *tail;
171   long int reason;
172
173   inv_key = malloc (sizeof (*inv_key));
174   if (!inv_key)
175     return gpg_error_from_errno (errno);
176   inv_key->next = NULL;
177   errno = 0;
178   reason = strtol (args, &tail, 0);
179   if (errno || args == tail || *tail != ' ')
180     {
181       /* The crypto backend does not behave.  */
182       free (inv_key);
183       return gpg_error (GPG_ERR_INV_ENGINE);
184     }
185
186   switch (reason)
187     {
188     default:
189     case 0:
190       inv_key->reason = gpg_error (GPG_ERR_GENERAL);
191       break;
192
193     case 1:
194       inv_key->reason = gpg_error (GPG_ERR_NO_PUBKEY);
195       break;
196
197     case 2:
198       inv_key->reason = gpg_error (GPG_ERR_AMBIGUOUS_NAME);
199       break;
200
201     case 3:
202       inv_key->reason = gpg_error (GPG_ERR_WRONG_KEY_USAGE);
203       break;
204
205     case 4:
206       inv_key->reason = gpg_error (GPG_ERR_CERT_REVOKED);
207       break;
208
209     case 5:
210       inv_key->reason = gpg_error (GPG_ERR_CERT_EXPIRED);
211       break;
212
213     case 6:
214       inv_key->reason = gpg_error (GPG_ERR_NO_CRL_KNOWN);
215       break;
216
217     case 7:
218       inv_key->reason = gpg_error (GPG_ERR_CRL_TOO_OLD);
219       break;
220
221     case 8:
222       inv_key->reason = gpg_error (GPG_ERR_NO_POLICY_MATCH);
223       break;
224
225     case 9:
226       inv_key->reason = gpg_error (GPG_ERR_NO_SECKEY);
227       break;
228
229     case 10:
230       inv_key->reason = gpg_error (GPG_ERR_PUBKEY_NOT_TRUSTED);
231       break;
232
233     case 11:
234       inv_key->reason = gpg_error (GPG_ERR_MISSING_CERT);
235       break;
236     }
237
238   while (*tail == ' ')
239     tail++;
240   if (*tail)
241     {
242       inv_key->fpr = strdup (tail);
243       if (!inv_key->fpr)
244         {
245           int saved_errno = errno;
246           free (inv_key);
247           return gpg_error_from_errno (saved_errno);
248         }
249     }
250   else
251     inv_key->fpr = NULL;
252
253   *key = inv_key;
254   return 0;
255 }
256
257
258 /* Parse the PLAINTEXT status line in ARGS and return the result in
259    FILENAMEP.  */
260 gpgme_error_t
261 _gpgme_parse_plaintext (char *args, char **filenamep)
262 {
263   char *tail;
264
265   while (*args == ' ')
266     args++;
267   if (*args == '\0')
268     return 0;
269
270   /* First argument is file type.  */
271   while (*args != ' ' && *args != '\0')
272     args++;
273   while (*args == ' ')
274     args++;
275   if (*args == '\0')
276     return 0;
277
278   /* Second argument is the timestamp.  */
279   while (*args != ' ' && *args != '\0')
280     args++;
281   while (*args == ' ')
282     args++;
283   if (*args == '\0')
284     return 0;
285
286   tail = args;
287   while (*tail != ' ' && *tail != '\0')
288     tail++;
289   *tail = '\0';
290   if (filenamep && *args != '\0')
291     {
292       char *filename = strdup (args);
293       if (!filename)
294         return gpg_error_from_errno (errno);
295
296       *filenamep = filename;
297     }
298   return 0;
299 }