api: New function gcry_get_config.
[libgcrypt.git] / tests / hashtest.c
index 15310d0..2ecbc1f 100644 (file)
@@ -1,4 +1,4 @@
-/* hashtest.c - Check the hash fucntions
+/* hashtest.c - Check the hash functions
  * Copyright (C) 2013 g10 Code GmbH
  *
  * This file is part of Libgcrypt.
 #include "stopwatch.h"
 
 #define PGM "hashtest"
+#include "t-common.h"
 
-#define my_isascii(c) (!((c) & 0x80))
-#define digitp(p)   (*(p) >= '0' && *(p) <= '9')
-#define hexdigitp(a) (digitp (a)                     \
-                      || (*(a) >= 'A' && *(a) <= 'F')  \
-                      || (*(a) >= 'a' && *(a) <= 'f'))
-#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))
-#define xmalloc(a)    gcry_xmalloc ((a))
-#define xcalloc(a,b)  gcry_xcalloc ((a),(b))
-#define xstrdup(a)    gcry_xstrdup ((a))
-#define xfree(a)      gcry_free ((a))
-#define pass()        do { ; } while (0)
-
-static int verbose;
-static int debug;
-static int error_count;
 static int missing_test_vectors;
 
 static struct {
@@ -63,6 +47,7 @@ static struct {
   { GCRY_MD_SHA1, 256,  -0, "71b923afde1c8c040884c723a2e3335b333e64c6" },
   { GCRY_MD_SHA1, 256,   1, "2d99f9b5b86e9c9c937104f4242bd6b8bc0927ef" },
   { GCRY_MD_SHA1, 256,  64, "a60dabe8d749f798b7ec3a684cc3eab487451482" },
+
   { GCRY_MD_SHA224, 256, -64,
     "b5672b54d2480a5688a2dc727a1ad4db7a81ef31ce8999e0bbaeffdc" },
   { GCRY_MD_SHA224, 256,  -1,
@@ -73,6 +58,7 @@ static struct {
     "e578d5d523320876565bbbc892511a485427caee6dd754d57e3e58c2" },
   { GCRY_MD_SHA224, 256,  64,
     "ff0464df248cd298b63765bc4f87f21e25c93c657fdf3656d3c878e5" },
+
   { GCRY_MD_SHA256, 256, -64,
     "87a9828d3de78d55d252341db2a622908c4e0ceaee9961ecf9768700fc799ec8" },
   { GCRY_MD_SHA256, 256,  -1,
@@ -83,59 +69,41 @@ static struct {
     "5a2e21b1e79cd866acf53a2a18ca76bd4e02c4b01bf4627354171824c812d95f" },
   { GCRY_MD_SHA256, 256,  64,
     "34444808af8e9d995e67f9e155ed94bf55f195a51dc1d8a989e6bcf95511c8a2" },
-  { 0 }
-};
-
-
-
-
-
-static void
-die (const char *format, ...)
-{
-  va_list arg_ptr ;
-
-  fflush (stdout);
-  fprintf (stderr, "%s: ", PGM);
-  va_start( arg_ptr, format ) ;
-  vfprintf (stderr, format, arg_ptr );
-  va_end(arg_ptr);
-  if (*format && format[strlen(format)-1] != '\n')
-    putc ('\n', stderr);
-  exit (1);
-}
-
-static void
-fail (const char *format, ...)
-{
-  va_list arg_ptr;
 
-  fflush (stdout);
-  fprintf (stderr, "%s: ", PGM);
-  /* if (wherestr) */
-  /*   fprintf (stderr, "%s: ", wherestr); */
-  va_start (arg_ptr, format);
-  vfprintf (stderr, format, arg_ptr);
-  va_end (arg_ptr);
-  if (*format && format[strlen(format)-1] != '\n')
-    putc ('\n', stderr);
-  error_count++;
-  if (error_count >= 50)
-    die ("stopped after 50 errors.");
-}
-
-static void
-show (const char *format, ...)
-{
-  va_list arg_ptr;
+  { GCRY_MD_SHA512, 256, -64,
+    "e01bf8140874bf240e8426cb2bcbc377cbed2e6037334116637149e1cd8cd462"
+    "96828b71f32b9f002771d4cb51172ce578b73b7939221e4df655ecd08601e655" },
+  { GCRY_MD_SHA512, 256,  -1,
+    "4917ff94514b1757705c289fdc3e7d6ffcce5771b20ae237ebc03d2ec9eb435f"
+    "b7ce9f0e27272be8cced77a5edae1a01a0ad62b0a44169d88bbee45474a17734" },
+  { GCRY_MD_SHA512, 256,   0,
+    "1e28e8b3c79f2f47da11f3c0b7da4e7981e7d932db6d17d528a31e191922edda"
+    "8fc4bb2df10ea876232db5a1c606bc41886e8b2c570a3e721221f60c8c7dc4ab" },
+  { GCRY_MD_SHA512, 256,   1,
+    "027d3324dd1cf127770ceb53681f4c70937c9bca4e3acd5fd76cb266c7d4527d"
+    "58140290a1822e8d60c4d3ae9725fb923183230d6dfd2d7d73c0d74a4757f34a" },
+  { GCRY_MD_SHA512, 256,  64,
+    "49920704ea9d6ee19f0742d6c868110fa3eda8ac09f026e9ef22cc731af53020"
+    "de40eedef66cb1afd94c61e285fa9327e01336e804903740a9145ab1f065c2d5" },
+
+  { GCRY_MD_SHA3_512, 256, -64,
+    "c6e082b3db996dbe5f2c5709818a7f325ef4febd883d7e9c545c06bfa7225198"
+    "1ecf40103788913cd5a5bdf13246b952ded6651043684b24197eb23544882a97" },
+  { GCRY_MD_SHA3_512, 256,  -1,
+    "d7bf28e8216bf7d3d0d3969e34078e94b98598e17b6f21f256379389e4eba8ee"
+    "74eb288774797263fec00bdfd357d132cea9e408be36b982f5a60ab56ad01613" },
+  { GCRY_MD_SHA3_512, 256,  +0,
+    "c1270852ba7b1e1a3eaa777969b8a65be28c3894537c61eb8cd22b1df6af703d"
+    "b59939f6adadeb64317faece8167d4817e73daf73e28a5ccd26bebee0a35c322" },
+  { GCRY_MD_SHA3_512, 256,  +1,
+    "8bdfeb3a1a9a1cdcef21172cbc5bb3b87c0d8f7111df0aaf7f1bc03ad4775bd6"
+    "a03e0a875c4e7d02d2230c213562c6a57be28d92eaf6e4bea4bc24690454c8ef" },
+  { GCRY_MD_SHA3_512, 256, +64,
+    "0c91b91665ceaf7af5102e0ed31aa4f050668ab3c57b1f4763946d567efe66b3"
+    "ab9a2016cf238dee5b44eae9f0cdfbf7b7a6eb1e759986273243dc35894706b6" },
 
-  fprintf (stderr, "%s: ", PGM);
-  va_start (arg_ptr, format);
-  vfprintf (stderr, format, arg_ptr);
-  if (*format && format[strlen(format)-1] != '\n')
-    putc ('\n', stderr);
-  va_end (arg_ptr);
-}
+  { 0 }
+};
 
 
 static void
@@ -208,10 +176,10 @@ run_selftest (int algo)
     fail ("extended selftest for %s (%d) failed: %s",
           gcry_md_algo_name (algo), algo, gpg_strerror (err));
   else if (err && verbose)
-    show ("extended selftest for %s (%d) not implemented",
+    info ("extended selftest for %s (%d) not implemented",
           gcry_md_algo_name (algo), algo);
   else if (verbose)
-    show ("extended selftest for %s (%d) passed",
+    info ("extended selftest for %s (%d) passed",
           gcry_md_algo_name (algo), algo);
 }
 
@@ -235,7 +203,7 @@ cmp_digest (const unsigned char *digest, size_t digestlen,
     }
   if (!testvectors[idx].algo)
     {
-      show ("%d GiB %+3d %-10s warning: %s",
+      info ("%d GiB %+3d %-10s warning: %s",
             gigs, bytes, gcry_md_algo_name (algo), "no test vector");
       missing_test_vectors++;
       return 1;
@@ -415,13 +383,13 @@ main (int argc, char **argv)
   if (gigs < 0 || gigs > 1024*1024)
     die ("value for --gigs must be in the range 0 to %d", 1024*1024);
 
-  gcry_control (GCRYCTL_DISABLE_SECMEM, 0);
+  xgcry_control (GCRYCTL_DISABLE_SECMEM, 0);
   if (!gcry_check_version (GCRYPT_VERSION))
     die ("version mismatch\n");
   if (debug)
-    gcry_control (GCRYCTL_SET_DEBUG_FLAGS, 1u , 0);
-  gcry_control (GCRYCTL_ENABLE_QUICK_RANDOM, 0);
-  gcry_control (GCRYCTL_INITIALIZATION_FINISHED, 0);
+    xgcry_control (GCRYCTL_SET_DEBUG_FLAGS, 1u , 0);
+  xgcry_control (GCRYCTL_ENABLE_QUICK_RANDOM, 0);
+  xgcry_control (GCRYCTL_INITIALIZATION_FINISHED, 0);
 
   /* A quick check that all given algorithms are valid.  */
   for (idx=0; idx < argc; idx++)
@@ -466,7 +434,7 @@ main (int argc, char **argv)
     fail ("Some test vectors are missing");
 
   if (verbose)
-    show ("All tests completed in %s.  Errors: %d\n",
-          elapsed_time (), error_count);
+    info ("All tests completed in %s.  Errors: %d\n",
+          elapsed_time (1), error_count);
   return !!error_count;
 }