Return to hash.c CVS log

Up to [local] / src / usr.bin / ssh

Annotation of src/usr.bin/ssh/hash.c, Revision 1.3

1.3     ! markus      1: /* $OpenBSD: hash.c,v 1.2 2013/12/07 00:26:37 djm Exp $ */
1.1       markus      2:
1.3     ! markus      3: /* Copied from nacl-20110221/crypto_hash/sha512/ref/hash.c */
1.1       markus      4:
                      5: /*
                      6: 20080913
                      7: D. J. Bernstein
                      8: Public domain.
                      9: */
                     10:
                     11: #include "crypto_api.h"
                     12:
                     13: #define blocks crypto_hashblocks_sha512
                     14:
                     15: static const unsigned char iv[64] = {
                     16:   0x6a,0x09,0xe6,0x67,0xf3,0xbc,0xc9,0x08,
                     17:   0xbb,0x67,0xae,0x85,0x84,0xca,0xa7,0x3b,
                     18:   0x3c,0x6e,0xf3,0x72,0xfe,0x94,0xf8,0x2b,
                     19:   0xa5,0x4f,0xf5,0x3a,0x5f,0x1d,0x36,0xf1,
                     20:   0x51,0x0e,0x52,0x7f,0xad,0xe6,0x82,0xd1,
                     21:   0x9b,0x05,0x68,0x8c,0x2b,0x3e,0x6c,0x1f,
                     22:   0x1f,0x83,0xd9,0xab,0xfb,0x41,0xbd,0x6b,
                     23:   0x5b,0xe0,0xcd,0x19,0x13,0x7e,0x21,0x79
                     24: } ;
                     25:
                     26: typedef unsigned long long uint64;
                     27:
                     28: int crypto_hash_sha512(unsigned char *out,const unsigned char *in,unsigned long long inlen)
                     29: {
                     30:   unsigned char h[64];
                     31:   unsigned char padded[256];
                     32:   unsigned int i;
                     33:   unsigned long long bytes = inlen;
                     34:
                     35:   for (i = 0;i < 64;++i) h[i] = iv[i];
                     36:
                     37:   blocks(h,in,inlen);
                     38:   in += inlen;
                     39:   inlen &= 127;
                     40:   in -= inlen;
                     41:
                     42:   for (i = 0;i < inlen;++i) padded[i] = in[i];
                     43:   padded[inlen] = 0x80;
                     44:
                     45:   if (inlen < 112) {
                     46:     for (i = inlen + 1;i < 119;++i) padded[i] = 0;
                     47:     padded[119] = bytes >> 61;
                     48:     padded[120] = bytes >> 53;
                     49:     padded[121] = bytes >> 45;
                     50:     padded[122] = bytes >> 37;
                     51:     padded[123] = bytes >> 29;
                     52:     padded[124] = bytes >> 21;
                     53:     padded[125] = bytes >> 13;
                     54:     padded[126] = bytes >> 5;
                     55:     padded[127] = bytes << 3;
                     56:     blocks(h,padded,128);
                     57:   } else {
                     58:     for (i = inlen + 1;i < 247;++i) padded[i] = 0;
                     59:     padded[247] = bytes >> 61;
                     60:     padded[248] = bytes >> 53;
                     61:     padded[249] = bytes >> 45;
                     62:     padded[250] = bytes >> 37;
                     63:     padded[251] = bytes >> 29;
                     64:     padded[252] = bytes >> 21;
                     65:     padded[253] = bytes >> 13;
                     66:     padded[254] = bytes >> 5;
                     67:     padded[255] = bytes << 3;
                     68:     blocks(h,padded,256);
                     69:   }
                     70:
                     71:   for (i = 0;i < 64;++i) out[i] = h[i];
                     72:
                     73:   return 0;
                     74: }