1use core::{convert::TryInto, mem::swap};
2
3pub const HALF_DIGEST_BUF_LEN: usize = 5;
4pub const DIGEST_BUF_LEN: usize = 10;
5pub const WORK_BUF_LEN: usize = 16;
6
7pub const H0: [u32; DIGEST_BUF_LEN] = [
8 0x6745_2301,
9 0xefcd_ab89,
10 0x98ba_dcfe,
11 0x1032_5476,
12 0xc3d2_e1f0,
13 0x7654_3210,
14 0xfedc_ba98,
15 0x89ab_cdef,
16 0x0123_4567,
17 0x3c2d_1e0f,
18];
19
20macro_rules! round(
21 ($a:expr, $b:expr, $c:expr, $d:expr, $e:expr,
22 $x:expr, $bits:expr, $add:expr, $round:expr) => ({
23 $a = $a.wrapping_add($round).wrapping_add($x).wrapping_add($add);
24 $a = $a.rotate_left($bits).wrapping_add($e);
25 $c = $c.rotate_left(10);
26 });
27);
28
29#[inline(always)]
30fn swap_idx(bb: &mut [u32; HALF_DIGEST_BUF_LEN], bbb: &mut [u32; HALF_DIGEST_BUF_LEN], idx: usize) {
31 swap(&mut bb[idx], &mut bbb[idx]);
32}
33
34macro_rules! process_block(
35 ($h:ident, $data:expr,
36 $( round1: h_ordering $f0:expr, $f1:expr, $f2:expr, $f3:expr, $f4:expr;
37 data_index $data_index1:expr; roll_shift $bits1:expr )*;
38 $( round2: h_ordering $g0:expr, $g1:expr, $g2:expr, $g3:expr, $g4:expr;
39 data_index $data_index2:expr; roll_shift $bits2:expr )*;
40 $( round3: h_ordering $h0:expr, $h1:expr, $h2:expr, $h3:expr, $h4:expr;
41 data_index $data_index3:expr; roll_shift $bits3:expr )*;
42 $( round4: h_ordering $i0:expr, $i1:expr, $i2:expr, $i3:expr, $i4:expr;
43 data_index $data_index4:expr; roll_shift $bits4:expr )*;
44 $( round5: h_ordering $j0:expr, $j1:expr, $j2:expr, $j3:expr, $j4:expr;
45 data_index $data_index5:expr; roll_shift $bits5:expr )*;
46 $( par_round1: h_ordering $pj0:expr, $pj1:expr, $pj2:expr, $pj3:expr, $pj4:expr;
47 data_index $pdata_index1:expr; roll_shift $pbits1:expr )*;
48 $( par_round2: h_ordering $pi0:expr, $pi1:expr, $pi2:expr, $pi3:expr, $pi4:expr;
49 data_index $pdata_index2:expr; roll_shift $pbits2:expr )*;
50 $( par_round3: h_ordering $ph0:expr, $ph1:expr, $ph2:expr, $ph3:expr, $ph4:expr;
51 data_index $pdata_index3:expr; roll_shift $pbits3:expr )*;
52 $( par_round4: h_ordering $pg0:expr, $pg1:expr, $pg2:expr, $pg3:expr, $pg4:expr;
53 data_index $pdata_index4:expr; roll_shift $pbits4:expr )*;
54 $( par_round5: h_ordering $pf0:expr, $pf1:expr, $pf2:expr, $pf3:expr, $pf4:expr;
55 data_index $pdata_index5:expr; roll_shift $pbits5:expr )*;
56 ) => ({
57 let mut bb = [0u32; HALF_DIGEST_BUF_LEN];
58 bb.copy_from_slice(&$h[..HALF_DIGEST_BUF_LEN]);
59
60 let mut bbb = [0u32; HALF_DIGEST_BUF_LEN];
61 bbb.copy_from_slice(&$h[HALF_DIGEST_BUF_LEN..]);
62
63
64 $( round!(bb[$f0], bb[$f1], bb[$f2], bb[$f3], bb[$f4],
66 $data[$data_index1], $bits1, 0x0000_0000,
67 bb[$f1] ^ bb[$f2] ^ bb[$f3]); )*
68
69 $( round!(bbb[$pj0], bbb[$pj1], bbb[$pj2], bbb[$pj3], bbb[$pj4],
71 $data[$pdata_index1], $pbits1, 0x50a2_8be6,
72 bbb[$pj1] ^ (bbb[$pj2] | !bbb[$pj3])); )*
73
74 swap_idx(&mut bb, &mut bbb, 0);
75
76
77 $( round!(bb[$g0], bb[$g1], bb[$g2], bb[$g3], bb[$g4],
79 $data[$data_index2], $bits2, 0x5a82_7999,
80 (bb[$g1] & bb[$g2]) | (!bb[$g1] & bb[$g3])); )*
81
82 $( round!(bbb[$pi0], bbb[$pi1], bbb[$pi2], bbb[$pi3], bbb[$pi4],
84 $data[$pdata_index2], $pbits2, 0x5c4d_d124,
85 (bbb[$pi1] & bbb[$pi3]) | (bbb[$pi2] & !bbb[$pi3])); )*
86
87
88 swap_idx(&mut bb, &mut bbb, 1);
89
90
91 $( round!(bb[$h0], bb[$h1], bb[$h2], bb[$h3], bb[$h4],
93 $data[$data_index3], $bits3, 0x6ed9_eba1,
94 (bb[$h1] | !bb[$h2]) ^ bb[$h3]); )*
95
96 $( round!(bbb[$ph0], bbb[$ph1], bbb[$ph2], bbb[$ph3], bbb[$ph4],
98 $data[$pdata_index3], $pbits3, 0x6d70_3ef3,
99 (bbb[$ph1] | !bbb[$ph2]) ^ bbb[$ph3]); )*
100
101 swap_idx(&mut bb, &mut bbb, 2);
102
103
104 $( round!(bb[$i0], bb[$i1], bb[$i2], bb[$i3], bb[$i4],
106 $data[$data_index4], $bits4, 0x8f1b_bcdc,
107 (bb[$i1] & bb[$i3]) | (bb[$i2] & !bb[$i3])); )*
108
109
110 $( round!(bbb[$pg0], bbb[$pg1], bbb[$pg2], bbb[$pg3], bbb[$pg4],
112 $data[$pdata_index4], $pbits4, 0x7a6d_76e9,
113 (bbb[$pg1] & bbb[$pg2]) | (!bbb[$pg1] & bbb[$pg3])); )*
114
115 swap_idx(&mut bb, &mut bbb, 3);
116
117 $( round!(bb[$j0], bb[$j1], bb[$j2], bb[$j3], bb[$j4],
119 $data[$data_index5], $bits5, 0xa953_fd4e,
120 bb[$j1] ^ (bb[$j2] | !bb[$j3])); )*
121
122 $( round!(bbb[$pf0], bbb[$pf1], bbb[$pf2], bbb[$pf3], bbb[$pf4],
124 $data[$pdata_index5], $pbits5, 0x0000_0000,
125 bbb[$pf1] ^ bbb[$pf2] ^ bbb[$pf3]); )*
126
127 swap_idx(&mut bb, &mut bbb, 4);
128
129
130 $h[0] = $h[0].wrapping_add(bb[0]);
131 $h[1] = $h[1].wrapping_add(bb[1]);
132 $h[2] = $h[2].wrapping_add(bb[2]);
133 $h[3] = $h[3].wrapping_add(bb[3]);
134 $h[4] = $h[4].wrapping_add(bb[4]);
135 $h[5] = $h[5].wrapping_add(bbb[0]);
136 $h[6] = $h[6].wrapping_add(bbb[1]);
137 $h[7] = $h[7].wrapping_add(bbb[2]);
138 $h[8] = $h[8].wrapping_add(bbb[3]);
139 $h[9] = $h[9].wrapping_add(bbb[4]);
140
141 });
142);
143
144pub fn compress(h: &mut [u32; DIGEST_BUF_LEN], data: &[u8; 64]) {
145 let mut w = [0u32; WORK_BUF_LEN];
146 for (o, chunk) in w.iter_mut().zip(data.chunks_exact(4)) {
147 *o = u32::from_le_bytes(chunk.try_into().unwrap());
148 }
149
150 process_block!(h, w[..],
151 round1: h_ordering 0, 1, 2, 3, 4; data_index 0; roll_shift 11
153 round1: h_ordering 4, 0, 1, 2, 3; data_index 1; roll_shift 14
154 round1: h_ordering 3, 4, 0, 1, 2; data_index 2; roll_shift 15
155 round1: h_ordering 2, 3, 4, 0, 1; data_index 3; roll_shift 12
156 round1: h_ordering 1, 2, 3, 4, 0; data_index 4; roll_shift 5
157 round1: h_ordering 0, 1, 2, 3, 4; data_index 5; roll_shift 8
158 round1: h_ordering 4, 0, 1, 2, 3; data_index 6; roll_shift 7
159 round1: h_ordering 3, 4, 0, 1, 2; data_index 7; roll_shift 9
160 round1: h_ordering 2, 3, 4, 0, 1; data_index 8; roll_shift 11
161 round1: h_ordering 1, 2, 3, 4, 0; data_index 9; roll_shift 13
162 round1: h_ordering 0, 1, 2, 3, 4; data_index 10; roll_shift 14
163 round1: h_ordering 4, 0, 1, 2, 3; data_index 11; roll_shift 15
164 round1: h_ordering 3, 4, 0, 1, 2; data_index 12; roll_shift 6
165 round1: h_ordering 2, 3, 4, 0, 1; data_index 13; roll_shift 7
166 round1: h_ordering 1, 2, 3, 4, 0; data_index 14; roll_shift 9
167 round1: h_ordering 0, 1, 2, 3, 4; data_index 15; roll_shift 8;
168
169 round2: h_ordering 4, 0, 1, 2, 3; data_index 7; roll_shift 7
171 round2: h_ordering 3, 4, 0, 1, 2; data_index 4; roll_shift 6
172 round2: h_ordering 2, 3, 4, 0, 1; data_index 13; roll_shift 8
173 round2: h_ordering 1, 2, 3, 4, 0; data_index 1; roll_shift 13
174 round2: h_ordering 0, 1, 2, 3, 4; data_index 10; roll_shift 11
175 round2: h_ordering 4, 0, 1, 2, 3; data_index 6; roll_shift 9
176 round2: h_ordering 3, 4, 0, 1, 2; data_index 15; roll_shift 7
177 round2: h_ordering 2, 3, 4, 0, 1; data_index 3; roll_shift 15
178 round2: h_ordering 1, 2, 3, 4, 0; data_index 12; roll_shift 7
179 round2: h_ordering 0, 1, 2, 3, 4; data_index 0; roll_shift 12
180 round2: h_ordering 4, 0, 1, 2, 3; data_index 9; roll_shift 15
181 round2: h_ordering 3, 4, 0, 1, 2; data_index 5; roll_shift 9
182 round2: h_ordering 2, 3, 4, 0, 1; data_index 2; roll_shift 11
183 round2: h_ordering 1, 2, 3, 4, 0; data_index 14; roll_shift 7
184 round2: h_ordering 0, 1, 2, 3, 4; data_index 11; roll_shift 13
185 round2: h_ordering 4, 0, 1, 2, 3; data_index 8; roll_shift 12;
186
187 round3: h_ordering 3, 4, 0, 1, 2; data_index 3; roll_shift 11
189 round3: h_ordering 2, 3, 4, 0, 1; data_index 10; roll_shift 13
190 round3: h_ordering 1, 2, 3, 4, 0; data_index 14; roll_shift 6
191 round3: h_ordering 0, 1, 2, 3, 4; data_index 4; roll_shift 7
192 round3: h_ordering 4, 0, 1, 2, 3; data_index 9; roll_shift 14
193 round3: h_ordering 3, 4, 0, 1, 2; data_index 15; roll_shift 9
194 round3: h_ordering 2, 3, 4, 0, 1; data_index 8; roll_shift 13
195 round3: h_ordering 1, 2, 3, 4, 0; data_index 1; roll_shift 15
196 round3: h_ordering 0, 1, 2, 3, 4; data_index 2; roll_shift 14
197 round3: h_ordering 4, 0, 1, 2, 3; data_index 7; roll_shift 8
198 round3: h_ordering 3, 4, 0, 1, 2; data_index 0; roll_shift 13
199 round3: h_ordering 2, 3, 4, 0, 1; data_index 6; roll_shift 6
200 round3: h_ordering 1, 2, 3, 4, 0; data_index 13; roll_shift 5
201 round3: h_ordering 0, 1, 2, 3, 4; data_index 11; roll_shift 12
202 round3: h_ordering 4, 0, 1, 2, 3; data_index 5; roll_shift 7
203 round3: h_ordering 3, 4, 0, 1, 2; data_index 12; roll_shift 5;
204
205 round4: h_ordering 2, 3, 4, 0, 1; data_index 1; roll_shift 11
207 round4: h_ordering 1, 2, 3, 4, 0; data_index 9; roll_shift 12
208 round4: h_ordering 0, 1, 2, 3, 4; data_index 11; roll_shift 14
209 round4: h_ordering 4, 0, 1, 2, 3; data_index 10; roll_shift 15
210 round4: h_ordering 3, 4, 0, 1, 2; data_index 0; roll_shift 14
211 round4: h_ordering 2, 3, 4, 0, 1; data_index 8; roll_shift 15
212 round4: h_ordering 1, 2, 3, 4, 0; data_index 12; roll_shift 9
213 round4: h_ordering 0, 1, 2, 3, 4; data_index 4; roll_shift 8
214 round4: h_ordering 4, 0, 1, 2, 3; data_index 13; roll_shift 9
215 round4: h_ordering 3, 4, 0, 1, 2; data_index 3; roll_shift 14
216 round4: h_ordering 2, 3, 4, 0, 1; data_index 7; roll_shift 5
217 round4: h_ordering 1, 2, 3, 4, 0; data_index 15; roll_shift 6
218 round4: h_ordering 0, 1, 2, 3, 4; data_index 14; roll_shift 8
219 round4: h_ordering 4, 0, 1, 2, 3; data_index 5; roll_shift 6
220 round4: h_ordering 3, 4, 0, 1, 2; data_index 6; roll_shift 5
221 round4: h_ordering 2, 3, 4, 0, 1; data_index 2; roll_shift 12;
222
223 round5: h_ordering 1, 2, 3, 4, 0; data_index 4; roll_shift 9
225 round5: h_ordering 0, 1, 2, 3, 4; data_index 0; roll_shift 15
226 round5: h_ordering 4, 0, 1, 2, 3; data_index 5; roll_shift 5
227 round5: h_ordering 3, 4, 0, 1, 2; data_index 9; roll_shift 11
228 round5: h_ordering 2, 3, 4, 0, 1; data_index 7; roll_shift 6
229 round5: h_ordering 1, 2, 3, 4, 0; data_index 12; roll_shift 8
230 round5: h_ordering 0, 1, 2, 3, 4; data_index 2; roll_shift 13
231 round5: h_ordering 4, 0, 1, 2, 3; data_index 10; roll_shift 12
232 round5: h_ordering 3, 4, 0, 1, 2; data_index 14; roll_shift 5
233 round5: h_ordering 2, 3, 4, 0, 1; data_index 1; roll_shift 12
234 round5: h_ordering 1, 2, 3, 4, 0; data_index 3; roll_shift 13
235 round5: h_ordering 0, 1, 2, 3, 4; data_index 8; roll_shift 14
236 round5: h_ordering 4, 0, 1, 2, 3; data_index 11; roll_shift 11
237 round5: h_ordering 3, 4, 0, 1, 2; data_index 6; roll_shift 8
238 round5: h_ordering 2, 3, 4, 0, 1; data_index 15; roll_shift 5
239 round5: h_ordering 1, 2, 3, 4, 0; data_index 13; roll_shift 6;
240
241 par_round1: h_ordering 0, 1, 2, 3, 4; data_index 5; roll_shift 8
243 par_round1: h_ordering 4, 0, 1, 2, 3; data_index 14; roll_shift 9
244 par_round1: h_ordering 3, 4, 0, 1, 2; data_index 7; roll_shift 9
245 par_round1: h_ordering 2, 3, 4, 0, 1; data_index 0; roll_shift 11
246 par_round1: h_ordering 1, 2, 3, 4, 0; data_index 9; roll_shift 13
247 par_round1: h_ordering 0, 1, 2, 3, 4; data_index 2; roll_shift 15
248 par_round1: h_ordering 4, 0, 1, 2, 3; data_index 11; roll_shift 15
249 par_round1: h_ordering 3, 4, 0, 1, 2; data_index 4; roll_shift 5
250 par_round1: h_ordering 2, 3, 4, 0, 1; data_index 13; roll_shift 7
251 par_round1: h_ordering 1, 2, 3, 4, 0; data_index 6; roll_shift 7
252 par_round1: h_ordering 0, 1, 2, 3, 4; data_index 15; roll_shift 8
253 par_round1: h_ordering 4, 0, 1, 2, 3; data_index 8; roll_shift 11
254 par_round1: h_ordering 3, 4, 0, 1, 2; data_index 1; roll_shift 14
255 par_round1: h_ordering 2, 3, 4, 0, 1; data_index 10; roll_shift 14
256 par_round1: h_ordering 1, 2, 3, 4, 0; data_index 3; roll_shift 12
257 par_round1: h_ordering 0, 1, 2, 3, 4; data_index 12; roll_shift 6;
258
259 par_round2: h_ordering 4, 0, 1, 2, 3; data_index 6; roll_shift 9
261 par_round2: h_ordering 3, 4, 0, 1, 2; data_index 11; roll_shift 13
262 par_round2: h_ordering 2, 3, 4, 0, 1; data_index 3; roll_shift 15
263 par_round2: h_ordering 1, 2, 3, 4, 0; data_index 7; roll_shift 7
264 par_round2: h_ordering 0, 1, 2, 3, 4; data_index 0; roll_shift 12
265 par_round2: h_ordering 4, 0, 1, 2, 3; data_index 13; roll_shift 8
266 par_round2: h_ordering 3, 4, 0, 1, 2; data_index 5; roll_shift 9
267 par_round2: h_ordering 2, 3, 4, 0, 1; data_index 10; roll_shift 11
268 par_round2: h_ordering 1, 2, 3, 4, 0; data_index 14; roll_shift 7
269 par_round2: h_ordering 0, 1, 2, 3, 4; data_index 15; roll_shift 7
270 par_round2: h_ordering 4, 0, 1, 2, 3; data_index 8; roll_shift 12
271 par_round2: h_ordering 3, 4, 0, 1, 2; data_index 12; roll_shift 7
272 par_round2: h_ordering 2, 3, 4, 0, 1; data_index 4; roll_shift 6
273 par_round2: h_ordering 1, 2, 3, 4, 0; data_index 9; roll_shift 15
274 par_round2: h_ordering 0, 1, 2, 3, 4; data_index 1; roll_shift 13
275 par_round2: h_ordering 4, 0, 1, 2, 3; data_index 2; roll_shift 11;
276
277 par_round3: h_ordering 3, 4, 0, 1, 2; data_index 15; roll_shift 9
279 par_round3: h_ordering 2, 3, 4, 0, 1; data_index 5; roll_shift 7
280 par_round3: h_ordering 1, 2, 3, 4, 0; data_index 1; roll_shift 15
281 par_round3: h_ordering 0, 1, 2, 3, 4; data_index 3; roll_shift 11
282 par_round3: h_ordering 4, 0, 1, 2, 3; data_index 7; roll_shift 8
283 par_round3: h_ordering 3, 4, 0, 1, 2; data_index 14; roll_shift 6
284 par_round3: h_ordering 2, 3, 4, 0, 1; data_index 6; roll_shift 6
285 par_round3: h_ordering 1, 2, 3, 4, 0; data_index 9; roll_shift 14
286 par_round3: h_ordering 0, 1, 2, 3, 4; data_index 11; roll_shift 12
287 par_round3: h_ordering 4, 0, 1, 2, 3; data_index 8; roll_shift 13
288 par_round3: h_ordering 3, 4, 0, 1, 2; data_index 12; roll_shift 5
289 par_round3: h_ordering 2, 3, 4, 0, 1; data_index 2; roll_shift 14
290 par_round3: h_ordering 1, 2, 3, 4, 0; data_index 10; roll_shift 13
291 par_round3: h_ordering 0, 1, 2, 3, 4; data_index 0; roll_shift 13
292 par_round3: h_ordering 4, 0, 1, 2, 3; data_index 4; roll_shift 7
293 par_round3: h_ordering 3, 4, 0, 1, 2; data_index 13; roll_shift 5;
294
295 par_round4: h_ordering 2, 3, 4, 0, 1; data_index 8; roll_shift 15
297 par_round4: h_ordering 1, 2, 3, 4, 0; data_index 6; roll_shift 5
298 par_round4: h_ordering 0, 1, 2, 3, 4; data_index 4; roll_shift 8
299 par_round4: h_ordering 4, 0, 1, 2, 3; data_index 1; roll_shift 11
300 par_round4: h_ordering 3, 4, 0, 1, 2; data_index 3; roll_shift 14
301 par_round4: h_ordering 2, 3, 4, 0, 1; data_index 11; roll_shift 14
302 par_round4: h_ordering 1, 2, 3, 4, 0; data_index 15; roll_shift 6
303 par_round4: h_ordering 0, 1, 2, 3, 4; data_index 0; roll_shift 14
304 par_round4: h_ordering 4, 0, 1, 2, 3; data_index 5; roll_shift 6
305 par_round4: h_ordering 3, 4, 0, 1, 2; data_index 12; roll_shift 9
306 par_round4: h_ordering 2, 3, 4, 0, 1; data_index 2; roll_shift 12
307 par_round4: h_ordering 1, 2, 3, 4, 0; data_index 13; roll_shift 9
308 par_round4: h_ordering 0, 1, 2, 3, 4; data_index 9; roll_shift 12
309 par_round4: h_ordering 4, 0, 1, 2, 3; data_index 7; roll_shift 5
310 par_round4: h_ordering 3, 4, 0, 1, 2; data_index 10; roll_shift 15
311 par_round4: h_ordering 2, 3, 4, 0, 1; data_index 14; roll_shift 8;
312
313 par_round5: h_ordering 1, 2, 3, 4, 0; data_index 12; roll_shift 8
315 par_round5: h_ordering 0, 1, 2, 3, 4; data_index 15; roll_shift 5
316 par_round5: h_ordering 4, 0, 1, 2, 3; data_index 10; roll_shift 12
317 par_round5: h_ordering 3, 4, 0, 1, 2; data_index 4; roll_shift 9
318 par_round5: h_ordering 2, 3, 4, 0, 1; data_index 1; roll_shift 12
319 par_round5: h_ordering 1, 2, 3, 4, 0; data_index 5; roll_shift 5
320 par_round5: h_ordering 0, 1, 2, 3, 4; data_index 8; roll_shift 14
321 par_round5: h_ordering 4, 0, 1, 2, 3; data_index 7; roll_shift 6
322 par_round5: h_ordering 3, 4, 0, 1, 2; data_index 6; roll_shift 8
323 par_round5: h_ordering 2, 3, 4, 0, 1; data_index 2; roll_shift 13
324 par_round5: h_ordering 1, 2, 3, 4, 0; data_index 13; roll_shift 6
325 par_round5: h_ordering 0, 1, 2, 3, 4; data_index 14; roll_shift 5
326 par_round5: h_ordering 4, 0, 1, 2, 3; data_index 0; roll_shift 15
327 par_round5: h_ordering 3, 4, 0, 1, 2; data_index 3; roll_shift 13
328 par_round5: h_ordering 2, 3, 4, 0, 1; data_index 9; roll_shift 11
329 par_round5: h_ordering 1, 2, 3, 4, 0; data_index 11; roll_shift 11;
330 );
331}