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 \

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 ExchangeWireAccount (TODO need hash over json) *)
-  (* validate currency specification *)
-  (* validate all amounts *)
-  (* validate all timestamp/duration *)
-  (* validate master_public_key *)
-  (* validate accounts *)
   (* 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 *)