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 = strtol (args, &tail, 0);
 157   if (errno || 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 }