1 /*
2 * Copyright (C) 2017 - This file is part of libecc project
3 *
4 * Authors:
5 * Ryad BENADJILA <ryadbenadjila@gmail.com>
6 * Arnaud EBALARD <arnaud.ebalard@ssi.gouv.fr>
7 * Jean-Pierre FLORI <jean-pierre.flori@ssi.gouv.fr>
8 *
9 * Contributors:
10 * Nicolas VIVET <nicolas.vivet@ssi.gouv.fr>
11 * Karim KHALFALLAH <karim.khalfallah@ssi.gouv.fr>
12 *
13 * This software is licensed under a dual BSD and GPL v2 license.
14 * See LICENSE file at the root folder of the project.
15 */
16 #include <libecc/lib_ecc_config.h>
17 #ifdef WITH_HASH_SHA512
18
19 #include <libecc/hash/sha512.h>
20
21 /* Init hash function. Returns 0 on success, -1 on error. */
sha512_init(sha512_context * ctx)22 int sha512_init(sha512_context *ctx)
23 {
24 int ret;
25
26 MUST_HAVE((ctx != NULL), ret, err);
27
28 ctx->sha512_total[0] = ctx->sha512_total[1] = 0;
29 ctx->sha512_state[0] = (u64)(0x6A09E667F3BCC908);
30 ctx->sha512_state[1] = (u64)(0xBB67AE8584CAA73B);
31 ctx->sha512_state[2] = (u64)(0x3C6EF372FE94F82B);
32 ctx->sha512_state[3] = (u64)(0xA54FF53A5F1D36F1);
33 ctx->sha512_state[4] = (u64)(0x510E527FADE682D1);
34 ctx->sha512_state[5] = (u64)(0x9B05688C2B3E6C1F);
35 ctx->sha512_state[6] = (u64)(0x1F83D9ABFB41BD6B);
36 ctx->sha512_state[7] = (u64)(0x5BE0CD19137E2179);
37
38 /* Tell that we are initialized */
39 ctx->magic = SHA512_HASH_MAGIC;
40 ret = 0;
41
42 err:
43 return ret;
44 }
45
46 /* Update hash function. Returns 0 on success, -1 on error. */
sha512_update(sha512_context * ctx,const u8 * input,u32 ilen)47 int sha512_update(sha512_context *ctx, const u8 *input, u32 ilen)
48 {
49 int ret;
50
51 SHA512_HASH_CHECK_INITIALIZED(ctx, ret, err);
52
53 ret = sha512_core_update(ctx, input, ilen);
54
55 err:
56 return ret;
57 }
58
59 /*
60 * Finalize hash function. Returns 0 on success, -1 on error. */
sha512_final(sha512_context * ctx,u8 output[SHA512_DIGEST_SIZE])61 int sha512_final(sha512_context *ctx, u8 output[SHA512_DIGEST_SIZE])
62 {
63 int ret;
64
65 SHA512_HASH_CHECK_INITIALIZED(ctx, ret, err);
66
67 ret = sha512_core_final(ctx, output, SHA512_DIGEST_SIZE); EG(ret, err);
68
69 /* Tell that we are uninitialized */
70 ctx->magic = WORD(0);
71 ret = 0;
72
73 err:
74 return ret;
75 }
76
77 /*
78 * Scattered version performing init/update/finalize on a vector of buffers
79 * 'inputs' with the length of each buffer passed via 'ilens'. The function
80 * loops on pointers in 'inputs' until it finds a NULL pointer. The function
81 * returns 0 on success, -1 on error.
82 */
sha512_scattered(const u8 ** inputs,const u32 * ilens,u8 output[SHA512_DIGEST_SIZE])83 int sha512_scattered(const u8 **inputs, const u32 *ilens,
84 u8 output[SHA512_DIGEST_SIZE])
85 {
86 sha512_context ctx;
87 int pos = 0;
88 int ret;
89
90 MUST_HAVE((inputs != NULL) && (ilens != NULL) && (output != NULL), ret, err);
91
92 ret = sha512_init(&ctx); EG(ret, err);
93
94 while (inputs[pos] != NULL) {
95 ret = sha512_update(&ctx, inputs[pos], ilens[pos]); EG(ret, err);
96 pos += 1;
97 }
98
99 ret = sha512_final(&ctx, output);
100
101 err:
102 return ret;
103 }
104
105 /* init/update/finalize on a single buffer 'input' of length 'ilen'. */
sha512(const u8 * input,u32 ilen,u8 output[SHA512_DIGEST_SIZE])106 int sha512(const u8 *input, u32 ilen, u8 output[SHA512_DIGEST_SIZE])
107 {
108 sha512_context ctx;
109 int ret;
110
111 ret = sha512_init(&ctx); EG(ret, err);
112 ret = sha512_update(&ctx, input, ilen); EG(ret, err);
113 ret = sha512_final(&ctx, output);
114
115 err:
116 return ret;
117 }
118
119 #else /* WITH_HASH_SHA512 */
120
121 /*
122 * Dummy definition to avoid the empty translation unit ISO C warning
123 */
124 typedef int dummy;
125 #endif /* WITH_HASH_SHA512 */
126