old-nall/hash/sha256.hpp
2016-07-03 13:35:22 +02:00

121 lines
3.8 KiB
C++

#pragma once
#include <nall/range.hpp>
#include <nall/string.hpp>
namespace nall { namespace Hash {
struct SHA256 {
SHA256() { reset(); }
SHA256(const void* values, uint size) : SHA256() { data(values, size); }
SHA256(const vector<uint8_t>& values) : SHA256() { data(values); }
SHA256(const string& values) : SHA256() { data(values); }
auto reset() -> void {
for(auto n : input) n = 0;
for(auto n : w) n = 0;
for(auto n : range(8)) h[n] = square(n);
queued = length = 0;
}
auto data(uint8_t value) -> void {
byte(value);
length++;
}
auto data(const void* values, uint size) -> void {
length += size;
auto p = (const uint8_t*)values;
while(size--) byte(*p++);
}
auto data(const vector<uint8_t>& values) -> void {
for(auto value : values) data(value);
}
auto data(const string& values) -> void {
for(auto value : values) data(value);
}
auto value() const -> vector<uint8_t> {
SHA256 self(*this);
self.finish();
vector<uint8_t> result;
for(auto n : range(32)) result.append(self.h[n >> 2] >> ((3 - (n & 3)) << 3));
return result;
}
inline auto digest() const -> string {
string result;
for(auto n : value()) result.append(hex(n, 2L));
return result;
}
private:
auto byte(uint8_t value) -> void {
auto shift = (3 - (queued & 3)) * 8;
input[queued >> 2] &= ~(0xff << shift);
input[queued >> 2] |= (value << shift);
if(++queued == 64) block(), queued = 0;
}
auto block() -> void {
for(auto n : range(16)) w[n] = input[n];
for(auto n : range(16, 64)) {
uint32_t a = ror(w[n - 15], 7) ^ ror(w[n - 15], 18) ^ (w[n - 15] >> 3);
uint32_t b = ror(w[n - 2], 17) ^ ror(w[n - 2], 19) ^ (w[n - 2] >> 10);
w[n] = w[n - 16] + w[n - 7] + a + b;
}
uint32_t t[8];
for(auto n : range(8)) t[n] = h[n];
for(auto n : range(64)) {
uint32_t a = ror(t[0], 2) ^ ror(t[0], 13) ^ ror(t[0], 22);
uint32_t b = ror(t[4], 6) ^ ror(t[4], 11) ^ ror(t[4], 25);
uint32_t c = (t[0] & t[1]) ^ (t[0] & t[2]) ^ (t[1] & t[2]);
uint32_t d = (t[4] & t[5]) ^ (~t[4] & t[6]);
uint32_t e = t[7] + w[n] + cube(n) + b + d;
t[7] = t[6]; t[6] = t[5]; t[5] = t[4]; t[4] = t[3] + e;
t[3] = t[2]; t[2] = t[1]; t[1] = t[0]; t[0] = a + c + e;
}
for(auto n : range(8)) h[n] += t[n];
}
auto finish() -> void {
byte(0x80);
while(queued != 56) byte(0x00);
for(auto n : range(8)) byte((length << 3) >> ((7 - n) << 3));
}
auto ror(uint32_t x, uint32_t n) -> uint32_t {
return (x >> n) | (x << 32 - n);
}
auto square(uint n) -> uint32_t {
static const uint32_t value[8] = {
0x6a09e667, 0xbb67ae85, 0x3c6ef372, 0xa54ff53a, 0x510e527f, 0x9b05688c, 0x1f83d9ab, 0x5be0cd19,
};
return value[n];
}
auto cube(uint n) -> uint32_t {
static const uint32_t value[64] = {
0x428a2f98, 0x71374491, 0xb5c0fbcf, 0xe9b5dba5, 0x3956c25b, 0x59f111f1, 0x923f82a4, 0xab1c5ed5,
0xd807aa98, 0x12835b01, 0x243185be, 0x550c7dc3, 0x72be5d74, 0x80deb1fe, 0x9bdc06a7, 0xc19bf174,
0xe49b69c1, 0xefbe4786, 0x0fc19dc6, 0x240ca1cc, 0x2de92c6f, 0x4a7484aa, 0x5cb0a9dc, 0x76f988da,
0x983e5152, 0xa831c66d, 0xb00327c8, 0xbf597fc7, 0xc6e00bf3, 0xd5a79147, 0x06ca6351, 0x14292967,
0x27b70a85, 0x2e1b2138, 0x4d2c6dfc, 0x53380d13, 0x650a7354, 0x766a0abb, 0x81c2c92e, 0x92722c85,
0xa2bfe8a1, 0xa81a664b, 0xc24b8b70, 0xc76c51a3, 0xd192e819, 0xd6990624, 0xf40e3585, 0x106aa070,
0x19a4c116, 0x1e376c08, 0x2748774c, 0x34b0bcb5, 0x391c0cb3, 0x4ed8aa4a, 0x5b9cca4f, 0x682e6ff3,
0x748f82ee, 0x78a5636f, 0x84c87814, 0x8cc70208, 0x90befffa, 0xa4506ceb, 0xbef9a3f7, 0xc67178f2,
};
return value[n];
}
uint32_t input[16];
uint32_t queued;
uint32_t w[64];
uint32_t h[8];
uint64_t length;
};
}}