3 * $Id: tiger.c,v 1.2 2004/04/08 01:36:15 mdw Exp $
5 * The Tiger hash function
7 * (c) 2000 Straylight/Edgeware
10 /*----- Licensing notice --------------------------------------------------*
12 * This file is part of Catacomb.
14 * Catacomb is free software; you can redistribute it and/or modify
15 * it under the terms of the GNU Library General Public License as
16 * published by the Free Software Foundation; either version 2 of the
17 * License, or (at your option) any later version.
19 * Catacomb is distributed in the hope that it will be useful,
20 * but WITHOUT ANY WARRANTY; without even the implied warranty of
21 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 * GNU Library General Public License for more details.
24 * You should have received a copy of the GNU Library General Public
25 * License along with Catacomb; if not, write to the Free
26 * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
30 /*----- Header files ------------------------------------------------------*/
32 #include <mLib/bits.h>
34 #include "ghash-def.h"
37 #include "tiger-tab.h"
38 #include "tiger-base.h"
40 /*----- S-boxes -----------------------------------------------------------*/
42 static const kludge64 s
[4][256] = TIGER_S
;
44 /*----- Main code ---------------------------------------------------------*/
46 /* --- @tiger_compress@ --- *
48 * Arguments: @tiger_ctx *ctx@ = pointer to context block
49 * @const void *sbuf@ = pointer to buffer of appropriate size
53 * Use: Tiger compression function.
56 void tiger_compress(tiger_ctx
*ctx
, const void *sbuf
)
61 for (i
= 0, p
= sbuf
; i
< 8; i
++, p
+= 8)
63 TIGER_CORE(ctx
->a
, ctx
->b
, ctx
->c
, x
);
66 /* --- @tiger_init@ --- *
68 * Arguments: @tiger_ctx *ctx@ = pointer to context block to initialize
72 * Use: Initializes a context block ready for hashing.
75 void tiger_init(tiger_ctx
*ctx
)
77 SET64(ctx
->a
, 0x01234567, 0x89abcdef);
78 SET64(ctx
->b
, 0xfedcba98, 0x76543210);
79 SET64(ctx
->c
, 0xf096a5b4, 0xc3b2e187);
81 ctx
->nl
= ctx
->nh
= 0;
84 /* --- @tiger_set@ --- *
86 * Arguments: @tiger_ctx *ctx@ = pointer to context block
87 * @const void *buf@ = pointer to state buffer
88 * @unsigned long count@ = current count of bytes processed
92 * Use: Initializes a context block from a given state. This is
93 * useful in cases where the initial hash state is meant to be
94 * secret, e.g., for NMAC and HMAC support.
97 void tiger_set(tiger_ctx
*ctx
, const void *buf
, unsigned long count
)
100 LOAD64_L_(ctx
->a
, p
+ 0);
101 LOAD64_L_(ctx
->b
, p
+ 8);
102 LOAD64_L_(ctx
->c
, p
+ 16);
104 ctx
->nl
= U32(count
);
105 ctx
->nh
= U32(((count
& ~MASK32
) >> 16) >> 16);
108 /* --- @tiger_hash@ --- *
110 * Arguments: @tiger_ctx *ctx@ = pointer to context block
111 * @const void *buf@ = buffer of data to hash
112 * @size_t sz@ = size of buffer to hash
116 * Use: Hashes a buffer of data. The buffer may be of any size and
120 void tiger_hash(tiger_ctx
*ctx
, const void *buf
, size_t sz
)
122 HASH_BUFFER(TIGER
, tiger
, ctx
, buf
, sz
);
125 /* --- @tiger_done@ --- *
127 * Arguments: @tiger_ctx *ctx@ = pointer to context block
128 * @void *hash@ = pointer to output buffer
132 * Use: Returns the hash of the data read so far.
135 void tiger_done(tiger_ctx
*ctx
, void *hash
)
138 HASH_PAD(TIGER
, tiger
, ctx
, 0x01u
, 0, 8);
139 STORE32_L(ctx
->buf
+ TIGER_BUFSZ
- 8, ctx
->nl
<< 3);
140 STORE32_L(ctx
->buf
+ TIGER_BUFSZ
- 4, (ctx
->nl
>> 29) | (ctx
->nh
<< 3));
141 tiger_compress(ctx
, ctx
->buf
);
142 STORE64_L_(p
+ 0, ctx
->a
);
143 STORE64_L_(p
+ 8, ctx
->b
);
144 STORE64_L_(p
+ 16, ctx
->c
);
147 /* --- @tiger_state@ --- *
149 * Arguments: @tiger_ctx *ctx@ = pointer to context
150 * @void *state@ = pointer to buffer for current state
152 * Returns: Number of bytes written to the hash function so far.
154 * Use: Returns the current state of the hash function such that
155 * it can be passed to @tiger_set@.
158 unsigned long tiger_state(tiger_ctx
*ctx
, void *state
)
161 STORE64_L_(p
+ 0, ctx
->a
);
162 STORE64_L_(p
+ 8, ctx
->b
);
163 STORE64_L_(p
+ 16, ctx
->c
);
164 return (ctx
->nl
| ((ctx
->nh
<< 16) << 16));
167 /* --- Generic interface --- */
169 GHASH_DEF(TIGER
, tiger
)
171 /* --- Test code --- */
173 HASH_TEST(TIGER
, tiger
)
175 /*----- That's all, folks -------------------------------------------------*/