Merge branch 'master' of ssh://gnunet.org/gnunet
[oweals/gnunet.git] / src / util / test_crypto_random.c
1 /*
2      This file is part of GNUnet.
3      Copyright (C) 2009 GNUnet e.V.
4
5      GNUnet is free software; you can redistribute it and/or modify
6      it under the terms of the GNU General Public License as published
7      by the Free Software Foundation; either version 3, or (at your
8      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      General Public License for more details.
14
15      You should have received a copy of the GNU General Public License
16      along with GNUnet; see the file COPYING.  If not, write to the
17      Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
18      Boston, MA 02110-1301, USA.
19
20 */
21
22 /**
23  * @file util/test_crypto_random.c
24  * @brief testcase for crypto_random.c
25  */
26 #include "platform.h"
27 #include "gnunet_util_lib.h"
28
29 static int
30 test (enum GNUNET_CRYPTO_Quality mode)
31 {
32
33   int buf[1024];
34   unsigned int *b2;
35   int i;
36   unsigned long long n;
37
38   for (i = 0; i < 1024; i++)
39     GNUNET_break (1024 > (buf[i] = GNUNET_CRYPTO_random_u32 (mode, 1024)));
40   for (i = 0; i < 10; i++)
41   {
42     b2 = GNUNET_CRYPTO_random_permute (mode, 1024);
43     if (0 == memcmp (b2, buf, sizeof (buf)))
44     {
45       FPRINTF (stderr, "%s",  "!");
46       GNUNET_free (b2);
47       continue;
48     }
49     GNUNET_free (b2);
50     break;
51   }
52   if (i == 10)
53     return 1;                   /* virtually impossible... */
54
55   for (n = 10; n < 1024LL * 1024LL * 1024LL; n *= 10)
56     GNUNET_break (n > GNUNET_CRYPTO_random_u64 (mode, n));
57   return 0;
58 }
59
60 int
61 main (int argc, char *argv[])
62 {
63   GNUNET_log_setup ("test-crypto-random", "WARNING", NULL);
64   if (0 != test (GNUNET_CRYPTO_QUALITY_WEAK))
65     return 1;
66   if (0 != test (GNUNET_CRYPTO_QUALITY_STRONG))
67     return 1;
68
69   return 0;
70 }