src/util/perf_crypto_hash.c

   1 /*
   2      This file is part of GNUnet.
   3      Copyright (C) 2002, 2003, 2004, 2006 GNUnet e.V.
   4
   5      GNUnet is free software: you can redistribute it and/or modify it
   6      under the terms of the GNU Affero General Public License as published
   7      by the Free Software Foundation, either version 3 of the License,
   8      or (at your option) any later version.
   9
  10      GNUnet is distributed in the hope that it will be useful, but
  11      WITHOUT ANY WARRANTY; without even the implied warranty of
  12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13      Affero General Public License for more details.
  14
  15      You should have received a copy of the GNU Affero General Public License
  16      along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17
  18      SPDX-License-Identifier: AGPL3.0-or-later
  19  */
  20
  21 /**
  22  * @author Christian Grothoff
  23  * @file util/perf_crypto_hash.c
  24  * @brief measure performance of hash function
  25  */
  26 #include "platform.h"
  27 #include "gnunet_util_lib.h"
  28 #include <gauger.h>
  29 #include <gcrypt.h>
  30
  31
  32 static void
  33 perfHash ()
  34 {
  35   struct GNUNET_HashCode hc;
  36   unsigned int i;
  37   char buf[64 * 1024];
  38
  39   memset (buf, 1, sizeof(buf));
  40   for (i = 0; i < 1024; i++)
  41     GNUNET_CRYPTO_hash (buf, sizeof(buf), &hc);
  42 }
  43
  44
  45 static void
  46 perfHashSmall ()
  47 {
  48   struct GNUNET_HashCode hc;
  49   unsigned int i;
  50   char buf[64];
  51
  52   memset (buf, 1, sizeof(buf));
  53   for (i = 0; i < 1024; i++)
  54     GNUNET_CRYPTO_hash (buf, sizeof(buf), &hc);
  55 }
  56
  57
  58 static void
  59 perfHKDF ()
  60 {
  61   unsigned int i;
  62   char res[128];
  63   char buf[128];
  64   char skm[64];
  65
  66   memset (buf, 1, sizeof(buf));
  67   memset (skm, 2, sizeof(skm));
  68   for (i = 0; i < 1024; i++)
  69     GNUNET_CRYPTO_hkdf (res, sizeof(res),
  70                         GCRY_MD_SHA512, GCRY_MD_SHA256,
  71                         buf, sizeof(buf),
  72                         skm, sizeof(skm),
  73                         "test", (size_t) 4,
  74                         NULL, 0);
  75 }
  76
  77
  78 int
  79 main (int argc, char *argv[])
  80 {
  81   struct GNUNET_TIME_Absolute start;
  82
  83   start = GNUNET_TIME_absolute_get ();
  84   perfHashSmall ();
  85   printf ("1024x 64-byte Hash perf took %s\n",
  86           GNUNET_STRINGS_relative_time_to_string (
  87             GNUNET_TIME_absolute_get_duration (start),
  88             GNUNET_YES));
  89
  90   start = GNUNET_TIME_absolute_get ();
  91   perfHash ();
  92   printf ("1024x 64k Hash perf took %s\n",
  93           GNUNET_STRINGS_relative_time_to_string (
  94             GNUNET_TIME_absolute_get_duration (start),
  95             GNUNET_YES));
  96   GAUGER ("UTIL", "Cryptographic hashing",
  97           64 * 1024 / (1
  98                        + GNUNET_TIME_absolute_get_duration
  99                          (start).rel_value_us / 1000LL), "kb/ms");
 100   start = GNUNET_TIME_absolute_get ();
 101   perfHKDF ();
 102   printf ("HKDF perf took %s\n",
 103           GNUNET_STRINGS_relative_time_to_string (
 104             GNUNET_TIME_absolute_get_duration (start),
 105             GNUNET_YES));
 106   GAUGER ("UTIL", "Cryptographic HKDF",
 107           64 * 1024 / (1
 108                        + GNUNET_TIME_absolute_get_duration
 109                          (start).rel_value_us / 1000LL), "kb/ms");
 110   return 0;
 111 }
 112
 113
 114 /* end of perf_crypto_hash.c */