From 61e68ed8087369bead3420aaadb06ca4b4279b42 Mon Sep 17 00:00:00 2001 From: Joe Crayne Date: Thu, 7 May 2020 12:09:08 -0400 Subject: Update merge command to create 25519 keys. --- kiki.hs | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) diff --git a/kiki.hs b/kiki.hs index bbe73f8..1138b7a 100644 --- a/kiki.hs +++ b/kiki.hs @@ -1323,7 +1323,10 @@ kiki "merge" [] = do , " If not specified, default is to spill (read and use but" , " don't write)." , "" - , " --create=(rsa:SIZE|cmd:CMD)" + , " --create=(rsa:SIZE|ed25519|cv25519|cmd:CMD)" + , " This should be used with a filename to export to in PEM" + , " format but this is just a dummy argument if the flow is set" + , " to spill." , "" , " --autosign[=no]" , "" @@ -1490,6 +1493,12 @@ kiki "merge" args = do digits -> Internal (GenRSA (read digits `div` 8)) } specs , op ) + Left ("create",Just "ed25519") + -> ( (si { initializer = Internal GenEd25519 }, specs) + , op ) + Left ("create",Just "cv25519") + -> ( (si { initializer = Internal GenCv25519 }, specs) + , op ) Left ("type",Just "keyring") -> ( (,) si { typ = KeyRingFile } specs, op ) Left ("type",Just "pem" ) -> ( (,) si { typ = PEMFile } specs, op ) Left ("type",Just "wallet" ) -> ( (,) si { typ = WalletFile } specs, op ) -- cgit v1.2.3