5 //  Original author:  Steve Reid <sreid@sea-to-sky.net>
10 //  This is free and unencumbered software released into the public domain - June 2013 waterjuice.o…
12 //    - stop symbols being exported for libselinux shared library - October 2015
14 //    - Not cast the workspace from a byte array to a CHAR64LONG16 due to alignment issues.
16 …signed char *') to 'CHAR64LONG16 *' increases required alignment from 1 to 4 [-Werror,-Wcast-align]
19 //    - Silence clang's -Wextra-semi-stmt warning - July 2021, Nicolas Iooss <[email protected]>
45 #define rol(value, bits) (((value) << (bits)) | ((value) >> (32 - (bits))))
48 #define blk0(i) (block->l[i] = (rol(block->l[i],24)&0xFF00FF00) \
49     |(rol(block->l[i],8)&0x00FF00FF))
51 #define blk(i) (block->l[i&15] = rol(block->l[(i+13)&15]^block->l[(i+8)&15] \
52     ^block->l[(i+2)&15]^block->l[i&15],1))
65 //  Hash a single 512-bit block. This is the core of the algorithm
86     // Copy context->state[] to working vars  in TransformFunction()
103     R2(e,a,b,c,d,36); R2(d,e,a,b,c,37); R2(c,d,e,a,b,38); R2(b,c,d,e,a,39);  in TransformFunction()
139     Context->State[0] = 0x67452301;  in Sha1Initialise()
140     Context->State[1] = 0xEFCDAB89;  in Sha1Initialise()
141     Context->State[2] = 0x98BADCFE;  in Sha1Initialise()
142     Context->State[3] = 0x10325476;  in Sha1Initialise()
143     Context->State[4] = 0xC3D2E1F0;  in Sha1Initialise()
144     Context->Count[0] = 0;  in Sha1Initialise()
145     Context->Count[1] = 0;  in Sha1Initialise()
165     j = (Context->Count[0] >> 3) & 63;  in Sha1Update()
166     if ((Context->Count[0] += BufferSize << 3) < (BufferSize << 3))  in Sha1Update()
168         Context->Count[1]++;  in Sha1Update()
171     Context->Count[1] += (BufferSize >> 29);  in Sha1Update()
174         i = 64 - j;  in Sha1Update()
175         memcpy(&Context->Buffer[j], Buffer, i);  in Sha1Update()
176         TransformFunction(Context->State, Context->Buffer);  in Sha1Update()
179             TransformFunction(Context->State, (const uint8_t*)Buffer + i);  in Sha1Update()
188     memcpy(&Context->Buffer[j], &((const uint8_t*)Buffer)[i], BufferSize - i);  in Sha1Update()
209         finalcount[i] = (unsigned char)((Context->Count[(i >= 4 ? 0 : 1)]  in Sha1Finalise()
210          >> ((3-(i & 3)) * 8) ) & 255);  // Endian independent  in Sha1Finalise()
213     while ((Context->Count[0] & 504) != 448)  in Sha1Finalise()
221         Digest->bytes[i] = (uint8_t)((Context->State[i>>2] >> ((3-(i & 3)) * 8) ) & 255);  in Sha1Finalise()