2003-07-02 Moritz Schulte <moritz@g10code.com>
authorMoritz Schulte <mo@g10code.com>
Wed, 2 Jul 2003 16:00:53 +0000 (16:00 +0000)
committerMoritz Schulte <mo@g10code.com>
Wed, 2 Jul 2003 16:00:53 +0000 (16:00 +0000)
* Makefile.am (TESTS): Added: ac.

* ac.c: New file.

tests/ChangeLog
tests/Makefile.am
tests/ac.c [new file with mode: 0644]

index 0766e70..e1c8e0c 100644 (file)
@@ -1,3 +1,9 @@
+2003-07-02  Moritz Schulte  <moritz@g10code.com>
+
+       * Makefile.am (TESTS): Added: ac.
+
+       * ac.c: New file.
+
 2003-06-18  Werner Koch  <wk@gnupg.org>
 
        * basic.c (check_cbc_mac_cipher): Adjusted for new API of get_blklen
index c1d24bc..8987b0a 100644 (file)
@@ -21,7 +21,7 @@
 
 # TESTS_ENVIRONMENT =  
 
-TESTS = basic tsexp keygen pubkey
+TESTS = ac basic tsexp keygen pubkey
 
 EXTRA_DIST = 
 
diff --git a/tests/ac.c b/tests/ac.c
new file mode 100644 (file)
index 0000000..fc2f894
--- /dev/null
@@ -0,0 +1,128 @@
+/* pubkey.c - Public key encryption/decryption tests
+ *     Copyright (C) 2003 Free Software Foundation, Inc.
+ *
+ * This file is part of Libgcrypt.
+ *
+ * Libgcrypt is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License as
+ * published by the Free Software Foundation; either version 2.1 of
+ * the License, or (at your option) any later version.
+ *
+ * Libgcrypt is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
+ */
+
+#include <stdarg.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <assert.h>
+
+#include "../src/gcrypt.h"
+
+static int verbose;
+
+static void
+die (const char *format, ...)
+{
+  va_list arg_ptr ;
+
+  va_start( arg_ptr, format ) ;
+  vfprintf (stderr, format, arg_ptr );
+  va_end(arg_ptr);
+  exit (1);
+}
+
+void
+check_run (void)
+{
+  gcry_ac_handle_t handle;
+  gcry_ac_key_pair_t key_pair;
+  gcry_ac_key_t key_sec, key_pub;
+  gpg_error_t err = 0;
+  unsigned int a = 0x4223;
+  gcry_mpi_t x, x2;
+  gcry_ac_data_t data;
+  gcry_ac_key_spec_rsa_t rsa_spec;
+
+  rsa_spec.e = gcry_mpi_new (0);
+  gcry_mpi_set_ui (rsa_spec.e, 1);
+
+  err = gcry_ac_open (&handle, GCRY_AC_RSA, 0);
+  assert (! err);
+
+  x = gcry_mpi_new (0);
+  gcry_mpi_set_ui (x, a);
+
+  err = gcry_ac_key_pair_generate (handle, &key_pair, 1024, (void *) &rsa_spec);
+  assert (! err);
+
+  key_sec = gcry_ac_key_pair_extract (key_pair, GCRY_AC_KEY_SECRET);
+  key_pub = gcry_ac_key_pair_extract (key_pair, GCRY_AC_KEY_PUBLIC);
+
+  err = gcry_ac_data_encrypt (handle, GCRY_AC_FLAG_DATA_NO_BLINDING,
+                             key_pub, x, &data);
+  assert (! err);
+
+  err = gcry_ac_data_decrypt (handle, GCRY_AC_FLAG_DATA_NO_BLINDING,
+                             key_sec, &x2, data);
+  assert (! err);
+
+  assert (! gcry_mpi_cmp (x, x2));
+
+  gcry_ac_data_destroy (data);
+
+  err = gcry_ac_data_sign (handle, key_sec, x, &data);
+  assert (! err);
+  err = gcry_ac_data_verify (handle, key_pub, x, data);
+  assert (! err);
+
+  err = gcry_ac_data_sign (handle, key_sec, x, &data);
+  assert (! err);
+  {
+    const char *label;
+    gcry_mpi_t y;
+
+    err = gcry_ac_data_get_index (data, 0, &label, &y);
+    assert (! err);
+    gcry_mpi_add_ui (y, y, 1);
+    
+    err = gcry_ac_data_set (data, label, y);
+    assert (! err);
+
+    err = gcry_ac_data_verify (handle, key_pub, x, data);
+    assert (gpg_err_code (err) == GPG_ERR_BAD_SIGNATURE);
+  }
+
+  gcry_ac_close (handle);
+}
+
+int
+main (int argc, char **argv)
+{
+  int debug = 0;
+  int i = 1;
+
+  if (argc > 1 && !strcmp (argv[1], "--verbose"))
+    verbose = 1;
+  else if (argc > 1 && !strcmp (argv[1], "--debug"))
+    verbose = debug = 1;
+
+  gcry_control (GCRYCTL_DISABLE_SECMEM, 0);
+  if (!gcry_check_version (GCRYPT_VERSION))
+    die ("version mismatch\n");
+  gcry_control (GCRYCTL_INITIALIZATION_FINISHED, 0);
+  if (debug)
+    gcry_control (GCRYCTL_SET_DEBUG_FLAGS, 1u , 0);
+
+  for (; i > 0; i--)
+    check_run ();
+  
+  return 0;
+}