Remove /* foo.c */ comments
[openssl.git] / test / hmactest.c
1 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
2  * All rights reserved.
3  *
4  * This package is an SSL implementation written
5  * by Eric Young (eay@cryptsoft.com).
6  * The implementation was written so as to conform with Netscapes SSL.
7  *
8  * This library is free for commercial and non-commercial use as long as
9  * the following conditions are aheared to.  The following conditions
10  * apply to all code found in this distribution, be it the RC4, RSA,
11  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
12  * included with this distribution is covered by the same copyright terms
13  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
14  *
15  * Copyright remains Eric Young's, and as such any Copyright notices in
16  * the code are not to be removed.
17  * If this package is used in a product, Eric Young should be given attribution
18  * as the author of the parts of the library used.
19  * This can be in the form of a textual message at program startup or
20  * in documentation (online or textual) provided with the package.
21  *
22  * Redistribution and use in source and binary forms, with or without
23  * modification, are permitted provided that the following conditions
24  * are met:
25  * 1. Redistributions of source code must retain the copyright
26  *    notice, this list of conditions and the following disclaimer.
27  * 2. Redistributions in binary form must reproduce the above copyright
28  *    notice, this list of conditions and the following disclaimer in the
29  *    documentation and/or other materials provided with the distribution.
30  * 3. All advertising materials mentioning features or use of this software
31  *    must display the following acknowledgement:
32  *    "This product includes cryptographic software written by
33  *     Eric Young (eay@cryptsoft.com)"
34  *    The word 'cryptographic' can be left out if the rouines from the library
35  *    being used are not cryptographic related :-).
36  * 4. If you include any Windows specific code (or a derivative thereof) from
37  *    the apps directory (application code) you must include an acknowledgement:
38  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
39  *
40  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
41  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
42  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
43  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
44  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
45  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
46  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
48  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
49  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
50  * SUCH DAMAGE.
51  *
52  * The licence and distribution terms for any publically available version or
53  * derivative of this code cannot be changed.  i.e. this code cannot simply be
54  * copied and put under another distribution licence
55  * [including the GNU Public Licence.]
56  */
57
58 #include <stdio.h>
59 #include <string.h>
60 #include <stdlib.h>
61
62 #include "../e_os.h"
63
64 # include <openssl/hmac.h>
65 # ifndef OPENSSL_NO_MD5
66 #  include <openssl/md5.h>
67 # endif
68
69 # ifdef CHARSET_EBCDIC
70 #  include <openssl/ebcdic.h>
71 # endif
72
73 # ifndef OPENSSL_NO_MD5
74 static struct test_st {
75     unsigned char key[16];
76     int key_len;
77     unsigned char data[64];
78     int data_len;
79     unsigned char *digest;
80 } test[8] = {
81     {
82         "", 0, "More text test vectors to stuff up EBCDIC machines :-)", 54,
83         (unsigned char *)"e9139d1e6ee064ef8cf514fc7dc83e86",
84     },
85     {
86         {
87             0x0b, 0x0b, 0x0b, 0x0b, 0x0b, 0x0b, 0x0b, 0x0b, 0x0b, 0x0b, 0x0b,
88             0x0b, 0x0b, 0x0b, 0x0b, 0x0b,
89         }, 16, "Hi There", 8,
90         (unsigned char *)"9294727a3638bb1c13f48ef8158bfc9d",
91     },
92     {
93         "Jefe", 4, "what do ya want for nothing?", 28,
94         (unsigned char *)"750c783e6ab0b503eaa86e310a5db738",
95     },
96     {
97         {
98             0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
99             0xaa, 0xaa, 0xaa, 0xaa, 0xaa,
100         }, 16, {
101             0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd,
102             0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd,
103             0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd,
104             0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd,
105             0xdd, 0xdd, 0xdd, 0xdd, 0xdd, 0xdd
106         }, 50, (unsigned char *)"56be34521d144c88dbb8c733f0e8b3f6",
107     },
108     {
109         "", 0, "My test data", 12,
110         (unsigned char *)"61afdecb95429ef494d61fdee15990cabf0826fc"
111     },
112     {
113         "", 0, "My test data", 12,
114         (unsigned char *)"2274b195d90ce8e03406f4b526a47e0787a88a65479938f1a5baa3ce0f079776"
115     },
116     {
117         "123456", 6, "My test data", 12,
118         (unsigned char *)"bab53058ae861a7f191abe2d0145cbb123776a6369ee3f9d79ce455667e411dd"
119     },
120     {
121         "12345", 5, "My test data again", 12,
122         (unsigned char *)"7dbe8c764c068e3bcd6e6b0fbcd5e6fc197b15bb"
123     }
124 };
125 # endif
126
127 static char *pt(unsigned char *md, unsigned int len);
128
129 int main(int argc, char *argv[])
130 {
131 # ifndef OPENSSL_NO_MD5
132     int i;
133     char *p;
134 # endif
135     int err = 0;
136     HMAC_CTX *ctx = NULL, *ctx2 = NULL;
137     unsigned char buf[EVP_MAX_MD_SIZE];
138     unsigned int len;
139
140 # ifdef OPENSSL_NO_MD5
141     printf("test skipped: MD5 disabled\n");
142 # else
143
144 #  ifdef CHARSET_EBCDIC
145     ebcdic2ascii(test[0].data, test[0].data, test[0].data_len);
146     ebcdic2ascii(test[1].data, test[1].data, test[1].data_len);
147     ebcdic2ascii(test[2].key, test[2].key, test[2].key_len);
148     ebcdic2ascii(test[2].data, test[2].data, test[2].data_len);
149 #  endif
150
151     for (i = 0; i < 4; i++) {
152         p = pt(HMAC(EVP_md5(),
153                     test[i].key, test[i].key_len,
154                     test[i].data, test[i].data_len, NULL, NULL),
155                     MD5_DIGEST_LENGTH);
156
157         if (strcmp(p, (char *)test[i].digest) != 0) {
158             printf("Error calculating HMAC on %d entry'\n", i);
159             printf("got %s instead of %s\n", p, test[i].digest);
160             err++;
161         } else
162             printf("test %d ok\n", i);
163     }
164 # endif                         /* OPENSSL_NO_MD5 */
165
166 /* test4 */
167     ctx = HMAC_CTX_new();
168     if (ctx == NULL) {
169         printf("HMAC malloc failure (test 4)\n");
170         err++;
171         goto end;
172     }
173     if (HMAC_Init_ex(ctx, NULL, 0, NULL, NULL)) {
174         printf("Should fail to initialise HMAC with empty MD and key (test 4)\n");
175         err++;
176         goto test5;
177     }
178     if (HMAC_Update(ctx, test[4].data, test[4].data_len)) {
179         printf("Should fail HMAC_Update with ctx not set up (test 4)\n");
180         err++;
181         goto test5;
182     }
183     if (HMAC_Init_ex(ctx, NULL, 0, EVP_sha1(), NULL)) {
184         printf("Should fail to initialise HMAC with empty key (test 4)\n");
185         err++;
186         goto test5;
187     }
188     if (HMAC_Update(ctx, test[4].data, test[4].data_len)) {
189         printf("Should fail HMAC_Update with ctx not set up (test 4)\n");
190         err++;
191         goto test5;
192     }
193     printf("test 4 ok\n");
194 test5:
195     HMAC_CTX_reset(ctx);
196     if (HMAC_Init_ex(ctx, test[4].key, test[4].key_len, NULL, NULL)) {
197         printf("Should fail to initialise HMAC with empty MD (test 5)\n");
198         err++;
199         goto test6;
200     }
201     if (HMAC_Update(ctx, test[4].data, test[4].data_len)) {
202         printf("Should fail HMAC_Update with ctx not set up (test 5)\n");
203         err++;
204         goto test6;
205     }
206     if (HMAC_Init_ex(ctx, test[4].key, -1, EVP_sha1(), NULL)) {
207         printf("Should fail to initialise HMAC with invalid key len(test 5)\n");
208         err++;
209         goto test6;
210     }
211     if (!HMAC_Init_ex(ctx, test[4].key, test[4].key_len, EVP_sha1(), NULL)) {
212         printf("Failed to initialise HMAC (test 5)\n");
213         err++;
214         goto test6;
215     }
216     if (!HMAC_Update(ctx, test[4].data, test[4].data_len)) {
217         printf("Error updating HMAC with data (test 5)\n");
218         err++;
219         goto test6;
220     }
221     if (!HMAC_Final(ctx, buf, &len)) {
222         printf("Error finalising data (test 5)\n");
223         err++;
224         goto test6;
225     }
226     p = pt(buf, len);
227     if (strcmp(p, (char *)test[4].digest) != 0) {
228         printf("Error calculating interim HMAC on test 5\n");
229         printf("got %s instead of %s\n", p, test[4].digest);
230         err++;
231         goto test6;
232     }
233     if (HMAC_Init_ex(ctx, NULL, 0, EVP_sha256(), NULL)) {
234         printf("Should disallow changing MD without a new key (test 5)\n");
235         err++;
236         goto test6;
237     }
238     if (!HMAC_Init_ex(ctx, test[4].key, test[4].key_len, EVP_sha256(), NULL)) {
239         printf("Failed to reinitialise HMAC (test 5)\n");
240         err++;
241         goto test6;
242     }
243     if (!HMAC_Update(ctx, test[5].data, test[5].data_len)) {
244         printf("Error updating HMAC with data (sha256) (test 5)\n");
245         err++;
246         goto test6;
247     }
248     if (!HMAC_Final(ctx, buf, &len)) {
249         printf("Error finalising data (sha256) (test 5)\n");
250         err++;
251         goto test6;
252     }
253     p = pt(buf, len);
254     if (strcmp(p, (char *)test[5].digest) != 0) {
255         printf("Error calculating 2nd interim HMAC on test 5\n");
256         printf("got %s instead of %s\n", p, test[5].digest);
257         err++;
258         goto test6;
259     }
260     if (!HMAC_Init_ex(ctx, test[6].key, test[6].key_len, NULL, NULL)) {
261         printf("Failed to reinitialise HMAC with key (test 5)\n");
262         err++;
263         goto test6;
264     }
265     if (!HMAC_Update(ctx, test[6].data, test[6].data_len)) {
266         printf("Error updating HMAC with data (new key) (test 5)\n");
267         err++;
268         goto test6;
269     }
270     if (!HMAC_Final(ctx, buf, &len)) {
271         printf("Error finalising data (new key) (test 5)\n");
272         err++;
273         goto test6;
274     }
275     p = pt(buf, len);
276     if (strcmp(p, (char *)test[6].digest) != 0) {
277         printf("error calculating HMAC on test 5\n");
278         printf("got %s instead of %s\n", p, test[6].digest);
279         err++;
280     } else {
281         printf("test 5 ok\n");
282     }
283 test6:
284     HMAC_CTX_reset(ctx);
285     ctx2 = HMAC_CTX_new();
286     if (ctx2 == NULL) {
287         printf("HMAC malloc failure (test 6)\n");
288         err++;
289         goto end;
290     }
291     if (!HMAC_Init_ex(ctx, test[7].key, test[7].key_len, EVP_sha1(), NULL)) {
292         printf("Failed to initialise HMAC (test 6)\n");
293         err++;
294         goto end;
295     }
296     if (!HMAC_Update(ctx, test[7].data, test[7].data_len)) {
297         printf("Error updating HMAC with data (test 6)\n");
298         err++;
299         goto end;
300     }
301     if (!HMAC_CTX_copy(ctx2, ctx)) {
302         printf("Failed to copy HMAC_CTX (test 6)\n");
303         err++;
304         goto end;
305     }
306     if (!HMAC_Final(ctx2, buf, &len)) {
307         printf("Error finalising data (test 6)\n");
308         err++;
309         goto end;
310     }
311     p = pt(buf, len);
312     if (strcmp(p, (char *)test[7].digest) != 0) {
313         printf("Error calculating HMAC on test 6\n");
314         printf("got %s instead of %s\n", p, test[7].digest);
315         err++;
316     } else {
317         printf("test 6 ok\n");
318     }
319 end:
320     HMAC_CTX_free(ctx2);
321     HMAC_CTX_free(ctx);
322     EXIT(err);
323 }
324
325 # ifndef OPENSSL_NO_MD5
326 static char *pt(unsigned char *md, unsigned int len)
327 {
328     unsigned int i;
329     static char buf[80];
330
331     for (i = 0; i < len; i++)
332         sprintf(&(buf[i * 2]), "%02x", md[i]);
333     return (buf);
334 }
335 # endif