* conversion.c (_gpgme_parse_timestamp): New.
[gpgme.git] / gpgme / sign.c
1 /* sign.c - Signing function.
2    Copyright (C) 2000 Werner Koch (dd9jn)
3    Copyright (C) 2001, 2002, 2003 g10 Code GmbH
4
5    This file is part of GPGME.
6  
7    GPGME is free software; you can redistribute it and/or modify it
8    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, but
13    WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15    General Public License for more details.
16  
17    You should have received a copy of the GNU General Public License
18    along with GPGME; if not, write to the Free Software Foundation,
19    Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
20
21 #if HAVE_CONFIG_H
22 #include <config.h>
23 #endif
24 #include <stdlib.h>
25 #include <string.h>
26 #include <errno.h>
27
28 #include "gpgme.h"
29 #include "context.h"
30 #include "ops.h"
31
32 \f
33 typedef struct
34 {
35   struct _gpgme_op_sign_result result;
36
37   /* A pointer to the next pointer of the last invalid signer in
38      the list.  This makes appending new invalid signers painless
39      while preserving the order.  */
40   gpgme_invalid_key_t *last_signer_p;
41
42   /* Likewise for signature information.  */
43   gpgme_new_signature_t *last_sig_p;
44 } *op_data_t;
45
46
47 static void
48 release_op_data (void *hook)
49 {
50   op_data_t opd = (op_data_t) hook;
51   gpgme_invalid_key_t invalid_signer = opd->result.invalid_signers;
52   gpgme_new_signature_t sig = opd->result.signatures;
53
54   while (invalid_signer)
55     {
56       gpgme_invalid_key_t next = invalid_signer->next;
57       if (invalid_signer->fpr)
58         free (invalid_signer->fpr);
59       free (invalid_signer);
60       invalid_signer = next;
61     }
62
63   while (sig)
64     {
65       gpgme_new_signature_t next = sig->next;
66       free (sig->fpr);
67       free (sig);
68       sig = next;
69     }
70 }
71
72
73 gpgme_sign_result_t
74 gpgme_op_sign_result (gpgme_ctx_t ctx)
75 {
76   void *hook;
77   op_data_t opd;
78   gpgme_error_t err;
79
80   err = _gpgme_op_data_lookup (ctx, OPDATA_SIGN, &hook, -1, NULL);
81   opd = hook;
82   if (err || !opd)
83     return NULL;
84
85   return &opd->result;
86 }
87
88 \f
89 static gpgme_error_t
90 parse_sig_created (char *args, gpgme_new_signature_t *sigp)
91 {
92   gpgme_new_signature_t sig;
93   char *tail;
94
95   sig = malloc (sizeof (*sig));
96   if (!sig)
97     return gpg_error_from_errno (errno);
98
99   sig->next = NULL;
100   switch (*args)
101     {
102     case 'S':
103       sig->type = GPGME_SIG_MODE_NORMAL;
104       break;
105
106     case 'D':
107       sig->type = GPGME_SIG_MODE_DETACH;
108       break;
109
110     case 'C':
111       sig->type = GPGME_SIG_MODE_CLEAR;
112       break;
113
114     default:
115       /* The backend engine is not behaving.  */
116       free (sig);
117       return gpg_error (GPG_ERR_INV_ENGINE);
118     }
119
120   args++;
121   if (*args != ' ')
122     {
123       free (sig);
124       return gpg_error (GPG_ERR_INV_ENGINE);
125     }
126
127   errno = 0;
128   sig->pubkey_algo = strtol (args, &tail, 0);
129   if (errno || args == tail || *tail != ' ')
130     {
131       /* The crypto backend does not behave.  */
132       free (sig);
133       return gpg_error (GPG_ERR_INV_ENGINE);
134     }
135   args = tail;
136
137   sig->hash_algo = strtol (args, &tail, 0);
138   if (errno || args == tail || *tail != ' ')
139     {
140       /* The crypto backend does not behave.  */
141       free (sig);
142       return gpg_error (GPG_ERR_INV_ENGINE);
143     }
144   args = tail;
145
146   sig->class = strtol (args, &tail, 0);
147   sig->_obsolete_class = sig->class;
148   if (errno || args == tail || *tail != ' ')
149     {
150       /* The crypto backend does not behave.  */
151       free (sig);
152       return gpg_error (GPG_ERR_INV_ENGINE);
153     }
154   args = tail;
155
156   sig->timestamp = _gpgme_parse_timestamp (args, &tail);
157   if (sig->timestamp == -1 || args == tail || *tail != ' ')
158     {
159       /* The crypto backend does not behave.  */
160       free (sig);
161       return gpg_error (GPG_ERR_INV_ENGINE);
162     }
163   args = tail;
164   while (*args == ' ')
165     args++;
166
167   if (!*args)
168     {
169       /* The crypto backend does not behave.  */
170       free (sig);
171       return gpg_error (GPG_ERR_INV_ENGINE);
172     }
173
174   tail = strchr (args, ' ');
175   if (tail)
176     *tail = '\0';
177
178   sig->fpr = strdup (args);
179   if (!sig->fpr)
180     {
181       int saved_errno = errno;
182       free (sig);
183       return gpg_error_from_errno (saved_errno);
184     }
185   *sigp = sig;
186   return 0;
187 }
188
189
190 gpgme_error_t
191 _gpgme_sign_status_handler (void *priv, gpgme_status_code_t code, char *args)
192 {
193   gpgme_ctx_t ctx = (gpgme_ctx_t) priv;
194   gpgme_error_t err;
195   void *hook;
196   op_data_t opd;
197
198   err = _gpgme_passphrase_status_handler (priv, code, args);
199   if (err)
200     return err;
201
202   err = _gpgme_op_data_lookup (ctx, OPDATA_SIGN, &hook, -1, NULL);
203   opd = hook;
204   if (err)
205     return err;
206
207   switch (code)
208     {
209     case GPGME_STATUS_SIG_CREATED:
210       err = parse_sig_created (args, opd->last_sig_p);
211       if (err)
212         return err;
213
214       opd->last_sig_p = &(*opd->last_sig_p)->next;
215       break;
216
217     case GPGME_STATUS_INV_RECP:
218       err = _gpgme_parse_inv_recp (args, opd->last_signer_p);
219       if (err)
220         return err;
221
222       opd->last_signer_p = &(*opd->last_signer_p)->next;
223       break;
224
225     case GPGME_STATUS_EOF:
226       if (opd->result.invalid_signers)
227         return gpg_error (GPG_ERR_UNUSABLE_SECKEY);
228       break;
229
230     default:
231       break;
232     }
233   return err;
234 }
235
236
237 static gpgme_error_t
238 sign_status_handler (void *priv, gpgme_status_code_t code, char *args)
239 {
240   gpgme_error_t err;
241
242   err = _gpgme_progress_status_handler (priv, code, args);
243   if (!err)
244     err = _gpgme_sign_status_handler (priv, code, args);
245   return err;
246 }
247
248
249 gpgme_error_t
250 _gpgme_op_sign_init_result (gpgme_ctx_t ctx)
251 {
252   gpgme_error_t err;
253   void *hook;
254   op_data_t opd;
255
256   err = _gpgme_op_data_lookup (ctx, OPDATA_SIGN, &hook,
257                                sizeof (*opd), release_op_data);
258   opd = hook;
259   if (err)
260     return err;
261   opd->last_signer_p = &opd->result.invalid_signers;
262   opd->last_sig_p = &opd->result.signatures;
263   return 0;
264 }
265
266
267 static gpgme_error_t
268 sign_start (gpgme_ctx_t ctx, int synchronous, gpgme_data_t plain,
269             gpgme_data_t sig, gpgme_sig_mode_t mode)
270 {
271   gpgme_error_t err;
272
273   err = _gpgme_op_reset (ctx, synchronous);
274   if (err)
275     return err;
276
277   err = _gpgme_op_sign_init_result (ctx);
278   if (err)
279     return err;
280
281   if (mode != GPGME_SIG_MODE_NORMAL && mode != GPGME_SIG_MODE_DETACH
282       && mode != GPGME_SIG_MODE_CLEAR)
283     return gpg_error (GPG_ERR_INV_VALUE);
284
285   if (!plain)
286     return gpg_error (GPG_ERR_NO_DATA);
287   if (!sig)
288     return gpg_error (GPG_ERR_INV_VALUE);
289
290   if (ctx->passphrase_cb)
291     {
292       err = _gpgme_engine_set_command_handler
293         (ctx->engine, _gpgme_passphrase_command_handler, ctx, NULL);
294       if (err)
295         return err;
296     }
297
298   _gpgme_engine_set_status_handler (ctx->engine, sign_status_handler,
299                                     ctx);
300
301   return _gpgme_engine_op_sign (ctx->engine, plain, sig, mode, ctx->use_armor,
302                                 ctx->use_textmode, ctx->include_certs,
303                                 ctx /* FIXME */);
304 }
305
306
307 /* Sign the plaintext PLAIN and store the signature in SIG.  */
308 gpgme_error_t
309 gpgme_op_sign_start (gpgme_ctx_t ctx, gpgme_data_t plain, gpgme_data_t sig,
310                      gpgme_sig_mode_t mode)
311 {
312   return sign_start (ctx, 0, plain, sig, mode);
313 }
314
315
316 /* Sign the plaintext PLAIN and store the signature in SIG.  */
317 gpgme_error_t
318 gpgme_op_sign (gpgme_ctx_t ctx, gpgme_data_t plain, gpgme_data_t sig,
319                gpgme_sig_mode_t mode)
320 {
321   gpgme_error_t err = sign_start (ctx, 1, plain, sig, mode);
322   if (!err)
323     err = _gpgme_wait_one (ctx);
324   return err;
325 }