1 /*
2 * SHA-512 hash implementation and interface functions
3 * Copyright (c) 2003-2018, Jouni Malinen <j@w1.fi>
4 *
5 * This software may be distributed under the terms of the BSD license.
6 * See README for more details.
7 */
8
9 #include "includes.h"
10
11 #include "common.h"
12 #include "sha512.h"
13 #include "crypto.h"
14
15
16 /**
17 * hmac_sha512_vector - HMAC-SHA512 over data vector (RFC 2104)
18 * @key: Key for HMAC operations
19 * @key_len: Length of the key in bytes
20 * @num_elem: Number of elements in the data vector
21 * @addr: Pointers to the data areas
22 * @len: Lengths of the data blocks
23 * @mac: Buffer for the hash (64 bytes)
24 * Returns: 0 on success, -1 on failure
25 */
hmac_sha512_vector(const u8 * key,size_t key_len,size_t num_elem,const u8 * addr[],const size_t * len,u8 * mac)26 int hmac_sha512_vector(const u8 *key, size_t key_len, size_t num_elem,
27 const u8 *addr[], const size_t *len, u8 *mac)
28 {
29 unsigned char k_pad[128]; /* padding - key XORd with ipad/opad */
30 unsigned char tk[64];
31 const u8 *_addr[6];
32 size_t _len[6], i;
33
34 if (num_elem > 5) {
35 /*
36 * Fixed limit on the number of fragments to avoid having to
37 * allocate memory (which could fail).
38 */
39 return -1;
40 }
41
42 /* if key is longer than 128 bytes reset it to key = SHA512(key) */
43 if (key_len > 128) {
44 if (sha512_vector(1, &key, &key_len, tk) < 0)
45 return -1;
46 key = tk;
47 key_len = 64;
48 }
49
50 /* the HMAC_SHA512 transform looks like:
51 *
52 * SHA512(K XOR opad, SHA512(K XOR ipad, text))
53 *
54 * where K is an n byte key
55 * ipad is the byte 0x36 repeated 128 times
56 * opad is the byte 0x5c repeated 128 times
57 * and text is the data being protected */
58
59 /* start out by storing key in ipad */
60 os_memset(k_pad, 0, sizeof(k_pad));
61 os_memcpy(k_pad, key, key_len);
62 /* XOR key with ipad values */
63 for (i = 0; i < 128; i++)
64 k_pad[i] ^= 0x36;
65
66 /* perform inner SHA512 */
67 _addr[0] = k_pad;
68 _len[0] = 128;
69 for (i = 0; i < num_elem; i++) {
70 _addr[i + 1] = addr[i];
71 _len[i + 1] = len[i];
72 }
73 if (sha512_vector(1 + num_elem, _addr, _len, mac) < 0)
74 return -1;
75
76 os_memset(k_pad, 0, sizeof(k_pad));
77 os_memcpy(k_pad, key, key_len);
78 /* XOR key with opad values */
79 for (i = 0; i < 128; i++)
80 k_pad[i] ^= 0x5c;
81
82 /* perform outer SHA512 */
83 _addr[0] = k_pad;
84 _len[0] = 128;
85 _addr[1] = mac;
86 _len[1] = SHA512_MAC_LEN;
87 return sha512_vector(2, _addr, _len, mac);
88 }
89
90
91 /**
92 * hmac_sha512 - HMAC-SHA512 over data buffer (RFC 2104)
93 * @key: Key for HMAC operations
94 * @key_len: Length of the key in bytes
95 * @data: Pointers to the data area
96 * @data_len: Length of the data area
97 * @mac: Buffer for the hash (64 bytes)
98 * Returns: 0 on success, -1 on failure
99 */
hmac_sha512(const u8 * key,size_t key_len,const u8 * data,size_t data_len,u8 * mac)100 int hmac_sha512(const u8 *key, size_t key_len, const u8 *data,
101 size_t data_len, u8 *mac)
102 {
103 return hmac_sha512_vector(key, key_len, 1, &data, &data_len, mac);
104 }
105