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

refacto verify_denomination/signkey

Browse source
This commit is contained in:
swrup 2026-02-27 20:28:56 +01:00
parent d2e546571c
commit edd2646a86
6 changed files with 120 additions and 170 deletions
Download patch file Download diff file Expand all files Collapse all files

17
src/denomination.ml
View file

@ -16,6 +16,23 @@ type t = {
master_sig: Signatures.DenominationKeyValidity.t;
}
let verify_denomination_key_validity ~key dn =
let open Signatures.DenominationKeyValidity in
verify key dn.master_sig
{
R.master= key;
start= dn.stamp_start;
expire_withdraw= dn.stamp_expire_withdraw;
expire_spend= dn.stamp_expire_deposit;
expire_legal= dn.stamp_expire_legal;
value= dn.value;
fee_withdraw= dn.fee_withdraw;
fee_deposit= dn.fee_deposit;
fee_refresh= dn.fee_refresh;
fee_refund= dn.fee_refund;
denom_hash= dn.h_pub;
}
let make_denom_group_sorted denominations =
let open Syntax in
(* use hashtbl to re-group denoms *)