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

JJ: Description from the destination commit:

Browse source 
+ wip

JJ: Description from source commit:
.
This commit is contained in:
swrup 2026-02-05 17:57:27 +01:00
parent 258db38b52
commit a287340284
6 changed files with 95 additions and 93 deletions
Download patch file Download diff file Expand all files Collapse all files

6
tools/offline_impl.ml
View file

@ -146,7 +146,7 @@ let enable_auditor ~output ~master_key ~auditor_url ~auditor_name ~auditor_pub
{
start_date= validity_start;
auditor_pub;
h_auditor_url= Hash_64_cstr.hash auditor_url;
h_auditor_url= Hash.Cstring.H64.hash auditor_url;
}
in
let v =
@ -177,7 +177,7 @@ let wire_fee ~output ~master_key ~wire_method ~fee_start ~fee_end ~closing_fee
let open Bin_sig.MasterWireFee in
sign_f ~f:(EddsaSignature.sign ~key)
{
h_wire_method= Hash_64_cstr.hash wire_method;
h_wire_method= Hash.Cstring.H64.hash wire_method;
start_date= fee_start;
end_date= fee_end;
closing_fee;
@ -210,7 +210,7 @@ let drain ~output ~master_key ~debit_account_section ~credit_payto_uri ~wtid
wtid;
date;
amount;
h_section= Hash_64_cstr.hash debit_account_section;
h_section= Hash.Cstring.H64.hash debit_account_section;
h_payto= FullPaytoHash.hash credit_payto_uri;
}
in

3
tools/offline_sig.ml
View file

@ -1,5 +1,4 @@
open Crypto
open Hash
open Api
let verify_future_keys_response =
@ -22,7 +21,7 @@ let verify_future_keys_response =
let h_denom_pub =
DenominationHash.hash (DenominationKey.to_octets denom_pub)
in
let h_section_name = Hash_64_cstr.hash section_name in
let h_section_name = Hash.Cstring.H64.hash section_name in
let anchor_time = stamp_start in
let duration_withdraw = Timestamp.diff stamp_start stamp_expire_withdraw in
let open Bin_sig.DenominationKeyAnnouncement in