Merge pull request #18 from reynir/mirage-crypto-rng.0.11.0

Update to mirage-crypto-rng.0.11.0
reynir · Feb 17, 2023 · 574cf84 · 574cf84
2 parents 446db09 + b6553c4
commit 574cf84
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 2 deletions.
diff --git a/cmd/ssh_add.ml b/cmd/ssh_add.ml
@@ -7,7 +7,7 @@ let gen_key key_type bits =
     Ssh_agent.Privkey.Ssh_ed25519 priv
 
 let main key_type bits key_comment =
-  let () = Mirage_crypto_rng_unix.initialize () in
+  let () = Mirage_crypto_rng_unix.initialize (module Mirage_crypto_rng.Fortuna) in
   let sock_path =
     match Sys.getenv "SSH_AUTH_SOCK" with
     | path -> path

diff --git a/ssh-agent.opam b/ssh-agent.opam
@@ -20,6 +20,7 @@ depends: [
   "mirage-crypto-pk"
   "mirage-crypto-ec"
   "cstruct"
+  "mirage-crypto-rng" {with-test & >= "0.11.0"}
   "alcotest" {with-test}
 ]
 conflicts: [

diff --git a/test/test.ml b/test/test.ml
@@ -99,7 +99,7 @@ let m_response = (module Response
                    : Alcotest.TESTABLE with type t = Ssh_agent.any_ssh_agent_response)
 
 
-let () = Mirage_crypto_rng_unix.initialize ()
+let () = Mirage_crypto_rng_unix.initialize (module Mirage_crypto_rng.Fortuna)
 let privkey = Mirage_crypto_pk.Rsa.generate ~bits:1024 ()
 let pubkey = Mirage_crypto_pk.Rsa.pub_of_priv privkey
 let privkey = Ssh_agent.Privkey.Ssh_rsa privkey