freebsd-skq/crypto/openssh/hash.c

28 lines
623 B
C
Raw Permalink Normal View History

2018-05-06 12:27:04 +00:00
/* $OpenBSD: hash.c,v 1.4 2017/12/14 21:07:39 naddy Exp $ */
2014-01-30 10:56:49 +00:00
2018-05-06 12:27:04 +00:00
/* $OpenBSD: hash.c,v 1.5 2018/01/13 00:24:09 naddy Exp $ */
2014-01-30 10:56:49 +00:00
/*
2018-05-06 12:27:04 +00:00
* Public domain. Author: Christian Weisgerber <naddy@openbsd.org>
* API compatible reimplementation of function from nacl
*/
2014-01-30 10:56:49 +00:00
#include "crypto_api.h"
2018-05-06 12:27:04 +00:00
#include <stdarg.h>
2014-01-30 10:56:49 +00:00
2018-05-06 12:27:04 +00:00
#include "digest.h"
#include "log.h"
#include "ssherr.h"
2014-01-30 10:56:49 +00:00
2018-05-06 12:27:04 +00:00
int
crypto_hash_sha512(unsigned char *out, const unsigned char *in,
unsigned long long inlen)
2014-01-30 10:56:49 +00:00
{
2018-05-06 12:27:04 +00:00
int r;
2014-01-30 10:56:49 +00:00
2018-05-06 12:27:04 +00:00
if ((r = ssh_digest_memory(SSH_DIGEST_SHA512, in, inlen, out,
crypto_hash_sha512_BYTES)) != 0)
fatal("%s: %s", __func__, ssh_err(r));
return 0;
2014-01-30 10:56:49 +00:00
}