diff --git a/test/offline_management.sh b/test/offline_management.sh index ccbef73b..606e6028 100755 --- a/test/offline_management.sh +++ b/test/offline_management.sh @@ -60,7 +60,7 @@ echo "[OK] /management/auditors/\$AUDITOR_PUB/disable" offline_tool wire-fee \ --master_key $master_key \ --output $b \ ---wire_method "xxx" \ +--wire_method "x-taler-bank" \ --fee_start 0 \ --fee_end 99999999 \ --closing_fee $zero_kudos \ diff --git a/test/validate_response.ml b/test/validate_response.ml index 709f4464..71bc6049 100644 --- a/test/validate_response.ml +++ b/test/validate_response.ml @@ -2,9 +2,9 @@ open Syntax (*open Crypto*) let keys content = - let open Api.ExchangeKeysResponse in + let open Api in + let open ExchangeKeysResponse in let* v = Api.decode jsont content in - (* validate version compatibility *) let* () = if Libtool_version.is_compatible @@ -13,13 +13,13 @@ let keys content = else Fmt.error "version incompatible" in - (* TODO *) - (* validate currency specification *) - (* validate all amounts *) - (* validate all timestamp/duration *) - (* validate master_public_key *) - (* validate accounts *) + (* validate ExchangeWireAccount (TODO need hash over json) *) (* validate wire-fees *) + let* () = + let open AggregateTransferFee in + { wire_fee; closing_fee; start_date; end_date; sig_ } + in + (* validate signkeys *) (* validate exchange_pub *) (* validate denominations *)