fix secmod_rsa config; fix signkey stamp_end
This commit is contained in:
parent
8996eb7424
commit
5e9426267a
4 changed files with 59 additions and 50 deletions
|
|
@ -188,25 +188,8 @@ module Exchange_secmod_rsa = struct
|
|||
|
||||
let lookahead_sign = get "lookahead_sign" |> duration
|
||||
let overlap_duration = get "overlap_duration" |> duration
|
||||
let duration = get "duration" |> duration
|
||||
let key_dir = get "key_dir"
|
||||
let sm_priv_key = get "sm_priv_key"
|
||||
|
||||
(* only support one rsa_keysize *)
|
||||
let rsa_keysize =
|
||||
Coin.all_coins
|
||||
|> List.map (fun coin -> coin.Coin.rsa_keysize)
|
||||
|> List.sort_uniq Int.compare
|
||||
|> function
|
||||
| [] -> fail "no coin section found"
|
||||
| a :: b :: _ ->
|
||||
fail
|
||||
"coins with different rsa_keysize are not supported, found \
|
||||
rsa_keysize = %d and %d"
|
||||
a b
|
||||
| n :: [] -> n
|
||||
|
||||
let sections = Coin.all_coins |> List.map (fun coin -> coin.Coin.section_name)
|
||||
end
|
||||
|
||||
module Exchange_secmod_eddsa = struct
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue