GCC Code Coverage Report
Directory: ./ Exec Total Coverage
File: usr.bin/ssh/lib/../hash.c Lines: 0 35 0.0 %
Date: 2017-11-13 Branches: 0 12 0.0 %

Line Branch Exec Source
1
/* $OpenBSD: hash.c,v 1.3 2013/12/09 11:03:45 markus Exp $ */
2
3
/* Copied from nacl-20110221/crypto_hash/sha512/ref/hash.c */
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
}