X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/e56dff91c23e9e8ac8bc34cfc17728a1cb2953c6..3563e36580c7dad68cd6d3f7eb82eef570fc0c76:/key-pack.c

diff --git a/key-pack.c b/key-pack.c
index e6f2825..575fd93 100644
--- a/key-pack.c
+++ b/key-pack.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
- * $Id: key-pack.c,v 1.1 2000/06/17 10:42:41 mdw Exp $
+ * $Id: key-pack.c,v 1.2 2004/03/28 01:58:47 mdw Exp $
  *
  * Packing and unpacking key data
  *
@@ -30,6 +30,9 @@
 /*----- Revision history --------------------------------------------------* 
  *
  * $Log: key-pack.c,v $
+ * Revision 1.2  2004/03/28 01:58:47  mdw
+ * Generate, store and retreive elliptic curve keys.
+ *
  * Revision 1.1  2000/06/17 10:42:41  mdw
  * Packing and unpacking structured keys.
  *
@@ -67,6 +70,12 @@ int key_pack(key_packdef *kp, key_data *kd, dstr *d)
     case KENC_MP:
       kd->u.m = *(mp **)kp->p;
       return (0);
+    case KENC_STRING:
+      kd->u.p = *(char **)kp->p;
+      return (0);
+    case KENC_EC:
+      kd->u.e = *(ec *)kp->p;
+      return (0);
 
     /* --- Encrypted keys are a little tricky --- *
      *
@@ -161,6 +170,12 @@ int key_unpack(key_packdef *kp, key_data *kd, dstr *d)
     case KENC_MP:
       *(mp **)kp->p = kd->u.m;
       break;
+    case KENC_STRING:
+      *(char **)kp->p = kd->u.p;
+      break;
+    case KENC_EC:
+      *(ec *)kp->p = kd->u.e;
+      break;
 
     /* --- Structured keys take a little care --- */