Mercurial > hg > octave-shane > gnulib-hg

annotate tests/test-gc-hmac-sha256.c @ 17632:86af85d364e1 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
unistd: port readlink to Mac OS X 10.3.9 * lib/unistd.in.h (_GL_INCLUDING_UNISTD_H): New macro, to work around self-include problem in Mac OS X 10.3.9 when combined with readlink module. Problem reported by Klaus Zietler in <http://bugs.gnu.org/16825>.
author Paul Eggert <eggert@penguin.cs.ucla.edu>
date Tue, 25 Feb 2014 11:16:27 -0800 (2014-02-25)
parents 344018b6e5d7
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
17482
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
1 /*
17587
344018b6e5d7 maint: update copyright
Eric Blake <eblake@redhat.com>
parents: 17482
diff changeset
2 * Copyright (C) 2005, 2010-2014 Free Software Foundation, Inc.
17482
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
3 * Written by Simon Josefsson
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
4 *
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
5 * This program is free software; you can redistribute it and/or modify
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
6 * it under the terms of the GNU General Public License as published by
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
7 * the Free Software Foundation; either version 3, or (at your option)
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
8 * any later version.
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
9 *
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
10 * This program is distributed in the hope that it will be useful,
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
13 * GNU General Public License for more details.
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
14 *
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
15 * You should have received a copy of the GNU General Public License
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
16 * along with this program; if not, see <http://www.gnu.org/licenses/>. */
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
17
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
18 #include <config.h>
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
19
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
20 #include <stdio.h>
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
21 #include <string.h>
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
22 #include "gc.h"
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
23
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
24 int
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
25 main (int argc, char *argv[])
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
26 {
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
27 Gc_rc rc;
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
28
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
29 rc = gc_init ();
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
30 if (rc != GC_OK)
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
31 {
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
32 printf ("gc_init() failed\n");
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
33 return 1;
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
34 }
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
35
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
36 {
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
37 char *key =
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
38 "\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b\x0b";
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
39 size_t key_len = 20;
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
40 char *data = "Hi There";
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
41 size_t data_len = 8;
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
42 char *digest =
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
43 "\xb0\x34\x4c\x61\xd8\xdb\x38\x53\x5c\xa8\xaf\xce\xaf\x0b\xf1\x2b\x88\x1d\xc2\x00\xc9\x83\x3d\xa7\x26\xe9\x37\x6c\x2e\x32\xcf\xf7";
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
44 char out[GC_SHA256_DIGEST_SIZE];
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
45
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
46 if (gc_hmac_sha256 (key, key_len, data, data_len, out) != 0)
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
47 {
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
48 printf ("call failure\n");
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
49 return 1;
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
50 }
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
51
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
52 if (memcmp (digest, out, GC_SHA256_DIGEST_SIZE) != 0)
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
53 {
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
54 size_t i;
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
55 printf ("hash 1 mismatch. expected:\n");
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
56 for (i = 0; i < GC_SHA256_DIGEST_SIZE; i++)
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
57 printf ("%02x ", digest[i] & 0xFF);
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
58 printf ("\ncomputed:\n");
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
59 for (i = 0; i < GC_SHA256_DIGEST_SIZE; i++)
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
60 printf ("%02x ", out[i] & 0xFF);
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
61 printf ("\n");
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
62 return 1;
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
63 }
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
64 }
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
65
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
66 gc_done ();
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
67
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
68 return 0;
b1c70949ba69 gc: support HMAC-SHA256 and HMAC-SHA512.
Simon Josefsson <simon@josefsson.org>
parents:
diff changeset
69 }