]> pd.if.org Git - zpackage/blob - libtomcrypt/src/mac/pelican/pelican_test.c
remove rmd hashes
[zpackage] / libtomcrypt / src / mac / pelican / pelican_test.c
1 /* LibTomCrypt, modular cryptographic library -- Tom St Denis
2  *
3  * LibTomCrypt is a library that provides various cryptographic
4  * algorithms in a highly modular and flexible manner.
5  *
6  * The library is free for all purposes without any express
7  * guarantee it works.
8  */
9 #include "tomcrypt.h"
10
11 /**
12    @file pelican_test.c
13    Pelican MAC, test, by Tom St Denis
14 */
15
16 #ifdef LTC_PELICAN
17
18 int pelican_test(void)
19 {
20 #ifndef LTC_TEST
21    return CRYPT_NOP;
22 #else
23    static const struct {
24         unsigned char K[32], MSG[64], T[16];
25    int keylen, ptlen;
26    } tests[] = {
27 /* K=16, M=0 */
28 {
29    { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
30      0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F },
31    { 0 },
32    { 0xeb, 0x58, 0x37, 0x15, 0xf8, 0x34, 0xde, 0xe5,
33      0xa4, 0xd1, 0x6e, 0xe4, 0xb9, 0xd7, 0x76, 0x0e, },
34    16, 0
35 },
36
37 /* K=16, M=3 */
38 {
39    { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
40      0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F },
41    { 0x00, 0x01, 0x02 },
42    { 0x1c, 0x97, 0x40, 0x60, 0x6c, 0x58, 0x17, 0x2d,
43      0x03, 0x94, 0x19, 0x70, 0x81, 0xc4, 0x38, 0x54, },
44    16, 3
45 },
46
47 /* K=16, M=16 */
48 {
49    { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
50      0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F },
51    { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
52      0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F },
53    { 0x03, 0xcc, 0x46, 0xb8, 0xac, 0xa7, 0x9c, 0x36,
54      0x1e, 0x8c, 0x6e, 0xa6, 0x7b, 0x89, 0x32, 0x49, },
55    16, 16
56 },
57
58 /* K=16, M=32 */
59 {
60    { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
61      0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F },
62    { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
63      0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
64      0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
65      0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F },
66    { 0x89, 0xcc, 0x36, 0x58, 0x1b, 0xdd, 0x4d, 0xb5,
67      0x78, 0xbb, 0xac, 0xf0, 0xff, 0x8b, 0x08, 0x15, },
68    16, 32
69 },
70
71 /* K=16, M=35 */
72 {
73    { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
74      0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F },
75    { 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
76      0x08, 0x09, 0x0A, 0x0B, 0x0C, 0x0D, 0x0E, 0x0F,
77      0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17,
78      0x18, 0x19, 0x1A, 0x1B, 0x1C, 0x1D, 0x1E, 0x1F,
79      0x20, 0x21, 0x23 },
80    { 0x4a, 0x7d, 0x45, 0x4d, 0xcd, 0xb5, 0xda, 0x8d,
81      0x48, 0x78, 0x16, 0x48, 0x5d, 0x45, 0x95, 0x99, },
82    16, 35
83 },
84 };
85    int x, err;
86    unsigned char out[16];
87    pelican_state pel;
88
89    for (x = 0; x < (int)(sizeof(tests)/sizeof(tests[0])); x++) {
90        if ((err = pelican_init(&pel, tests[x].K, tests[x].keylen)) != CRYPT_OK) {
91           return err;
92        }
93        if ((err = pelican_process(&pel, tests[x].MSG, tests[x].ptlen)) != CRYPT_OK) {
94           return err;
95        }
96        if ((err = pelican_done(&pel, out)) != CRYPT_OK) {
97           return err;
98        }
99
100        if (compare_testvector(out, 16, tests[x].T, 16, "PELICAN", x)) {
101            return CRYPT_FAIL_TESTVECTOR;
102        }
103    }
104    return CRYPT_OK;
105 #endif
106 }
107
108
109 #endif
110
111 /* ref:         $Format:%D$ */
112 /* git commit:  $Format:%H$ */
113 /* commit time: $Format:%ai$ */