This commit is contained in:
swrup 2026-03-03 10:31:57 +01:00
parent 650264f21e
commit 94a6e4a84a
11 changed files with 15 additions and 31 deletions

View file

@ -103,7 +103,7 @@ let split_in_periodes ~start ~end_ =
in
go acc start end_
(* TODO do not exceed lookahead (probably more important...) *)
(* TODO do not exceed lookahead *)
(* try to not generate keys with validity start in the past *)
let gen_additional_keys_until_lookahead ~now l =
let start =
@ -118,7 +118,6 @@ let gen_additional_keys_until_lookahead ~now l =
let new_keys = List.map (fun (t1, t2) -> gen_key t1 t2) periodes in
new_keys
(* TODO config *)
let sm_key_fpath =
Result.get_ok
@@
@ -221,5 +220,5 @@ end
- more checks
- sign: check timestamps before signing
- schedule tasks
- !lock
- ! use lock
*)