summaryrefslogtreecommitdiff
path: root/src/libstdcrypto/sha512_update.c
diff options
context:
space:
mode:
authorLaurent Bercot <ska-skaware@skarnet.org>2015-03-27 13:28:03 +0000
committerLaurent Bercot <ska-skaware@skarnet.org>2015-03-27 13:28:03 +0000
commite17f71f9f01a429664caf120d9ac159ed9f5283f (patch)
tree524ebfc55d4aa56b2842a109ffffab2319afa6c2 /src/libstdcrypto/sha512_update.c
parent36333f75234a6cb1b98cbe104aee3506d6bec9a1 (diff)
downloadskalibs-e17f71f9f01a429664caf120d9ac159ed9f5283f.tar.xz
- added sha512 (buggy, need to commit to test somewhere else)
- version bump (not a rc yet) - bugfix: buffer_get returned -1 EPIPE on short reads w/o EOF
Diffstat (limited to 'src/libstdcrypto/sha512_update.c')
-rw-r--r--src/libstdcrypto/sha512_update.c24
1 files changed, 24 insertions, 0 deletions
diff --git a/src/libstdcrypto/sha512_update.c b/src/libstdcrypto/sha512_update.c
new file mode 100644
index 0000000..4f66622
--- /dev/null
+++ b/src/libstdcrypto/sha512_update.c
@@ -0,0 +1,24 @@
+/* ISC license. */
+
+#include <skalibs/bytestr.h>
+#include <skalibs/sha512.h>
+#include "sha512-internal.h"
+
+void sha512_update (SHA512Schedule *ctx, char const *buf, unsigned int len)
+{
+ register unsigned int pad = ctx->len & 0x7fu ;
+ ctx->len += len ;
+ if (pad && len >= 128 - pad)
+ {
+ byte_copy(ctx->buf + pad, 128 - pad, buf) ;
+ buf += 128 - pad ; len -= 128 - pad ; pad = 0 ;
+ sha512_transform(ctx, ctx->buf) ;
+ }
+
+ while (len >= 128)
+ {
+ sha512_transform(ctx, (unsigned char const *)buf) ;
+ buf += 128 ; len -= 128 ;
+ }
+ byte_copy(ctx->buf + pad, len, buf) ;
+}