2 /* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL
5 /* ====================================================================
6 * Copyright (c) 2005 The OpenSSL Project. All rights reserved.
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in
17 * the documentation and/or other materials provided with the
20 * 3. All advertising materials mentioning features or use of this
21 * software must display the following acknowledgment:
22 * "This product includes software developed by the OpenSSL Project
23 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
25 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26 * endorse or promote products derived from this software without
27 * prior written permission. For written permission, please contact
28 * licensing@OpenSSL.org.
30 * 5. Products derived from this software may not be called "OpenSSL"
31 * nor may "OpenSSL" appear in their names without prior written
32 * permission of the OpenSSL Project.
34 * 6. Redistributions of any form whatsoever must retain the following
36 * "This product includes software developed by the OpenSSL Project
37 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
39 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR
43 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50 * OF THE POSSIBILITY OF SUCH DAMAGE.
51 * ====================================================================
53 * This product includes cryptographic software written by Eric Young
54 * (eay@cryptsoft.com). This product includes software written by Tim
55 * Hudson (tjh@cryptsoft.com).
62 #include <openssl/bio.h>
63 #include <openssl/evp.h>
64 #include <openssl/hmac.h>
65 #include <openssl/err.h>
66 #include <openssl/x509v3.h>
68 static int hmac_test(BIO *err, BIO *out, BIO *in);
69 static int print_hmac(BIO *err, BIO *out,
70 unsigned char *Key, int Klen,
71 unsigned char *Msg, int Msglen, int Tlen);
73 int main(int argc, char **argv)
75 BIO *in = NULL, *out = NULL, *err = NULL;
78 ERR_load_crypto_strings();
80 err = BIO_new_fp(stderr, BIO_NOCLOSE);
84 fprintf(stderr, "FATAL stderr initialization error\n");
89 if(!FIPS_mode_set(1,argv[0]))
91 ERR_print_errors(err);
97 in = BIO_new_fp(stdin, BIO_NOCLOSE);
99 in = BIO_new_file(argv[1], "r");
102 out = BIO_new_fp(stdout, BIO_NOCLOSE);
104 out = BIO_new_file(argv[2], "w");
108 BIO_printf(err, "FATAL input initialization error\n");
114 fprintf(stderr, "FATAL output initialization error\n");
118 if (!hmac_test(err, out, in))
120 fprintf(stderr, "FATAL hmac file processing error\n");
129 ERR_print_errors(err);
142 #define HMAC_TEST_MAXLINELEN 1024
144 int hmac_test(BIO *err, BIO *out, BIO *in)
146 char *linebuf, *olinebuf, *p, *q;
147 char *keyword, *value;
148 unsigned char *Key = NULL, *Msg = NULL;
149 int Count, Klen, Tlen, have_key, have_mesg;
154 olinebuf = OPENSSL_malloc(HMAC_TEST_MAXLINELEN);
155 linebuf = OPENSSL_malloc(HMAC_TEST_MAXLINELEN);
157 if (!linebuf || !olinebuf)
166 while (BIO_gets(in, olinebuf, HMAC_TEST_MAXLINELEN) > 0)
169 strcpy(linebuf, olinebuf);
171 /* Skip leading space */
172 while (isspace((unsigned char)*keyword))
175 /* Look for = sign */
176 p = strchr(linebuf, '=');
178 /* If no = or starts with [ (for [L=20] line) just copy */
179 if (!p || *keyword=='[')
181 if (!BIO_puts(out, olinebuf))
188 /* Remove trailing space */
189 while (isspace((unsigned char)*q))
195 /* Remove leading space from value */
196 while (isspace((unsigned char)*value))
199 /* Remove trailing space from value */
200 p = value + strlen(value) - 1;
202 while (*p == '\n' || isspace((unsigned char)*p))
205 if (!strcmp(keyword, "Count"))
213 else if (!strcmp(keyword, "Klen"))
221 else if (!strcmp(keyword, "Tlen"))
229 else if (!strcmp(keyword, "Msg"))
233 Msg = string_to_hex(value, &Msglen);
235 else if (!strcmp(keyword, "Key"))
239 Key = string_to_hex(value, &Keylen);
241 else if (!strcmp(keyword, "Mac"))
246 BIO_puts(out, olinebuf);
248 if (Key && Msg && (Tlen > 0) && (Klen > 0))
250 if (!print_hmac(err, out, Key, Klen, Msg, Msglen, Tlen))
270 OPENSSL_free(olinebuf);
272 OPENSSL_free(linebuf);
282 BIO_printf(err, "FATAL parse error processing line %d\n", lnum);
288 static int print_hmac(BIO *err, BIO *out,
289 unsigned char *Key, int Klen,
290 unsigned char *Msg, int Msglen, int Tlen)
293 unsigned char md[EVP_MAX_MD_SIZE];
294 if (!HMAC(EVP_sha1(), Key, Klen, Msg, Msglen, md,
295 (unsigned int *)&mdlen))
297 BIO_puts(err, "Error calculating HMAC\n");
302 BIO_puts(err, "Parameter error, Tlen > HMAC length\n");
305 BIO_puts(out, "Mac = ");
306 for (i = 0; i < Tlen; i++)
307 BIO_printf(out, "%02x", md[i]);