Changeset View
Changeset View
Standalone View
Standalone View
head/contrib/bearssl/src/hash/sha1.c
Property | Old Value | New Value |
---|---|---|
svn:eol-style | null | native \ No newline at end of property |
svn:keywords | null | FreeBSD=%H \ No newline at end of property |
svn:mime-type | null | text/plain \ No newline at end of property |
/* | |||||
* Copyright (c) 2016 Thomas Pornin <pornin@bolet.org> | |||||
* | |||||
* Permission is hereby granted, free of charge, to any person obtaining | |||||
* a copy of this software and associated documentation files (the | |||||
* "Software"), to deal in the Software without restriction, including | |||||
* without limitation the rights to use, copy, modify, merge, publish, | |||||
* distribute, sublicense, and/or sell copies of the Software, and to | |||||
* permit persons to whom the Software is furnished to do so, subject to | |||||
* the following conditions: | |||||
* | |||||
* The above copyright notice and this permission notice shall be | |||||
* included in all copies or substantial portions of the Software. | |||||
* | |||||
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, | |||||
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF | |||||
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND | |||||
* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS | |||||
* BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN | |||||
* ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN | |||||
* CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE | |||||
* SOFTWARE. | |||||
*/ | |||||
#include "inner.h" | |||||
#define F(B, C, D) ((((C) ^ (D)) & (B)) ^ (D)) | |||||
#define G(B, C, D) ((B) ^ (C) ^ (D)) | |||||
#define H(B, C, D) (((D) & (C)) | (((D) | (C)) & (B))) | |||||
#define I(B, C, D) G(B, C, D) | |||||
#define ROTL(x, n) (((x) << (n)) | ((x) >> (32 - (n)))) | |||||
#define K1 ((uint32_t)0x5A827999) | |||||
#define K2 ((uint32_t)0x6ED9EBA1) | |||||
#define K3 ((uint32_t)0x8F1BBCDC) | |||||
#define K4 ((uint32_t)0xCA62C1D6) | |||||
/* see inner.h */ | |||||
const uint32_t br_sha1_IV[5] = { | |||||
0x67452301, 0xEFCDAB89, 0x98BADCFE, 0x10325476, 0xC3D2E1F0 | |||||
}; | |||||
/* see inner.h */ | |||||
void | |||||
br_sha1_round(const unsigned char *buf, uint32_t *val) | |||||
{ | |||||
uint32_t m[80]; | |||||
uint32_t a, b, c, d, e; | |||||
int i; | |||||
a = val[0]; | |||||
b = val[1]; | |||||
c = val[2]; | |||||
d = val[3]; | |||||
e = val[4]; | |||||
br_range_dec32be(m, 16, buf); | |||||
for (i = 16; i < 80; i ++) { | |||||
uint32_t x = m[i - 3] ^ m[i - 8] ^ m[i - 14] ^ m[i - 16]; | |||||
m[i] = ROTL(x, 1); | |||||
} | |||||
for (i = 0; i < 20; i += 5) { | |||||
e += ROTL(a, 5) + F(b, c, d) + K1 + m[i + 0]; b = ROTL(b, 30); | |||||
d += ROTL(e, 5) + F(a, b, c) + K1 + m[i + 1]; a = ROTL(a, 30); | |||||
c += ROTL(d, 5) + F(e, a, b) + K1 + m[i + 2]; e = ROTL(e, 30); | |||||
b += ROTL(c, 5) + F(d, e, a) + K1 + m[i + 3]; d = ROTL(d, 30); | |||||
a += ROTL(b, 5) + F(c, d, e) + K1 + m[i + 4]; c = ROTL(c, 30); | |||||
} | |||||
for (i = 20; i < 40; i += 5) { | |||||
e += ROTL(a, 5) + G(b, c, d) + K2 + m[i + 0]; b = ROTL(b, 30); | |||||
d += ROTL(e, 5) + G(a, b, c) + K2 + m[i + 1]; a = ROTL(a, 30); | |||||
c += ROTL(d, 5) + G(e, a, b) + K2 + m[i + 2]; e = ROTL(e, 30); | |||||
b += ROTL(c, 5) + G(d, e, a) + K2 + m[i + 3]; d = ROTL(d, 30); | |||||
a += ROTL(b, 5) + G(c, d, e) + K2 + m[i + 4]; c = ROTL(c, 30); | |||||
} | |||||
for (i = 40; i < 60; i += 5) { | |||||
e += ROTL(a, 5) + H(b, c, d) + K3 + m[i + 0]; b = ROTL(b, 30); | |||||
d += ROTL(e, 5) + H(a, b, c) + K3 + m[i + 1]; a = ROTL(a, 30); | |||||
c += ROTL(d, 5) + H(e, a, b) + K3 + m[i + 2]; e = ROTL(e, 30); | |||||
b += ROTL(c, 5) + H(d, e, a) + K3 + m[i + 3]; d = ROTL(d, 30); | |||||
a += ROTL(b, 5) + H(c, d, e) + K3 + m[i + 4]; c = ROTL(c, 30); | |||||
} | |||||
for (i = 60; i < 80; i += 5) { | |||||
e += ROTL(a, 5) + I(b, c, d) + K4 + m[i + 0]; b = ROTL(b, 30); | |||||
d += ROTL(e, 5) + I(a, b, c) + K4 + m[i + 1]; a = ROTL(a, 30); | |||||
c += ROTL(d, 5) + I(e, a, b) + K4 + m[i + 2]; e = ROTL(e, 30); | |||||
b += ROTL(c, 5) + I(d, e, a) + K4 + m[i + 3]; d = ROTL(d, 30); | |||||
a += ROTL(b, 5) + I(c, d, e) + K4 + m[i + 4]; c = ROTL(c, 30); | |||||
} | |||||
val[0] += a; | |||||
val[1] += b; | |||||
val[2] += c; | |||||
val[3] += d; | |||||
val[4] += e; | |||||
} | |||||
/* see bearssl.h */ | |||||
void | |||||
br_sha1_init(br_sha1_context *cc) | |||||
{ | |||||
cc->vtable = &br_sha1_vtable; | |||||
memcpy(cc->val, br_sha1_IV, sizeof cc->val); | |||||
cc->count = 0; | |||||
} | |||||
/* see bearssl.h */ | |||||
void | |||||
br_sha1_update(br_sha1_context *cc, const void *data, size_t len) | |||||
{ | |||||
const unsigned char *buf; | |||||
size_t ptr; | |||||
buf = data; | |||||
ptr = (size_t)cc->count & 63; | |||||
while (len > 0) { | |||||
size_t clen; | |||||
clen = 64 - ptr; | |||||
if (clen > len) { | |||||
clen = len; | |||||
} | |||||
memcpy(cc->buf + ptr, buf, clen); | |||||
ptr += clen; | |||||
buf += clen; | |||||
len -= clen; | |||||
cc->count += (uint64_t)clen; | |||||
if (ptr == 64) { | |||||
br_sha1_round(cc->buf, cc->val); | |||||
ptr = 0; | |||||
} | |||||
} | |||||
} | |||||
/* see bearssl.h */ | |||||
void | |||||
br_sha1_out(const br_sha1_context *cc, void *dst) | |||||
{ | |||||
unsigned char buf[64]; | |||||
uint32_t val[5]; | |||||
size_t ptr; | |||||
ptr = (size_t)cc->count & 63; | |||||
memcpy(buf, cc->buf, ptr); | |||||
memcpy(val, cc->val, sizeof val); | |||||
buf[ptr ++] = 0x80; | |||||
if (ptr > 56) { | |||||
memset(buf + ptr, 0, 64 - ptr); | |||||
br_sha1_round(buf, val); | |||||
memset(buf, 0, 56); | |||||
} else { | |||||
memset(buf + ptr, 0, 56 - ptr); | |||||
} | |||||
br_enc64be(buf + 56, cc->count << 3); | |||||
br_sha1_round(buf, val); | |||||
br_range_enc32be(dst, val, 5); | |||||
} | |||||
/* see bearssl.h */ | |||||
uint64_t | |||||
br_sha1_state(const br_sha1_context *cc, void *dst) | |||||
{ | |||||
br_range_enc32be(dst, cc->val, 5); | |||||
return cc->count; | |||||
} | |||||
/* see bearssl.h */ | |||||
void | |||||
br_sha1_set_state(br_sha1_context *cc, const void *stb, uint64_t count) | |||||
{ | |||||
br_range_dec32be(cc->val, 5, stb); | |||||
cc->count = count; | |||||
} | |||||
/* see bearssl.h */ | |||||
const br_hash_class br_sha1_vtable = { | |||||
sizeof(br_sha1_context), | |||||
BR_HASHDESC_ID(br_sha1_ID) | |||||
| BR_HASHDESC_OUT(20) | |||||
| BR_HASHDESC_STATE(20) | |||||
| BR_HASHDESC_LBLEN(6) | |||||
| BR_HASHDESC_MD_PADDING | |||||
| BR_HASHDESC_MD_PADDING_BE, | |||||
(void (*)(const br_hash_class **))&br_sha1_init, | |||||
(void (*)(const br_hash_class **, const void *, size_t))&br_sha1_update, | |||||
(void (*)(const br_hash_class *const *, void *))&br_sha1_out, | |||||
(uint64_t (*)(const br_hash_class *const *, void *))&br_sha1_state, | |||||
(void (*)(const br_hash_class **, const void *, uint64_t)) | |||||
&br_sha1_set_state | |||||
}; |