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

Browse source
This commit is contained in:
swrup 2025-11-28 17:35:44 +01:00
parent a7c678fa3d
commit ad7cbbedd9
1 changed files with 15 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

32
tools/offline_signature.ml
View file

@ -1,4 +1,4 @@
let _denom_signature master_priv master_pub
let _denom_signature ~key ~key_pub
Api.FutureDenom.
{
section_name= _;
@ -28,22 +28,20 @@ let _denom_signature master_priv master_pub
let master_sig =
let open Bin_type in
let open Bin_signature.DenominationKeyValidityPS in
let denom_key_validity =
{
master= master_pub;
start= stamp_start;
expire_withdraw= stamp_expire_withdraw;
expire_spend= stamp_expire_deposit;
expire_legal= stamp_expire_legal;
value;
fee_withdraw;
fee_deposit;
fee_refresh;
denom_hash= DenominationHash.hash pub_octets;
}
in
let data = Bin.to_string bin denom_key_validity in
Crypto.EddsaSignature.sign ~key:master_priv data
{
master= key_pub;
start= stamp_start;
expire_withdraw= stamp_expire_withdraw;
expire_spend= stamp_expire_deposit;
expire_legal= stamp_expire_legal;
value;
fee_withdraw;
fee_deposit;
fee_refresh;
denom_hash= DenominationHash.hash pub_octets;
}
|> Bin.to_string bin
|> Crypto.EddsaSignature.sign ~key
in
Api.DenomSignature.{ h_denom_pub; master_sig }