1
// Copyright (c) 2018-2019 The Bitcoin Core developers
2
// Distributed under the MIT software license, see the accompanying
3
// file COPYING or http://www.opensource.org/licenses/mit-license.php.
4

            
5
#ifdef ENABLE_SSE41
6

            
7
#include <stdint.h>
8
#include <immintrin.h>
9

            
10
#include <crypto/common.h>
11

            
12
namespace sha256d64_sse41 {
13
namespace {
14

            
15
__m128i inline K(uint32_t x) { return _mm_set1_epi32(x); }
16

            
17
__m128i inline Add(__m128i x, __m128i y) { return _mm_add_epi32(x, y); }
18
__m128i inline Add(__m128i x, __m128i y, __m128i z) { return Add(Add(x, y), z); }
19
__m128i inline Add(__m128i x, __m128i y, __m128i z, __m128i w) { return Add(Add(x, y), Add(z, w)); }
20
__m128i inline Add(__m128i x, __m128i y, __m128i z, __m128i w, __m128i v) { return Add(Add(x, y, z), Add(w, v)); }
21
__m128i inline Inc(__m128i& x, __m128i y) { x = Add(x, y); return x; }
22
__m128i inline Inc(__m128i& x, __m128i y, __m128i z) { x = Add(x, y, z); return x; }
23
__m128i inline Inc(__m128i& x, __m128i y, __m128i z, __m128i w) { x = Add(x, y, z, w); return x; }
24
__m128i inline Xor(__m128i x, __m128i y) { return _mm_xor_si128(x, y); }
25
__m128i inline Xor(__m128i x, __m128i y, __m128i z) { return Xor(Xor(x, y), z); }
26
__m128i inline Or(__m128i x, __m128i y) { return _mm_or_si128(x, y); }
27
__m128i inline And(__m128i x, __m128i y) { return _mm_and_si128(x, y); }
28
__m128i inline ShR(__m128i x, int n) { return _mm_srli_epi32(x, n); }
29
__m128i inline ShL(__m128i x, int n) { return _mm_slli_epi32(x, n); }
30

            
31
__m128i inline Ch(__m128i x, __m128i y, __m128i z) { return Xor(z, And(x, Xor(y, z))); }
32
__m128i inline Maj(__m128i x, __m128i y, __m128i z) { return Or(And(x, y), And(z, Or(x, y))); }
33
__m128i inline Sigma0(__m128i x) { return Xor(Or(ShR(x, 2), ShL(x, 30)), Or(ShR(x, 13), ShL(x, 19)), Or(ShR(x, 22), ShL(x, 10))); }
34
__m128i inline Sigma1(__m128i x) { return Xor(Or(ShR(x, 6), ShL(x, 26)), Or(ShR(x, 11), ShL(x, 21)), Or(ShR(x, 25), ShL(x, 7))); }
35
__m128i inline sigma0(__m128i x) { return Xor(Or(ShR(x, 7), ShL(x, 25)), Or(ShR(x, 18), ShL(x, 14)), ShR(x, 3)); }
36
__m128i inline sigma1(__m128i x) { return Xor(Or(ShR(x, 17), ShL(x, 15)), Or(ShR(x, 19), ShL(x, 13)), ShR(x, 10)); }
37

            
38
/** One round of SHA-256. */
39
void inline __attribute__((always_inline)) Round(__m128i a, __m128i b, __m128i c, __m128i& d, __m128i e, __m128i f, __m128i g, __m128i& h, __m128i k)
40
{
41
    __m128i t1 = Add(h, Sigma1(e), Ch(e, f, g), k);
42
    __m128i t2 = Add(Sigma0(a), Maj(a, b, c));
43
    d = Add(d, t1);
44
    h = Add(t1, t2);
45
}
46

            
47
__m128i inline Read4(const unsigned char* chunk, int offset) {
48
    __m128i ret = _mm_set_epi32(
49
        ReadLE32(chunk + 0 + offset),
50
        ReadLE32(chunk + 64 + offset),
51
        ReadLE32(chunk + 128 + offset),
52
        ReadLE32(chunk + 192 + offset)
53
    );
54
    return _mm_shuffle_epi8(ret, _mm_set_epi32(0x0C0D0E0FUL, 0x08090A0BUL, 0x04050607UL, 0x00010203UL));
55
}
56

            
57
void inline Write4(unsigned char* out, int offset, __m128i v) {
58
    v = _mm_shuffle_epi8(v, _mm_set_epi32(0x0C0D0E0FUL, 0x08090A0BUL, 0x04050607UL, 0x00010203UL));
59
    WriteLE32(out + 0 + offset, _mm_extract_epi32(v, 3));
60
    WriteLE32(out + 32 + offset, _mm_extract_epi32(v, 2));
61
    WriteLE32(out + 64 + offset, _mm_extract_epi32(v, 1));
62
    WriteLE32(out + 96 + offset, _mm_extract_epi32(v, 0));
63
}
64

            
65
}
66

            
67
void Transform_4way(unsigned char* out, const unsigned char* in)
68
{
69
    // Transform 1
70
    __m128i a = K(0x6a09e667ul);
71
    __m128i b = K(0xbb67ae85ul);
72
    __m128i c = K(0x3c6ef372ul);
73
    __m128i d = K(0xa54ff53aul);
74
    __m128i e = K(0x510e527ful);
75
    __m128i f = K(0x9b05688cul);
76
    __m128i g = K(0x1f83d9abul);
77
    __m128i h = K(0x5be0cd19ul);
78

            
79
    __m128i w0, w1, w2, w3, w4, w5, w6, w7, w8, w9, w10, w11, w12, w13, w14, w15;
80

            
81
    Round(a, b, c, d, e, f, g, h, Add(K(0x428a2f98ul), w0 = Read4(in, 0)));
82
    Round(h, a, b, c, d, e, f, g, Add(K(0x71374491ul), w1 = Read4(in, 4)));
83
    Round(g, h, a, b, c, d, e, f, Add(K(0xb5c0fbcful), w2 = Read4(in, 8)));
84
    Round(f, g, h, a, b, c, d, e, Add(K(0xe9b5dba5ul), w3 = Read4(in, 12)));
85
    Round(e, f, g, h, a, b, c, d, Add(K(0x3956c25bul), w4 = Read4(in, 16)));
86
    Round(d, e, f, g, h, a, b, c, Add(K(0x59f111f1ul), w5 = Read4(in, 20)));
87
    Round(c, d, e, f, g, h, a, b, Add(K(0x923f82a4ul), w6 = Read4(in, 24)));
88
    Round(b, c, d, e, f, g, h, a, Add(K(0xab1c5ed5ul), w7 = Read4(in, 28)));
89
    Round(a, b, c, d, e, f, g, h, Add(K(0xd807aa98ul), w8 = Read4(in, 32)));
90
    Round(h, a, b, c, d, e, f, g, Add(K(0x12835b01ul), w9 = Read4(in, 36)));
91
    Round(g, h, a, b, c, d, e, f, Add(K(0x243185beul), w10 = Read4(in, 40)));
92
    Round(f, g, h, a, b, c, d, e, Add(K(0x550c7dc3ul), w11 = Read4(in, 44)));
93
    Round(e, f, g, h, a, b, c, d, Add(K(0x72be5d74ul), w12 = Read4(in, 48)));
94
    Round(d, e, f, g, h, a, b, c, Add(K(0x80deb1feul), w13 = Read4(in, 52)));
95
    Round(c, d, e, f, g, h, a, b, Add(K(0x9bdc06a7ul), w14 = Read4(in, 56)));
96
    Round(b, c, d, e, f, g, h, a, Add(K(0xc19bf174ul), w15 = Read4(in, 60)));
97
    Round(a, b, c, d, e, f, g, h, Add(K(0xe49b69c1ul), Inc(w0, sigma1(w14), w9, sigma0(w1))));
98
    Round(h, a, b, c, d, e, f, g, Add(K(0xefbe4786ul), Inc(w1, sigma1(w15), w10, sigma0(w2))));
99
    Round(g, h, a, b, c, d, e, f, Add(K(0x0fc19dc6ul), Inc(w2, sigma1(w0), w11, sigma0(w3))));
100
    Round(f, g, h, a, b, c, d, e, Add(K(0x240ca1ccul), Inc(w3, sigma1(w1), w12, sigma0(w4))));
101
    Round(e, f, g, h, a, b, c, d, Add(K(0x2de92c6ful), Inc(w4, sigma1(w2), w13, sigma0(w5))));
102
    Round(d, e, f, g, h, a, b, c, Add(K(0x4a7484aaul), Inc(w5, sigma1(w3), w14, sigma0(w6))));
103
    Round(c, d, e, f, g, h, a, b, Add(K(0x5cb0a9dcul), Inc(w6, sigma1(w4), w15, sigma0(w7))));
104
    Round(b, c, d, e, f, g, h, a, Add(K(0x76f988daul), Inc(w7, sigma1(w5), w0, sigma0(w8))));
105
    Round(a, b, c, d, e, f, g, h, Add(K(0x983e5152ul), Inc(w8, sigma1(w6), w1, sigma0(w9))));
106
    Round(h, a, b, c, d, e, f, g, Add(K(0xa831c66dul), Inc(w9, sigma1(w7), w2, sigma0(w10))));
107
    Round(g, h, a, b, c, d, e, f, Add(K(0xb00327c8ul), Inc(w10, sigma1(w8), w3, sigma0(w11))));
108
    Round(f, g, h, a, b, c, d, e, Add(K(0xbf597fc7ul), Inc(w11, sigma1(w9), w4, sigma0(w12))));
109
    Round(e, f, g, h, a, b, c, d, Add(K(0xc6e00bf3ul), Inc(w12, sigma1(w10), w5, sigma0(w13))));
110
    Round(d, e, f, g, h, a, b, c, Add(K(0xd5a79147ul), Inc(w13, sigma1(w11), w6, sigma0(w14))));
111
    Round(c, d, e, f, g, h, a, b, Add(K(0x06ca6351ul), Inc(w14, sigma1(w12), w7, sigma0(w15))));
112
    Round(b, c, d, e, f, g, h, a, Add(K(0x14292967ul), Inc(w15, sigma1(w13), w8, sigma0(w0))));
113
    Round(a, b, c, d, e, f, g, h, Add(K(0x27b70a85ul), Inc(w0, sigma1(w14), w9, sigma0(w1))));
114
    Round(h, a, b, c, d, e, f, g, Add(K(0x2e1b2138ul), Inc(w1, sigma1(w15), w10, sigma0(w2))));
115
    Round(g, h, a, b, c, d, e, f, Add(K(0x4d2c6dfcul), Inc(w2, sigma1(w0), w11, sigma0(w3))));
116
    Round(f, g, h, a, b, c, d, e, Add(K(0x53380d13ul), Inc(w3, sigma1(w1), w12, sigma0(w4))));
117
    Round(e, f, g, h, a, b, c, d, Add(K(0x650a7354ul), Inc(w4, sigma1(w2), w13, sigma0(w5))));
118
    Round(d, e, f, g, h, a, b, c, Add(K(0x766a0abbul), Inc(w5, sigma1(w3), w14, sigma0(w6))));
119
    Round(c, d, e, f, g, h, a, b, Add(K(0x81c2c92eul), Inc(w6, sigma1(w4), w15, sigma0(w7))));
120
    Round(b, c, d, e, f, g, h, a, Add(K(0x92722c85ul), Inc(w7, sigma1(w5), w0, sigma0(w8))));
121
    Round(a, b, c, d, e, f, g, h, Add(K(0xa2bfe8a1ul), Inc(w8, sigma1(w6), w1, sigma0(w9))));
122
    Round(h, a, b, c, d, e, f, g, Add(K(0xa81a664bul), Inc(w9, sigma1(w7), w2, sigma0(w10))));
123
    Round(g, h, a, b, c, d, e, f, Add(K(0xc24b8b70ul), Inc(w10, sigma1(w8), w3, sigma0(w11))));
124
    Round(f, g, h, a, b, c, d, e, Add(K(0xc76c51a3ul), Inc(w11, sigma1(w9), w4, sigma0(w12))));
125
    Round(e, f, g, h, a, b, c, d, Add(K(0xd192e819ul), Inc(w12, sigma1(w10), w5, sigma0(w13))));
126
    Round(d, e, f, g, h, a, b, c, Add(K(0xd6990624ul), Inc(w13, sigma1(w11), w6, sigma0(w14))));
127
    Round(c, d, e, f, g, h, a, b, Add(K(0xf40e3585ul), Inc(w14, sigma1(w12), w7, sigma0(w15))));
128
    Round(b, c, d, e, f, g, h, a, Add(K(0x106aa070ul), Inc(w15, sigma1(w13), w8, sigma0(w0))));
129
    Round(a, b, c, d, e, f, g, h, Add(K(0x19a4c116ul), Inc(w0, sigma1(w14), w9, sigma0(w1))));
130
    Round(h, a, b, c, d, e, f, g, Add(K(0x1e376c08ul), Inc(w1, sigma1(w15), w10, sigma0(w2))));
131
    Round(g, h, a, b, c, d, e, f, Add(K(0x2748774cul), Inc(w2, sigma1(w0), w11, sigma0(w3))));
132
    Round(f, g, h, a, b, c, d, e, Add(K(0x34b0bcb5ul), Inc(w3, sigma1(w1), w12, sigma0(w4))));
133
    Round(e, f, g, h, a, b, c, d, Add(K(0x391c0cb3ul), Inc(w4, sigma1(w2), w13, sigma0(w5))));
134
    Round(d, e, f, g, h, a, b, c, Add(K(0x4ed8aa4aul), Inc(w5, sigma1(w3), w14, sigma0(w6))));
135
    Round(c, d, e, f, g, h, a, b, Add(K(0x5b9cca4ful), Inc(w6, sigma1(w4), w15, sigma0(w7))));
136
    Round(b, c, d, e, f, g, h, a, Add(K(0x682e6ff3ul), Inc(w7, sigma1(w5), w0, sigma0(w8))));
137
    Round(a, b, c, d, e, f, g, h, Add(K(0x748f82eeul), Inc(w8, sigma1(w6), w1, sigma0(w9))));
138
    Round(h, a, b, c, d, e, f, g, Add(K(0x78a5636ful), Inc(w9, sigma1(w7), w2, sigma0(w10))));
139
    Round(g, h, a, b, c, d, e, f, Add(K(0x84c87814ul), Inc(w10, sigma1(w8), w3, sigma0(w11))));
140
    Round(f, g, h, a, b, c, d, e, Add(K(0x8cc70208ul), Inc(w11, sigma1(w9), w4, sigma0(w12))));
141
    Round(e, f, g, h, a, b, c, d, Add(K(0x90befffaul), Inc(w12, sigma1(w10), w5, sigma0(w13))));
142
    Round(d, e, f, g, h, a, b, c, Add(K(0xa4506cebul), Inc(w13, sigma1(w11), w6, sigma0(w14))));
143
    Round(c, d, e, f, g, h, a, b, Add(K(0xbef9a3f7ul), Inc(w14, sigma1(w12), w7, sigma0(w15))));
144
    Round(b, c, d, e, f, g, h, a, Add(K(0xc67178f2ul), Inc(w15, sigma1(w13), w8, sigma0(w0))));
145

            
146
    a = Add(a, K(0x6a09e667ul));
147
    b = Add(b, K(0xbb67ae85ul));
148
    c = Add(c, K(0x3c6ef372ul));
149
    d = Add(d, K(0xa54ff53aul));
150
    e = Add(e, K(0x510e527ful));
151
    f = Add(f, K(0x9b05688cul));
152
    g = Add(g, K(0x1f83d9abul));
153
    h = Add(h, K(0x5be0cd19ul));
154

            
155
    __m128i t0 = a, t1 = b, t2 = c, t3 = d, t4 = e, t5 = f, t6 = g, t7 = h;
156

            
157
    // Transform 2
158
    Round(a, b, c, d, e, f, g, h, K(0xc28a2f98ul));
159
    Round(h, a, b, c, d, e, f, g, K(0x71374491ul));
160
    Round(g, h, a, b, c, d, e, f, K(0xb5c0fbcful));
161
    Round(f, g, h, a, b, c, d, e, K(0xe9b5dba5ul));
162
    Round(e, f, g, h, a, b, c, d, K(0x3956c25bul));
163
    Round(d, e, f, g, h, a, b, c, K(0x59f111f1ul));
164
    Round(c, d, e, f, g, h, a, b, K(0x923f82a4ul));
165
    Round(b, c, d, e, f, g, h, a, K(0xab1c5ed5ul));
166
    Round(a, b, c, d, e, f, g, h, K(0xd807aa98ul));
167
    Round(h, a, b, c, d, e, f, g, K(0x12835b01ul));
168
    Round(g, h, a, b, c, d, e, f, K(0x243185beul));
169
    Round(f, g, h, a, b, c, d, e, K(0x550c7dc3ul));
170
    Round(e, f, g, h, a, b, c, d, K(0x72be5d74ul));
171
    Round(d, e, f, g, h, a, b, c, K(0x80deb1feul));
172
    Round(c, d, e, f, g, h, a, b, K(0x9bdc06a7ul));
173
    Round(b, c, d, e, f, g, h, a, K(0xc19bf374ul));
174
    Round(a, b, c, d, e, f, g, h, K(0x649b69c1ul));
175
    Round(h, a, b, c, d, e, f, g, K(0xf0fe4786ul));
176
    Round(g, h, a, b, c, d, e, f, K(0x0fe1edc6ul));
177
    Round(f, g, h, a, b, c, d, e, K(0x240cf254ul));
178
    Round(e, f, g, h, a, b, c, d, K(0x4fe9346ful));
179
    Round(d, e, f, g, h, a, b, c, K(0x6cc984beul));
180
    Round(c, d, e, f, g, h, a, b, K(0x61b9411eul));
181
    Round(b, c, d, e, f, g, h, a, K(0x16f988faul));
182
    Round(a, b, c, d, e, f, g, h, K(0xf2c65152ul));
183
    Round(h, a, b, c, d, e, f, g, K(0xa88e5a6dul));
184
    Round(g, h, a, b, c, d, e, f, K(0xb019fc65ul));
185
    Round(f, g, h, a, b, c, d, e, K(0xb9d99ec7ul));
186
    Round(e, f, g, h, a, b, c, d, K(0x9a1231c3ul));
187
    Round(d, e, f, g, h, a, b, c, K(0xe70eeaa0ul));
188
    Round(c, d, e, f, g, h, a, b, K(0xfdb1232bul));
189
    Round(b, c, d, e, f, g, h, a, K(0xc7353eb0ul));
190
    Round(a, b, c, d, e, f, g, h, K(0x3069bad5ul));
191
    Round(h, a, b, c, d, e, f, g, K(0xcb976d5ful));
192
    Round(g, h, a, b, c, d, e, f, K(0x5a0f118ful));
193
    Round(f, g, h, a, b, c, d, e, K(0xdc1eeefdul));
194
    Round(e, f, g, h, a, b, c, d, K(0x0a35b689ul));
195
    Round(d, e, f, g, h, a, b, c, K(0xde0b7a04ul));
196
    Round(c, d, e, f, g, h, a, b, K(0x58f4ca9dul));
197
    Round(b, c, d, e, f, g, h, a, K(0xe15d5b16ul));
198
    Round(a, b, c, d, e, f, g, h, K(0x007f3e86ul));
199
    Round(h, a, b, c, d, e, f, g, K(0x37088980ul));
200
    Round(g, h, a, b, c, d, e, f, K(0xa507ea32ul));
201
    Round(f, g, h, a, b, c, d, e, K(0x6fab9537ul));
202
    Round(e, f, g, h, a, b, c, d, K(0x17406110ul));
203
    Round(d, e, f, g, h, a, b, c, K(0x0d8cd6f1ul));
204
    Round(c, d, e, f, g, h, a, b, K(0xcdaa3b6dul));
205
    Round(b, c, d, e, f, g, h, a, K(0xc0bbbe37ul));
206
    Round(a, b, c, d, e, f, g, h, K(0x83613bdaul));
207
    Round(h, a, b, c, d, e, f, g, K(0xdb48a363ul));
208
    Round(g, h, a, b, c, d, e, f, K(0x0b02e931ul));
209
    Round(f, g, h, a, b, c, d, e, K(0x6fd15ca7ul));
210
    Round(e, f, g, h, a, b, c, d, K(0x521afacaul));
211
    Round(d, e, f, g, h, a, b, c, K(0x31338431ul));
212
    Round(c, d, e, f, g, h, a, b, K(0x6ed41a95ul));
213
    Round(b, c, d, e, f, g, h, a, K(0x6d437890ul));
214
    Round(a, b, c, d, e, f, g, h, K(0xc39c91f2ul));
215
    Round(h, a, b, c, d, e, f, g, K(0x9eccabbdul));
216
    Round(g, h, a, b, c, d, e, f, K(0xb5c9a0e6ul));
217
    Round(f, g, h, a, b, c, d, e, K(0x532fb63cul));
218
    Round(e, f, g, h, a, b, c, d, K(0xd2c741c6ul));
219
    Round(d, e, f, g, h, a, b, c, K(0x07237ea3ul));
220
    Round(c, d, e, f, g, h, a, b, K(0xa4954b68ul));
221
    Round(b, c, d, e, f, g, h, a, K(0x4c191d76ul));
222

            
223
    w0 = Add(t0, a);
224
    w1 = Add(t1, b);
225
    w2 = Add(t2, c);
226
    w3 = Add(t3, d);
227
    w4 = Add(t4, e);
228
    w5 = Add(t5, f);
229
    w6 = Add(t6, g);
230
    w7 = Add(t7, h);
231

            
232
    // Transform 3
233
    a = K(0x6a09e667ul);
234
    b = K(0xbb67ae85ul);
235
    c = K(0x3c6ef372ul);
236
    d = K(0xa54ff53aul);
237
    e = K(0x510e527ful);
238
    f = K(0x9b05688cul);
239
    g = K(0x1f83d9abul);
240
    h = K(0x5be0cd19ul);
241

            
242
    Round(a, b, c, d, e, f, g, h, Add(K(0x428a2f98ul), w0));
243
    Round(h, a, b, c, d, e, f, g, Add(K(0x71374491ul), w1));
244
    Round(g, h, a, b, c, d, e, f, Add(K(0xb5c0fbcful), w2));
245
    Round(f, g, h, a, b, c, d, e, Add(K(0xe9b5dba5ul), w3));
246
    Round(e, f, g, h, a, b, c, d, Add(K(0x3956c25bul), w4));
247
    Round(d, e, f, g, h, a, b, c, Add(K(0x59f111f1ul), w5));
248
    Round(c, d, e, f, g, h, a, b, Add(K(0x923f82a4ul), w6));
249
    Round(b, c, d, e, f, g, h, a, Add(K(0xab1c5ed5ul), w7));
250
    Round(a, b, c, d, e, f, g, h, K(0x5807aa98ul));
251
    Round(h, a, b, c, d, e, f, g, K(0x12835b01ul));
252
    Round(g, h, a, b, c, d, e, f, K(0x243185beul));
253
    Round(f, g, h, a, b, c, d, e, K(0x550c7dc3ul));
254
    Round(e, f, g, h, a, b, c, d, K(0x72be5d74ul));
255
    Round(d, e, f, g, h, a, b, c, K(0x80deb1feul));
256
    Round(c, d, e, f, g, h, a, b, K(0x9bdc06a7ul));
257
    Round(b, c, d, e, f, g, h, a, K(0xc19bf274ul));
258
    Round(a, b, c, d, e, f, g, h, Add(K(0xe49b69c1ul), Inc(w0, sigma0(w1))));
259
    Round(h, a, b, c, d, e, f, g, Add(K(0xefbe4786ul), Inc(w1, K(0xa00000ul), sigma0(w2))));
260
    Round(g, h, a, b, c, d, e, f, Add(K(0x0fc19dc6ul), Inc(w2, sigma1(w0), sigma0(w3))));
261
    Round(f, g, h, a, b, c, d, e, Add(K(0x240ca1ccul), Inc(w3, sigma1(w1), sigma0(w4))));
262
    Round(e, f, g, h, a, b, c, d, Add(K(0x2de92c6ful), Inc(w4, sigma1(w2), sigma0(w5))));
263
    Round(d, e, f, g, h, a, b, c, Add(K(0x4a7484aaul), Inc(w5, sigma1(w3), sigma0(w6))));
264
    Round(c, d, e, f, g, h, a, b, Add(K(0x5cb0a9dcul), Inc(w6, sigma1(w4), K(0x100ul), sigma0(w7))));
265
    Round(b, c, d, e, f, g, h, a, Add(K(0x76f988daul), Inc(w7, sigma1(w5), w0, K(0x11002000ul))));
266
    Round(a, b, c, d, e, f, g, h, Add(K(0x983e5152ul), w8 = Add(K(0x80000000ul), sigma1(w6), w1)));
267
    Round(h, a, b, c, d, e, f, g, Add(K(0xa831c66dul), w9 = Add(sigma1(w7), w2)));
268
    Round(g, h, a, b, c, d, e, f, Add(K(0xb00327c8ul), w10 = Add(sigma1(w8), w3)));
269
    Round(f, g, h, a, b, c, d, e, Add(K(0xbf597fc7ul), w11 = Add(sigma1(w9), w4)));
270
    Round(e, f, g, h, a, b, c, d, Add(K(0xc6e00bf3ul), w12 = Add(sigma1(w10), w5)));
271
    Round(d, e, f, g, h, a, b, c, Add(K(0xd5a79147ul), w13 = Add(sigma1(w11), w6)));
272
    Round(c, d, e, f, g, h, a, b, Add(K(0x06ca6351ul), w14 = Add(sigma1(w12), w7, K(0x400022ul))));
273
    Round(b, c, d, e, f, g, h, a, Add(K(0x14292967ul), w15 = Add(K(0x100ul), sigma1(w13), w8, sigma0(w0))));
274
    Round(a, b, c, d, e, f, g, h, Add(K(0x27b70a85ul), Inc(w0, sigma1(w14), w9, sigma0(w1))));
275
    Round(h, a, b, c, d, e, f, g, Add(K(0x2e1b2138ul), Inc(w1, sigma1(w15), w10, sigma0(w2))));
276
    Round(g, h, a, b, c, d, e, f, Add(K(0x4d2c6dfcul), Inc(w2, sigma1(w0), w11, sigma0(w3))));
277
    Round(f, g, h, a, b, c, d, e, Add(K(0x53380d13ul), Inc(w3, sigma1(w1), w12, sigma0(w4))));
278
    Round(e, f, g, h, a, b, c, d, Add(K(0x650a7354ul), Inc(w4, sigma1(w2), w13, sigma0(w5))));
279
    Round(d, e, f, g, h, a, b, c, Add(K(0x766a0abbul), Inc(w5, sigma1(w3), w14, sigma0(w6))));
280
    Round(c, d, e, f, g, h, a, b, Add(K(0x81c2c92eul), Inc(w6, sigma1(w4), w15, sigma0(w7))));
281
    Round(b, c, d, e, f, g, h, a, Add(K(0x92722c85ul), Inc(w7, sigma1(w5), w0, sigma0(w8))));
282
    Round(a, b, c, d, e, f, g, h, Add(K(0xa2bfe8a1ul), Inc(w8, sigma1(w6), w1, sigma0(w9))));
283
    Round(h, a, b, c, d, e, f, g, Add(K(0xa81a664bul), Inc(w9, sigma1(w7), w2, sigma0(w10))));
284
    Round(g, h, a, b, c, d, e, f, Add(K(0xc24b8b70ul), Inc(w10, sigma1(w8), w3, sigma0(w11))));
285
    Round(f, g, h, a, b, c, d, e, Add(K(0xc76c51a3ul), Inc(w11, sigma1(w9), w4, sigma0(w12))));
286
    Round(e, f, g, h, a, b, c, d, Add(K(0xd192e819ul), Inc(w12, sigma1(w10), w5, sigma0(w13))));
287
    Round(d, e, f, g, h, a, b, c, Add(K(0xd6990624ul), Inc(w13, sigma1(w11), w6, sigma0(w14))));
288
    Round(c, d, e, f, g, h, a, b, Add(K(0xf40e3585ul), Inc(w14, sigma1(w12), w7, sigma0(w15))));
289
    Round(b, c, d, e, f, g, h, a, Add(K(0x106aa070ul), Inc(w15, sigma1(w13), w8, sigma0(w0))));
290
    Round(a, b, c, d, e, f, g, h, Add(K(0x19a4c116ul), Inc(w0, sigma1(w14), w9, sigma0(w1))));
291
    Round(h, a, b, c, d, e, f, g, Add(K(0x1e376c08ul), Inc(w1, sigma1(w15), w10, sigma0(w2))));
292
    Round(g, h, a, b, c, d, e, f, Add(K(0x2748774cul), Inc(w2, sigma1(w0), w11, sigma0(w3))));
293
    Round(f, g, h, a, b, c, d, e, Add(K(0x34b0bcb5ul), Inc(w3, sigma1(w1), w12, sigma0(w4))));
294
    Round(e, f, g, h, a, b, c, d, Add(K(0x391c0cb3ul), Inc(w4, sigma1(w2), w13, sigma0(w5))));
295
    Round(d, e, f, g, h, a, b, c, Add(K(0x4ed8aa4aul), Inc(w5, sigma1(w3), w14, sigma0(w6))));
296
    Round(c, d, e, f, g, h, a, b, Add(K(0x5b9cca4ful), Inc(w6, sigma1(w4), w15, sigma0(w7))));
297
    Round(b, c, d, e, f, g, h, a, Add(K(0x682e6ff3ul), Inc(w7, sigma1(w5), w0, sigma0(w8))));
298
    Round(a, b, c, d, e, f, g, h, Add(K(0x748f82eeul), Inc(w8, sigma1(w6), w1, sigma0(w9))));
299
    Round(h, a, b, c, d, e, f, g, Add(K(0x78a5636ful), Inc(w9, sigma1(w7), w2, sigma0(w10))));
300
    Round(g, h, a, b, c, d, e, f, Add(K(0x84c87814ul), Inc(w10, sigma1(w8), w3, sigma0(w11))));
301
    Round(f, g, h, a, b, c, d, e, Add(K(0x8cc70208ul), Inc(w11, sigma1(w9), w4, sigma0(w12))));
302
    Round(e, f, g, h, a, b, c, d, Add(K(0x90befffaul), Inc(w12, sigma1(w10), w5, sigma0(w13))));
303
    Round(d, e, f, g, h, a, b, c, Add(K(0xa4506cebul), Inc(w13, sigma1(w11), w6, sigma0(w14))));
304
    Round(c, d, e, f, g, h, a, b, Add(K(0xbef9a3f7ul), w14, sigma1(w12), w7, sigma0(w15)));
305
    Round(b, c, d, e, f, g, h, a, Add(K(0xc67178f2ul), w15, sigma1(w13), w8, sigma0(w0)));
306

            
307
    // Output
308
    Write4(out, 0, Add(a, K(0x6a09e667ul)));
309
    Write4(out, 4, Add(b, K(0xbb67ae85ul)));
310
    Write4(out, 8, Add(c, K(0x3c6ef372ul)));
311
    Write4(out, 12, Add(d, K(0xa54ff53aul)));
312
    Write4(out, 16, Add(e, K(0x510e527ful)));
313
    Write4(out, 20, Add(f, K(0x9b05688cul)));
314
    Write4(out, 24, Add(g, K(0x1f83d9abul)));
315
    Write4(out, 28, Add(h, K(0x5be0cd19ul)));
316
}
317

            
318
}
319

            
320
#endif