Ask to insert the right OpenPGP card.
[gnupg.git] / g10 / mainproc.c
index 45d9d34..31d3385 100644 (file)
@@ -1,12 +1,12 @@
 /* mainproc.c - handle packets
- * Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004,
- *               2005, 2006 Free Software Foundation, Inc.
+ * Copyright (C) 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007,
+ *               2008, 2009 Free Software Foundation, Inc.
  *
  * This file is part of GnuPG.
  *
  * GnuPG is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
+ * the Free Software Foundation; either version 3 of the License, or
  * (at your option) any later version.
  *
  * GnuPG is distributed in the hope that it will be useful,
@@ -15,9 +15,7 @@
  * GNU General Public License for more details.
  *
  * You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
- * USA.
+ * along with this program; if not, see <http://www.gnu.org/licenses/>.
  */
 
 #include <config.h>
@@ -65,8 +63,26 @@ struct mainproc_context
   md_filter_context_t mfx;
   int sigs_only;    /* Process only signatures and reject all other stuff. */
   int encrypt_only; /* Process only encryption messages. */
-  STRLIST signed_data;
+    
+  /* Name of the file with the complete signature or the file with the
+     detached signature.  This is currently only used to deduce the
+     file name of the data file if that has not been given. */
   const char *sigfilename;
+  
+  /* A structure to describe the signed data in case of a detached
+     signature. */
+  struct 
+  {
+    /* A file descriptor of the the signed data.  Only used if not -1. */
+    int data_fd;
+    /* A list of filenames with the data files or NULL. This is only
+       used if DATA_FD is -1. */
+    strlist_t data_names;
+    /* Flag to indicated that either one of the next previous fieldss
+       is used.  This is only needed for better readability. */
+    int used;
+  } signed_data;
+  
   DEK *dek;
   int last_was_session_key;
   KBNODE list;      /* The current list of packets. */
@@ -80,10 +96,15 @@ struct mainproc_context
 
 
 static int do_proc_packets( CTX c, IOBUF a );
-
 static void list_node( CTX c, KBNODE node );
 static void proc_tree( CTX c, KBNODE node );
+static int literals_seen;
 
+void
+reset_literals_seen(void)
+{
+  literals_seen=0;
+}
 
 static void
 release_list( CTX c )
@@ -212,7 +233,7 @@ symkey_decrypt_seskey( DEK *dek, byte *seskey, size_t slen )
       return G10ERR_BAD_KEY;
     }
 
-  if (gcry_cipher_open (&hd, dek->algo, GCRY_CIPHER_MODE_CFB, 1))
+  if (openpgp_cipher_open (&hd, dek->algo, GCRY_CIPHER_MODE_CFB, 1))
       BUG ();
   if (gcry_cipher_setkey ( hd, dek->key, dek->keylen ))
     BUG ();
@@ -253,9 +274,9 @@ proc_symkey_enc( CTX c, PACKET *pkt )
     else if(!c->dek)
       {
         int algo = enc->cipher_algo;
-       const char *s = gcry_cipher_algo_name (algo);
+       const char *s = openpgp_cipher_algo_name (algo);
 
-       if(s)
+       if (!openpgp_cipher_test_algo (algo))
          {
            if(!opt.quiet)
              {
@@ -290,23 +311,8 @@ proc_symkey_enc( CTX c, PACKET *pkt )
          }
        else
          {
-            int canceled;
-
-           c->dek = passphrase_to_dek (NULL, 0, algo, &enc->s2k, 0,
-                                        NULL, &canceled);
-            if (canceled)
-              {
-                /* For unknown reasons passphrase_to_dek does only
-                   return NULL if a new passphrase has been requested
-                   and has not been repeated correctly.  Thus even
-                   with a cancel requested (by means of the gpg-agent)
-                   it won't return NULL but an empty passphrase.  We
-                   take the most conservative approach for now and
-                   work around it right here. */
-                xfree (c->dek);
-                c->dek = NULL;
-              }
-
+           c->dek = passphrase_to_dek (NULL, 0, algo, &enc->s2k, 3,
+                                        NULL, NULL);
            if(c->dek)
              {
                c->dek->symmetric=1;
@@ -371,10 +377,16 @@ proc_pubkey_enc( CTX c, PACKET *pkt )
        }
     }
     else if( is_ELGAMAL(enc->pubkey_algo)
-       || enc->pubkey_algo == PUBKEY_ALGO_DSA
-       || is_RSA(enc->pubkey_algo)  ) {
-      /* FIXME:  strore this all in a list and process it later */
-
+             || enc->pubkey_algo == PUBKEY_ALGO_DSA
+             || is_RSA(enc->pubkey_algo)
+             || enc->pubkey_algo == PUBKEY_ALGO_ELGAMAL) {
+      /* Note that we also allow type 20 Elgamal keys for decryption.
+         There are still a couple of those keys in active use as a
+         subkey.  */
+
+      /* FIXME: Store this all in a list and process it later so that
+         we can prioritize what key to use.  This gives a better user
+         experience if wildcard keyids are used.  */
        if ( !c->dek && ((!enc->keyid[0] && !enc->keyid[1])
                           || opt.try_all_secrets
                          || !seckey_available( enc->keyid )) ) {
@@ -457,8 +469,8 @@ print_pkenc_list( struct kidlist_item *list, int failed )
        if( list->reason == G10ERR_NO_SECKEY ) {
            if( is_status_enabled() ) {
                char buf[20];
-               sprintf(buf,"%08lX%08lX", (ulong)list->kid[0],
-                                         (ulong)list->kid[1] );
+               snprintf (buf, sizeof buf, "%08lX%08lX",
+                          (ulong)list->kid[0], (ulong)list->kid[1]);
                write_status_text( STATUS_NO_SECKEY, buf );
            }
        }
@@ -512,8 +524,8 @@ proc_encrypted( CTX c, PACKET *pkt )
            algo = opt.def_cipher_algo;
            if ( algo )
              log_info (_("assuming %s encrypted data\n"),
-                        gcry_cipher_algo_name (algo));
-           else if ( gcry_cipher_test_algo (CIPHER_ALGO_IDEA) )
+                        openpgp_cipher_algo_name (algo));
+           else if ( openpgp_cipher_test_algo (CIPHER_ALGO_IDEA) )
              {
                algo = opt.def_cipher_algo;
                if (!algo)
@@ -521,7 +533,7 @@ proc_encrypted( CTX c, PACKET *pkt )
                idea_cipher_warn(1);
                log_info (_("IDEA cipher unavailable, "
                            "optimistically attempting to use %s instead\n"),
-                         gcry_cipher_algo_name (algo));
+                         openpgp_cipher_algo_name (algo));
              }
            else
              {
@@ -536,7 +548,7 @@ proc_encrypted( CTX c, PACKET *pkt )
                log_info (_("assuming %s encrypted data\n"), "IDEA");
              }
 
-           c->dek = passphrase_to_dek ( NULL, 0, algo, s2k, 0, NULL, NULL );
+           c->dek = passphrase_to_dek ( NULL, 0, algo, s2k, 3, NULL, NULL );
            if (c->dek)
              c->dek->algo_info_printed = 1;
          }
@@ -593,6 +605,8 @@ proc_plaintext( CTX c, PACKET *pkt )
     int any, clearsig, only_md5, rc;
     KBNODE n;
 
+    literals_seen++;
+
     if( pt->namelen == 8 && !memcmp( pt->name, "_CONSOLE", 8 ) )
        log_info(_("NOTE: sender requested \"for-your-eyes-only\"\n"));
     else if( opt.verbose )
@@ -680,15 +694,29 @@ proc_plaintext( CTX c, PACKET *pkt )
            gcry_md_start_debug ( c->mfx.md2, "verify2" );
     }
 
-    rc = handle_plaintext( pt, &c->mfx, c->sigs_only, clearsig );
-    if (rc)
-      log_debug ("handle_plaintext failed: err=%d\n", rc);
-    if( gpg_err_code (rc) == GPG_ERR_ENOENT && !c->sigs_only) 
+    rc=0;
+
+    if (literals_seen>1)
+      {
+       log_info (_("WARNING: multiple plaintexts seen\n"));
+
+       if (!opt.flags.allow_multiple_messages)
+         {
+            write_status_text (STATUS_ERROR, "proc_pkt.plaintext 89_BAD_DATA");
+           log_inc_errorcount ();
+           rc = gpg_error (GPG_ERR_UNEXPECTED); 
+         }
+      }
+    
+    if(!rc)
       {
-#warning We need to change the test for the error code
-        /* Can't write output but we hash it anyway to
-         * Check the signature. */
-        rc = handle_plaintext( pt, &c->mfx, 1, clearsig );
+        rc = handle_plaintext( pt, &c->mfx, c->sigs_only, clearsig );
+        if ( gpg_err_code (rc) == GPG_ERR_EACCES && !c->sigs_only ) 
+          {
+            /* Can't write output but we hash it anyway to check the
+               signature. */
+            rc = handle_plaintext( pt, &c->mfx, 1, clearsig );
+          }
       }
 
     if( rc )
@@ -710,8 +738,14 @@ proc_plaintext( CTX c, PACKET *pkt )
 static int
 proc_compressed_cb( IOBUF a, void *info )
 {
-    return proc_signature_packets( info, a, ((CTX)info)->signed_data,
-                                           ((CTX)info)->sigfilename );
+  if ( ((CTX)info)->signed_data.used
+       && ((CTX)info)->signed_data.data_fd != -1)
+    return proc_signature_packets_by_fd (info, a,
+                                         ((CTX)info)->signed_data.data_fd);
+  else
+    return proc_signature_packets (info, a,
+                                   ((CTX)info)->signed_data.data_names,
+                                   ((CTX)info)->sigfilename );
 }
 
 static int
@@ -1135,14 +1169,18 @@ proc_packets( void *anchor, IOBUF a )
 
 int
 proc_signature_packets( void *anchor, IOBUF a,
-                       STRLIST signedfiles, const char *sigfilename )
+                       strlist_t signedfiles, const char *sigfilename )
 {
     CTX c = xmalloc_clear( sizeof *c );
     int rc;
 
     c->anchor = anchor;
     c->sigs_only = 1;
-    c->signed_data = signedfiles;
+
+    c->signed_data.data_fd = -1;
+    c->signed_data.data_names = signedfiles;
+    c->signed_data.used = !!signedfiles;
+
     c->sigfilename = sigfilename;
     rc = do_proc_packets( c, a );
 
@@ -1169,6 +1207,43 @@ proc_signature_packets( void *anchor, IOBUF a,
 }
 
 int
+proc_signature_packets_by_fd (void *anchor, IOBUF a, int signed_data_fd )
+{
+  int rc;
+  CTX c = xcalloc (1, sizeof *c);
+
+  c->anchor = anchor;
+  c->sigs_only = 1;
+
+  c->signed_data.data_fd = signed_data_fd;
+  c->signed_data.data_names = NULL;
+  c->signed_data.used = (signed_data_fd != -1);
+
+  rc = do_proc_packets ( c, a );
+
+  /* If we have not encountered any signature we print an error
+     messages, send a NODATA status back and return an error code.
+     Using log_error is required because verify_files does not check
+     error codes for each file but we want to terminate the process
+     with an error. */ 
+  if (!rc && !c->any_sig_seen)
+    {
+      write_status_text (STATUS_NODATA, "4");
+      log_error (_("no signature found\n"));
+      rc = gpg_error (GPG_ERR_NO_DATA);
+    }
+  
+  /* Propagate the signature seen flag upward. Do this only on success
+     so that we won't issue the nodata status several times. */
+  if (!rc && c->anchor && c->any_sig_seen)
+    c->anchor->any_sig_seen = 1;
+  
+  xfree ( c );
+  return rc;
+}
+
+
+int
 proc_encryption_packets( void *anchor, IOBUF a )
 {
     CTX c = xmalloc_clear( sizeof *c );
@@ -1465,8 +1540,17 @@ check_sig_and_print( CTX c, KBNODE node )
           n_sig++;
         if (!n_sig)
           goto ambiguous;
-        if (n && !opt.allow_multisig_verification)
-          goto ambiguous;
+
+       /* If we wanted to disallow multiple sig verification, we'd do
+          something like this:
+
+          if (n && !opt.allow_multisig_verification)
+             goto ambiguous;
+
+          However, now that we have --allow-multiple-messages, this
+          can stay allowable as we can't get here unless multiple
+          messages (i.e. multiple literals) are allowed. */
+
         if (n_onepass != n_sig)
           {
             log_info ("number of one-pass packets does not match "
@@ -1721,7 +1805,8 @@ check_sig_and_print( CTX c, KBNODE node )
 
         /* If we have a good signature and already printed 
          * the primary user ID, print all the other user IDs */
-        if ( count && !rc ) {
+        if ( count && !rc
+             && !(opt.verify_options&VERIFY_SHOW_PRIMARY_UID_ONLY)) {
            char *p;
             for( un=keyblock; un; un = un->next ) {
                 if( un->pkt->pkttype != PKT_USER_ID )
@@ -1741,7 +1826,8 @@ check_sig_and_print( CTX c, KBNODE node )
 
                    if(opt.verify_options&VERIFY_SHOW_PHOTOS)
                      show_photos(un->pkt->pkt.user_id->attribs,
-                                 un->pkt->pkt.user_id->numattribs,pk,NULL);
+                                 un->pkt->pkt.user_id->numattribs,
+                                 pk,NULL,un->pkt->pkt.user_id);
                  }
 
                p=utf8_to_native(un->pkt->pkt.user_id->name,
@@ -1917,6 +2003,8 @@ proc_tree( CTX c, KBNODE node )
     else if( node->pkt->pkttype == PKT_ONEPASS_SIG ) {
        /* check all signatures */
        if( !c->have_data ) {
+            int use_textmode = 0;
+
            free_md_filter_context( &c->mfx );
            /* prepare to create all requested message digests */
             if (gcry_md_open (&c->mfx.md, 0, 0))
@@ -1929,23 +2017,33 @@ proc_tree( CTX c, KBNODE node )
                gcry_md_enable (c->mfx.md,
                                 n1->pkt->pkt.signature->digest_algo);
               }
-           /* ask for file and hash it */
+
+            if (n1 && n1->pkt->pkt.onepass_sig->sig_class == 0x01)
+                use_textmode = 1;
+
+           /* Ask for file and hash it. */
            if( c->sigs_only ) {
-               rc = hash_datafiles( c->mfx.md, NULL,
-                                    c->signed_data, c->sigfilename,
-                       n1? (n1->pkt->pkt.onepass_sig->sig_class == 0x01):0 );
+                if (c->signed_data.used && c->signed_data.data_fd != -1)
+                    rc = hash_datafile_by_fd (c->mfx.md, NULL,
+                                              c->signed_data.data_fd,
+                                              use_textmode);
+                else
+                    rc = hash_datafiles (c->mfx.md, NULL,
+                                         c->signed_data.data_names,
+                                         c->sigfilename,
+                                         use_textmode );
            }
            else {
-               rc = ask_for_detached_datafilec->mfx.md, c->mfx.md2,
+               rc = ask_for_detached_datafile (c->mfx.md, c->mfx.md2,
                                                iobuf_get_real_fname(c->iobuf),
-                       n1? (n1->pkt->pkt.onepass_sig->sig_class == 0x01):0 );
+                                                use_textmode );
            }
            if( rc ) {
                log_error("can't hash datafile: %s\n", g10_errstr(rc));
                return;
            }
        }
-        else if ( c->signed_data ) {
+        else if ( c->signed_data.used ) {
             log_error (_("not a detached signature\n") );
             return;
         }
@@ -1961,7 +2059,7 @@ proc_tree( CTX c, KBNODE node )
             log_error("cleartext signature without data\n" );
             return;
         }
-        else if ( c->signed_data ) {
+        else if ( c->signed_data.used ) {
             log_error (_("not a detached signature\n") );
             return;
         }
@@ -2037,9 +2135,15 @@ proc_tree( CTX c, KBNODE node )
                     gcry_md_start_debug( c->mfx.md2, "verify2" );
             }
            if( c->sigs_only ) {
-               rc = hash_datafiles( c->mfx.md, c->mfx.md2,
-                                    c->signed_data, c->sigfilename,
-                                    (sig->sig_class == 0x01) );
+                if (c->signed_data.used && c->signed_data.data_fd != -1)
+                    rc = hash_datafile_by_fd (c->mfx.md, c->mfx.md2,
+                                              c->signed_data.data_fd, 
+                                              (sig->sig_class == 0x01));
+                else
+                    rc = hash_datafiles (c->mfx.md, c->mfx.md2,
+                                         c->signed_data.data_names,
+                                         c->sigfilename,
+                                         (sig->sig_class == 0x01));
            }
            else {
                rc = ask_for_detached_datafile( c->mfx.md, c->mfx.md2,
@@ -2051,7 +2155,7 @@ proc_tree( CTX c, KBNODE node )
                return;
            }
        }
-        else if ( c->signed_data ) {
+        else if ( c->signed_data.used ) {
             log_error (_("not a detached signature\n") );
             return;
         }