sha3 1.0.4 → 1.0.5

Sign up to get free protection for your applications and to get access to all the features.
Files changed (44) hide show
  1. checksums.yaml +4 -4
  2. checksums.yaml.gz.sig +0 -0
  3. data/README.md +8 -5
  4. data/certs/johanns.pem +23 -22
  5. data/ext/sha3/config.h +26 -0
  6. data/ext/sha3/digest.c +6 -6
  7. data/ext/sha3/extconf.rb +40 -10
  8. data/ext/sha3/lib/common/align.h +33 -0
  9. data/ext/sha3/{brg_endian.h → lib/common/brg_endian.h} +8 -7
  10. data/ext/sha3/{KeccakHash.c → lib/high/Keccak/FIPS202/KeccakHash.c} +26 -25
  11. data/ext/sha3/{KeccakHash.h → lib/high/Keccak/FIPS202/KeccakHash.h} +34 -19
  12. data/ext/sha3/lib/high/Keccak/KeccakSponge.c +111 -0
  13. data/ext/sha3/lib/high/Keccak/KeccakSponge.h +76 -0
  14. data/ext/sha3/lib/high/Keccak/KeccakSponge.inc +316 -0
  15. data/ext/sha3/lib/low/KeccakP-1600/common/KeccakP-1600-64.macros +748 -0
  16. data/ext/sha3/lib/low/KeccakP-1600/common/KeccakP-1600-unrolling.macros +305 -0
  17. data/ext/sha3/lib/low/KeccakP-1600/ref-32bits/KeccakP-1600-SnP.h +44 -0
  18. data/ext/sha3/lib/low/KeccakP-1600/ref-32bits/KeccakP-1600-reference.h +23 -0
  19. data/ext/sha3/lib/low/KeccakP-1600/ref-32bits/KeccakP-1600-reference32BI.c +625 -0
  20. data/ext/sha3/lib/low/KeccakP-1600/ref-64bits/KeccakP-1600-SnP.h +44 -0
  21. data/ext/sha3/lib/low/KeccakP-1600/ref-64bits/KeccakP-1600-reference.c +444 -0
  22. data/ext/sha3/lib/low/KeccakP-1600/ref-64bits/KeccakP-1600-reference.h +23 -0
  23. data/lib/sha3/version.rb +1 -1
  24. data/sha3.gemspec +6 -5
  25. data/tests.sh +8 -7
  26. data.tar.gz.sig +0 -0
  27. metadata +50 -66
  28. metadata.gz.sig +0 -0
  29. data/ext/sha3/KeccakF-1600-interface.h +0 -40
  30. data/ext/sha3/KeccakSponge.c +0 -192
  31. data/ext/sha3/KeccakSponge.h +0 -113
  32. data/ext/sha3/Optimized64/KeccakF-1600-64.macros +0 -2199
  33. data/ext/sha3/Optimized64/KeccakF-1600-opt64-settings.h +0 -3
  34. data/ext/sha3/Optimized64/KeccakF-1600-opt64.c +0 -508
  35. data/ext/sha3/Optimized64/KeccakF-1600-unrolling.macros +0 -126
  36. data/ext/sha3/Optimized64/SnP-interface.h +0 -47
  37. data/ext/sha3/Reference/KeccakF-1600-reference.c +0 -311
  38. data/ext/sha3/Reference/KeccakF-reference.h +0 -26
  39. data/ext/sha3/Reference/SnP-FBWL-default.c +0 -96
  40. data/ext/sha3/Reference/SnP-FBWL-default.h +0 -26
  41. data/ext/sha3/Reference/SnP-interface.h +0 -42
  42. data/ext/sha3/Reference/displayIntermediateValues.c +0 -158
  43. data/ext/sha3/Reference/displayIntermediateValues.h +0 -34
  44. data/ext/sha3/SnP-Relaned.h +0 -249
@@ -0,0 +1,625 @@
1
+ /*
2
+ The eXtended Keccak Code Package (XKCP)
3
+ https://github.com/XKCP/XKCP
4
+
5
+ The Keccak-p permutations, designed by Guido Bertoni, Joan Daemen, Michaël Peeters and Gilles Van Assche.
6
+
7
+ Implementation by the designers, hereby denoted as "the implementer".
8
+
9
+ For more information, feedback or questions, please refer to the Keccak Team website:
10
+ https://keccak.team/
11
+
12
+ To the extent possible under law, the implementer has waived all copyright
13
+ and related or neighboring rights to the source code in this file.
14
+ http://creativecommons.org/publicdomain/zero/1.0/
15
+
16
+ ---
17
+
18
+ This file implements Keccak-p[1600] in a SnP-compatible way.
19
+ Please refer to SnP-documentation.h for more details.
20
+
21
+ This implementation comes with KeccakP-1600-SnP.h in the same folder.
22
+ Please refer to LowLevel.build for the exact list of other files it must be combined with.
23
+ */
24
+
25
+ #if DEBUG
26
+ #include <assert.h>
27
+ #endif
28
+ #include <stdint.h>
29
+ #include <stdio.h>
30
+ #include <string.h>
31
+ #include "brg_endian.h"
32
+ #ifdef KeccakReference
33
+ #include "displayIntermediateValues.h"
34
+ #endif
35
+
36
+ #define maxNrRounds 24
37
+ #define nrLanes 25
38
+
39
+ #ifdef KeccakReference
40
+
41
+ static uint32_t KeccakRoundConstants[maxNrRounds][2];
42
+ static unsigned int KeccakRhoOffsets[nrLanes];
43
+
44
+ #endif
45
+
46
+ /* ---------------------------------------------------------------- */
47
+
48
+ void toBitInterleaving(uint32_t low, uint32_t high, uint32_t *even, uint32_t *odd);
49
+ void fromBitInterleaving(uint32_t even, uint32_t odd, uint32_t *low, uint32_t *high);
50
+
51
+ void toBitInterleaving(uint32_t low, uint32_t high, uint32_t *even, uint32_t *odd)
52
+ {
53
+ unsigned int i;
54
+
55
+ *even = 0;
56
+ *odd = 0;
57
+ for(i=0; i<64; i++) {
58
+ unsigned int inBit;
59
+ if (i < 32)
60
+ inBit = (low >> i) & 1;
61
+ else
62
+ inBit = (high >> (i-32)) & 1;
63
+ if ((i % 2) == 0)
64
+ *even |= inBit << (i/2);
65
+ else
66
+ *odd |= inBit << ((i-1)/2);
67
+ }
68
+ }
69
+
70
+ void fromBitInterleaving(uint32_t even, uint32_t odd, uint32_t *low, uint32_t *high)
71
+ {
72
+ unsigned int i;
73
+
74
+ *low = 0;
75
+ *high = 0;
76
+ for(i=0; i<64; i++) {
77
+ unsigned int inBit;
78
+ if ((i % 2) == 0)
79
+ inBit = (even >> (i/2)) & 1;
80
+ else
81
+ inBit = (odd >> ((i-1)/2)) & 1;
82
+ if (i < 32)
83
+ *low |= inBit << i;
84
+ else
85
+ *high |= inBit << (i-32);
86
+ }
87
+ }
88
+
89
+ #ifdef KeccakReference
90
+
91
+ /* ---------------------------------------------------------------- */
92
+
93
+ void KeccakP1600_InitializeRoundConstants(void);
94
+ void KeccakP1600_InitializeRhoOffsets(void);
95
+ static int LFSR86540(uint8_t *LFSR);
96
+
97
+ void KeccakP1600_StaticInitialize(void)
98
+ {
99
+ KeccakP1600_InitializeRoundConstants();
100
+ KeccakP1600_InitializeRhoOffsets();
101
+ }
102
+
103
+ void KeccakP1600_InitializeRoundConstants(void)
104
+ {
105
+ uint8_t LFSRstate = 0x01;
106
+ unsigned int i, j, bitPosition;
107
+ uint32_t low, high;
108
+
109
+ for(i=0; i<maxNrRounds; i++) {
110
+ low = high = 0;
111
+ for(j=0; j<7; j++) {
112
+ bitPosition = (1<<j)-1; /* 2^j-1 */
113
+ if (LFSR86540(&LFSRstate)) {
114
+ if (bitPosition < 32)
115
+ low ^= (uint32_t)1 << bitPosition;
116
+ else
117
+ high ^= (uint32_t)1 << (bitPosition-32);
118
+ }
119
+ }
120
+ toBitInterleaving(low, high, &(KeccakRoundConstants[i][0]), &(KeccakRoundConstants[i][1]));
121
+ }
122
+ }
123
+
124
+ void KeccakP1600_InitializeRhoOffsets(void)
125
+ {
126
+ unsigned int x, y, t, newX, newY;
127
+
128
+ KeccakRhoOffsets[0] = 0;
129
+ x = 1;
130
+ y = 0;
131
+ for(t=0; t<24; t++) {
132
+ KeccakRhoOffsets[5*y+x] = ((t+1)*(t+2)/2) % 64;
133
+ newX = (0*x+1*y) % 5;
134
+ newY = (2*x+3*y) % 5;
135
+ x = newX;
136
+ y = newY;
137
+ }
138
+ }
139
+
140
+ static int LFSR86540(uint8_t *LFSR)
141
+ {
142
+ int result = ((*LFSR) & 0x01) != 0;
143
+ if (((*LFSR) & 0x80) != 0)
144
+ /* Primitive polynomial over GF(2): x^8+x^6+x^5+x^4+1 */
145
+ (*LFSR) = ((*LFSR) << 1) ^ 0x71;
146
+ else
147
+ (*LFSR) <<= 1;
148
+ return result;
149
+ }
150
+
151
+ #else
152
+
153
+ static const uint32_t KeccakRoundConstants[maxNrRounds][2] =
154
+ {
155
+ 0x00000001, 0x00000000,
156
+ 0x00000000, 0x00000089,
157
+ 0x00000000, 0x8000008B,
158
+ 0x00000000, 0x80008080,
159
+ 0x00000001, 0x0000008B,
160
+ 0x00000001, 0x00008000,
161
+ 0x00000001, 0x80008088,
162
+ 0x00000001, 0x80000082,
163
+ 0x00000000, 0x0000000B,
164
+ 0x00000000, 0x0000000A,
165
+ 0x00000001, 0x00008082,
166
+ 0x00000000, 0x00008003,
167
+ 0x00000001, 0x0000808B,
168
+ 0x00000001, 0x8000000B,
169
+ 0x00000001, 0x8000008A,
170
+ 0x00000001, 0x80000081,
171
+ 0x00000000, 0x80000081,
172
+ 0x00000000, 0x80000008,
173
+ 0x00000000, 0x00000083,
174
+ 0x00000000, 0x80008003,
175
+ 0x00000001, 0x80008088,
176
+ 0x00000000, 0x80000088,
177
+ 0x00000001, 0x00008000,
178
+ 0x00000000, 0x80008082
179
+ };
180
+
181
+ static const unsigned int KeccakRhoOffsets[nrLanes] =
182
+ {
183
+ 0, 1, 62, 28, 27, 36, 44, 6, 55, 20, 3, 10, 43, 25, 39, 41, 45, 15, 21, 8, 18, 2, 61, 56, 14
184
+ };
185
+
186
+ #endif
187
+
188
+ /* ---------------------------------------------------------------- */
189
+
190
+ void KeccakP1600_Initialize(void *state)
191
+ {
192
+ memset(state, 0, 1600/8);
193
+ }
194
+
195
+ /* ---------------------------------------------------------------- */
196
+
197
+ void KeccakP1600_AddBytes(void *state, const unsigned char *data, unsigned int offset, unsigned int length);
198
+
199
+ void KeccakP1600_AddByte(void *state, unsigned char byte, unsigned int offset)
200
+ {
201
+ unsigned char data[1];
202
+
203
+ #if DEBUG
204
+ assert(offset < 200);
205
+ #endif
206
+ data[0] = byte;
207
+ KeccakP1600_AddBytes(state, data, offset, 1);
208
+ }
209
+
210
+ /* ---------------------------------------------------------------- */
211
+
212
+ void KeccakP1600_AddBytesInLane(void *state, unsigned int lanePosition, const unsigned char *data, unsigned int offset, unsigned int length)
213
+ {
214
+ if ((lanePosition < 25) && (offset < 8) && (offset+length <= 8)) {
215
+ uint8_t laneAsBytes[8];
216
+ uint32_t low, high;
217
+ uint32_t lane[2];
218
+ uint32_t *stateAsHalfLanes;
219
+
220
+ memset(laneAsBytes, 0, 8);
221
+ memcpy(laneAsBytes+offset, data, length);
222
+ low = laneAsBytes[0]
223
+ | ((uint32_t)(laneAsBytes[1]) << 8)
224
+ | ((uint32_t)(laneAsBytes[2]) << 16)
225
+ | ((uint32_t)(laneAsBytes[3]) << 24);
226
+ high = laneAsBytes[4]
227
+ | ((uint32_t)(laneAsBytes[5]) << 8)
228
+ | ((uint32_t)(laneAsBytes[6]) << 16)
229
+ | ((uint32_t)(laneAsBytes[7]) << 24);
230
+ toBitInterleaving(low, high, lane, lane+1);
231
+ stateAsHalfLanes = (uint32_t*)state;
232
+ stateAsHalfLanes[lanePosition*2+0] ^= lane[0];
233
+ stateAsHalfLanes[lanePosition*2+1] ^= lane[1];
234
+ }
235
+ }
236
+
237
+ void KeccakP1600_AddBytes(void *state, const unsigned char *data, unsigned int offset, unsigned int length)
238
+ {
239
+ unsigned int lanePosition = offset/8;
240
+ unsigned int offsetInLane = offset%8;
241
+
242
+ #if DEBUG
243
+ assert(offset < 200);
244
+ assert(offset+length <= 200);
245
+ #endif
246
+ while(length > 0) {
247
+ unsigned int bytesInLane = 8 - offsetInLane;
248
+ if (bytesInLane > length)
249
+ bytesInLane = length;
250
+ KeccakP1600_AddBytesInLane(state, lanePosition, data, offsetInLane, bytesInLane);
251
+ length -= bytesInLane;
252
+ lanePosition++;
253
+ offsetInLane = 0;
254
+ data += bytesInLane;
255
+ }
256
+ }
257
+
258
+ /* ---------------------------------------------------------------- */
259
+
260
+ void KeccakP1600_ExtractBytesInLane(const void *state, unsigned int lanePosition, unsigned char *data, unsigned int offset, unsigned int length);
261
+
262
+ void KeccakP1600_OverwriteBytesInLane(void *state, unsigned int lanePosition, const unsigned char *data, unsigned int offset, unsigned int length)
263
+ {
264
+ if ((lanePosition < 25) && (offset < 8) && (offset+length <= 8)) {
265
+ uint8_t laneAsBytes[8];
266
+ uint32_t low, high;
267
+ uint32_t lane[2];
268
+ uint32_t *stateAsHalfLanes;
269
+
270
+ KeccakP1600_ExtractBytesInLane(state, lanePosition, laneAsBytes, 0, 8);
271
+ memcpy(laneAsBytes+offset, data, length);
272
+ low = laneAsBytes[0]
273
+ | ((uint32_t)(laneAsBytes[1]) << 8)
274
+ | ((uint32_t)(laneAsBytes[2]) << 16)
275
+ | ((uint32_t)(laneAsBytes[3]) << 24);
276
+ high = laneAsBytes[4]
277
+ | ((uint32_t)(laneAsBytes[5]) << 8)
278
+ | ((uint32_t)(laneAsBytes[6]) << 16)
279
+ | ((uint32_t)(laneAsBytes[7]) << 24);
280
+ toBitInterleaving(low, high, lane, lane+1);
281
+ stateAsHalfLanes = (uint32_t*)state;
282
+ stateAsHalfLanes[lanePosition*2+0] = lane[0];
283
+ stateAsHalfLanes[lanePosition*2+1] = lane[1];
284
+ }
285
+ }
286
+
287
+ void KeccakP1600_OverwriteBytes(void *state, const unsigned char *data, unsigned int offset, unsigned int length)
288
+ {
289
+ unsigned int lanePosition = offset/8;
290
+ unsigned int offsetInLane = offset%8;
291
+
292
+ #if DEBUG
293
+ assert(offset < 200);
294
+ assert(offset+length <= 200);
295
+ #endif
296
+ while(length > 0) {
297
+ unsigned int bytesInLane = 8 - offsetInLane;
298
+ if (bytesInLane > length)
299
+ bytesInLane = length;
300
+ KeccakP1600_OverwriteBytesInLane(state, lanePosition, data, offsetInLane, bytesInLane);
301
+ length -= bytesInLane;
302
+ lanePosition++;
303
+ offsetInLane = 0;
304
+ data += bytesInLane;
305
+ }
306
+ }
307
+
308
+ /* ---------------------------------------------------------------- */
309
+
310
+ void KeccakP1600_OverwriteWithZeroes(void *state, unsigned int byteCount)
311
+ {
312
+ uint8_t laneAsBytes[8];
313
+ unsigned int lanePosition = 0;
314
+
315
+ #if DEBUG
316
+ assert(byteCount <= 200);
317
+ #endif
318
+ memset(laneAsBytes, 0, 8);
319
+ while(byteCount > 0) {
320
+ if (byteCount < 8) {
321
+ KeccakP1600_OverwriteBytesInLane(state, lanePosition, laneAsBytes, 0, byteCount);
322
+ byteCount = 0;
323
+ }
324
+ else {
325
+ uint32_t *stateAsHalfLanes = (uint32_t*)state;
326
+ stateAsHalfLanes[lanePosition*2+0] = 0;
327
+ stateAsHalfLanes[lanePosition*2+1] = 0;
328
+ byteCount -= 8;
329
+ lanePosition++;
330
+ }
331
+ }
332
+ }
333
+
334
+ /* ---------------------------------------------------------------- */
335
+
336
+ void KeccakP1600_PermutationOnWords(uint32_t *state, unsigned int nrRounds);
337
+ static void theta(uint32_t *A);
338
+ static void rho(uint32_t *A);
339
+ static void pi(uint32_t *A);
340
+ static void chi(uint32_t *A);
341
+ static void iota(uint32_t *A, unsigned int indexRound);
342
+ void KeccakP1600_ExtractBytes(const void *state, unsigned char *data, unsigned int offset, unsigned int length);
343
+
344
+ void KeccakP1600_Permute_Nrounds(void *state, unsigned int nrounds)
345
+ {
346
+ uint32_t *stateAsHalfLanes = (uint32_t*)state;
347
+ {
348
+ uint8_t stateAsBytes[1600/8];
349
+ KeccakP1600_ExtractBytes(state, stateAsBytes, 0, 1600/8);
350
+ #ifdef KeccakReference
351
+ displayStateAsBytes(1, "Input of permutation", stateAsBytes, 1600);
352
+ #endif
353
+ }
354
+ KeccakP1600_PermutationOnWords(stateAsHalfLanes, nrounds);
355
+ {
356
+ uint8_t stateAsBytes[1600/8];
357
+ KeccakP1600_ExtractBytes(state, stateAsBytes, 0, 1600/8);
358
+ #ifdef KeccakReference
359
+ displayStateAsBytes(1, "State after permutation", stateAsBytes, 1600);
360
+ #endif
361
+ }
362
+ }
363
+
364
+
365
+ void KeccakP1600_Permute_12rounds(void *state)
366
+ {
367
+ uint32_t *stateAsHalfLanes = (uint32_t*)state;
368
+ {
369
+ uint8_t stateAsBytes[1600/8];
370
+ KeccakP1600_ExtractBytes(state, stateAsBytes, 0, 1600/8);
371
+ #ifdef KeccakReference
372
+ displayStateAsBytes(1, "Input of permutation", stateAsBytes, 1600);
373
+ #endif
374
+ }
375
+ KeccakP1600_PermutationOnWords(stateAsHalfLanes, 12);
376
+ {
377
+ uint8_t stateAsBytes[1600/8];
378
+ KeccakP1600_ExtractBytes(state, stateAsBytes, 0, 1600/8);
379
+ #ifdef KeccakReference
380
+ displayStateAsBytes(1, "State after permutation", stateAsBytes, 1600);
381
+ #endif
382
+ }
383
+ }
384
+
385
+ void KeccakP1600_Permute_24rounds(void *state)
386
+ {
387
+ uint32_t *stateAsHalfLanes = (uint32_t*)state;
388
+ {
389
+ uint8_t stateAsBytes[1600/8];
390
+ KeccakP1600_ExtractBytes(state, stateAsBytes, 0, 1600/8);
391
+ #ifdef KeccakReference
392
+ displayStateAsBytes(1, "Input of permutation", stateAsBytes, 1600);
393
+ #endif
394
+ }
395
+ KeccakP1600_PermutationOnWords(stateAsHalfLanes, 24);
396
+ {
397
+ uint8_t stateAsBytes[1600/8];
398
+ KeccakP1600_ExtractBytes(state, stateAsBytes, 0, 1600/8);
399
+ #ifdef KeccakReference
400
+ displayStateAsBytes(1, "State after permutation", stateAsBytes, 1600);
401
+ #endif
402
+ }
403
+ }
404
+
405
+ void KeccakP1600_PermutationOnWords(uint32_t *state, unsigned int nrRounds)
406
+ {
407
+ unsigned int i;
408
+
409
+ #ifdef KeccakReference
410
+ displayStateAs32bitWords(3, "Same, with lanes as pairs of 32-bit words (bit interleaving)", state);
411
+ #endif
412
+
413
+ for(i=(maxNrRounds-nrRounds); i<maxNrRounds; i++) {
414
+ #ifdef KeccakReference
415
+ displayRoundNumber(3, i);
416
+ #endif
417
+
418
+ theta(state);
419
+ #ifdef KeccakReference
420
+ displayStateAs32bitWords(3, "After theta", state);
421
+ #endif
422
+
423
+ rho(state);
424
+ #ifdef KeccakReference
425
+ displayStateAs32bitWords(3, "After rho", state);
426
+ #endif
427
+
428
+ pi(state);
429
+ #ifdef KeccakReference
430
+ displayStateAs32bitWords(3, "After pi", state);
431
+ #endif
432
+
433
+ chi(state);
434
+ #ifdef KeccakReference
435
+ displayStateAs32bitWords(3, "After chi", state);
436
+ #endif
437
+
438
+ iota(state, i);
439
+ #ifdef KeccakReference
440
+ displayStateAs32bitWords(3, "After iota", state);
441
+ #endif
442
+ }
443
+ }
444
+
445
+ #define index(x, y,z) ((((x)%5)+5*((y)%5))*2 + z)
446
+ #define ROL32(a, offset) ((offset != 0) ? ((((uint32_t)a) << offset) ^ (((uint32_t)a) >> (32-offset))) : a)
447
+
448
+ void ROL64(uint32_t inEven, uint32_t inOdd, uint32_t *outEven, uint32_t *outOdd, unsigned int offset)
449
+ {
450
+ if ((offset % 2) == 0) {
451
+ *outEven = ROL32(inEven, offset/2);
452
+ *outOdd = ROL32(inOdd, offset/2);
453
+ }
454
+ else {
455
+ *outEven = ROL32(inOdd, (offset+1)/2);
456
+ *outOdd = ROL32(inEven, (offset-1)/2);
457
+ }
458
+ }
459
+
460
+ static void theta(uint32_t *A)
461
+ {
462
+ unsigned int x, y, z;
463
+ uint32_t C[5][2], D[5][2];
464
+
465
+ for(x=0; x<5; x++) {
466
+ for(z=0; z<2; z++) {
467
+ C[x][z] = 0;
468
+ for(y=0; y<5; y++)
469
+ C[x][z] ^= A[index(x, y, z)];
470
+ }
471
+ }
472
+ for(x=0; x<5; x++) {
473
+ ROL64(C[(x+1)%5][0], C[(x+1)%5][1], &(D[x][0]), &(D[x][1]), 1);
474
+ for(z=0; z<2; z++)
475
+ D[x][z] ^= C[(x+4)%5][z];
476
+ }
477
+ for(x=0; x<5; x++)
478
+ for(y=0; y<5; y++)
479
+ for(z=0; z<2; z++)
480
+ A[index(x, y, z)] ^= D[x][z];
481
+ }
482
+
483
+ static void rho(uint32_t *A)
484
+ {
485
+ unsigned int x, y;
486
+
487
+ for(x=0; x<5; x++) for(y=0; y<5; y++)
488
+ ROL64(A[index(x, y, 0)], A[index(x, y, 1)], &(A[index(x, y, 0)]), &(A[index(x, y, 1)]), KeccakRhoOffsets[5*y+x]);
489
+ }
490
+
491
+ static void pi(uint32_t *A)
492
+ {
493
+ unsigned int x, y, z;
494
+ uint32_t tempA[50];
495
+
496
+ for(x=0; x<5; x++) for(y=0; y<5; y++) for(z=0; z<2; z++)
497
+ tempA[index(x, y, z)] = A[index(x, y, z)];
498
+ for(x=0; x<5; x++) for(y=0; y<5; y++) for(z=0; z<2; z++)
499
+ A[index(0*x+1*y, 2*x+3*y, z)] = tempA[index(x, y, z)];
500
+ }
501
+
502
+ static void chi(uint32_t *A)
503
+ {
504
+ unsigned int x, y, z;
505
+ uint32_t C[5][2];
506
+
507
+ for(y=0; y<5; y++) {
508
+ for(x=0; x<5; x++)
509
+ for(z=0; z<2; z++)
510
+ C[x][z] = A[index(x, y, z)] ^ ((~A[index(x+1, y, z)]) & A[index(x+2, y, z)]);
511
+ for(x=0; x<5; x++)
512
+ for(z=0; z<2; z++)
513
+ A[index(x, y, z)] = C[x][z];
514
+ }
515
+ }
516
+
517
+ static void iota(uint32_t *A, unsigned int indexRound)
518
+ {
519
+ A[index(0, 0, 0)] ^= KeccakRoundConstants[indexRound][0];
520
+ A[index(0, 0, 1)] ^= KeccakRoundConstants[indexRound][1];
521
+ }
522
+
523
+ /* ---------------------------------------------------------------- */
524
+
525
+ void KeccakP1600_ExtractBytesInLane(const void *state, unsigned int lanePosition, unsigned char *data, unsigned int offset, unsigned int length)
526
+ {
527
+ if ((lanePosition < 25) && (offset < 8) && (offset+length <= 8)) {
528
+ uint32_t *stateAsHalfLanes = (uint32_t*)state;
529
+ uint32_t lane[2];
530
+ uint8_t laneAsBytes[8];
531
+ fromBitInterleaving(stateAsHalfLanes[lanePosition*2], stateAsHalfLanes[lanePosition*2+1], lane, lane+1);
532
+ laneAsBytes[0] = lane[0] & 0xFF;
533
+ laneAsBytes[1] = (lane[0] >> 8) & 0xFF;
534
+ laneAsBytes[2] = (lane[0] >> 16) & 0xFF;
535
+ laneAsBytes[3] = (lane[0] >> 24) & 0xFF;
536
+ laneAsBytes[4] = lane[1] & 0xFF;
537
+ laneAsBytes[5] = (lane[1] >> 8) & 0xFF;
538
+ laneAsBytes[6] = (lane[1] >> 16) & 0xFF;
539
+ laneAsBytes[7] = (lane[1] >> 24) & 0xFF;
540
+ memcpy(data, laneAsBytes+offset, length);
541
+ }
542
+ }
543
+
544
+ void KeccakP1600_ExtractBytes(const void *state, unsigned char *data, unsigned int offset, unsigned int length)
545
+ {
546
+ unsigned int lanePosition = offset/8;
547
+ unsigned int offsetInLane = offset%8;
548
+
549
+ #if DEBUG
550
+ assert(offset < 200);
551
+ assert(offset+length <= 200);
552
+ #endif
553
+ while(length > 0) {
554
+ unsigned int bytesInLane = 8 - offsetInLane;
555
+ if (bytesInLane > length)
556
+ bytesInLane = length;
557
+ KeccakP1600_ExtractBytesInLane(state, lanePosition, data, offsetInLane, bytesInLane);
558
+ length -= bytesInLane;
559
+ lanePosition++;
560
+ offsetInLane = 0;
561
+ data += bytesInLane;
562
+ }
563
+ }
564
+
565
+ /* ---------------------------------------------------------------- */
566
+
567
+ void KeccakP1600_ExtractAndAddBytesInLane(const void *state, unsigned int lanePosition, const unsigned char *input, unsigned char *output, unsigned int offset, unsigned int length)
568
+ {
569
+ if ((lanePosition < 25) && (offset < 8) && (offset+length <= 8)) {
570
+ uint8_t laneAsBytes[8];
571
+ unsigned int i;
572
+
573
+ KeccakP1600_ExtractBytesInLane(state, lanePosition, laneAsBytes, offset, length);
574
+ for(i=0; i<length; i++)
575
+ output[i] = input[i] ^ laneAsBytes[i];
576
+ }
577
+ }
578
+
579
+ void KeccakP1600_ExtractAndAddBytes(const void *state, const unsigned char *input, unsigned char *output, unsigned int offset, unsigned int length)
580
+ {
581
+ unsigned int lanePosition = offset/8;
582
+ unsigned int offsetInLane = offset%8;
583
+
584
+ #if DEBUG
585
+ assert(offset < 200);
586
+ assert(offset+length <= 200);
587
+ #endif
588
+ while(length > 0) {
589
+ unsigned int bytesInLane = 8 - offsetInLane;
590
+ if (bytesInLane > length)
591
+ bytesInLane = length;
592
+ KeccakP1600_ExtractAndAddBytesInLane(state, lanePosition, input, output, offsetInLane, bytesInLane);
593
+ length -= bytesInLane;
594
+ lanePosition++;
595
+ offsetInLane = 0;
596
+ input += bytesInLane;
597
+ output += bytesInLane;
598
+ }
599
+ }
600
+
601
+ /* ---------------------------------------------------------------- */
602
+
603
+ void KeccakP1600_DisplayRoundConstants(FILE *f)
604
+ {
605
+ unsigned int i;
606
+
607
+ for(i=0; i<maxNrRounds; i++) {
608
+ fprintf(f, "RC[%02i][0][0] = ", i);
609
+ fprintf(f, "%08X:%08X", (unsigned int)(KeccakRoundConstants[i][0]), (unsigned int)(KeccakRoundConstants[i][1]));
610
+ fprintf(f, "\n");
611
+ }
612
+ fprintf(f, "\n");
613
+ }
614
+
615
+ void KeccakP1600_DisplayRhoOffsets(FILE *f)
616
+ {
617
+ unsigned int x, y;
618
+
619
+ for(y=0; y<5; y++) for(x=0; x<5; x++) {
620
+ fprintf(f, "RhoOffset[%i][%i] = ", x, y);
621
+ fprintf(f, "%2i", KeccakRhoOffsets[5*y+x]);
622
+ fprintf(f, "\n");
623
+ }
624
+ fprintf(f, "\n");
625
+ }
@@ -0,0 +1,44 @@
1
+ /*
2
+ The eXtended Keccak Code Package (XKCP)
3
+ https://github.com/XKCP/XKCP
4
+
5
+ The Keccak-p permutations, designed by Guido Bertoni, Joan Daemen, Michaël Peeters and Gilles Van Assche.
6
+
7
+ Implementation by the designers, hereby denoted as "the implementer".
8
+
9
+ For more information, feedback or questions, please refer to the Keccak Team website:
10
+ https://keccak.team/
11
+
12
+ To the extent possible under law, the implementer has waived all copyright
13
+ and related or neighboring rights to the source code in this file.
14
+ http://creativecommons.org/publicdomain/zero/1.0/
15
+
16
+ ---
17
+
18
+ Please refer to SnP-documentation.h for more details.
19
+ */
20
+
21
+ #ifndef _KeccakP_1600_SnP_h_
22
+ #define _KeccakP_1600_SnP_h_
23
+
24
+ #define KeccakP1600_implementation "64-bit reference implementation"
25
+ #define KeccakP1600_stateSizeInBytes 200
26
+ #define KeccakP1600_stateAlignment 8
27
+
28
+ #ifdef KeccakReference
29
+ void KeccakP1600_StaticInitialize( void );
30
+ #else
31
+ #define KeccakP1600_StaticInitialize()
32
+ #endif
33
+ void KeccakP1600_Initialize(void *state);
34
+ void KeccakP1600_AddByte(void *state, unsigned char data, unsigned int offset);
35
+ void KeccakP1600_AddBytes(void *state, const unsigned char *data, unsigned int offset, unsigned int length);
36
+ void KeccakP1600_OverwriteBytes(void *state, const unsigned char *data, unsigned int offset, unsigned int length);
37
+ void KeccakP1600_OverwriteWithZeroes(void *state, unsigned int byteCount);
38
+ void KeccakP1600_Permute_Nrounds(void *state, unsigned int nrounds);
39
+ void KeccakP1600_Permute_12rounds(void *state);
40
+ void KeccakP1600_Permute_24rounds(void *state);
41
+ void KeccakP1600_ExtractBytes(const void *state, unsigned char *data, unsigned int offset, unsigned int length);
42
+ void KeccakP1600_ExtractAndAddBytes(const void *state, const unsigned char *input, unsigned char *output, unsigned int offset, unsigned int length);
43
+
44
+ #endif