30 #define __alignof__(x) sizeof(x)
33 typedef unsigned int uint32_t;
35 #pragma warning(disable:4996)
44 #include <sys/param.h>
45 #include <sys/types.h>
49 #define MAX(x,y) ((x)>(y)?(x):(y))
50 #define MIN(x,y) ((x)<(y)?(x):(y))
63 #if __BYTE_ORDER == __LITTLE_ENDIAN
65 (((n) << 24) | (((n) & 0xff00) << 8) | (((n) >> 8) & 0xff00) | ((n) >> 24))
73 static const unsigned char fillbuf[64] = { 0x80, 0 };
77 static const uint32_t
K[64] = {
78 0x428a2f98, 0x71374491, 0xb5c0fbcf, 0xe9b5dba5,
79 0x3956c25b, 0x59f111f1, 0x923f82a4, 0xab1c5ed5,
80 0xd807aa98, 0x12835b01, 0x243185be, 0x550c7dc3,
81 0x72be5d74, 0x80deb1fe, 0x9bdc06a7, 0xc19bf174,
82 0xe49b69c1, 0xefbe4786, 0x0fc19dc6, 0x240ca1cc,
83 0x2de92c6f, 0x4a7484aa, 0x5cb0a9dc, 0x76f988da,
84 0x983e5152, 0xa831c66d, 0xb00327c8, 0xbf597fc7,
85 0xc6e00bf3, 0xd5a79147, 0x06ca6351, 0x14292967,
86 0x27b70a85, 0x2e1b2138, 0x4d2c6dfc, 0x53380d13,
87 0x650a7354, 0x766a0abb, 0x81c2c92e, 0x92722c85,
88 0xa2bfe8a1, 0xa81a664b, 0xc24b8b70, 0xc76c51a3,
89 0xd192e819, 0xd6990624, 0xf40e3585, 0x106aa070,
90 0x19a4c116, 0x1e376c08, 0x2748774c, 0x34b0bcb5,
91 0x391c0cb3, 0x4ed8aa4a, 0x5b9cca4f, 0x682e6ff3,
92 0x748f82ee, 0x78a5636f, 0x84c87814, 0x8cc70208,
93 0x90befffa, 0xa4506ceb, 0xbef9a3f7, 0xc67178f2
101 const uint32_t *words = (
const uint32_t *) buffer;
102 size_t nwords = len /
sizeof(uint32_t);
103 uint32_t
a = ctx->
H[0];
104 uint32_t b = ctx->
H[1];
105 uint32_t c = ctx->
H[2];
106 uint32_t
d = ctx->
H[3];
107 uint32_t e = ctx->
H[4];
108 uint32_t
f = ctx->
H[5];
109 uint32_t g = ctx->
H[6];
110 uint32_t h = ctx->
H[7];
115 ctx->
total[0] += len;
116 if (ctx->
total[0] < len)
134 #define Ch(x, y, z) ((x & y) ^ (~x & z))
135 #define Maj(x, y, z) ((x & y) ^ (x & z) ^ (y & z))
136 #define S0(x) (CYCLIC (x, 2) ^ CYCLIC (x, 13) ^ CYCLIC (x, 22))
137 #define S1(x) (CYCLIC (x, 6) ^ CYCLIC (x, 11) ^ CYCLIC (x, 25))
138 #define R0(x) (CYCLIC (x, 7) ^ CYCLIC (x, 18) ^ (x >> 3))
139 #define R1(x) (CYCLIC (x, 17) ^ CYCLIC (x, 19) ^ (x >> 10))
143 #define CYCLIC(w, s) ((w >> s) | (w << (32 - s)))
146 for (t = 0; t < 16; ++t) {
150 for (t = 16; t < 64; ++t)
151 W[t] =
R1(W[t - 2]) + W[t - 7] +
R0(W[t - 15]) + W[t - 16];
154 for (t = 0; t < 64; ++t) {
155 uint32_t T1 = h +
S1(e) +
Ch(e, f, g) +
K[t] + W[t];
156 uint32_t T2 =
S0(a) +
Maj(a, b, c);
198 ctx->
H[0] = 0x6a09e667;
199 ctx->
H[1] = 0xbb67ae85;
200 ctx->
H[2] = 0x3c6ef372;
201 ctx->
H[3] = 0xa54ff53a;
202 ctx->
H[4] = 0x510e527f;
203 ctx->
H[5] = 0x9b05688c;
204 ctx->
H[6] = 0x1f83d9ab;
205 ctx->
H[7] = 0x5be0cd19;
220 uint32_t bytes = ctx->
buflen;
225 ctx->
total[0] += bytes;
226 if (ctx->
total[0] < bytes)
229 pad = bytes >= 56 ? 64 + 56 - bytes : 56 - bytes;
233 *(uint32_t *) & ctx->
buffer[bytes + pad + 4] =
SWAP(ctx->
total[0] << 3);
240 for (i = 0; i < 8; ++i)
241 ((uint32_t *) resbuf)[i] =
SWAP(ctx->
H[i]);
252 size_t left_over = ctx->
buflen;
253 size_t add = 128 - left_over > len ? len : 128 - left_over;
255 memcpy(&ctx->
buffer[left_over], buffer, add);
266 buffer = (
const char *) buffer + add;
275 #define UNALIGNED_P(p) (((uintptr_t) p) % __alignof__ (uint32_t) != 0)
277 #define UNALIGNED_P(p) (((uintptr_t) p) % sizeof (uint32_t) != 0)
282 buffer = (
const char *) buffer + 64;
286 buffer = (
const char *) buffer + (len & ~63);
293 size_t left_over = ctx->
buflen;
295 memcpy(&ctx->
buffer[left_over], buffer, len);
297 if (left_over >= 64) {
315 #define SALT_LEN_MAX 16
317 #define ROUNDS_DEFAULT 5000
319 #define ROUNDS_MIN 1000
321 #define ROUNDS_MAX 999999999
324 static const char b64t[65] =
"./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
327 static char *
sha256_crypt_r(
const char *key,
const char *salt,
char *buffer,
int buflen)
330 unsigned char alt_result[32];
331 unsigned char temp_result[32];
333 unsigned char alt_result[32]
335 unsigned char temp_result[32]
344 char *copied_key = NULL;
345 char *copied_salt = NULL;
350 int rounds_custom = 0;
362 unsigned long int srounds = strtoul(num, &endp, 10);
371 key_len = strlen(key);
373 if ((key - (
char *) 0) % __alignof__(uint32_t) != 0) {
374 char *tmp = (
char *) alloca(key_len + __alignof__(uint32_t));
375 key = copied_key = (
char *) memcpy(tmp + __alignof__(uint32_t)
376 - (tmp - (
char *) 0) % __alignof__(uint32_t), key, key_len);
379 if ((salt - (
char *) 0) % __alignof__(uint32_t) != 0) {
380 char *tmp = (
char *) alloca(salt_len + __alignof__(uint32_t));
381 salt = copied_salt = (
char *) memcpy(tmp + __alignof__(uint32_t)
382 - (tmp - (
char *) 0) % __alignof__(uint32_t), salt, salt_len);
415 for (cnt = key_len; cnt > 32; cnt -= 32)
421 for (cnt = key_len; cnt > 0; cnt >>= 1)
434 for (cnt = 0; cnt < key_len; ++cnt)
441 cp = p_bytes = (
char*) alloca(key_len);
442 for (cnt = key_len; cnt >= 32; cnt -= 32) {
443 memcpy(cp, temp_result, 32);
446 memcpy(cp, temp_result, cnt);
452 for (cnt = 0; (int) cnt < 16 + alt_result[0]; ++cnt)
459 cp = s_bytes = (
char*) alloca(salt_len);
460 for (cnt = salt_len; cnt >= 32; cnt -= 32) {
461 memcpy(cp, temp_result, 32);
464 memcpy(cp, temp_result, cnt);
468 for (cnt = 0; cnt < rounds; ++cnt) {
499 cp = buffer + strlen(buffer);
504 int n = _snprintf(cp,
MAX(0, buflen),
"%s%Iu$",
507 int n = snprintf(cp,
MAX(0, buflen),
"%s%zu$",
514 strncpy(cp, salt,
MIN((
size_t)
MAX(0, buflen), salt_len));
515 cp = cp + strlen(cp);
516 buflen -=
MIN((
size_t)
MAX(0, buflen), salt_len);
522 #define b64_from_24bit(B2, B1, B0, N) \
524 unsigned int w = ((B2) << 16) | ((B1) << 8) | (B0); \
526 while (n-- > 0 && buflen > 0) \
528 *cp++ = b64t[w & 0x3f]; \
557 memset(temp_result,
'\0',
sizeof(temp_result));
558 memset(p_bytes,
'\0', key_len);
559 memset(s_bytes,
'\0', salt_len);
560 memset(&ctx,
'\0',
sizeof(ctx));
561 memset(&alt_ctx,
'\0',
sizeof(alt_ctx));
562 if (copied_key != NULL)
563 memset(copied_key,
'\0', key_len);
564 if (copied_salt != NULL)
565 memset(copied_salt,
'\0', salt_len);
584 if (buflen < needed) {
585 char *new_buffer = (
char *) realloc(buffer, needed);
586 if (new_buffer == NULL)
struct __attribute__((__packed__)) InfoWord
#define b64_from_24bit(B2, B1, B0, N)
char * sha256_crypt(const char *key, const char *salt)
static const uint32_t K[64]
static void sha256_process_block(const void *buffer, size_t len, struct sha256_ctx *ctx)
static char * sha256_crypt_r(const char *key, const char *salt, char *buffer, int buflen)
static const char b64t[65]
static const char sha256_salt_prefix[]
static void sha256_process_bytes(const void *buffer, size_t len, struct sha256_ctx *ctx)
static void sha256_init_ctx(struct sha256_ctx *ctx)
static void * sha256_finish_ctx(struct sha256_ctx *ctx, void *resbuf)
then JMuonMCEvt f $INPUT_FILE o $INTERMEDIATE_FILE d
alias put_queue eval echo n
static const char sha256_rounds_prefix[]
static const unsigned char fillbuf[64]