2 This file is part of GNUnet.
3 Copyright (C) 2014 GNUnet e.V.
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.
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.
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/>.
18 SPDX-License-Identifier: AGPL3.0-or-later
22 * @author Christian Grothoff
23 * @file util/perf_crypto_paillier.c
24 * @brief measure performance of Paillier encryption
27 #include "gnunet_util_lib.h"
32 main (int argc, char *argv[])
34 struct GNUNET_TIME_Absolute start;
35 struct GNUNET_CRYPTO_PaillierPublicKey public_key;
36 struct GNUNET_CRYPTO_PaillierPrivateKey private_key;
37 struct GNUNET_CRYPTO_PaillierCiphertext c1;
41 start = GNUNET_TIME_absolute_get ();
42 for (i = 0; i < 10; i++)
43 GNUNET_CRYPTO_paillier_create (&public_key,
45 printf ("10x key generation took %s\n",
46 GNUNET_STRINGS_relative_time_to_string (
47 GNUNET_TIME_absolute_get_duration (start),
49 GAUGER ("UTIL", "Paillier key generation",
51 + GNUNET_TIME_absolute_get_duration
52 (start).rel_value_us / 1000LL), "keys/ms");
54 m1 = gcry_mpi_new (0);
55 m1 = gcry_mpi_set_ui (m1, 1);
56 /* m1 = m1 * 2 ^ (GCPB - 3) */
57 gcry_mpi_mul_2exp (m1,
59 GNUNET_CRYPTO_PAILLIER_BITS - 3);
60 start = GNUNET_TIME_absolute_get ();
61 for (i = 0; i < 10; i++)
62 GNUNET_CRYPTO_paillier_encrypt (&public_key,
66 printf ("10x encryption took %s\n",
67 GNUNET_STRINGS_relative_time_to_string (
68 GNUNET_TIME_absolute_get_duration (start),
70 GAUGER ("UTIL", "Paillier encryption",
72 + GNUNET_TIME_absolute_get_duration
73 (start).rel_value_us / 1000LL), "ops/ms");
75 start = GNUNET_TIME_absolute_get ();
76 for (i = 0; i < 10; i++)
77 GNUNET_CRYPTO_paillier_decrypt (&private_key,
81 printf ("10x decryption took %s\n",
82 GNUNET_STRINGS_relative_time_to_string (
83 GNUNET_TIME_absolute_get_duration (start),
85 GAUGER ("UTIL", "Paillier decryption",
87 + GNUNET_TIME_absolute_get_duration
88 (start).rel_value_us / 1000LL), "ops/ms");
95 /* end of perf_crypto_paillier.c */