Line | Count | Source (jump to first uncovered line) |
1 | | /* $OpenBSD: hash.c,v 1.6 2019/11/29 00:11:21 djm Exp $ */ |
2 | | /* |
3 | | * Public domain. Author: Christian Weisgerber <naddy@openbsd.org> |
4 | | * API compatible reimplementation of function from nacl |
5 | | */ |
6 | | |
7 | | #include "includes.h" |
8 | | |
9 | | #include "crypto_api.h" |
10 | | |
11 | | #include <stdarg.h> |
12 | | |
13 | | #ifdef WITH_OPENSSL |
14 | | #include <openssl/evp.h> |
15 | | |
16 | | int |
17 | | crypto_hash_sha512(unsigned char *out, const unsigned char *in, |
18 | | unsigned long long inlen) |
19 | 40 | { |
20 | | |
21 | 40 | if (!EVP_Digest(in, inlen, out, NULL, EVP_sha512(), NULL)) |
22 | 0 | return -1; |
23 | 40 | return 0; |
24 | 40 | } |
25 | | |
26 | | #else |
27 | | # ifdef HAVE_SHA2_H |
28 | | # include <sha2.h> |
29 | | # endif |
30 | | |
31 | | int |
32 | | crypto_hash_sha512(unsigned char *out, const unsigned char *in, |
33 | | unsigned long long inlen) |
34 | | { |
35 | | |
36 | | SHA2_CTX ctx; |
37 | | |
38 | | SHA512Init(&ctx); |
39 | | SHA512Update(&ctx, in, inlen); |
40 | | SHA512Final(out, &ctx); |
41 | | return 0; |
42 | | } |
43 | | #endif /* WITH_OPENSSL */ |