Add gc-pbkdf2-sha1 module.
[gnulib.git] / tests / test-gc-pbkdf2-sha1.c
1 /*
2  * Copyright (C) 2002, 2003, 2004, 2005  Free Software Foundation
3  *
4  * This program is free software; you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation; either version 2, or (at your option)
7  * any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
17  * 02110-1301, USA.  */
18
19 /* Written by Simon Josefsson.  */
20
21 #ifdef HAVE_CONFIG_H
22 # include <config.h>
23 #endif
24
25 #include "gc.h"
26
27 #include <stdio.h>
28 #include <string.h>
29
30 /* Test vectors from RFC 3962. */
31
32 #define G_CLEF "\xF0\x9D\x84\x9E"
33
34 struct pkcs5
35 {
36   int iterations;
37   const char *password;
38   const char *salt;
39   int dklen;
40   const char *expected;
41 };
42 const struct pkcs5 pkcs5[] = {
43   {1, "password", "ATHENA.MIT.EDUraeburn", 16,
44    "\xCD\xED\xB5\x28\x1B\xB2\xF8\x01\x56\x5A\x11\x22\xB2\x56\x35\x15"},
45   {2, "password", "ATHENA.MIT.EDUraeburn", 16,
46    "\x01\xdb\xee\x7f\x4a\x9e\x24\x3e\x98\x8b\x62\xc7\x3c\xda\x93\x5d"},
47   {2, "password", "ATHENA.MIT.EDUraeburn", 32,
48    "\x01\xdb\xee\x7f\x4a\x9e\x24\x3e\x98\x8b\x62\xc7\x3c\xda\x93\x5d"
49    "\xa0\x53\x78\xb9\x32\x44\xec\x8f\x48\xa9\x9e\x61\xad\x79\x9d\x86"},
50   {1200, "password", "ATHENA.MIT.EDUraeburn", 16,
51    "\x5c\x08\xeb\x61\xfd\xf7\x1e\x4e\x4e\xc3\xcf\x6b\xa1\xf5\x51\x2b"},
52   {1200, "password", "ATHENA.MIT.EDUraeburn", 32,
53    "\x5c\x08\xeb\x61\xfd\xf7\x1e\x4e\x4e\xc3\xcf\x6b\xa1\xf5\x51\x2b"
54    "\xa7\xe5\x2d\xdb\xc5\xe5\x14\x2f\x70\x8a\x31\xe2\xe6\x2b\x1e\x13"},
55   {5, "password", "\x12\x34\x56\x78\x78\x56\x34\x12\x00", 16,
56    "\xd1\xda\xa7\x86\x15\xf2\x87\xe6\xa1\xc8\xb1\x20\xd7\x06\x2a\x49"},
57   {5, "password", "\x12\x34\x56\x78\x78\x56\x34\x12\x00", 32,
58    "\xd1\xda\xa7\x86\x15\xf2\x87\xe6\xa1\xc8\xb1\x20\xd7\x06\x2a\x49"
59    "\x3f\x98\xd2\x03\xe6\xbe\x49\xa6\xad\xf4\xfa\x57\x4b\x6e\x64\xee"},
60   {1200, "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
61    "pass phrase equals block size", 16,
62    "\x13\x9c\x30\xc0\x96\x6b\xc3\x2b\xa5\x5f\xdb\xf2\x12\x53\x0a\xc9"},
63   {1200, "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
64    "pass phrase equals block size", 32,
65    "\x13\x9c\x30\xc0\x96\x6b\xc3\x2b\xa5\x5f\xdb\xf2\x12\x53\x0a\xc9"
66    "\xc5\xec\x59\xf1\xa4\x52\xf5\xcc\x9a\xd9\x40\xfe\xa0\x59\x8e\xd1"},
67   {1200, "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
68    "pass phrase exceeds block size", 16,
69    "\x9c\xca\xd6\xd4\x68\x77\x0c\xd5\x1b\x10\xe6\xa6\x87\x21\xbe\x61"},
70   {1200, "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX",
71    "pass phrase exceeds block size", 32,
72    "\x9c\xca\xd6\xd4\x68\x77\x0c\xd5\x1b\x10\xe6\xa6\x87\x21\xbe\x61"
73    "\x1a\x8b\x4d\x28\x26\x01\xdb\x3b\x36\xbe\x92\x46\x91\x5e\xc8\x2a"},
74   {50, G_CLEF "\x00", "EXAMPLE.COMpianist", 16,
75    "\x6b\x9c\xf2\x6d\x45\x45\x5a\x43\xa5\xb8\xbb\x27\x6a\x40\x3b\x39"},
76   {50, G_CLEF "\x00", "EXAMPLE.COMpianist", 32,
77    "\x6b\x9c\xf2\x6d\x45\x45\x5a\x43\xa5\xb8\xbb\x27\x6a\x40\x3b\x39"
78    "\xe7\xfe\x37\xa0\xc4\x1e\x02\xc2\x81\xff\x30\x69\xe1\xe9\x4f\x52"},
79   {500, "All n-entities must communicate with other n-entities via n-1 "
80    "entiteeheehees", "\x12\x34\x56\x78\x78\x56\x34\x12\x00", 16,
81    "\x6A\x89\x70\xBF\x68\xC9\x2C\xAE\xA8\x4A\x8D\xF2\x85\x10\x85\x86"}
82 };
83
84 int
85 main (int argc, char *argv[])
86 {
87   size_t i;
88   int rc;
89   char out[BUFSIZ];
90
91   for (i = 0; i < sizeof (pkcs5) / sizeof (pkcs5[0]); i++)
92     {
93       rc = gc_pbkdf2_sha1 (pkcs5[i].password, strlen (pkcs5[i].password),
94                            pkcs5[i].salt, strlen (pkcs5[i].salt),
95                            pkcs5[i].iterations, out, pkcs5[i].dklen);
96       if (rc != GC_OK)
97         {
98           printf ("PKCS5 entry %d failed fatally: %d\n", i, rc);
99           return 1;
100         }
101
102       if (memcmp (pkcs5[i].expected, out, pkcs5[i].dklen) != 0)
103         {
104           printf ("PKCS5 entry %d failed\n", i);
105           return 1;
106         }
107     }
108
109   return 0;
110 }