Omit OpenBSDism in crypto-helper - pee - Pee a password manager;Pee - because you have to...
(HTM) git clone git://vernunftzentrum.de/pee.git
(DIR) Log
(DIR) Files
(DIR) Refs
(DIR) LICENSE
---
(DIR) commit 0bdcc0c509429af0b90d130e5d23b277decab24e
(DIR) parent 17a1288a736cdf7cbedb59fcfddb462769398dd5
(HTM) Author: Christian Kellermann <ckeen@pestilenz.org>
Date: Sat, 9 Jan 2016 12:53:56 +0100
Omit OpenBSDism in crypto-helper
Diffstat:
crypto-helper.scm | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
---
(DIR) diff --git a/crypto-helper.scm b/crypto-helper.scm
@@ -13,7 +13,6 @@
((scheme-pointer unsigned-char) out))
"
int res = 0;
- explicit_bzero(out, BLAKE2S_OUTBYTES);
res = blake2s(out, passphrase, NULL, BLAKE2S_OUTBYTES, strlen(passphrase), 0);
C_return(res);
"))
@@ -29,7 +28,7 @@
(arc4random len))
(else
(with-input-from-file "/dev/random" (lambda () (read-u8vector len))))))
-
+ #+openbsd
(define (arc4random len)
(let ((buf (make-blob len)))
((foreign-lambda