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