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 { 20 21 if (!EVP_Digest(in, inlen, out, NULL, EVP_sha512(), NULL)) 22 return -1; 23 return 0; 24 } 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 */ 44