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