swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

rename crockford

Browse source
This commit is contained in:
swrup 2026-03-31 13:28:40 +02:00 • committed by Swrup
parent 34b979a9bc
commit 10df5181a0
14 changed files with 80 additions and 70 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/secmod_rsa.ml
View file

@ -48,9 +48,9 @@ let find_exn h_pub section_name =
rsa keysize is not known and then we have to escape '\x00' *)
let rsa_private_key_bin =
let decode_exn o =
Rsa.priv_of_b32 o |> function Error e -> invalid_arg e | Ok v -> v
Rsa.priv_of_crockford o |> function Error e -> invalid_arg e | Ok v -> v
in
let encode o = Rsa.priv_to_b32 o in
let encode o = Rsa.priv_to_crockford o in
Bin.map Bin.cstring decode_exn encode
let key_bin =
@ -67,7 +67,7 @@ let key_bin =
|> sealr
let key_spath k =
let sfn = String.sub (DenominationHash.to_b32 k.h_pub) 0 8 in
let sfn = String.sub (DenominationHash.to_crockford k.h_pub) 0 8 in
Fat.Path.add Cfg.key_dir sfn
let read_eddsa fs spath =