008-11-03 Marcus Brinkmann <marcus@g10code.com>
[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       ctx->op_data = data;
56     }
57   *hook = data->hook;
58   return 0;
59 }
60
61
62 /* type is: 0: asynchronous operation (use global or user event loop).
63             1: synchronous operation (always use private event loop).
64             2: asynchronous private operation (use private or user
65             event loop).  
66             256: Modification flag to suppress the engine reset.
67 */
68 gpgme_error_t
69 _gpgme_op_reset (gpgme_ctx_t ctx, int type)
70 {
71   gpgme_error_t err = 0;
72   struct gpgme_io_cbs io_cbs;
73   int no_reset = (type & 256);
74   int reuse_engine = 0;
75
76   type &= 255;
77
78   _gpgme_release_result (ctx);
79   LOCK (ctx->lock);
80   ctx->canceled = 0;
81   UNLOCK (ctx->lock);
82
83   if (ctx->engine && no_reset)
84     reuse_engine = 1;
85   else if (ctx->engine)
86     {
87       /* Attempt to reset an existing engine.  */
88
89       err = _gpgme_engine_reset (ctx->engine);
90       if (gpg_err_code (err) == GPG_ERR_NOT_IMPLEMENTED)
91         {
92           _gpgme_engine_release (ctx->engine);
93           ctx->engine = NULL;
94         }
95     }
96
97   if (!ctx->engine)
98     {
99       gpgme_engine_info_t info;
100       info = ctx->engine_info;
101       while (info && info->protocol != ctx->protocol)
102         info = info->next;
103
104       if (!info)
105         return gpg_error (GPG_ERR_UNSUPPORTED_PROTOCOL);
106
107       /* Create an engine object.  */
108       err = _gpgme_engine_new (info, &ctx->engine);
109       if (err)
110         return err;
111     }
112
113   if (!reuse_engine)
114     {
115       err = _gpgme_engine_set_locale (ctx->engine, LC_CTYPE, ctx->lc_ctype);
116 #ifdef LC_MESSAGES
117       if (!err)
118         err = _gpgme_engine_set_locale (ctx->engine,
119                                         LC_MESSAGES, ctx->lc_messages);
120 #endif
121       if (gpg_err_code (err) == GPG_ERR_NOT_IMPLEMENTED)
122         err = 0;
123       if (err)
124         {
125           _gpgme_engine_release (ctx->engine);
126           ctx->engine = NULL;
127           return err;
128         }
129     }
130
131   if (type == 1 || (type == 2 && !ctx->io_cbs.add))
132     {
133       /* Use private event loop.  */
134       io_cbs.add = _gpgme_add_io_cb;
135       io_cbs.add_priv = ctx;
136       io_cbs.remove = _gpgme_remove_io_cb;
137       io_cbs.event = _gpgme_wait_private_event_cb;
138       io_cbs.event_priv = ctx;
139     }
140   else if (! ctx->io_cbs.add)
141     {
142       /* Use global event loop.  */
143       io_cbs.add = _gpgme_add_io_cb;
144       io_cbs.add_priv = ctx;
145       io_cbs.remove = _gpgme_remove_io_cb;
146       io_cbs.event = _gpgme_wait_global_event_cb;
147       io_cbs.event_priv = ctx;
148     }
149   else
150     {
151       /* Use user event loop.  */
152       io_cbs.add = _gpgme_wait_user_add_io_cb;
153       io_cbs.add_priv = ctx;
154       io_cbs.remove = _gpgme_wait_user_remove_io_cb;
155       io_cbs.event = _gpgme_wait_user_event_cb;
156       io_cbs.event_priv = ctx;
157     }
158   _gpgme_engine_set_io_cbs (ctx->engine, &io_cbs);
159   return err;
160 }
161
162 \f
163 /* Parse the INV_RECP status line in ARGS and return the result in
164    KEY.  */
165 gpgme_error_t
166 _gpgme_parse_inv_recp (char *args, gpgme_invalid_key_t *key)
167 {
168   gpgme_invalid_key_t inv_key;
169   char *tail;
170   long int reason;
171
172   inv_key = malloc (sizeof (*inv_key));
173   if (!inv_key)
174     return gpg_error_from_errno (errno);
175   inv_key->next = NULL;
176   errno = 0;
177   reason = strtol (args, &tail, 0);
178   if (errno || args == tail || *tail != ' ')
179     {
180       /* The crypto backend does not behave.  */
181       free (inv_key);
182       return gpg_error (GPG_ERR_INV_ENGINE);
183     }
184
185   switch (reason)
186     {
187     default:
188     case 0:
189       inv_key->reason = gpg_error (GPG_ERR_GENERAL);
190       break;
191
192     case 1:
193       inv_key->reason = gpg_error (GPG_ERR_NO_PUBKEY);
194       break;
195
196     case 2:
197       inv_key->reason = gpg_error (GPG_ERR_AMBIGUOUS_NAME);
198       break;
199
200     case 3:
201       inv_key->reason = gpg_error (GPG_ERR_WRONG_KEY_USAGE);
202       break;
203
204     case 4:
205       inv_key->reason = gpg_error (GPG_ERR_CERT_REVOKED);
206       break;
207
208     case 5:
209       inv_key->reason = gpg_error (GPG_ERR_CERT_EXPIRED);
210       break;
211
212     case 6:
213       inv_key->reason = gpg_error (GPG_ERR_NO_CRL_KNOWN);
214       break;
215
216     case 7:
217       inv_key->reason = gpg_error (GPG_ERR_CRL_TOO_OLD);
218       break;
219
220     case 8:
221       inv_key->reason = gpg_error (GPG_ERR_NO_POLICY_MATCH);
222       break;
223
224     case 9:
225       inv_key->reason = gpg_error (GPG_ERR_NO_SECKEY);
226       break;
227
228     case 10:
229       inv_key->reason = gpg_error (GPG_ERR_PUBKEY_NOT_TRUSTED);
230       break;
231
232     case 11:
233       inv_key->reason = gpg_error (GPG_ERR_MISSING_CERT);
234       break;
235     }
236
237   while (*tail == ' ')
238     tail++;
239   if (*tail)
240     {
241       inv_key->fpr = strdup (tail);
242       if (!inv_key->fpr)
243         {
244           int saved_errno = errno;
245           free (inv_key);
246           return gpg_error_from_errno (saved_errno);
247         }
248     }
249   else
250     inv_key->fpr = NULL;
251
252   *key = inv_key;
253   return 0;
254 }
255
256
257 /* Parse the PLAINTEXT status line in ARGS and return the result in
258    FILENAMEP.  */
259 gpgme_error_t
260 _gpgme_parse_plaintext (char *args, char **filenamep)
261 {
262   char *tail;
263
264   while (*args == ' ')
265     args++;
266   if (*args == '\0')
267     return 0;
268
269   /* First argument is file type.  */
270   while (*args != ' ' && *args != '\0')
271     args++;
272   while (*args == ' ')
273     args++;
274   if (*args == '\0')
275     return 0;
276
277   /* Second argument is the timestamp.  */
278   while (*args != ' ' && *args != '\0')
279     args++;
280   while (*args == ' ')
281     args++;
282   if (*args == '\0')
283     return 0;
284
285   tail = args;
286   while (*tail != ' ' && *tail != '\0')
287     tail++;
288   *tail = '\0';
289   if (filenamep && *args != '\0')
290     {
291       char *filename = strdup (args);
292       if (!filename)
293         return gpg_error_from_errno (errno);
294
295       *filenamep = filename;
296     }
297   return 0;
298 }