Use syslog to log important messages.
[libgcrypt.git] / tests / fipsrngdrv.c
1 /* fipsrngdrv.c  -  A driver to test the FIPS RNG.
2    Copyright (C) 2008 Free Software Foundation, Inc.
3
4    This file is part of Libgcrypt.
5   
6    Libgcrypt is free software; you can redistribute it and/or modify
7    it under the terms of the GNU Lesser General Public License as
8    published by the Free Software Foundation; either version 2.1 of
9    the License, or (at your option) any later version.
10   
11    Libgcrypt is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU Lesser General Public License for more details.
15   
16    You should have received a copy of the GNU Lesser General Public
17    License along with this program; if not, see <http://www.gnu.org/licenses/>.
18  */
19
20 #ifdef HAVE_CONFIG_H
21 #include <config.h>
22 #endif
23 #include <stdio.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <stdarg.h>
27
28 #include "../src/gcrypt.h"
29
30 #define PGM "fipsrngdrv"
31
32
33 static void
34 die (const char *format, ...)
35 {
36   va_list arg_ptr;
37
38   va_start (arg_ptr, format);
39   fputs (PGM ": ", stderr);
40   vfprintf (stderr, format, arg_ptr);
41   va_end (arg_ptr);
42   exit (1);
43 }
44
45
46 static gcry_error_t
47 init_external_test (void **r_context, 
48                     unsigned int flags,
49                     const void *key, size_t keylen,
50                     const void *seed, size_t seedlen,
51                     const void *dt, size_t dtlen)
52 {
53   return gcry_control (58, 
54                        r_context, flags,
55                        key, keylen,
56                        seed, seedlen,
57                        dt, dtlen);
58 }
59
60 static gcry_error_t
61 run_external_test (void *context, void *buffer, size_t buflen)
62 {
63   return gcry_control (59, context, buffer, buflen);
64 }
65
66 static void
67 deinit_external_test (void *context)
68 {
69   gcry_control (60, context);
70 }
71
72
73 static void
74 print_buffer (const unsigned char *buffer, size_t length)
75 {
76   while (length--)
77     printf ("%02X", *buffer++);
78 }
79
80
81 int
82 main (int argc, char **argv)
83 {
84   void *context;
85   gpg_error_t err;
86   int block;
87   unsigned char buffer[16];
88
89   (void)argc;
90   (void)argv;
91
92   gcry_control (GCRYCTL_FORCE_FIPS_MODE, 0);
93   if (!gcry_check_version (GCRYPT_VERSION))
94     die ("version mismatch\n");
95   gcry_control (GCRYCTL_DISABLE_SECMEM, 0);
96   gcry_control (GCRYCTL_SET_VERBOSITY, 2);
97   gcry_control (GCRYCTL_INITIALIZATION_FINISHED, 0);
98
99   err = init_external_test (&context, 0,
100                             "1234567890123456", 16,
101                             "abcdefghijklmnop", 16,
102                             "XXXXXXXXXXXXXXXX", 16);
103   if (err)
104     die ("init external test failed: %s\n", gpg_strerror (err));
105
106   for (block=0; block < 10; block++)
107     {
108       err = run_external_test (context, buffer, sizeof buffer);
109       if (err)
110         die ("run external test failed: %s\n", gpg_strerror (err));
111       print_buffer (buffer, sizeof buffer);
112       putchar ('\n');
113     }
114
115   deinit_external_test (context);
116
117   return 0;
118 }
119