| naddy@openbsd.org | 4cdc595 | 2017-12-14 21:07:39 +0000 | [diff] [blame] | 1 | /* $OpenBSD: hash.c,v 1.4 2017/12/14 21:07:39 naddy Exp $ */ |
| Darren Tucker | f45f78a | 2014-01-17 12:43:43 +1100 | [diff] [blame] | 2 | |
| naddy@openbsd.org | a69bbb0 | 2018-01-13 00:24:09 +0000 | [diff] [blame] | 3 | /* $OpenBSD: hash.c,v 1.5 2018/01/13 00:24:09 naddy Exp $ */ |
| 4 | /* |
| 5 | * Public domain. Author: Christian Weisgerber <naddy@openbsd.org> |
| 6 | * API compatible reimplementation of function from nacl |
| 7 | */ |
| djm@openbsd.org | 04c7e28 | 2017-12-18 02:25:15 +0000 | [diff] [blame] | 8 | |
| Damien Miller | 5be9d9e | 2013-12-07 11:24:01 +1100 | [diff] [blame] | 9 | #include "crypto_api.h" |
| 10 | |
| naddy@openbsd.org | 4cdc595 | 2017-12-14 21:07:39 +0000 | [diff] [blame] | 11 | #include <stdarg.h> |
| Damien Miller | 5be9d9e | 2013-12-07 11:24:01 +1100 | [diff] [blame] | 12 | |
| naddy@openbsd.org | 4cdc595 | 2017-12-14 21:07:39 +0000 | [diff] [blame] | 13 | #include "digest.h" |
| 14 | #include "log.h" |
| 15 | #include "ssherr.h" |
| Damien Miller | 5be9d9e | 2013-12-07 11:24:01 +1100 | [diff] [blame] | 16 | |
| naddy@openbsd.org | 4cdc595 | 2017-12-14 21:07:39 +0000 | [diff] [blame] | 17 | int |
| 18 | crypto_hash_sha512(unsigned char *out, const unsigned char *in, |
| 19 | unsigned long long inlen) |
| Damien Miller | 5be9d9e | 2013-12-07 11:24:01 +1100 | [diff] [blame] | 20 | { |
| naddy@openbsd.org | 4cdc595 | 2017-12-14 21:07:39 +0000 | [diff] [blame] | 21 | int r; |
| Damien Miller | 5be9d9e | 2013-12-07 11:24:01 +1100 | [diff] [blame] | 22 | |
| naddy@openbsd.org | 4cdc595 | 2017-12-14 21:07:39 +0000 | [diff] [blame] | 23 | if ((r = ssh_digest_memory(SSH_DIGEST_SHA512, in, inlen, out, |
| 24 | crypto_hash_sha512_BYTES)) != 0) |
| 25 | fatal("%s: %s", __func__, ssh_err(r)); |
| 26 | return 0; |
| Damien Miller | 5be9d9e | 2013-12-07 11:24:01 +1100 | [diff] [blame] | 27 | } |