]>
Commit | Line | Data |
---|---|---|
53964b9e JG |
1 | /* |
2 | * Cryptographic API. | |
3 | * | |
4 | * SHA-3, as specified in | |
5 | * http://nvlpubs.nist.gov/nistpubs/FIPS/NIST.FIPS.202.pdf | |
6 | * | |
7 | * SHA-3 code by Jeff Garzik <[email protected]> | |
83dee2ce | 8 | * Ard Biesheuvel <[email protected]> |
53964b9e JG |
9 | * |
10 | * This program is free software; you can redistribute it and/or modify it | |
11 | * under the terms of the GNU General Public License as published by the Free | |
12 | * Software Foundation; either version 2 of the License, or (at your option)• | |
13 | * any later version. | |
14 | * | |
15 | */ | |
16 | #include <crypto/internal/hash.h> | |
17 | #include <linux/init.h> | |
18 | #include <linux/module.h> | |
19 | #include <linux/types.h> | |
20 | #include <crypto/sha3.h> | |
c013cee9 | 21 | #include <asm/unaligned.h> |
53964b9e | 22 | |
4767b9ad | 23 | /* |
739d875d | 24 | * On some 32-bit architectures (h8300), GCC ends up using |
4767b9ad AB |
25 | * over 1 KB of stack if we inline the round calculation into the loop |
26 | * in keccakf(). On the other hand, on 64-bit architectures with plenty | |
27 | * of [64-bit wide] general purpose registers, not inlining it severely | |
28 | * hurts performance. So let's use 64-bitness as a heuristic to decide | |
29 | * whether to inline or not. | |
30 | */ | |
31 | #ifdef CONFIG_64BIT | |
32 | #define SHA3_INLINE inline | |
33 | #else | |
34 | #define SHA3_INLINE noinline | |
35 | #endif | |
36 | ||
53964b9e JG |
37 | #define KECCAK_ROUNDS 24 |
38 | ||
53964b9e | 39 | static const u64 keccakf_rndc[24] = { |
f743e70e GU |
40 | 0x0000000000000001ULL, 0x0000000000008082ULL, 0x800000000000808aULL, |
41 | 0x8000000080008000ULL, 0x000000000000808bULL, 0x0000000080000001ULL, | |
42 | 0x8000000080008081ULL, 0x8000000000008009ULL, 0x000000000000008aULL, | |
43 | 0x0000000000000088ULL, 0x0000000080008009ULL, 0x000000008000000aULL, | |
44 | 0x000000008000808bULL, 0x800000000000008bULL, 0x8000000000008089ULL, | |
45 | 0x8000000000008003ULL, 0x8000000000008002ULL, 0x8000000000000080ULL, | |
46 | 0x000000000000800aULL, 0x800000008000000aULL, 0x8000000080008081ULL, | |
47 | 0x8000000000008080ULL, 0x0000000080000001ULL, 0x8000000080008008ULL | |
53964b9e JG |
48 | }; |
49 | ||
53964b9e JG |
50 | /* update the state with given number of rounds */ |
51 | ||
4767b9ad | 52 | static SHA3_INLINE void keccakf_round(u64 st[25]) |
53964b9e | 53 | { |
83dee2ce | 54 | u64 t[5], tt, bc[5]; |
53964b9e | 55 | |
4767b9ad AB |
56 | /* Theta */ |
57 | bc[0] = st[0] ^ st[5] ^ st[10] ^ st[15] ^ st[20]; | |
58 | bc[1] = st[1] ^ st[6] ^ st[11] ^ st[16] ^ st[21]; | |
59 | bc[2] = st[2] ^ st[7] ^ st[12] ^ st[17] ^ st[22]; | |
60 | bc[3] = st[3] ^ st[8] ^ st[13] ^ st[18] ^ st[23]; | |
61 | bc[4] = st[4] ^ st[9] ^ st[14] ^ st[19] ^ st[24]; | |
62 | ||
63 | t[0] = bc[4] ^ rol64(bc[1], 1); | |
64 | t[1] = bc[0] ^ rol64(bc[2], 1); | |
65 | t[2] = bc[1] ^ rol64(bc[3], 1); | |
66 | t[3] = bc[2] ^ rol64(bc[4], 1); | |
67 | t[4] = bc[3] ^ rol64(bc[0], 1); | |
68 | ||
69 | st[0] ^= t[0]; | |
70 | ||
71 | /* Rho Pi */ | |
72 | tt = st[1]; | |
73 | st[ 1] = rol64(st[ 6] ^ t[1], 44); | |
74 | st[ 6] = rol64(st[ 9] ^ t[4], 20); | |
75 | st[ 9] = rol64(st[22] ^ t[2], 61); | |
76 | st[22] = rol64(st[14] ^ t[4], 39); | |
77 | st[14] = rol64(st[20] ^ t[0], 18); | |
78 | st[20] = rol64(st[ 2] ^ t[2], 62); | |
79 | st[ 2] = rol64(st[12] ^ t[2], 43); | |
80 | st[12] = rol64(st[13] ^ t[3], 25); | |
81 | st[13] = rol64(st[19] ^ t[4], 8); | |
82 | st[19] = rol64(st[23] ^ t[3], 56); | |
83 | st[23] = rol64(st[15] ^ t[0], 41); | |
84 | st[15] = rol64(st[ 4] ^ t[4], 27); | |
85 | st[ 4] = rol64(st[24] ^ t[4], 14); | |
86 | st[24] = rol64(st[21] ^ t[1], 2); | |
87 | st[21] = rol64(st[ 8] ^ t[3], 55); | |
88 | st[ 8] = rol64(st[16] ^ t[1], 45); | |
89 | st[16] = rol64(st[ 5] ^ t[0], 36); | |
90 | st[ 5] = rol64(st[ 3] ^ t[3], 28); | |
91 | st[ 3] = rol64(st[18] ^ t[3], 21); | |
92 | st[18] = rol64(st[17] ^ t[2], 15); | |
93 | st[17] = rol64(st[11] ^ t[1], 10); | |
94 | st[11] = rol64(st[ 7] ^ t[2], 6); | |
95 | st[ 7] = rol64(st[10] ^ t[0], 3); | |
96 | st[10] = rol64( tt ^ t[1], 1); | |
97 | ||
98 | /* Chi */ | |
99 | bc[ 0] = ~st[ 1] & st[ 2]; | |
100 | bc[ 1] = ~st[ 2] & st[ 3]; | |
101 | bc[ 2] = ~st[ 3] & st[ 4]; | |
102 | bc[ 3] = ~st[ 4] & st[ 0]; | |
103 | bc[ 4] = ~st[ 0] & st[ 1]; | |
104 | st[ 0] ^= bc[ 0]; | |
105 | st[ 1] ^= bc[ 1]; | |
106 | st[ 2] ^= bc[ 2]; | |
107 | st[ 3] ^= bc[ 3]; | |
108 | st[ 4] ^= bc[ 4]; | |
109 | ||
110 | bc[ 0] = ~st[ 6] & st[ 7]; | |
111 | bc[ 1] = ~st[ 7] & st[ 8]; | |
112 | bc[ 2] = ~st[ 8] & st[ 9]; | |
113 | bc[ 3] = ~st[ 9] & st[ 5]; | |
114 | bc[ 4] = ~st[ 5] & st[ 6]; | |
115 | st[ 5] ^= bc[ 0]; | |
116 | st[ 6] ^= bc[ 1]; | |
117 | st[ 7] ^= bc[ 2]; | |
118 | st[ 8] ^= bc[ 3]; | |
119 | st[ 9] ^= bc[ 4]; | |
120 | ||
121 | bc[ 0] = ~st[11] & st[12]; | |
122 | bc[ 1] = ~st[12] & st[13]; | |
123 | bc[ 2] = ~st[13] & st[14]; | |
124 | bc[ 3] = ~st[14] & st[10]; | |
125 | bc[ 4] = ~st[10] & st[11]; | |
126 | st[10] ^= bc[ 0]; | |
127 | st[11] ^= bc[ 1]; | |
128 | st[12] ^= bc[ 2]; | |
129 | st[13] ^= bc[ 3]; | |
130 | st[14] ^= bc[ 4]; | |
131 | ||
132 | bc[ 0] = ~st[16] & st[17]; | |
133 | bc[ 1] = ~st[17] & st[18]; | |
134 | bc[ 2] = ~st[18] & st[19]; | |
135 | bc[ 3] = ~st[19] & st[15]; | |
136 | bc[ 4] = ~st[15] & st[16]; | |
137 | st[15] ^= bc[ 0]; | |
138 | st[16] ^= bc[ 1]; | |
139 | st[17] ^= bc[ 2]; | |
140 | st[18] ^= bc[ 3]; | |
141 | st[19] ^= bc[ 4]; | |
142 | ||
143 | bc[ 0] = ~st[21] & st[22]; | |
144 | bc[ 1] = ~st[22] & st[23]; | |
145 | bc[ 2] = ~st[23] & st[24]; | |
146 | bc[ 3] = ~st[24] & st[20]; | |
147 | bc[ 4] = ~st[20] & st[21]; | |
148 | st[20] ^= bc[ 0]; | |
149 | st[21] ^= bc[ 1]; | |
150 | st[22] ^= bc[ 2]; | |
151 | st[23] ^= bc[ 3]; | |
152 | st[24] ^= bc[ 4]; | |
153 | } | |
53964b9e | 154 | |
f044a84e | 155 | static void keccakf(u64 st[25]) |
4767b9ad AB |
156 | { |
157 | int round; | |
53964b9e | 158 | |
4767b9ad AB |
159 | for (round = 0; round < KECCAK_ROUNDS; round++) { |
160 | keccakf_round(st); | |
53964b9e JG |
161 | /* Iota */ |
162 | st[0] ^= keccakf_rndc[round]; | |
163 | } | |
164 | } | |
165 | ||
6657674b | 166 | int crypto_sha3_init(struct shash_desc *desc) |
53964b9e JG |
167 | { |
168 | struct sha3_state *sctx = shash_desc_ctx(desc); | |
beeb504a | 169 | unsigned int digest_size = crypto_shash_digestsize(desc->tfm); |
53964b9e | 170 | |
beeb504a AB |
171 | sctx->rsiz = 200 - 2 * digest_size; |
172 | sctx->rsizw = sctx->rsiz / 8; | |
173 | sctx->partial = 0; | |
53964b9e | 174 | |
beeb504a | 175 | memset(sctx->st, 0, sizeof(sctx->st)); |
53964b9e JG |
176 | return 0; |
177 | } | |
6657674b | 178 | EXPORT_SYMBOL(crypto_sha3_init); |
53964b9e | 179 | |
6657674b | 180 | int crypto_sha3_update(struct shash_desc *desc, const u8 *data, |
53964b9e JG |
181 | unsigned int len) |
182 | { | |
183 | struct sha3_state *sctx = shash_desc_ctx(desc); | |
184 | unsigned int done; | |
185 | const u8 *src; | |
186 | ||
187 | done = 0; | |
188 | src = data; | |
189 | ||
190 | if ((sctx->partial + len) > (sctx->rsiz - 1)) { | |
191 | if (sctx->partial) { | |
192 | done = -sctx->partial; | |
193 | memcpy(sctx->buf + sctx->partial, data, | |
194 | done + sctx->rsiz); | |
195 | src = sctx->buf; | |
196 | } | |
197 | ||
198 | do { | |
199 | unsigned int i; | |
200 | ||
201 | for (i = 0; i < sctx->rsizw; i++) | |
c013cee9 | 202 | sctx->st[i] ^= get_unaligned_le64(src + 8 * i); |
53964b9e JG |
203 | keccakf(sctx->st); |
204 | ||
205 | done += sctx->rsiz; | |
206 | src = data + done; | |
207 | } while (done + (sctx->rsiz - 1) < len); | |
208 | ||
209 | sctx->partial = 0; | |
210 | } | |
211 | memcpy(sctx->buf + sctx->partial, src, len - done); | |
212 | sctx->partial += (len - done); | |
213 | ||
214 | return 0; | |
215 | } | |
6657674b | 216 | EXPORT_SYMBOL(crypto_sha3_update); |
53964b9e | 217 | |
6657674b | 218 | int crypto_sha3_final(struct shash_desc *desc, u8 *out) |
53964b9e JG |
219 | { |
220 | struct sha3_state *sctx = shash_desc_ctx(desc); | |
221 | unsigned int i, inlen = sctx->partial; | |
beeb504a AB |
222 | unsigned int digest_size = crypto_shash_digestsize(desc->tfm); |
223 | __le64 *digest = (__le64 *)out; | |
53964b9e JG |
224 | |
225 | sctx->buf[inlen++] = 0x06; | |
226 | memset(sctx->buf + inlen, 0, sctx->rsiz - inlen); | |
227 | sctx->buf[sctx->rsiz - 1] |= 0x80; | |
228 | ||
229 | for (i = 0; i < sctx->rsizw; i++) | |
c013cee9 | 230 | sctx->st[i] ^= get_unaligned_le64(sctx->buf + 8 * i); |
53964b9e JG |
231 | |
232 | keccakf(sctx->st); | |
233 | ||
beeb504a AB |
234 | for (i = 0; i < digest_size / 8; i++) |
235 | put_unaligned_le64(sctx->st[i], digest++); | |
53964b9e | 236 | |
beeb504a AB |
237 | if (digest_size & 4) |
238 | put_unaligned_le32(sctx->st[i], (__le32 *)digest); | |
53964b9e JG |
239 | |
240 | memset(sctx, 0, sizeof(*sctx)); | |
241 | return 0; | |
242 | } | |
6657674b | 243 | EXPORT_SYMBOL(crypto_sha3_final); |
53964b9e | 244 | |
beeb504a AB |
245 | static struct shash_alg algs[] = { { |
246 | .digestsize = SHA3_224_DIGEST_SIZE, | |
6657674b AB |
247 | .init = crypto_sha3_init, |
248 | .update = crypto_sha3_update, | |
249 | .final = crypto_sha3_final, | |
beeb504a AB |
250 | .descsize = sizeof(struct sha3_state), |
251 | .base.cra_name = "sha3-224", | |
252 | .base.cra_driver_name = "sha3-224-generic", | |
beeb504a AB |
253 | .base.cra_blocksize = SHA3_224_BLOCK_SIZE, |
254 | .base.cra_module = THIS_MODULE, | |
255 | }, { | |
256 | .digestsize = SHA3_256_DIGEST_SIZE, | |
6657674b AB |
257 | .init = crypto_sha3_init, |
258 | .update = crypto_sha3_update, | |
259 | .final = crypto_sha3_final, | |
beeb504a AB |
260 | .descsize = sizeof(struct sha3_state), |
261 | .base.cra_name = "sha3-256", | |
262 | .base.cra_driver_name = "sha3-256-generic", | |
beeb504a AB |
263 | .base.cra_blocksize = SHA3_256_BLOCK_SIZE, |
264 | .base.cra_module = THIS_MODULE, | |
265 | }, { | |
266 | .digestsize = SHA3_384_DIGEST_SIZE, | |
6657674b AB |
267 | .init = crypto_sha3_init, |
268 | .update = crypto_sha3_update, | |
269 | .final = crypto_sha3_final, | |
beeb504a AB |
270 | .descsize = sizeof(struct sha3_state), |
271 | .base.cra_name = "sha3-384", | |
272 | .base.cra_driver_name = "sha3-384-generic", | |
beeb504a AB |
273 | .base.cra_blocksize = SHA3_384_BLOCK_SIZE, |
274 | .base.cra_module = THIS_MODULE, | |
275 | }, { | |
276 | .digestsize = SHA3_512_DIGEST_SIZE, | |
6657674b AB |
277 | .init = crypto_sha3_init, |
278 | .update = crypto_sha3_update, | |
279 | .final = crypto_sha3_final, | |
beeb504a AB |
280 | .descsize = sizeof(struct sha3_state), |
281 | .base.cra_name = "sha3-512", | |
282 | .base.cra_driver_name = "sha3-512-generic", | |
beeb504a AB |
283 | .base.cra_blocksize = SHA3_512_BLOCK_SIZE, |
284 | .base.cra_module = THIS_MODULE, | |
285 | } }; | |
53964b9e JG |
286 | |
287 | static int __init sha3_generic_mod_init(void) | |
288 | { | |
beeb504a | 289 | return crypto_register_shashes(algs, ARRAY_SIZE(algs)); |
53964b9e JG |
290 | } |
291 | ||
292 | static void __exit sha3_generic_mod_fini(void) | |
293 | { | |
beeb504a | 294 | crypto_unregister_shashes(algs, ARRAY_SIZE(algs)); |
53964b9e JG |
295 | } |
296 | ||
297 | module_init(sha3_generic_mod_init); | |
298 | module_exit(sha3_generic_mod_fini); | |
299 | ||
300 | MODULE_LICENSE("GPL"); | |
301 | MODULE_DESCRIPTION("SHA-3 Secure Hash Algorithm"); | |
302 | ||
303 | MODULE_ALIAS_CRYPTO("sha3-224"); | |
304 | MODULE_ALIAS_CRYPTO("sha3-224-generic"); | |
305 | MODULE_ALIAS_CRYPTO("sha3-256"); | |
306 | MODULE_ALIAS_CRYPTO("sha3-256-generic"); | |
307 | MODULE_ALIAS_CRYPTO("sha3-384"); | |
308 | MODULE_ALIAS_CRYPTO("sha3-384-generic"); | |
309 | MODULE_ALIAS_CRYPTO("sha3-512"); | |
310 | MODULE_ALIAS_CRYPTO("sha3-512-generic"); |