new cryptplug function importCertificateFromMem()
[gpgme.git] / gpgmeplug / gpgmeplug.c
index 8db8e84..f603008 100644 (file)
@@ -6,6 +6,7 @@
               the common CRYPTPLUG specification.
 
   Copyright (C) 2001 by Klarälvdalens Datakonsult AB
+  Copyright (C) 2002 g10 Code GmbH
 
   GPGMEPLUG is free software; you can redistribute it and/or modify
   it under the terms of GNU General Public License as published by
@@ -50,6 +51,7 @@
 #include <assert.h>
 #include <errno.h>
 #include <time.h>
+#include <ctype.h>
 
 #ifndef BUG_URL
 #define BUG_URL "http:://www.gnupg.org/aegypten/"
 #define GPGMEPLUG_PROTOCOL GPGME_PROTOCOL_OpenPGP
 #endif
 
-// definitions for signing
-#ifndef GPGMEPLUG_SIGN_MAKE_MIME_OBJECT
-#define GPGMEPLUG_SIGN_INCLUDE_CLEARTEXT true
-#define GPGMEPLUG_SIGN_MAKE_MIME_OBJECT  true
-#define GPGMEPLUG_SIGN_MAKE_MULTI_MIME   true
-#define GPGMEPLUG_SIGN_CTYPE_MAIN        "multipart/signed;protocol=application/pgp-signature;micalg=pgp-sha1"
-#define GPGMEPLUG_SIGN_CDISP_MAIN        ""
-#define GPGMEPLUG_SIGN_CTENC_MAIN        ""
-#define GPGMEPLUG_SIGN_CTYPE_VERSION     ""
-#define GPGMEPLUG_SIGN_CDISP_VERSION     ""
-#define GPGMEPLUG_SIGN_CTENC_VERSION     ""
-#define GPGMEPLUG_SIGN_BTEXT_VERSION     ""
-#define GPGMEPLUG_SIGN_CTYPE_CODE        "application/pgp-signature"
-#define GPGMEPLUG_SIGN_CDISP_CODE        ""
-#define GPGMEPLUG_SIGN_CTENC_CODE        ""
-#define GPGMEPLUG_SIGN_FLAT_PREFIX       ""
-#define GPGMEPLUG_SIGN_FLAT_SEPARATOR    ""
-#define GPGMEPLUG_SIGN_FLAT_POSTFIX      ""
+/* definitions for signing */
+/* 1. opaque signatures (only used for S/MIME). */
+#ifndef GPGMEPLUG_OPA_SIGN_MAKE_MIME_OBJECT
+#define GPGMEPLUG_OPA_SIGN_INCLUDE_CLEARTEXT false
+#define GPGMEPLUG_OPA_SIGN_MAKE_MIME_OBJECT  false
+#define GPGMEPLUG_OPA_SIGN_MAKE_MULTI_MIME   false
+#define GPGMEPLUG_OPA_SIGN_CTYPE_MAIN        ""
+#define GPGMEPLUG_OPA_SIGN_CDISP_MAIN        ""
+#define GPGMEPLUG_OPA_SIGN_CTENC_MAIN        ""
+#define GPGMEPLUG_OPA_SIGN_CTYPE_VERSION     ""
+#define GPGMEPLUG_OPA_SIGN_CDISP_VERSION     ""
+#define GPGMEPLUG_OPA_SIGN_CTENC_VERSION     ""
+#define GPGMEPLUG_OPA_SIGN_BTEXT_VERSION     ""
+#define GPGMEPLUG_OPA_SIGN_CTYPE_CODE        ""
+#define GPGMEPLUG_OPA_SIGN_CDISP_CODE        ""
+#define GPGMEPLUG_OPA_SIGN_CTENC_CODE        ""
+#define GPGMEPLUG_OPA_SIGN_FLAT_PREFIX       ""
+#define GPGMEPLUG_OPA_SIGN_FLAT_SEPARATOR    ""
+#define GPGMEPLUG_OPA_SIGN_FLAT_POSTFIX      ""
 #endif
-// definitions for encoding
+/* 2. detached signatures (used for S/MIME and for OpenPGP) */
+#ifndef GPGMEPLUG_DET_SIGN_MAKE_MIME_OBJECT
+#define GPGMEPLUG_DET_SIGN_INCLUDE_CLEARTEXT true
+#define GPGMEPLUG_DET_SIGN_MAKE_MIME_OBJECT  true
+#define GPGMEPLUG_DET_SIGN_MAKE_MULTI_MIME   true
+#define GPGMEPLUG_DET_SIGN_CTYPE_MAIN        "multipart/signed;protocol=application/pgp-signature;micalg=pgp-sha1"
+#define GPGMEPLUG_DET_SIGN_CDISP_MAIN        ""
+#define GPGMEPLUG_DET_SIGN_CTENC_MAIN        ""
+#define GPGMEPLUG_DET_SIGN_CTYPE_VERSION     ""
+#define GPGMEPLUG_DET_SIGN_CDISP_VERSION     ""
+#define GPGMEPLUG_DET_SIGN_CTENC_VERSION     ""
+#define GPGMEPLUG_DET_SIGN_BTEXT_VERSION     ""
+#define GPGMEPLUG_DET_SIGN_CTYPE_CODE        "application/pgp-signature"
+#define GPGMEPLUG_DET_SIGN_CDISP_CODE        ""
+#define GPGMEPLUG_DET_SIGN_CTENC_CODE        ""
+#define GPGMEPLUG_DET_SIGN_FLAT_PREFIX       ""
+#define GPGMEPLUG_DET_SIGN_FLAT_SEPARATOR    ""
+#define GPGMEPLUG_DET_SIGN_FLAT_POSTFIX      ""
+#endif
+/* 3. common definitions for opaque and detached signing */
+#ifndef __GPGMEPLUG_SIGNATURE_CODE_IS_BINARY
+#define __GPGMEPLUG_SIGNATURE_CODE_IS_BINARY false
+#endif
+
+#define __GPGMEPLUG_ERROR_CLEARTEXT_IS_ZERO "Error: Cannot run checkMessageSignature() with cleartext == 0"
+
+/* definitions for encoding */
 #ifndef GPGMEPLUG_ENC_MAKE_MIME_OBJECT
 #define GPGMEPLUG_ENC_INCLUDE_CLEARTEXT  false
 #define GPGMEPLUG_ENC_MAKE_MIME_OBJECT   true
 #define GPGMEPLUG_ENC_FLAT_PREFIX        ""
 #define GPGMEPLUG_ENC_FLAT_SEPARATOR     ""
 #define GPGMEPLUG_ENC_FLAT_POSTFIX       ""
+#define __GPGMEPLUG_ENCRYPTED_CODE_IS_BINARY false
 #endif
-// Note: The following specification will result in
-//       function encryptAndSignMessage() producing
-//       _empty_ mails.
-//       This must be changed as soon as our plugin
-//       is supporting the encryptAndSignMessage() function.
+/* Note: The following specification will result in
+       function encryptAndSignMessage() producing
+       _empty_ mails.
+       This must be changed as soon as our plugin
+       is supporting the encryptAndSignMessage() function. */
 #ifndef GPGMEPLUG_ENCSIGN_MAKE_MIME_OBJECT
 #define GPGMEPLUG_ENCSIGN_INCLUDE_CLEARTEXT false
 #define GPGMEPLUG_ENCSIGN_MAKE_MIME_OBJECT  false
 #include "cryptplug.h"
 
 
+#define days_from_seconds(x) ((x)/86400)
+
+
 typedef struct {
   const char*             bugURL;
   const char*             signatureKeyCertificate;
   SignatureAlgorithm      signatureAlgorithm;
+  SignatureCompoundMode   signatureCompoundMode;
   SendCertificates        sendCertificates;
   SignEmail               signEmail;
   bool                    saveSentSignatures;
@@ -162,6 +196,7 @@ typedef struct {
   bool                    certificateInChainExpiryNearWarning;
   int                     certificateInChainExpiryNearWarningInterval;
   bool                    receiverEmailAddressNotInCertificateWarning;
+  const char* libVersion; /* a statically allocated string with the GPGME Version used */
 } Config;
 
 
@@ -169,6 +204,48 @@ Config config;
 
 #define NEAR_EXPIRY 14
 
+/* Max number of parts in a DN */
+#define MAX_GPGME_IDX 20
+
+/* some macros to replace ctype ones and avoid locale problems */
+#define spacep(p)   (*(p) == ' ' || *(p) == '\t')
+#define digitp(p)   (*(p) >= '0' && *(p) <= '9')
+#define hexdigitp(a) (digitp (a)                     \
+                      || (*(a) >= 'A' && *(a) <= 'F')  \
+                      || (*(a) >= 'a' && *(a) <= 'f'))
+/* the atoi macros assume that the buffer has only valid digits */
+#define atoi_1(p)   (*(p) - '0' )
+#define atoi_2(p)   ((atoi_1(p) * 10) + atoi_1((p)+1))
+#define atoi_4(p)   ((atoi_2(p) * 100) + atoi_2((p)+2))
+#define xtoi_1(p)   (*(p) <= '9'? (*(p)- '0'): \
+                     *(p) <= 'F'? (*(p)-'A'+10):(*(p)-'a'+10))
+#define xtoi_2(p)   ((xtoi_1(p) * 16) + xtoi_1((p)+1))
+
+static void *
+xmalloc (size_t n)
+{
+  char *p = malloc (n);
+  if (!p)
+    { 
+      fputs ("\nfatal: out of core\n", stderr);
+      exit (4);
+    }
+  return p;
+}
+
+/* Please: Don't call an allocation function xfoo when it may return NULL. */
+/* Wrong: #define xstrdup( x ) (x)?strdup(x):0 */
+/* Right: */
+static char *
+xstrdup (const char *string)
+{
+  char *p = xmalloc (strlen (string)+1);
+  strcpy (p, string);
+  return p;
+}
+
+
+
 bool initialize()
 {
   config.bugURL                               = malloc( strlen( BUG_URL ) + 1 );
@@ -176,6 +253,10 @@ bool initialize()
   config.signatureKeyCertificate              = malloc( 1 );
   strcpy( (char* )config.signatureKeyCertificate, "" );
   config.signatureAlgorithm                   = SignAlg_SHA1;
+  if( GPGMEPLUG_PROTOCOL == GPGME_PROTOCOL_CMS )
+    config.signatureCompoundMode              = SignatureCompoundMode_Opaque;
+  else
+    config.signatureCompoundMode              = SignatureCompoundMode_Detached;
   config.sendCertificates                     = SendCert_SendChainWithRoot;
   config.signEmail                            = SignEmail_SignAll;
   config.saveSentSignatures                   = true;
@@ -209,8 +290,8 @@ bool initialize()
   config.certificateInChainExpiryNearWarning          = true;
   config.certificateInChainExpiryNearWarningInterval  = NEAR_EXPIRY;
   config.receiverEmailAddressNotInCertificateWarning  = true;
-
-  return true;
+  config.libVersion = gpgme_check_version (NULL);
+  return (gpgme_engine_check_version (GPGMEPLUG_PROTOCOL) == GPGME_No_Error);
 };
 
 
@@ -227,18 +308,34 @@ void deinitialize()
 
 bool hasFeature( Feature flag )
 {
+  /* our own plugins are supposed to support everything */
   switch ( flag ) {
-    case CryptPlugFeat_SignMessages:              return true;
-    case CryptPlugFeat_VerifySignatures:          return true;
-    case CryptPlugFeat_EncryptMessages:           return true;
-    case CryptPlugFeat_DecryptMessages:           return true;
-    // undefined or not yet implemented:
-    case CryptPlugFeat_undef:                     return false;
-    default:                                      return false;
+  case Feature_SignMessages:              return true;
+  case Feature_VerifySignatures:          return true;
+  case Feature_EncryptMessages:           return true;
+  case Feature_DecryptMessages:           return true;
+  case Feature_SendCertificates:          return true;
+  case Feature_WarnSignCertificateExpiry: return true;
+  case Feature_WarnSignEmailNotInCertificate: return true;
+  case Feature_PinEntrySettings:          return true;
+  case Feature_StoreMessagesWithSigs:     return true;
+  case Feature_EncryptionCRLs:            return true;
+  case Feature_WarnEncryptCertificateExpiry: return true;
+  case Feature_WarnEncryptEmailNotInCertificate: return true;
+  case Feature_StoreMessagesEncrypted:    return true;
+  case Feature_CheckCertificatePath:      return true;
+  case Feature_CertificateDirectoryService: return false;
+  case Feature_CRLDirectoryService:       return false;
+  /* undefined or not yet implemented: */
+  case Feature_undef:                     return false;
+  default:                                      return false;
   }
 }
 
 
+const char* libVersion(){ return config.libVersion; }
+
+
 const char* bugURL(){ return config.bugURL; }
 
 
@@ -284,6 +381,16 @@ SignatureAlgorithm signatureAlgorithm()
   return config.signatureAlgorithm;
 }
 
+void setSignatureCompoundMode( SignatureCompoundMode signComp )
+{
+  config.signatureCompoundMode = signComp;
+}
+
+SignatureCompoundMode signatureCompoundMode()
+{
+  return config.signatureCompoundMode;
+}
+
 void setSendCertificates( SendCertificates sendCert )
 {
   config.sendCertificates = sendCert;
@@ -343,9 +450,33 @@ bool warnNoCertificate()
   return config.warnNoCertificate;
 }
 
+
+bool isEmailInCertificate( const char* email, const char* certificate )
+{
+    /* PENDING(g10) this function should return true if the email
+       address passed as the first parameter is contained in the
+       certificate passed as the second parameter, and false
+       otherwise. This is used to alert the user if his own email
+       address is not contained in the certificate he uses for
+       signing.
+       Note that the parameter email can be anything that is allowed
+       in a From: line.
+       Another note: OK, OK, we'll handle that in the MUA. You can
+       assume that you only get the email address.
+    */
+  return false; /* dummy*/
+}
+
+
 void setNumPINRequests( PinRequests reqMode )
 {
   config.numPINRequests = reqMode;
+
+  /* PENDING(g10) Put this value into gpg and make it ask for the pin
+     according to this. Note that there is also
+     setNumPINRequestsInterval() which is only used if reqMode ==
+     PinRequest_AfterMinutes.
+  */
 }
 
 PinRequests numPINRequests()
@@ -355,11 +486,15 @@ PinRequests numPINRequests()
 
 
 
-
-
 void setNumPINRequestsInterval( int interval )
 {
   config.numPINRequestsInterval = interval;
+
+  /* PENDING(g10) Put this value into gpg and make it ask for the pin
+     according to this. Note that this should only be used if
+     config.numPINRequests (set with setNumPINRequests()) has the
+     value PinRequest_AfterMinutes.
+  */
 }
 
 int numPINRequestsInterval()
@@ -369,10 +504,6 @@ int numPINRequestsInterval()
 
 
 
-
-
-
-
 void setCheckSignatureCertificatePathToRoot( bool flag )
 {
   config.checkSignatureCertificatePathToRoot = flag;
@@ -408,6 +539,39 @@ bool signatureCertificateExpiryNearWarning( void )
   return config.signatureCertificateExpiryNearWarning;
 }
 
+
+int signatureCertificateDaysLeftToExpiry( const char* certificate )
+{
+  GpgmeCtx ctx;
+  GpgmeError err;
+  GpgmeKey rKey;
+  time_t daysLeft = 0;
+
+  gpgme_new( &ctx );
+  gpgme_set_protocol( ctx, GPGMEPLUG_PROTOCOL );
+
+  err = gpgme_op_keylist_start( ctx, certificate, 0 );
+  if ( GPGME_No_Error == err ) {
+    err = gpgme_op_keylist_next( ctx, &rKey );
+    gpgme_op_keylist_end( ctx );
+    if ( GPGME_No_Error == err ) {
+      time_t expire_time = gpgme_key_get_ulong_attr(
+                             rKey,GPGME_ATTR_EXPIRE, NULL, 0 );
+      time_t cur_time = time (NULL);
+      daysLeft = days_from_seconds(expire_time - cur_time);
+      gpgme_key_release( rKey );
+    }
+  }
+  gpgme_release( ctx );
+    
+  /* 
+  fprintf( stderr, "gpgmeplug signatureCertificateDaysLeftToExpiry returned %d\n", daysLeft );
+  */
+
+  return daysLeft;
+}
+
+
 void setSignatureCertificateExpiryNearInterval( int interval )
 {
   config.signatureCertificateExpiryNearInterval = interval;
@@ -428,6 +592,48 @@ bool caCertificateExpiryNearWarning( void )
   return config.cACertificateExpiryNearWarning;
 }
 
+int caCertificateDaysLeftToExpiry( const char* certificate )
+{
+    /* PENDING(g10)
+       Please return the number of days that are left until the
+       CA certificate for the certificate specified in the parameter
+       certificate expires.
+    */
+  /*
+  GpgmeCtx ctx;
+  GpgmeError err;
+  GpgmeKey rKey;
+  time_t daysLeft = 0;
+
+  gpgme_new( &ctx );
+  gpgme_set_protocol( ctx, GPGMEPLUG_PROTOCOL );
+
+  err = gpgme_op_keylist_start( ctx, certificate, 0 );
+  if ( GPGME_No_Error == err ) {
+    err = gpgme_op_keylist_next( ctx, &rKey );
+    gpgme_op_keylist_end( ctx );
+    if ( GPGME_No_Error == err ) {
+      time_t expire_time = gpgme_key_get_ulong_attr(
+                             rKey,
+                             
+??????????????????????? GPGME_ATTR_EXPIRE,  ???????????????????????
+                             
+                             NULL, 0 );
+      time_t cur_time = time (NULL);
+      daysLeft = days_from_seconds(expire_time - cur_time);
+      gpgme_key_release( rKey );
+    }
+  }
+  gpgme_release( ctx );
+    
+   
+  // fprintf( stderr, "gpgmeplug caCertificateDaysLeftToExpiry returned %d\n", daysLeft );
+  return daysLeft;
+  */
+  
+  return 10; /* dummy that triggers a warning in the MUA */
+}
+
 void setCACertificateExpiryNearInterval( int interval )
 {
   config.cACertificateExpiryNearInterval = interval;
@@ -448,6 +654,49 @@ bool rootCertificateExpiryNearWarning( void )
   return config.rootCertificateExpiryNearWarning;
 }
 
+int rootCertificateDaysLeftToExpiry( const char* certificate )
+{
+    /* PENDING(g10)
+       Please return the number of days that are left until the
+       root certificate for the certificate specified in the parameter
+       certificate expires.
+    */
+  /*
+  GpgmeCtx ctx;
+  GpgmeError err;
+  GpgmeKey rKey;
+  time_t daysLeft = 0;
+
+  gpgme_new( &ctx );
+  gpgme_set_protocol( ctx, GPGMEPLUG_PROTOCOL );
+
+  err = gpgme_op_keylist_start( ctx, certificate, 0 );
+  if ( GPGME_No_Error == err ) {
+    err = gpgme_op_keylist_next( ctx, &rKey );
+    gpgme_op_keylist_end( ctx );
+    if ( GPGME_No_Error == err ) {
+      time_t expire_time = gpgme_key_get_ulong_attr(
+                             rKey,
+                             
+??????????????????????? GPGME_ATTR_EXPIRE,  ???????????????????????
+                             
+                             NULL, 0 );
+      time_t cur_time = time (NULL);
+      daysLeft = days_from_seconds(expire_time - cur_time);
+      gpgme_key_release( rKey );
+    }
+  }
+  gpgme_release( ctx );
+    
+   
+  // fprintf( stderr, "gpgmeplug rootCertificateDaysLeftToExpiry returned %d\n", daysLeft );
+  return daysLeft;
+  */
+  
+  return 10; /* dummy that triggers a warning in the MUA */
+}
+
+
 void setRootCertificateExpiryNearInterval( int interval )
 {
   config.rootCertificateExpiryNearInterval = interval;
@@ -575,6 +824,47 @@ bool receiverCertificateExpiryNearWarning()
   return config.receiverCertificateExpiryNearWarning;
 }
 
+
+int receiverCertificateDaysLeftToExpiry( const char* certificate )
+{
+  GpgmeCtx ctx;
+  GpgmeError err;
+  GpgmeKey rKey;
+  time_t daysLeft = 0;
+
+  gpgme_new( &ctx );
+  gpgme_set_protocol( ctx, GPGMEPLUG_PROTOCOL );
+
+  err = gpgme_op_keylist_start( ctx, certificate, 0 );
+  if ( GPGME_No_Error == err ) {
+    err = gpgme_op_keylist_next( ctx, &rKey );
+    gpgme_op_keylist_end( ctx );
+    if ( GPGME_No_Error == err ) {
+      time_t expire_time = gpgme_key_get_ulong_attr(
+                             rKey,GPGME_ATTR_EXPIRE, NULL, 0 );
+      time_t cur_time = time (NULL);
+      daysLeft = days_from_seconds(expire_time - cur_time);
+      gpgme_key_release( rKey );
+    }
+  }
+  gpgme_release( ctx );
+    
+  /*
+  fprintf( stderr, "gpgmeplug receiverCertificateDaysLeftToExpiry returned %d\n", daysLeft );
+  */
+
+  return daysLeft;
+    
+    
+    
+    /* PENDING(g10)
+       Please return the number of days that are left until the
+       certificate specified in the parameter certificate expires.
+    */
+  return 10; /* dummy that triggers a warning in the MUA */
+}
+
+
 void setReceiverCertificateExpiryNearWarningInterval( int interval )
 {
   config.receiverCertificateExpiryNearWarningInterval = interval;
@@ -595,6 +885,18 @@ bool certificateInChainExpiryNearWarning()
   return config.certificateInChainExpiryNearWarning;
 }
 
+
+int certificateInChainDaysLeftToExpiry( const char* certificate )
+{
+    /* PENDING(g10)
+       Please return the number of days that are left until the
+       the first certificate in the chain of the specified certificate
+       expires.
+    */
+  return 10; /* dummy that triggers a warning in the MUA */
+}
+
+
 void setCertificateInChainExpiryNearWarningInterval( int interval )
 {
   config.certificateInChainExpiryNearWarningInterval = interval;
@@ -625,6 +927,11 @@ bool receiverEmailAddressNotInCertificateWarning()
 void setEncryptionUseCRLs( bool flag )
 {
   config.encryptionUseCRLs = flag;
+
+  /* PENDING(g10) Store this setting in gpgme and use it. If true,
+     every certificate used for encryption should be checked against
+     applicable CRLs.
+  */
 }
 
 bool encryptionUseCRLs()
@@ -632,6 +939,16 @@ bool encryptionUseCRLs()
   return config.encryptionUseCRLs;
 }
 
+
+int encryptionCRLsDaysLeftToExpiry()
+{
+    /* PENDING(g10)
+       Please return the number of days that are left until the
+       CRL used for encryption expires.
+    */
+  return 10; /* dummy that triggers a warning in the MUA */
+}
+
 void setEncryptionCRLExpiryNearWarning( bool flag )
 {
   config.encryptionCRLExpiryNearWarning = flag;
@@ -744,23 +1061,27 @@ bool certificateValidity( const char* certificate,
 void storeNewCharPtr( char** dest, const char* src )
 {
   int sLen = strlen( src );
-  *dest = malloc( sLen + 1 );
+  *dest = xmalloc( sLen + 1 );
   strcpy( *dest, src );
-  (*dest)[sLen] = '\0';
 }
 
 
 bool signMessage( const char*  cleartext,
-                  const char** ciphertext,
+                  char** ciphertext,
+                  const size_t* cipherLen,
                   const char*  certificate,
-                  struct StructuringInfo* structuring )
+                  struct StructuringInfo* structuring,
+                  int* errId,
+                  char** errTxt )
 {
+  bool bIsOpaque;
   GpgmeCtx ctx;
   GpgmeError err;
+  GpgmeKey rKey;
   GpgmeData data,  sig;
-  size_t rSLen = 0;
-  char*  rSig  = 0;
-  bool   bOk   = false;
+  char* rSig  = 0;
+  bool  bOk   = false;
+  int sendCerts = 1;
 
   init_StructuringInfo( structuring );
 
@@ -770,11 +1091,10 @@ bool signMessage( const char*  cleartext,
   err = gpgme_new (&ctx);
   gpgme_set_protocol (ctx, GPGMEPLUG_PROTOCOL);
 
-  gpgme_set_armor (ctx, 1);
-  gpgme_set_textmode (ctx, 1);
+  gpgme_set_armor (ctx, __GPGMEPLUG_SIGNATURE_CODE_IS_BINARY ? 0 : 1);
+  /*  gpgme_set_textmode (ctx, 1); */
 
-  int sendCerts;
-  switch ( config.sendCertificates() ) {
+  switch ( config.sendCertificates ) {
     case SendCert_undef:
       break;
     case SendCert_DontSend:
@@ -795,204 +1115,281 @@ bool signMessage( const char*  cleartext,
   }
   gpgme_set_include_certs (ctx, sendCerts);
 
+  /* select the signer's key if provided */
+  if (certificate != 0) {
+      err = gpgme_op_keylist_start(ctx, certificate, 0);
+      while (err == GPGME_No_Error) {
+          err = gpgme_op_keylist_next(ctx, &rKey);
+          if (err == GPGME_No_Error) {
+              unsigned long u;
+              u = gpgme_key_get_ulong_attr(rKey, GPGME_ATTR_CAN_SIGN, 0, 0);
+              if( u ) {
+
+//                const char* s;
+//                s = gpgme_key_get_string_attr(rKey, GPGME_ATTR_FPR, 0, 0);
+//                fprintf( stderr, "gpgmeplug signMessage signing with key: %s\n", s );
+
+                  /* clear existing signers */
+                  gpgme_signers_clear(ctx);
+                  /* set the signing key */
+                  gpgme_signers_add(ctx, rKey);
+                  /* we only support one signer for now */
+                  break;
+              }
+          }
+      }
+      gpgme_op_keylist_end(ctx);
+  }
+
+  /* PENDING(g10) Implement this
+
+     gpgme_set_signature_algorithm( ctx, config.signatureAlgorithm )
+     --> This does not make sense.  The algorithm is a property of
+     the certificate used [wk 2002-03-23] */
+
   gpgme_data_new_from_mem (&data, cleartext,
-                            1+strlen( cleartext ), 1 );
+                            strlen( cleartext ), 1 );
   gpgme_data_new ( &sig );
-  err = gpgme_op_sign (ctx, data, sig, GPGME_SIG_MODE_DETACH );
-
-  if (!err) {
-    rSig  = gpgme_data_release_and_get_mem( sig,  &rSLen );
-    *ciphertext = malloc( rSLen + 1 );
-    if( *ciphertext ) {
-      if( rSLen ) {
-        bOk = true;
-        strncpy((char*)*ciphertext, rSig, rSLen );
+
+  /* NOTE: Currently we support Opaque signed messages only for S/MIME,
+     but not for OpenPGP mode! */
+  if( GPGMEPLUG_PROTOCOL == GPGME_PROTOCOL_CMS )
+    bIsOpaque = (SignatureCompoundMode_Opaque == signatureCompoundMode());
+  else
+    bIsOpaque = false;
+
+  err = gpgme_op_sign ( ctx,
+                        data,
+                        sig,
+                        bIsOpaque
+                        ? GPGME_SIG_MODE_NORMAL
+                        : GPGME_SIG_MODE_DETACH );
+
+  if ( err == GPGME_No_Error ) {
+    if( __GPGMEPLUG_SIGNATURE_CODE_IS_BINARY ) {
+      *ciphertext = gpgme_data_release_and_get_mem( sig, (size_t*)cipherLen );
+      bOk = true;
+    }
+    else {
+      rSig = gpgme_data_release_and_get_mem( sig, (size_t*)cipherLen );
+      *ciphertext = malloc( *cipherLen + 1 );
+      if( *ciphertext ) {
+        if( *cipherLen ) {
+          bOk = true;
+          strncpy((char*)*ciphertext, rSig, *cipherLen );
+        }
+        (*ciphertext)[*cipherLen] = '\0';
       }
-      ((char*)(*ciphertext))[rSLen] = '\0';
+      free( rSig );
     }
-    free( rSig );
   }
   else {
     gpgme_data_release( sig );
+/*
+*ciphertext = malloc( 70 );
+strcpy((char*)*ciphertext, "xyz\nsig-dummy\nzyx" );
+(*ciphertext)[17] = '\0';
+err = 0;
+{
+*/
     *ciphertext = 0;
-    // hier fehlt eine Fehlerbehandlung, falls das
-    // Signieren schiefging
+    fprintf( stderr, "\n\n    gpgme_op_sign() returned this error code:  %i\n\n", err );
+    if( errId )
+      *errId = err;
+    if( errTxt ) {
+      const char* _errTxt = gpgme_strerror( err );
+      *errTxt = malloc( strlen( _errTxt ) + 1 );
+      if( *errTxt )
+        strcpy(*errTxt, _errTxt );
+    }
+/*
+}
+*/
   }
   gpgme_data_release( data );
   gpgme_release (ctx);
 
   if( bOk && structuring ) {
-    structuring->includeCleartext = GPGMEPLUG_SIGN_INCLUDE_CLEARTEXT;
-    structuring->makeMimeObject   = GPGMEPLUG_SIGN_MAKE_MIME_OBJECT;
-    if( structuring->makeMimeObject ) {
-      structuring->makeMultiMime  = GPGMEPLUG_SIGN_MAKE_MULTI_MIME;
-      storeNewCharPtr( &structuring->contentTypeMain,
-                       GPGMEPLUG_SIGN_CTYPE_MAIN );
-      storeNewCharPtr( &structuring->contentDispMain,
-                       GPGMEPLUG_SIGN_CDISP_MAIN );
-      storeNewCharPtr( &structuring->contentTEncMain,
-                       GPGMEPLUG_SIGN_CTENC_MAIN );
-      if( structuring->makeMultiMime ) {
-        storeNewCharPtr( &structuring->contentTypeVersion,
-                         GPGMEPLUG_SIGN_CTYPE_VERSION );
-        storeNewCharPtr( &structuring->contentDispVersion,
-                         GPGMEPLUG_SIGN_CDISP_VERSION );
-        storeNewCharPtr( &structuring->contentTEncVersion,
-                         GPGMEPLUG_SIGN_CTENC_VERSION );
-        storeNewCharPtr( &structuring->bodyTextVersion,
-                         GPGMEPLUG_SIGN_BTEXT_VERSION );
-        storeNewCharPtr( &structuring->contentTypeCode,
-                         GPGMEPLUG_SIGN_CTYPE_CODE );
-        storeNewCharPtr( &structuring->contentDispCode,
-                         GPGMEPLUG_SIGN_CDISP_CODE );
-        storeNewCharPtr( &structuring->contentTEncCode,
-                         GPGMEPLUG_SIGN_CTENC_CODE );
+    if( bIsOpaque ) {
+      structuring->includeCleartext = GPGMEPLUG_OPA_SIGN_INCLUDE_CLEARTEXT;
+      structuring->makeMimeObject   = GPGMEPLUG_OPA_SIGN_MAKE_MIME_OBJECT;
+      if( structuring->makeMimeObject ) {
+        structuring->makeMultiMime  = GPGMEPLUG_OPA_SIGN_MAKE_MULTI_MIME;
+        storeNewCharPtr( &structuring->contentTypeMain,
+                        GPGMEPLUG_OPA_SIGN_CTYPE_MAIN );
+        storeNewCharPtr( &structuring->contentDispMain,
+                        GPGMEPLUG_OPA_SIGN_CDISP_MAIN );
+        storeNewCharPtr( &structuring->contentTEncMain,
+                        GPGMEPLUG_OPA_SIGN_CTENC_MAIN );
+        if( structuring->makeMultiMime ) {
+            storeNewCharPtr( &structuring->contentTypeVersion,
+                            GPGMEPLUG_OPA_SIGN_CTYPE_VERSION );
+            storeNewCharPtr( &structuring->contentDispVersion,
+                            GPGMEPLUG_OPA_SIGN_CDISP_VERSION );
+            storeNewCharPtr( &structuring->contentTEncVersion,
+                            GPGMEPLUG_OPA_SIGN_CTENC_VERSION );
+            storeNewCharPtr( &structuring->bodyTextVersion,
+                            GPGMEPLUG_OPA_SIGN_BTEXT_VERSION );
+            storeNewCharPtr( &structuring->contentTypeCode,
+                            GPGMEPLUG_OPA_SIGN_CTYPE_CODE );
+            storeNewCharPtr( &structuring->contentDispCode,
+                            GPGMEPLUG_OPA_SIGN_CDISP_CODE );
+            storeNewCharPtr( &structuring->contentTEncCode,
+                            GPGMEPLUG_OPA_SIGN_CTENC_CODE );
+        }
+      } else {
+        storeNewCharPtr( &structuring->flatTextPrefix,
+                        GPGMEPLUG_OPA_SIGN_FLAT_PREFIX );
+        storeNewCharPtr( &structuring->flatTextSeparator,
+                        GPGMEPLUG_OPA_SIGN_FLAT_SEPARATOR );
+        storeNewCharPtr( &structuring->flatTextPostfix,
+                        GPGMEPLUG_OPA_SIGN_FLAT_POSTFIX );
       }
     } else {
-      storeNewCharPtr( &structuring->flatTextPrefix,
-                       GPGMEPLUG_SIGN_FLAT_PREFIX );
-      storeNewCharPtr( &structuring->flatTextSeparator,
-                       GPGMEPLUG_SIGN_FLAT_SEPARATOR );
-      storeNewCharPtr( &structuring->flatTextPostfix,
-                       GPGMEPLUG_SIGN_FLAT_POSTFIX );
+      structuring->includeCleartext = GPGMEPLUG_DET_SIGN_INCLUDE_CLEARTEXT;
+      structuring->makeMimeObject   = GPGMEPLUG_DET_SIGN_MAKE_MIME_OBJECT;
+      if( structuring->makeMimeObject ) {
+        structuring->makeMultiMime  = GPGMEPLUG_DET_SIGN_MAKE_MULTI_MIME;
+        storeNewCharPtr( &structuring->contentTypeMain,
+                        GPGMEPLUG_DET_SIGN_CTYPE_MAIN );
+        storeNewCharPtr( &structuring->contentDispMain,
+                        GPGMEPLUG_DET_SIGN_CDISP_MAIN );
+        storeNewCharPtr( &structuring->contentTEncMain,
+                        GPGMEPLUG_DET_SIGN_CTENC_MAIN );
+        if( structuring->makeMultiMime ) {
+            storeNewCharPtr( &structuring->contentTypeVersion,
+                            GPGMEPLUG_DET_SIGN_CTYPE_VERSION );
+            storeNewCharPtr( &structuring->contentDispVersion,
+                            GPGMEPLUG_DET_SIGN_CDISP_VERSION );
+            storeNewCharPtr( &structuring->contentTEncVersion,
+                            GPGMEPLUG_DET_SIGN_CTENC_VERSION );
+            storeNewCharPtr( &structuring->bodyTextVersion,
+                            GPGMEPLUG_DET_SIGN_BTEXT_VERSION );
+            storeNewCharPtr( &structuring->contentTypeCode,
+                            GPGMEPLUG_DET_SIGN_CTYPE_CODE );
+            storeNewCharPtr( &structuring->contentDispCode,
+                            GPGMEPLUG_DET_SIGN_CDISP_CODE );
+            storeNewCharPtr( &structuring->contentTEncCode,
+                            GPGMEPLUG_DET_SIGN_CTENC_CODE );
+        }
+      } else {
+        storeNewCharPtr( &structuring->flatTextPrefix,
+                        GPGMEPLUG_DET_SIGN_FLAT_PREFIX );
+        storeNewCharPtr( &structuring->flatTextSeparator,
+                        GPGMEPLUG_DET_SIGN_FLAT_SEPARATOR );
+        storeNewCharPtr( &structuring->flatTextPostfix,
+                        GPGMEPLUG_DET_SIGN_FLAT_POSTFIX );
+      }
     }
   }
   return bOk;
 }
 
 
-static const char*
-sig_status_to_string( GpgmeSigStat status )
-{
-  const char *result;
 
-  switch (status) {
-    case GPGME_SIG_STAT_NONE:
-      result = "Oops: Signature not verified";
-      break;
-    case GPGME_SIG_STAT_NOSIG:
-      result = "No signature found";
-      break;
-    case GPGME_SIG_STAT_GOOD:
-      result = "Good signature";
-      break;
-    case GPGME_SIG_STAT_BAD:
-      result = "BAD signature";
-      break;
-    case GPGME_SIG_STAT_NOKEY:
-      result = "No public key to verify the signature";
-      break;
-    case GPGME_SIG_STAT_ERROR:
-      result = "Error verifying the signature";
-      break;
-    case GPGME_SIG_STAT_DIFF:
-      result = "Different results for signatures";
-      break;
-    default:
-      result = "Error: Unknown status";
-      break;
-  }
+bool storeCertificatesFromMessage(
+        const char* ciphertext ){ return true; }
 
+
+/* returns address if address doesn't contain a <xxx> part
+ * else it returns a new string xxx and frees address
+ */
+static char* parseAddress( char* address )
+{
+  char* result = address;
+  char* i;
+  char* j;
+  if( !result ) return result;
+  i = index( address, '<' );
+  if( i ) {
+    j = index( i+1, '>' );
+    if( j == NULL ) j = address+strlen(address);
+    result = xmalloc( j-i );
+    strncpy( result, i+1, j-i-1 );
+    result[j-i-1] = '\0';
+    free( address );
+  } else {
+    i = address;
+    j = i+strlen(address);
+  }
+  {
+    /* remove surrounding whitespace */
+    char* k = result+(j-i-1);
+    char* l = result;
+    while( isspace( *l ) ) ++l;
+    while( isspace( *k ) ) --k;
+    if( l != result || k != result+(j-i-1) ) {
+      char* result2 = xmalloc( k-l+2 );
+      strncpy( result2, l, k-l+1 );
+      result2[k-l+1] = '\0';
+      free(result);
+      result = result2;
+    }
+  }
   return result;
 }
 
-
-bool checkMessageSignature( const char* ciphertext,
-                            const char* signaturetext,
-                            struct SignatureMetaData* sigmeta )
+static char* nextAddress( const char** address )
 {
-  GpgmeCtx ctx;
-  GpgmeSigStat status;
-  GpgmeData datapart, sigpart;
-  GpgmeError err;
-  GpgmeKey key;
-  time_t created;
-  int sig_idx = 0;
-  const char* statusStr;
-  const char* fpr;
-
-  gpgme_new( &ctx );
-  gpgme_set_protocol (ctx, GPGMEPLUG_PROTOCOL);
-  gpgme_data_new_from_mem( &datapart, ciphertext,
-                          1+strlen( ciphertext ), 1 );
-  gpgme_data_new_from_mem( &sigpart, signaturetext,
-                          1+strlen( signaturetext ), 1 );
-
-  gpgme_op_verify( ctx, sigpart, datapart, &status );
-  gpgme_data_release( datapart );
-  gpgme_data_release( sigpart );
+  const char *start = *address;
+  char* result = NULL;
+  int quote = 0;
+  int comment = 0;
+  int found = 0;
+  if( *address == NULL ) return NULL;
+  while( **address ) {
 
-  /* Provide information in the sigmeta struct */
-  /* the status string */
-  statusStr = sig_status_to_string( status );
-  sigmeta->status = malloc( strlen( statusStr ) + 1 );
-  if( sigmeta->status ) {
-    strcpy( sigmeta->status, statusStr );
-    sigmeta->status[strlen( statusStr )] = '\0';
-  } else
-    ; // nothing to do, is already 0
-
-  // Extended information for any number of signatures.
-  fpr = gpgme_get_sig_status( ctx, sig_idx, &status, &created );
-  sigmeta->extended_info = 0;
-  while( fpr != NULL ) {
-    struct tm* ctime_val;
-    const char* sig_status;
-
-    void* realloc_return = realloc( sigmeta->extended_info,
-                                    sizeof( struct SignatureMetaDataExtendedInfo ) * ( sig_idx + 1 ) );
-    if( realloc_return ) {
-      sigmeta->extended_info = realloc_return;
-      // the creation time
-      sigmeta->extended_info[sig_idx].creation_time = malloc( sizeof( struct tm ) );
-      if( sigmeta->extended_info[sig_idx].creation_time ) {
-        ctime_val = localtime( &created );
-        memcpy( sigmeta->extended_info[sig_idx].creation_time,
-                ctime_val, sizeof( struct tm ) );
-      }
-
-      err = gpgme_get_sig_key (ctx, sig_idx, &key);
-      sig_status = sig_status_to_string( status );
-      sigmeta->extended_info[sig_idx].status_text = malloc( strlen( sig_status ) + 1 );
-      if( sigmeta->extended_info[sig_idx].status_text ) {
-        strcpy( sigmeta->extended_info[sig_idx].status_text,
-                sig_status );
-        sigmeta->extended_info[sig_idx].status_text[strlen( sig_status )] = '\0';
+    switch( **address ) {
+    case '\\': /* escaped character */
+      ++(*address);
+      break;
+    case '"':
+      if( comment == 0 ) {
+        if( quote > 0 ) --quote;
+        else ++quote;
       }
-
-      sigmeta->extended_info[sig_idx].fingerprint = malloc( strlen( fpr ) + 1 );
-      if( sigmeta->extended_info[sig_idx].fingerprint ) {
-        strcpy( sigmeta->extended_info[sig_idx].fingerprint, fpr );
-        sigmeta->extended_info[sig_idx].fingerprint[strlen( fpr )] = '\0';
+      break;
+    case '(': /* comment start */
+      if( quote == 0 ) ++comment;
+      break;
+    case ')': /* comment end */
+      if( quote == 0 ) --comment;
+      break;
+    case '\0':
+    case '\1': /* delimiter */
+      if( quote == 0 && comment == 0 ) {
+        found = 1;
       }
-    } else
-      break; // if allocation fails once, it isn't likely to
-              // succeed the next time either
-
-    fpr = gpgme_get_sig_status (ctx, ++sig_idx, &status, &created);
+      break;
+    }
+    ++(*address);
+    if( found ) break;
   }
-  sigmeta->extended_info_count = sig_idx;
-  sigmeta->nota_xml = gpgme_get_notation( ctx );
-  sigmeta->status_code = status;
-
-  gpgme_release( ctx );
-  return ( status == GPGME_SIG_STAT_GOOD );
+  if( found || **address == 0 ) {
+    size_t len;
+    len = *address - start;
+    if( len > 0 ) {
+      if( **address != 0 ) --len;
+      result = xmalloc( len*sizeof(char)+1 );
+      strncpy( result, start, len );
+      result[len] = '\0';
+    }
+  }
+  return parseAddress(result);
 }
 
-bool storeCertificatesFromMessage(
-        const char* ciphertext ){ return true; }
-
-
-bool encryptMessage( const char* cleartext,
+bool encryptMessage( const char*  cleartext,
                      const char** ciphertext,
-                     const char* addressee,
-                     struct StructuringInfo* structuring )
+                     const size_t* cipherLen,
+                     const char*  certificate,
+                     struct StructuringInfo* structuring,
+                     int* errId,
+                     char** errTxt )
 {
   GpgmeCtx ctx;
   GpgmeError err;
   GpgmeData gCiphertext, gPlaintext;
   GpgmeRecipients rset;
-  size_t rCLen = 0;
   char*  rCiph = 0;
   bool   bOk   = false;
 
@@ -1001,8 +1398,8 @@ bool encryptMessage( const char* cleartext,
   gpgme_new (&ctx);
   gpgme_set_protocol (ctx, GPGMEPLUG_PROTOCOL);
 
-  gpgme_set_armor (ctx, 1);
-  gpgme_set_textmode (ctx, 1);
+  gpgme_set_armor (ctx, __GPGMEPLUG_ENCRYPTED_CODE_IS_BINARY ? 0 : 1);
+  /*  gpgme_set_textmode (ctx, 1); */
 
   gpgme_data_new_from_mem (&gPlaintext, cleartext,
                             1+strlen( cleartext ), 1 );
@@ -1010,46 +1407,143 @@ bool encryptMessage( const char* cleartext,
 
   gpgme_recipients_new (&rset);
 
-
+  /*
   if( GPGMEPLUG_PROTOCOL == GPGME_PROTOCOL_CMS )
   {
-    gpgme_recipients_add_name_with_validity (rset,
-      "/CN=test cert 1,OU=Aegypten Project,O=g10 Code GmbH,L=Düsseldorf,C=DE",
-      GPGME_VALIDITY_FULL );
+    gpgme_recipients_add_name (rset,
+      "/CN=test cert 1,OU=Aegypten Project,O=g10 Code GmbH,L=DÃ?sseldorf,C=DE" );
+
     fputs( "\nGPGSMPLUG encryptMessage() using test key of Aegypten Project\n", stderr );
   }
   else
+  */
   {
-    gpgme_recipients_add_name (rset, addressee);
-    fprintf( stderr, "\nGPGMEPLUG encryptMessage() using addressee %s\n", addressee );
+    const char* p = certificate;
+    char* tok;
+    while( (tok = nextAddress( &p ) ) != 0 ) {
+      gpgme_recipients_add_name (rset, tok );
+      fprintf( stderr, "\nGPGMEPLUG encryptMessage() using addressee %s\n", tok );
+      free(tok);
+    }
   }
 
+  /* PENDING(g10) Implement this
+     Possible values: RSA = 1, SHA1 = 2, TripleDES = 3
+     gpgme_set_encryption_algorithm( ctx, config.encryptionAlgorithm );
+
+     -> Your are mixing public key and symmetric algorithms.  The
+     latter may be configured but the sphix specifications do opnly
+     allow 3-DES so this is not nothing we need to do.  The proper way
+     to select the symmetric algorithm is anyway by looking at the
+     capabilities of the certificate because this is the only way to
+     know what the recipient can accept. [wk 2002-03-23]
+
+     PENDING(g10) Implement this
+     gpgme_set_encryption_check_certificate_path(
+     config.checkCertificatePath )
+
+     PENDING(g10) Implement this
+     gpgme_set_encryption_check_certificate_path_to_root(
+     config.checkEncryptionCertificatePathToRoot )
+
+     -> Not checking a certificate up to the ROOT CA is dangerous and
+     stupid. There is no need for those options.  [wk 2002-03-23] */
+
+
 
   err = gpgme_op_encrypt (ctx, rset, gPlaintext, gCiphertext );
-  if( err )
-    fprintf( stderr, "gpgme_op_encrypt() returned this error code:  %i\n\n", err );
+  if( err ) {
+    fprintf( stderr, "\ngpgme_op_encrypt() returned this error code:  %i\n", err );
+    if( errId )
+      *errId = err;
+    if( errTxt ) {
+      const char* _errTxt = gpgme_strerror( err );
+      *errTxt = malloc( strlen( _errTxt ) + 100 ); // leave room for reason string
+      if( *errTxt ) {
+        char* opInfo;
+        strcpy(*errTxt, _errTxt );
+        opInfo = gpgme_get_op_info(ctx, 0);
+        if( NULL != opInfo && *opInfo ){
+          const int opLen = strlen( opInfo );
+          const int reasonLen = 8;
+          char reason[ 1+reasonLen ];
+          char* pos1;
+          strcpy( reason, "<reason>" );
+          pos1 = strstr( opInfo, reason );
+          if( NULL != pos1 && 
+              opLen > reasonLen + (pos1 - opInfo) ){
+            char* pos2;
+            pos1 += reasonLen;
+            pos2 = strchr( pos1, '<' );
+            if( NULL != pos2 &&
+                pos1 < pos2 ){
+              long int reasonId;
+              strcat( *errTxt, " - " );
+              *pos2 = '\0';
+              fprintf( stderr, "                        and this reason code:  %s\n\n", pos1 );
+              reasonId = strtol( pos1, NULL, 10 );
+              switch( reasonId ) {
+                case  0: strcat( *errTxt, "No specific reason given" );
+                         break;
+                case  1: strcat( *errTxt, "Not Found" );
+                         break;
+                case  2: strcat( *errTxt, "Ambigious specification" );
+                         break;
+                case  3: strcat( *errTxt, "Key can't be used for operation" );
+                         break;
+                case  4: strcat( *errTxt, "Key has been revoked" );
+                         break;
+                case  5: strcat( *errTxt, "Key has expired" );
+                         break;
+                case  6: strcat( *errTxt, "No CRL known for certificate" );
+                         break;
+                case  7: strcat( *errTxt, "No current CRL available" );
+                         break;
+                case  8: strcat( *errTxt, "Contraints not matched" );
+                         break;
+                default: {
+                           strcat( *errTxt, "Extended error Id: #" );
+                           strcat( *errTxt, pos1 );
+                         }  
+              }
+              *pos2 = '<';
+            }
+          }
+          free( opInfo );
+        }
+      }
+    }
+  }
 
   gpgme_recipients_release (rset);
   gpgme_data_release (gPlaintext);
 
-  if( !err ) {
-    rCiph = gpgme_data_release_and_get_mem( gCiphertext,  &rCLen );
-    *ciphertext = malloc( rCLen + 1 );
-    if( *ciphertext ) {
-      if( rCLen ) {
-        bOk = true;
-        strncpy((char*)*ciphertext, rCiph, rCLen );
+  if( err == GPGME_No_Error ) {
+    if( __GPGMEPLUG_ENCRYPTED_CODE_IS_BINARY ) {
+      *ciphertext = gpgme_data_release_and_get_mem( gCiphertext, (size_t*)cipherLen );
+      bOk = true;
+    }
+    else {
+      rCiph = gpgme_data_release_and_get_mem( gCiphertext, (size_t*)cipherLen );
+      *ciphertext = malloc( *cipherLen + 1 );
+      if( *ciphertext ) {
+        if( *cipherLen ) {
+          bOk = true;
+          strncpy((char*)*ciphertext, rCiph, *cipherLen );
+        }
+        ((char*)(*ciphertext))[*cipherLen] = 0;
       }
-      ((char*)(*ciphertext))[rCLen] = 0;
+      free( rCiph );
     }
-    free( rCiph );
   }
   else {
     gpgme_data_release ( gCiphertext );
     *ciphertext = 0;
-    // hier fehlt eine Fehlerbehandlung: fuer einen Recipient nur ein
-    // untrusted key (oder gar keiner) gefunden wurde, verweigert gpg
-    // das signieren.
+    /* error handling is missing: if only one untrusted key was found
+      (or none at all), gpg won't sign the message.  (hier fehlt eine
+      Fehlerbehandlung: fuer einen Recipient nur ein untrusted key
+      (oder gar keiner) gefunden wurde, verweigert gpg das signieren.)
+    */
   }
 
   gpgme_release (ctx);
@@ -1107,7 +1601,7 @@ bool encryptAndSignMessage( const char* cleartext,
 
   bOk = false;
 
-  // implementation of this function is still missing
+  /* implementation of this function is still missing */
 
   if( bOk && structuring ) {
     structuring->includeCleartext = GPGMEPLUG_ENCSIGN_INCLUDE_CLEARTEXT;
@@ -1148,9 +1642,14 @@ bool encryptAndSignMessage( const char* cleartext,
   return bOk;
 }
 
+
 bool decryptMessage( const char* ciphertext,
+                     bool        cipherIsBinary,
+                     int         cipherLen,
                      const char** cleartext,
-                     const char* certificate )
+                     const char* certificate,
+                     int* errId,
+                     char** errTxt )
 {
   GpgmeCtx ctx;
   GpgmeError err;
@@ -1164,12 +1663,35 @@ bool decryptMessage( const char* ciphertext,
 
   err = gpgme_new (&ctx);
   gpgme_set_protocol (ctx, GPGMEPLUG_PROTOCOL);
+  
+  gpgme_set_armor (ctx, cipherIsBinary ? 0 : 1);
+  /*  gpgme_set_textmode (ctx, cipherIsBinary ? 0 : 1); */
 
+  /*
   gpgme_data_new_from_mem( &gCiphertext, ciphertext,
-                           1+strlen( ciphertext ), 1 );
+                           1+strlen( ciphertext ), 1 ); */
+  gpgme_data_new_from_mem( &gCiphertext,
+                           ciphertext,
+                           cipherIsBinary
+                           ? cipherLen
+                           : strlen( ciphertext ),
+                           1 );
+
   gpgme_data_new( &gPlaintext );
 
-  gpgme_op_decrypt( ctx, gCiphertext, gPlaintext );
+  err = err = gpgme_op_decrypt( ctx, gCiphertext, gPlaintext );
+  if( err ) {
+    fprintf( stderr, "\ngpgme_op_decrypt() returned this error code:  %i\n\n", err );
+    if( errId )
+      *errId = err;
+    if( errTxt ) {
+      const char* _errTxt = gpgme_strerror( err );
+      *errTxt = malloc( strlen( _errTxt ) + 1 );
+      if( *errTxt )
+        strcpy(*errTxt, _errTxt );
+    }
+  }
+  
   gpgme_data_release( gCiphertext );
 
   rCiph = gpgme_data_release_and_get_mem( gPlaintext,  &rCLen );
@@ -1195,9 +1717,46 @@ bool decryptAndCheckMessage( const char* ciphertext,
 
 const char* requestCertificateDialog(){ return 0; }
 
-bool requestDecentralCertificate( const char* name, const char*
-          email, const char* organization, const char* department,
-          const char* ca_address ){ return true; }
+
+/* The buffer generatedKey contains the LEN bytes you want.
+   Caller is responsible for freeing. */
+bool requestDecentralCertificate( const char* certparms, 
+                                  char** generatedKey, int* length )
+{
+    GpgmeError err;
+    GpgmeCtx ctx;
+    GpgmeData pub;
+    int len;
+
+    err = gpgme_data_new (&pub);
+    fprintf( stderr,  "1: gpgme returned %d\n", err );
+    if( err != GPGME_No_Error )
+        return false;
+
+    err = gpgme_new (&ctx);
+    fprintf( stderr,  "2: gpgme returned %d\n", err );
+    if( err != GPGME_No_Error ) {
+        gpgme_data_release( pub );
+        return false;
+    }
+
+    gpgme_set_protocol (ctx, GPGME_PROTOCOL_CMS);
+    /* Don't ASCII-armor, the MUA will use base64 encoding */
+    /*    gpgme_set_armor (ctx, 1); */
+    err = gpgme_op_genkey (ctx, certparms, pub, NULL );
+    fprintf( stderr,  "3: gpgme returned %d\n", err );
+    if( err != GPGME_No_Error ) {
+        gpgme_data_release( pub );
+        gpgme_release( ctx );
+        return false;
+    }
+
+    gpgme_release (ctx);
+    *generatedKey = gpgme_data_release_and_get_mem (pub, &len);
+    *length = len;
+
+    return true;
+}
 
 bool requestCentralCertificateAndPSE( const char* name,
           const char* email, const char* organization, const char* department,
@@ -1220,3 +1779,980 @@ bool archiveCertificate( const char* certificate ){ return true; }
 const char* displayCRL(){ return 0; }
 
 void updateCRL(){}
+
+
+char *
+trim_trailing_spaces( char *string )
+{
+    char *p, *mark;
+
+    for( mark = NULL, p = string; *p; p++ ) {
+       if( isspace( *p ) ) {
+           if( !mark )
+               mark = p;
+       }
+       else
+           mark = NULL;
+    }
+    if( mark )
+       *mark = '\0' ;
+
+    return string ;
+}
+
+/* Parse a DN and return an array-ized one.  This is not a validating
+   parser and it does not support any old-stylish syntax; gpgme is
+   expected to return only rfc2253 compatible strings. */
+static const unsigned char *
+parse_dn_part (struct DnPair *array, const unsigned char *string)
+{
+  const unsigned char *s, *s1;
+  size_t n;
+  unsigned char *p;
+
+  /* parse attributeType */
+  for (s = string+1; *s && *s != '='; s++)
+    ;
+  if (!*s)
+    return NULL; /* error */
+  n = s - string;
+  if (!n)
+    return NULL; /* empty key */
+  array->key = p = xmalloc (n+1);
+  
+  
+  memcpy (p, string, n);
+  p[n] = 0;
+  trim_trailing_spaces (p);
+  if ( !strcmp (p, "1.2.840.113549.1.9.1") )
+    strcpy (p, "EMail");
+  string = s + 1;
+
+  if (*string == '#')
+    { /* hexstring */
+      string++;
+      for (s=string; hexdigitp (s); s++)
+        s++;
+      n = s - string;
+      if (!n || (n & 1))
+        return NULL; /* empty or odd number of digits */
+      n /= 2;
+      array->value = p = xmalloc (n+1);
+      
+      
+      for (s1=string; n; s1 += 2, n--)
+        *p++ = xtoi_2 (s1);
+      *p = 0;
+   }
+  else
+    { /* regular v3 quoted string */
+      for (n=0, s=string; *s; s++)
+        {
+          if (*s == '\\')
+            { /* pair */
+              s++;
+              if (*s == ',' || *s == '=' || *s == '+'
+                  || *s == '<' || *s == '>' || *s == '#' || *s == ';' 
+                  || *s == '\\' || *s == '\"' || *s == ' ')
+                n++;
+              else if (hexdigitp (s) && hexdigitp (s+1))
+                {
+                  s++;
+                  n++;
+                }
+              else
+                return NULL; /* invalid escape sequence */
+            }
+          else if (*s == '\"')
+            return NULL; /* invalid encoding */
+          else if (*s == ',' || *s == '=' || *s == '+'
+                   || *s == '<' || *s == '>' || *s == '#' || *s == ';' )
+            break; 
+          else
+            n++;
+        }
+
+      array->value = p = xmalloc (n+1);
+      
+      
+      for (s=string; n; s++, n--)
+        {
+          if (*s == '\\')
+            { 
+              s++;
+              if (hexdigitp (s))
+                {
+                  *p++ = xtoi_2 (s);
+                  s++;
+                }
+              else
+                *p++ = *s;
+            }
+          else
+            *p++ = *s;
+        }
+      *p = 0;
+    }
+  return s;
+}
+
+
+/* Parse a DN and return an array-ized one.  This is not a validating
+   parser and it does not support any old-stylish syntax; gpgme is
+   expected to return only rfc2253 compatible strings. */
+static struct DnPair *
+parse_dn (const unsigned char *string)
+{
+  struct DnPair *array;
+  size_t arrayidx, arraysize;
+  int i;
+
+  if( !string )
+    return NULL;
+
+  arraysize = 7; /* C,ST,L,O,OU,CN,email */
+  arrayidx = 0;
+  array = xmalloc ((arraysize+1) * sizeof *array);
+  
+  
+  while (*string)
+    {
+      while (*string == ' ')
+        string++;
+      if (!*string)
+        break; /* ready */
+      if (arrayidx >= arraysize)
+        { /* mutt lacks a real safe_realoc - so we need to copy */
+          struct DnPair *a2;
+
+          arraysize += 5;
+          a2 = xmalloc ((arraysize+1) * sizeof *array);
+          for (i=0; i < arrayidx; i++)
+            {
+              a2[i].key = array[i].key;
+              a2[i].value = array[i].value;
+            }
+          free (array);
+          array = a2;
+        }
+      array[arrayidx].key = NULL;
+      array[arrayidx].value = NULL;
+      string = parse_dn_part (array+arrayidx, string);
+      arrayidx++;
+      if (!string)
+        goto failure;
+      while (*string == ' ')
+        string++;
+      if (*string && *string != ',' && *string != ';' && *string != '+')
+        goto failure; /* invalid delimiter */
+      if (*string)
+        string++;
+    }
+  array[arrayidx].key = NULL;
+  array[arrayidx].value = NULL;
+  return array;
+
+ failure:
+  for (i=0; i < arrayidx; i++)
+    {
+      free (array[i].key);
+      free (array[i].value);
+    }
+  free (array);
+  return NULL;
+}
+
+static int 
+add_dn_part( char* result, struct DnPair* dn, const char* part )
+{
+  int any = 0;
+
+  if( dn ) {
+    for(; dn->key; ++dn ) {
+      if( !strcmp( dn->key, part ) ) {
+        if( any ) strcat( result, "+" );
+        /* email hack */
+        if( !strcmp( part, "1.2.840.113549.1.9.1" ) ) strcat( result, "EMail" );
+        else strcat( result, part );
+        strcat( result, "=" );
+        strcat( result, dn->value );
+        any = 1;
+      }
+    }
+  }
+  return any;
+}
+
+static char* 
+reorder_dn( struct DnPair *dn )
+{
+  /* note: The must parts are: CN, L, OU, O, C */
+  const char* stdpart[] = {
+    "CN", "S", "SN", "GN", "T", "UID",
+          "MAIL", "EMAIL", "MOBILE", "TEL", "FAX", "STREET",
+    "L",  "PC", "SP", "ST",
+    "OU",
+    "O",
+    "C",
+    NULL
+  };
+  int any=0, any2=0, len=0, i;
+  char* result;
+  if( dn ) {
+    for( i = 0; dn[i].key; ++i ) {
+      len += strlen( dn[i].key );
+      len += strlen( dn[i].value );
+      len += 4; /* ',' and '=', and possibly "(" and ")" */
+    }
+  }
+  result = xmalloc( (len+1)*sizeof(char) );
+  *result = 0;
+
+  /* add standard parts */
+  for( i = 0; stdpart[i]; ++i ) {
+    if( any ) {
+      strcat( result, "," );
+    }
+    any = add_dn_part( result, dn, stdpart[i] );
+  }
+
+  /* add remaining parts in no particular order */
+  if( dn ) {
+    for(; dn->key; ++dn ) {
+      for( i = 0; stdpart[i]; ++i ) {
+        if( !strcmp( dn->key, stdpart[i] ) ) {
+          break;
+        }
+      }
+      if( !stdpart[i] ) {
+        if( any ) strcat( result, "," );
+        if( !any2 ) strcat( result, "(");
+        any = add_dn_part( result, dn, dn->key );
+        any2 = 1;
+      }
+    }
+  }
+  if( any2 ) strcat( result, ")");
+  return result;
+}
+
+struct CertIterator {
+  GpgmeCtx ctx;  
+  struct CertificateInfo info;
+};
+
+struct CertIterator* 
+startListCertificates( const char* pattern, int remote )
+{
+    GpgmeError err;
+    struct CertIterator* it;
+    const char* patterns[] = { pattern, NULL };
+    fprintf( stderr,  "startListCertificates( \"%s\", %d )\n", pattern, remote );
+
+    it = xmalloc( sizeof( struct CertIterator ) );
+
+    err = gpgme_new (&(it->ctx));
+    /*fprintf( stderr,  "2: gpgme returned %d\n", err );*/
+    if( err != GPGME_No_Error ) {
+      free( it );
+      return NULL;
+    }
+
+    gpgme_set_protocol (it->ctx, GPGME_PROTOCOL_CMS);
+    if( remote ) gpgme_set_keylist_mode ( it->ctx, GPGME_KEYLIST_MODE_EXTERN ); 
+    else gpgme_set_keylist_mode ( it->ctx, GPGME_KEYLIST_MODE_LOCAL );
+    err =  gpgme_op_keylist_ext_start ( it->ctx, patterns, 0, 0);
+    if( err != GPGME_No_Error ) {
+      fprintf( stderr,  "gpgme_op_keylist_ext_start returned %d", err );
+      endListCertificates( it );
+      return NULL;
+    }
+    memset( &(it->info), 0, sizeof( struct CertificateInfo ) );
+    return it;
+}
+
+/* free() each string in a char*[] and the array itself */
+static void 
+freeStringArray( char** c )
+{
+    char** _c = c;
+
+    while( c && *c ) {
+      /*fprintf( stderr, "freeing \"%s\"\n", *c );*/
+      free( *c );
+      ++c;
+    }
+    free( _c );
+}
+
+/* free all malloc'ed data in a struct CertificateInfo */
+static void 
+freeInfo( struct CertificateInfo* info )
+{
+  struct DnPair* a = info->dnarray;
+  assert( info );
+  freeStringArray( info->userid );
+  free( info->serial);
+  free( info->fingerprint );
+  free( info->issuer );
+  free( info->chainid );
+  free( info->caps );
+  while( a && a->key && a->value ) {
+    free (a->key);
+    free (a->value);
+    ++a;
+  }
+  free (info->dnarray);
+  memset( info, 0, sizeof( *info ) );
+}
+
+/* Format the fingerprint nicely. The caller should
+   free the returned value using free() */
+static char* make_fingerprint( const char* fpr )
+{
+  int len = strlen(fpr);
+  int i = 0;
+  char* result = xmalloc( (len + len/2 + 1)*sizeof(char) );
+
+  for(; *fpr; ++fpr, ++i ) {
+    if( i%3 == 2) {
+      result[i] = ':'; ++i;
+    }
+    result[i] = *fpr;
+  }
+  result[i] = 0;
+  return result;
+}
+
+int 
+nextCertificate( struct CertIterator* it, struct CertificateInfo** result )
+{
+  GpgmeError err;
+  GpgmeKey   key;
+  int retval = GPGME_No_Error;
+  assert( it );
+  fprintf( stderr,  "nextCertificates( %p, %p )\n", it, result );
+  err = gpgme_op_keylist_next ( it->ctx, &key);
+  if( err != GPGME_EOF ) {   
+    int idx;
+    const char* s;
+    unsigned long u;
+    char* names[MAX_GPGME_IDX+1];
+    struct DnPair *issuer_dn, *tmp_dn;
+    retval = err;
+    memset( names, 0, sizeof( names ) );
+    freeInfo( &(it->info) );
+
+    for( idx = 0; (s = gpgme_key_get_string_attr (key, GPGME_ATTR_USERID, 0, idx)) && idx < MAX_GPGME_IDX; 
+        ++idx ) {
+      names[idx] = xstrdup( s );
+    }
+    
+    it->info.userid = xmalloc( sizeof( char* ) * (idx+1) );
+    memset( it->info.userid, 0, sizeof( char* ) * (idx+1) );
+    it->info.dnarray = 0;
+    for( idx = 0; names[idx] != 0; ++idx ) {
+      struct DnPair* a = parse_dn( names[idx] ); 
+      if( idx == 0 ) {
+       it->info.userid[idx] = reorder_dn( a );
+       it->info.dnarray = a;
+       free (names[idx]);
+        names[idx] = NULL;
+      } else {
+       it->info.userid[idx] = names[idx];
+      }
+    }
+    it->info.userid[idx] = 0;
+
+    s = gpgme_key_get_string_attr (key, GPGME_ATTR_SERIAL, 0, 0); 
+    it->info.serial = s? xstrdup(s) : NULL;
+
+    s = gpgme_key_get_string_attr (key, GPGME_ATTR_FPR, 0, 0); 
+    it->info.fingerprint = make_fingerprint( s );
+
+    s = gpgme_key_get_string_attr (key, GPGME_ATTR_ISSUER, 0, 0); 
+    if( s ) {
+      issuer_dn = tmp_dn = parse_dn( s );     
+      /*it->info.issuer = xstrdup(s);*/
+      it->info.issuer = reorder_dn( issuer_dn );
+      while( tmp_dn->key ) {
+       free( tmp_dn->key );
+       free( tmp_dn->value );
+       ++tmp_dn;
+      }
+      free( issuer_dn );
+      issuer_dn = tmp_dn = NULL;
+    } else {
+      it->info.issuer = NULL;
+    }
+    s = gpgme_key_get_string_attr (key, GPGME_ATTR_CHAINID, 0, 0); 
+    it->info.chainid = s? xstrdup(s): NULL;
+
+    s = gpgme_key_get_string_attr (key, GPGME_ATTR_KEY_CAPS, 0, 0); 
+    it->info.caps = s? xstrdup(s) : NULL;
+
+    u = gpgme_key_get_ulong_attr (key, GPGME_ATTR_CREATED, 0, 0); 
+    it->info.created = u;
+
+    u = gpgme_key_get_ulong_attr (key, GPGME_ATTR_EXPIRE, 0, 0); 
+    it->info.expire = u;
+
+    u = gpgme_key_get_ulong_attr (key, GPGME_ATTR_IS_SECRET, 0, 0); 
+    it->info.secret = u;
+
+    u = gpgme_key_get_ulong_attr (key, GPGME_ATTR_UID_INVALID, 0, 0); 
+    it->info.invalid = u;
+
+    u = gpgme_key_get_ulong_attr (key, GPGME_ATTR_KEY_EXPIRED, 0, 0); 
+    it->info.expired = u;
+
+    u = gpgme_key_get_ulong_attr (key, GPGME_ATTR_KEY_DISABLED, 0, 0); 
+    it->info.disabled = u;
+
+    gpgme_key_release (key);
+    /*return &(it->info);*/
+    *result =  &(it->info);
+  } else {
+    *result = NULL;
+  }
+  return retval;
+}
+
+int
+endListCertificates( struct CertIterator* it )
+{
+  char *s = gpgme_get_op_info (it->ctx, 0);
+  int truncated = s && strstr (s, "<truncated/>");
+  fprintf( stderr,  "endListCertificates( %p )\n", it );
+  if( s ) free( s );
+  assert(it);
+  freeInfo( &(it->info) );
+  gpgme_op_keylist_end(it->ctx);
+  gpgme_release (it->ctx);
+  free( it );
+  return truncated;
+}
+
+int
+importCertificateWithFPR( const char* fingerprint, char** additional_info )
+{
+  GpgmeError err;
+  GpgmeCtx  ctx;
+  GpgmeData keydata;
+  GpgmeRecipients recips;
+  char* buf;
+  const char* tmp1;
+  char* tmp2;
+
+  err = gpgme_new( &ctx );
+  /*fprintf( stderr,  "2: gpgme returned %d\n", err );*/
+  if( err != GPGME_No_Error ) {
+    return err;
+  }
+  gpgme_set_protocol( ctx, GPGME_PROTOCOL_CMS );
+  gpgme_set_keylist_mode( ctx, GPGME_KEYLIST_MODE_LOCAL );
+
+  err = gpgme_data_new( &keydata );
+  if( err ) {
+    fprintf( stderr,  "gpgme_data_new returned %d\n", err );
+    gpgme_release( ctx );
+    return err;
+  }
+
+  err = gpgme_recipients_new( &recips );
+  if( err ) {
+    fprintf( stderr,  "gpgme_recipients_new returned %d\n", err );
+    gpgme_data_release( keydata );
+    gpgme_release( ctx );
+    return err;
+  }
+  
+  buf = malloc( sizeof(char)*( strlen( fingerprint ) + 1 ) );
+  if( !buf ) {
+    gpgme_recipients_release( recips );
+    gpgme_data_release( keydata );    
+    gpgme_release( ctx );
+    return GPGME_Out_Of_Core;
+  }
+  tmp1 = fingerprint;
+  tmp2 = buf;
+  while( *tmp1 ) {
+    if( *tmp1 != ':' ) *tmp2++ = *tmp1;
+    tmp1++;
+  }
+  *tmp2 = 0;
+  fprintf( stderr,  "calling gpgme_recipients_add_name( %s )\n", buf );  
+  err = gpgme_recipients_add_name( recips, buf ); 
+  if( err ) {
+    fprintf( stderr,  "gpgme_recipients_add_name returned %d\n", err );
+    free (buf);
+    gpgme_recipients_release( recips );
+    gpgme_data_release( keydata );    
+    gpgme_release( ctx );
+    return err;
+  }
+
+  err = gpgme_op_export( ctx, recips, keydata );
+  if( err ) {
+    fprintf( stderr,  "gpgme_op_export returned %d\n", err );
+    free (buf);
+    *additional_info = gpgme_get_op_info( ctx, 0 );
+    gpgme_recipients_release( recips );
+    gpgme_data_release( keydata );    
+    gpgme_release( ctx );
+    return err;
+  }
+  free (buf);
+  buf = NULL;
+
+  err = gpgme_op_import( ctx, keydata );
+  *additional_info = gpgme_get_op_info( ctx, 0 );
+  if( err ) {    
+    fprintf( stderr,  "gpgme_op_import returned %d\n", err );
+    gpgme_recipients_release( recips );
+    gpgme_data_release( keydata );
+    gpgme_release( ctx );
+    return err;
+  }
+
+  gpgme_recipients_release( recips );
+  gpgme_data_release( keydata );    
+  gpgme_release( ctx );
+  return 0;
+}
+int
+importCertificateFromMem( const char* data, size_t length , char** additional_info )
+{
+  GpgmeError err;
+  GpgmeCtx  ctx;
+  GpgmeData keydata;
+
+  err = gpgme_new( &ctx );
+  /*fprintf( stderr,  "2: gpgme returned %d\n", err );*/
+  if( err != GPGME_No_Error ) {
+    return err;
+  }
+  gpgme_set_protocol( ctx, GPGME_PROTOCOL_CMS );
+  gpgme_set_keylist_mode( ctx, GPGME_KEYLIST_MODE_LOCAL );
+
+  err = gpgme_data_new_from_mem( &keydata, data, length, 0 );
+  if( err ) {
+    fprintf( stderr,  "gpgme_data_new returned %d\n", err );
+    gpgme_release( ctx );
+    return err;
+  }
+
+  err = gpgme_op_import( ctx, keydata );
+  *additional_info = gpgme_get_op_info( ctx, 0 );
+  if( err ) {    
+    fprintf( stderr,  "gpgme_op_import returned %d\n", err );
+    gpgme_data_release( keydata );    
+    gpgme_release( ctx );
+    return err;
+  }
+
+  gpgme_data_release( keydata );    
+  gpgme_release( ctx );
+  return 0;
+}
+
+/*  == == == == == == == == == == == == == == == == == == == == == == == == ==
+   ==                                                                      ==
+  ==         Continuation of CryptPlug code                               ==
+ ==                                                                      ==
+== == == == == == == == == == == == == == == == == == == == == == == == ==  */
+
+
+/*
+  Find all certificate for a given addressee and return them in a
+  '\1' separated list.
+  NOTE: The certificate parameter must point to a not-yet allocated
+        char*.  The function will allocate the memory needed and
+        return the size in newSize.
+  If secretOnly is true, only secret keys are returned.
+*/
+bool findCertificates( const char* addressee,
+                       char** certificates,
+                       int* newSize,
+                       bool secretOnly )
+{
+#define MAXCERTS 1024
+  /* use const char declarations since all of them are needed twice */
+  const char* delimiter = "\1";
+  const char* openBracket = "    (";
+  const char* closeBracket = ")";
+
+  GpgmeCtx ctx;
+  GpgmeError err;
+  GpgmeKey rKey;
+  const char *s;
+  const char *s2;
+  char* dn;
+  struct DnPair* a;
+  int nFound = 0;
+  int iFound = 0;
+  int siz = 0;
+  char* DNs[MAXCERTS];
+  char* FPRs[MAXCERTS];
+  
+  if( ! certificates ){
+    fprintf( stderr, "gpgme: findCertificates called with invalid *certificates pointer\n" );
+    return false;
+  }
+
+  if( ! newSize ){
+    fprintf( stderr, "gpgme: findCertificates called with invalid newSize pointer\n" );
+    return false;
+  }
+
+  *certificates = 0;
+  *newSize = 0;
+  
+  /* calculate length of buffer needed for certs plus fingerprints */
+  gpgme_new (&ctx);
+  gpgme_set_protocol (ctx, GPGMEPLUG_PROTOCOL);
+  err = gpgme_op_keylist_start(ctx, addressee, secretOnly ? 1 : 0);
+  while( GPGME_No_Error == err ) {
+    err = gpgme_op_keylist_next(ctx, &rKey);
+    if( GPGME_No_Error == err ) {
+      s = gpgme_key_get_string_attr (rKey, GPGME_ATTR_USERID, NULL, 0);
+      if( s ) {
+        dn = xstrdup( s );
+        s2 = gpgme_key_get_string_attr (rKey, GPGME_ATTR_FPR, NULL, 0);
+        if( s2 ) {
+          if( nFound )
+            siz += strlen( delimiter );
+          a = parse_dn( dn );
+          free( dn );
+          dn = reorder_dn( a );
+          siz += strlen( dn );
+          siz += strlen( openBracket );
+          siz += strlen( s2 );
+          siz += strlen( closeBracket );
+          DNs[ nFound ] = dn;
+          dn = NULL; /* prevent it from being free'ed below. */
+          FPRs[nFound ] = xstrdup( s2 );
+          ++nFound;
+          if( nFound >= MAXCERTS ) {
+            fprintf( stderr,
+                     "gpgme: findCertificates found too many certificates (%d)\n",
+                     MAXCERTS );
+            break;
+          }
+        }
+        free (dn); 
+      }
+    }
+  }
+  gpgme_op_keylist_end( ctx );
+  gpgme_release (ctx);
+  
+  
+  if( 0 < siz ) {
+    /* add one for trailing ZERO char */
+    ++siz;
+    *newSize = siz;
+    /* allocate the buffer */
+    *certificates = xmalloc( sizeof(char) * siz );
+    memset( *certificates, 0, sizeof(char) * siz );
+    /* fill the buffer */
+    for (iFound=0; iFound < nFound; iFound++) {
+      if( !iFound )
+        strcpy(*certificates, DNs[iFound] );
+      else {
+        strcat(*certificates, delimiter );
+        strcat(*certificates, DNs[iFound] );
+      }
+      strcat(  *certificates, openBracket );
+      strcat(  *certificates, FPRs[iFound] );
+      strcat(  *certificates, closeBracket );
+      free( DNs[ iFound ] );
+      free( FPRs[iFound ] );
+    }
+  }
+    
+  return ( 0 < nFound );
+}
+
+
+static const char*
+sig_status_to_string( GpgmeSigStat status )
+{
+  const char *result;
+
+  switch (status) {
+    case GPGME_SIG_STAT_NONE:
+      result = "Oops: Signature not verified";
+      break;
+    case GPGME_SIG_STAT_NOSIG:
+      result = "No signature found";
+      break;
+    case GPGME_SIG_STAT_GOOD:
+      result = "Good signature";
+      break;
+    case GPGME_SIG_STAT_BAD:
+      result = "BAD signature";
+      break;
+    case GPGME_SIG_STAT_NOKEY:
+      result = "No public key to verify the signature";
+      break;
+    case GPGME_SIG_STAT_ERROR:
+      result = "Error verifying the signature";
+      break;
+    case GPGME_SIG_STAT_DIFF:
+      result = "Different results for signatures";
+      break;
+    default:
+      result = "Error: Unknown status";
+      break;
+  }
+
+  return result;
+}
+
+
+bool checkMessageSignature( char** cleartext,
+                            const char* signaturetext,
+                            bool signatureIsBinary,
+                            int signatureLen,
+                            struct SignatureMetaData* sigmeta )
+{
+  GpgmeCtx ctx;
+  GpgmeSigStat status;
+  unsigned long sumGPGME;
+  SigStatusFlags sumPlug;
+  GpgmeData datapart, sigpart;
+  char* rClear = 0;
+  size_t clearLen;
+  GpgmeError err;
+  GpgmeKey key;
+  time_t created;
+  struct DnPair* a;
+  int sig_idx=0;
+  int UID_idx=0;
+  const char* statusStr;
+  const char* fpr;
+  bool isOpaqueSigned;
+  
+  if( !cleartext ) {
+    if( sigmeta )
+      storeNewCharPtr( &sigmeta->status,
+                        __GPGMEPLUG_ERROR_CLEARTEXT_IS_ZERO );
+
+    return false;
+  }
+
+  isOpaqueSigned = !*cleartext;
+
+  gpgme_new( &ctx );
+  gpgme_set_protocol (ctx, GPGMEPLUG_PROTOCOL);
+  gpgme_set_armor (ctx,    signatureIsBinary ? 0 : 1);
+  /*  gpgme_set_textmode (ctx, signatureIsBinary ? 0 : 1); */
+
+  if( isOpaqueSigned )
+    gpgme_data_new( &datapart );
+  else
+    gpgme_data_new_from_mem( &datapart, *cleartext,
+                             strlen( *cleartext ), 1 );
+
+  gpgme_data_new_from_mem( &sigpart,
+                           signaturetext,
+                           signatureIsBinary
+                           ? signatureLen
+                           : strlen( signaturetext ),
+                           1 );
+
+  gpgme_op_verify( ctx, sigpart, datapart, &status );
+
+  if( isOpaqueSigned ) {
+    rClear = gpgme_data_release_and_get_mem( datapart, &clearLen );
+    *cleartext = malloc( clearLen + 1 );
+    if( *cleartext ) {
+      if( clearLen )
+        strncpy(*cleartext, rClear, clearLen );
+      (*cleartext)[clearLen] = '\0';
+    }
+    free( rClear );
+  }
+  else
+    gpgme_data_release( datapart );
+
+  gpgme_data_release( sigpart );
+
+  /* Provide information in the sigmeta struct */
+  /* the status string */
+  statusStr = sig_status_to_string( status );
+  sigmeta->status = malloc( strlen( statusStr ) + 1 );
+  if( sigmeta->status ) {
+    strcpy( sigmeta->status, statusStr );
+    sigmeta->status[strlen( statusStr )] = '\0';
+  } else
+    ; /* nothing to do, is already 0 */
+
+  /* Extended information for any number of signatures. */
+  fpr = gpgme_get_sig_status( ctx, sig_idx, &status, &created );
+  sigmeta->extended_info = 0;
+  while( fpr != NULL ) {
+    struct tm* ctime_val;
+    const char* sig_status;
+
+    void* alloc_return = realloc( sigmeta->extended_info,
+                                  sizeof( struct SignatureMetaDataExtendedInfo )
+                                  * ( sig_idx + 1 ) );
+    if( alloc_return ) {
+      sigmeta->extended_info = alloc_return;
+
+      /* clear the data area */
+      memset( &sigmeta->extended_info[sig_idx], 
+              0,
+              sizeof (struct SignatureMetaDataExtendedInfo) );
+
+      /* the creation time */
+      sigmeta->extended_info[sig_idx].creation_time = malloc( sizeof( struct tm ) );
+      if( sigmeta->extended_info[sig_idx].creation_time ) {
+        ctime_val = localtime( &created );
+        memcpy( sigmeta->extended_info[sig_idx].creation_time,
+                ctime_val, sizeof( struct tm ) );
+      }
+
+      /* the extended signature verification status */
+      sumGPGME = gpgme_get_sig_ulong_attr( ctx,
+                                           sig_idx,
+                                           GPGME_ATTR_SIG_SUMMARY,
+                                           0 );
+      fprintf( stderr, "gpgmeplug checkMessageSignature status flags: %lX\n", sumGPGME );
+      /* translate GPGME status flags to common CryptPlug status flags */
+      sumPlug = 0;
+      if( sumGPGME & GPGME_SIGSUM_VALID       ) sumPlug |= SigStat_VALID      ;
+      if( sumGPGME & GPGME_SIGSUM_GREEN       ) sumPlug |= SigStat_GREEN      ;
+      if( sumGPGME & GPGME_SIGSUM_RED         ) sumPlug |= SigStat_RED        ;
+      if( sumGPGME & GPGME_SIGSUM_KEY_REVOKED ) sumPlug |= SigStat_KEY_REVOKED;
+      if( sumGPGME & GPGME_SIGSUM_KEY_EXPIRED ) sumPlug |= SigStat_KEY_EXPIRED;
+      if( sumGPGME & GPGME_SIGSUM_SIG_EXPIRED ) sumPlug |= SigStat_SIG_EXPIRED;
+      if( sumGPGME & GPGME_SIGSUM_KEY_MISSING ) sumPlug |= SigStat_KEY_MISSING;
+      if( sumGPGME & GPGME_SIGSUM_CRL_MISSING ) sumPlug |= SigStat_CRL_MISSING;
+      if( sumGPGME & GPGME_SIGSUM_CRL_TOO_OLD ) sumPlug |= SigStat_CRL_TOO_OLD;
+      if( sumGPGME & GPGME_SIGSUM_BAD_POLICY  ) sumPlug |= SigStat_BAD_POLICY ;
+      if( sumGPGME & GPGME_SIGSUM_SYS_ERROR   ) sumPlug |= SigStat_SYS_ERROR  ;
+      if( !sumPlug )
+        sumPlug = SigStat_NUMERICAL_CODE | sumGPGME;
+      sigmeta->extended_info[sig_idx].sigStatusFlags = sumPlug;
+
+      sigmeta->extended_info[sig_idx].validity = GPGME_VALIDITY_UNKNOWN;
+
+      err = gpgme_get_sig_key (ctx, sig_idx, &key);
+
+      if ( err == GPGME_No_Error) {
+        const char* attr_string;
+        unsigned long attr_ulong;
+
+        /* extract key identidy */
+        attr_string = gpgme_key_get_string_attr(key, GPGME_ATTR_KEYID, 0, 0);
+        if (attr_string != 0)
+            storeNewCharPtr( &sigmeta->extended_info[sig_idx].keyid, attr_string );
+
+        /* extract finger print */
+        attr_string = gpgme_key_get_string_attr(key, GPGME_ATTR_FPR, 0, 0);
+        if (attr_string != 0)
+            storeNewCharPtr( &sigmeta->extended_info[sig_idx].fingerprint,
+                            attr_string );
+
+        /* algorithms useable with this key */
+        attr_string = gpgme_key_get_string_attr(key, GPGME_ATTR_ALGO, 0, 0);
+        if (attr_string != 0)
+            storeNewCharPtr( &sigmeta->extended_info[sig_idx].algo,
+                            attr_string );
+        attr_ulong = gpgme_key_get_ulong_attr(key, GPGME_ATTR_ALGO, 0, 0);
+        sigmeta->extended_info[sig_idx].algo_num = attr_ulong;
+
+        /* extract key validity */
+        attr_ulong = gpgme_key_get_ulong_attr(key, GPGME_ATTR_VALIDITY, 0, 0);
+        sigmeta->extended_info[sig_idx].validity = attr_ulong;
+
+        /* extract user id, according to the documentation it's representable
+        * as a number, but it seems that it also has a string representation
+        */
+        attr_string = gpgme_key_get_string_attr(key, GPGME_ATTR_USERID, 0, 0);
+        if (attr_string != 0) {
+            a = parse_dn( attr_string );
+            sigmeta->extended_info[sig_idx].userid = reorder_dn( a );
+        }
+        
+        attr_ulong = gpgme_key_get_ulong_attr(key, GPGME_ATTR_USERID, 0, 0);
+        sigmeta->extended_info[sig_idx].userid_num = attr_ulong;
+
+        /* extract the length */
+          sigmeta->extended_info[sig_idx].keylen = attr_ulong;
+
+        /* extract the creation time of the key */
+        attr_ulong = gpgme_key_get_ulong_attr(key, GPGME_ATTR_CREATED, 0, 0);
+        sigmeta->extended_info[sig_idx].key_created = attr_ulong;
+
+        /* extract the expiration time of the key */
+        attr_ulong = gpgme_key_get_ulong_attr(key, GPGME_ATTR_EXPIRE, 0, 0);
+        sigmeta->extended_info[sig_idx].key_expires = attr_ulong;
+
+        /* extract user name */
+        attr_string = gpgme_key_get_string_attr(key, GPGME_ATTR_NAME, 0, 0);
+        if (attr_string != 0) {
+            a = parse_dn( attr_string );
+            sigmeta->extended_info[sig_idx].name = reorder_dn( a );
+        }
+
+        /* extract email(s) */
+        sigmeta->extended_info[sig_idx].emailCount = 0;
+        sigmeta->extended_info[sig_idx].emailList = 0;
+        for( UID_idx=0; 
+             (attr_string = gpgme_key_get_string_attr(key,
+                              GPGME_ATTR_EMAIL, 0, UID_idx)); 
+             ++UID_idx ){
+          if (*attr_string) {
+            fprintf( stderr, "gpgmeplug checkMessageSignature found email: %s\n", attr_string );
+            if( !sigmeta->extended_info[sig_idx].emailCount )
+                alloc_return = 
+                    malloc( sizeof( char*) );
+            else
+                alloc_return = 
+                    realloc( sigmeta->extended_info[sig_idx].emailList,
+                             sizeof( char*)
+                             * (sigmeta->extended_info[sig_idx].emailCount + 1) );
+            if( alloc_return ) {
+              sigmeta->extended_info[sig_idx].emailList = alloc_return;
+              storeNewCharPtr( 
+                  &( sigmeta->extended_info[sig_idx].emailList[
+                          sigmeta->extended_info[sig_idx].emailCount ] ),
+                  attr_string );
+              ++sigmeta->extended_info[sig_idx].emailCount;
+            }
+          }
+        }
+        if( !sigmeta->extended_info[sig_idx].emailCount )
+          fprintf( stderr, "gpgmeplug checkMessageSignature found NO EMAIL\n" );
+
+        /* extract the comment */
+        attr_string = gpgme_key_get_string_attr(key, GPGME_ATTR_COMMENT, 0, 0);
+        if (attr_string != 0)
+            storeNewCharPtr( &sigmeta->extended_info[sig_idx].comment,
+                            attr_string );
+      }
+      else
+        storeNewCharPtr( &sigmeta->extended_info[sig_idx].fingerprint, fpr );
+
+      sig_status = sig_status_to_string( status );
+      storeNewCharPtr( &sigmeta->extended_info[sig_idx].status_text,
+                       sig_status );
+
+    } else
+      break; /* if allocation fails once, it isn't likely to
+                succeed the next time either */
+
+    fpr = gpgme_get_sig_status (ctx, ++sig_idx, &status, &created);
+  }
+  sigmeta->extended_info_count = sig_idx;
+  sigmeta->nota_xml = gpgme_get_notation( ctx );
+  sigmeta->status_code = status;
+
+  gpgme_release( ctx );
+  return ( status == GPGME_SIG_STAT_GOOD );
+}
+