4e1a523aa334da018b36c078186100a97b450d7f
[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->sig_class = strtol (args, &tail, 0);
147   sig->class = sig->sig_class;
148   sig->_obsolete_class = sig->sig_class;
149   if (errno || args == tail || *tail != ' ')
150     {
151       /* The crypto backend does not behave.  */
152       free (sig);
153       return gpg_error (GPG_ERR_INV_ENGINE);
154     }
155   args = tail;
156
157   sig->timestamp = _gpgme_parse_timestamp (args, &tail);
158   if (sig->timestamp == -1 || args == tail || *tail != ' ')
159     {
160       /* The crypto backend does not behave.  */
161       free (sig);
162       return gpg_error (GPG_ERR_INV_ENGINE);
163     }
164   args = tail;
165   while (*args == ' ')
166     args++;
167
168   if (!*args)
169     {
170       /* The crypto backend does not behave.  */
171       free (sig);
172       return gpg_error (GPG_ERR_INV_ENGINE);
173     }
174
175   tail = strchr (args, ' ');
176   if (tail)
177     *tail = '\0';
178
179   sig->fpr = strdup (args);
180   if (!sig->fpr)
181     {
182       int saved_errno = errno;
183       free (sig);
184       return gpg_error_from_errno (saved_errno);
185     }
186   *sigp = sig;
187   return 0;
188 }
189
190
191 gpgme_error_t
192 _gpgme_sign_status_handler (void *priv, gpgme_status_code_t code, char *args)
193 {
194   gpgme_ctx_t ctx = (gpgme_ctx_t) priv;
195   gpgme_error_t err;
196   void *hook;
197   op_data_t opd;
198
199   err = _gpgme_passphrase_status_handler (priv, code, args);
200   if (err)
201     return err;
202
203   err = _gpgme_op_data_lookup (ctx, OPDATA_SIGN, &hook, -1, NULL);
204   opd = hook;
205   if (err)
206     return err;
207
208   switch (code)
209     {
210     case GPGME_STATUS_SIG_CREATED:
211       err = parse_sig_created (args, opd->last_sig_p);
212       if (err)
213         return err;
214
215       opd->last_sig_p = &(*opd->last_sig_p)->next;
216       break;
217
218     case GPGME_STATUS_INV_RECP:
219       err = _gpgme_parse_inv_recp (args, opd->last_signer_p);
220       if (err)
221         return err;
222
223       opd->last_signer_p = &(*opd->last_signer_p)->next;
224       break;
225
226     case GPGME_STATUS_EOF:
227       if (opd->result.invalid_signers)
228         return gpg_error (GPG_ERR_UNUSABLE_SECKEY);
229       break;
230
231     default:
232       break;
233     }
234   return err;
235 }
236
237
238 static gpgme_error_t
239 sign_status_handler (void *priv, gpgme_status_code_t code, char *args)
240 {
241   gpgme_error_t err;
242
243   err = _gpgme_progress_status_handler (priv, code, args);
244   if (!err)
245     err = _gpgme_sign_status_handler (priv, code, args);
246   return err;
247 }
248
249
250 gpgme_error_t
251 _gpgme_op_sign_init_result (gpgme_ctx_t ctx)
252 {
253   gpgme_error_t err;
254   void *hook;
255   op_data_t opd;
256
257   err = _gpgme_op_data_lookup (ctx, OPDATA_SIGN, &hook,
258                                sizeof (*opd), release_op_data);
259   opd = hook;
260   if (err)
261     return err;
262   opd->last_signer_p = &opd->result.invalid_signers;
263   opd->last_sig_p = &opd->result.signatures;
264   return 0;
265 }
266
267
268 static gpgme_error_t
269 sign_start (gpgme_ctx_t ctx, int synchronous, gpgme_data_t plain,
270             gpgme_data_t sig, gpgme_sig_mode_t mode)
271 {
272   gpgme_error_t err;
273
274   err = _gpgme_op_reset (ctx, synchronous);
275   if (err)
276     return err;
277
278   err = _gpgme_op_sign_init_result (ctx);
279   if (err)
280     return err;
281
282   if (mode != GPGME_SIG_MODE_NORMAL && mode != GPGME_SIG_MODE_DETACH
283       && mode != GPGME_SIG_MODE_CLEAR)
284     return gpg_error (GPG_ERR_INV_VALUE);
285
286   if (!plain)
287     return gpg_error (GPG_ERR_NO_DATA);
288   if (!sig)
289     return gpg_error (GPG_ERR_INV_VALUE);
290
291   if (ctx->passphrase_cb)
292     {
293       err = _gpgme_engine_set_command_handler
294         (ctx->engine, _gpgme_passphrase_command_handler, ctx, NULL);
295       if (err)
296         return err;
297     }
298
299   _gpgme_engine_set_status_handler (ctx->engine, sign_status_handler,
300                                     ctx);
301
302   return _gpgme_engine_op_sign (ctx->engine, plain, sig, mode, ctx->use_armor,
303                                 ctx->use_textmode, ctx->include_certs,
304                                 ctx /* FIXME */);
305 }
306
307
308 /* Sign the plaintext PLAIN and store the signature in SIG.  */
309 gpgme_error_t
310 gpgme_op_sign_start (gpgme_ctx_t ctx, gpgme_data_t plain, gpgme_data_t sig,
311                      gpgme_sig_mode_t mode)
312 {
313   return sign_start (ctx, 0, plain, sig, mode);
314 }
315
316
317 /* Sign the plaintext PLAIN and store the signature in SIG.  */
318 gpgme_error_t
319 gpgme_op_sign (gpgme_ctx_t ctx, gpgme_data_t plain, gpgme_data_t sig,
320                gpgme_sig_mode_t mode)
321 {
322   gpgme_error_t err = sign_start (ctx, 1, plain, sig, mode);
323   if (!err)
324     err = _gpgme_wait_one (ctx);
325   return err;
326 }