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

add update_master_signatures

Browse source
This commit is contained in:
swrup 2025-12-07 01:02:54 +01:00
parent 0d17d2a675
commit e9b7142412
11 changed files with 93 additions and 38 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/pg.ml
View file

@ -92,7 +92,8 @@ let lookup_signing_key =
let activate_signing_key =
let insert_signkey =
Caqti_type.(t5 eddsa_public time time time eddsa_signature ->. unit)
let master_sig = Api_sig.ExchangeSigningKeyValidityPS.caqti in
Caqti_type.(t5 eddsa_public time time time master_sig ->. unit)
"INSERT INTO exchange_sign_keys (exchange_pub, valid_from, expire_sign, \
expire_legal, master_sig) VALUES ($1, $2, $3, $4, $5)"
in
@ -118,9 +119,10 @@ let lookup_denomination_key =
let add_denomination_key =
let denomination_insert =
let master_sig = Api_sig.DenominationKeyValidityPS.caqti in
Caqti_type.(
t12 denomination_hash rsa_public eddsa_signature time time time time
amount amount amount amount (t2 amount age_mask)
t12 denomination_hash rsa_public master_sig time time time time amount
amount amount amount (t2 amount age_mask)
->. unit)
"INSERT INTO denominations (denom_pub_hash, denom_pub, master_sig, \
valid_from, expire_withdraw, expire_deposit, expire_legal, coin, \