2002-07-25 Marcus Brinkmann <marcus@g10code.de>

	* engine-gpgsm.c (_gpgme_gpgsm_op_delete): Implement this.

diff --git a/trunk/gpgme/ChangeLog b/trunk/gpgme/ChangeLog
index 1a92046736107bc15cd4214e6002f638000cf829..f6f2d93ac9dda9472ee9333d3da1b68837fc1601 100644 (file)
--- a/trunk/gpgme/ChangeLog
+++ b/trunk/gpgme/ChangeLog
@@ -1,3 +1,7 @@
+2002-07-25  Marcus Brinkmann  <marcus@g10code.de>
+
+       * engine-gpgsm.c (_gpgme_gpgsm_op_delete): Implement this.
+
 2002-07-25  Marcus Brinkmann  <marcus@g10code.de>
 
        * Makefile.am (libgpgme_la_LDADD): Add @LIBOBJS@ for vasprintf and

diff --git a/trunk/gpgme/engine-gpgsm.c b/trunk/gpgme/engine-gpgsm.c
index 5dd28f99c1181434d146691ab97fa49e20ea3417..07692d490a426fc68c78019323a396c5bb760a70 100644 (file)
--- a/trunk/gpgme/engine-gpgsm.c
+++ b/trunk/gpgme/engine-gpgsm.c
@@ -669,8 +669,63 @@ _gpgme_gpgsm_op_decrypt (GpgsmObject gpgsm, GpgmeData ciph, GpgmeData plain)
 GpgmeError
 _gpgme_gpgsm_op_delete (GpgsmObject gpgsm, GpgmeKey key, int allow_secret)
 {
-  /* FIXME */
-  return mk_error (Not_Implemented);
+  char *fpr = (char *) gpgme_key_get_string_attr (key, GPGME_ATTR_FPR, NULL, 0);
+  char *linep = fpr;
+  char *line;
+  int length = 8;      /* "DELKEYS " */
+
+  if (!fpr)
+    return mk_error (Invalid_Key);
+
+  while (*linep)
+    {
+      length++;
+      if (*linep == '%' || *linep == ' ' || *linep == '+')
+       length += 2;
+      linep++;
+    }
+  length++;
+
+  line = xtrymalloc (length);
+  if (!line)
+    return mk_error (Out_Of_Core);
+
+  strcpy (line, "DELKEYS ");
+  linep = &line[8];
+
+  while (*fpr)
+    {
+      switch (*fpr)
+       {
+       case '%':
+         *(linep++) = '%';
+         *(linep++) = '2';
+         *(linep++) = '5';
+         break;
+       case ' ':
+         *(linep++) = '%';
+         *(linep++) = '2';
+         *(linep++) = '0';
+         break;
+       case '+':
+         *(linep++) = '%';
+         *(linep++) = '2';
+         *(linep++) = 'B';
+         break;
+       default:
+         *(linep++) = *fpr;
+         break;
+       }
+      fpr++;
+    }
+  *linep = '\0';
+
+  gpgsm->command = line;
+  _gpgme_io_close (gpgsm->output_cb.fd);
+  _gpgme_io_close (gpgsm->input_cb.fd);
+  _gpgme_io_close (gpgsm->message_cb.fd);
+
+  return 0;
 }