src/nse/perf_kdf.c

   1 /*
   2      This file is part of GNUnet.
   3      Copyright (C) 2002, 2003, 2004, 2006, 2013 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 nse/perf_kdf.c
  24  * @brief measure performance of KDF hash function
  25  */
  26 #include "platform.h"
  27 #include "gnunet_util_lib.h"
  28 #include <gcrypt.h>
  29 #include <gauger.h>
  30
  31
  32 /**
  33  * Calculate the 'proof-of-work' hash (an expensive hash).
  34  *
  35  * @param buf data to hash
  36  * @param buf_len number of bytes in 'buf'
  37  * @param result where to write the resulting hash
  38  */
  39 static void
  40 pow_hash (const void *buf,
  41           size_t buf_len,
  42           struct GNUNET_HashCode *result)
  43 {
  44   GNUNET_break (0 ==
  45                 gcry_kdf_derive (buf, buf_len,
  46                                  GCRY_KDF_SCRYPT,
  47                                  1 /* subalgo */,
  48                                  "gnunet-proof-of-work", strlen (
  49                                    "gnunet-proof-of-work"),
  50                                  2 /* iterations; keep cost of individual op small */,
  51                                  sizeof(struct GNUNET_HashCode), result));
  52 }
  53
  54
  55 static void
  56 perfHash ()
  57 {
  58   struct GNUNET_HashCode hc;
  59   unsigned int i;
  60   char buf[64];
  61
  62   memset (buf, 1, sizeof(buf));
  63   for (i = 0; i < 1024; i++)
  64     pow_hash (buf, sizeof(buf), &hc);
  65 }
  66
  67
  68 int
  69 main (int argc, char *argv[])
  70 {
  71   struct GNUNET_TIME_Absolute start;
  72
  73   start = GNUNET_TIME_absolute_get ();
  74   perfHash ();
  75   printf ("Hash perf took %s\n",
  76           GNUNET_STRINGS_relative_time_to_string (
  77             GNUNET_TIME_absolute_get_duration (start),
  78             GNUNET_YES));
  79   GAUGER ("NSE", "Proof-of-work hashing",
  80           1024.0 / (1.0
  81                     + GNUNET_TIME_absolute_get_duration
  82                       (start).rel_value_us / 1000.0), "hashes/ms");
  83   return 0;
  84 }
  85
  86
  87 /* end of perf_kdf.c */