+ more config
This commit is contained in:
parent
002c1782bd
commit
37fa6619a6
1 changed files with 72 additions and 21 deletions
|
|
@ -7,6 +7,27 @@
|
||||||
- default config: use relevant duration, all set to 1 year for now
|
- default config: use relevant duration, all set to 1 year for now
|
||||||
*)
|
*)
|
||||||
|
|
||||||
|
(* TODO unikernel *)
|
||||||
|
type dir_path
|
||||||
|
type file_path
|
||||||
|
|
||||||
|
(* TODO *)
|
||||||
|
(* Values that represent a time duration are represented as a series of one or more NUMBER UNIT pairs, e.g. 60 s, 4 weeks 1 day, 5 years 2 minutes. *)
|
||||||
|
type duration
|
||||||
|
|
||||||
|
(* TODO
|
||||||
|
make it Amount.t *)
|
||||||
|
type amount = string
|
||||||
|
|
||||||
|
(* TODO
|
||||||
|
still need to parse them and tell that its not supported
|
||||||
|
some maybe are relevant
|
||||||
|
idk *)
|
||||||
|
type not_relevant
|
||||||
|
type not_implemented
|
||||||
|
type url = string
|
||||||
|
type seconds = int
|
||||||
|
|
||||||
module Global = struct end
|
module Global = struct end
|
||||||
|
|
||||||
(*
|
(*
|
||||||
|
|
@ -69,25 +90,6 @@ module type Currency = sig
|
||||||
val alt_unit_names : (int * string) list
|
val alt_unit_names : (int * string) list
|
||||||
end
|
end
|
||||||
|
|
||||||
(* TODO unikernel *)
|
|
||||||
type directory
|
|
||||||
|
|
||||||
(* TODO *)
|
|
||||||
(* Values that represent a time duration are represented as a series of one or more NUMBER UNIT pairs, e.g. 60 s, 4 weeks 1 day, 5 years 2 minutes. *)
|
|
||||||
type duration
|
|
||||||
|
|
||||||
(* TODO
|
|
||||||
make it Amount.t *)
|
|
||||||
type amount = string
|
|
||||||
|
|
||||||
(* TODO
|
|
||||||
still need to parse them and tell that its not supported
|
|
||||||
some maybe are relevant
|
|
||||||
idk *)
|
|
||||||
type not_relevant
|
|
||||||
type url = string
|
|
||||||
type seconds = int
|
|
||||||
|
|
||||||
(* The following options are from the “[exchange]” section and used by most
|
(* The following options are from the “[exchange]” section and used by most
|
||||||
exchange tools. *)
|
exchange tools. *)
|
||||||
module type Exchange = sig
|
module type Exchange = sig
|
||||||
|
|
@ -261,7 +263,7 @@ module type Exchange = sig
|
||||||
- $TERMS_DIR/fr/0.pdf
|
- $TERMS_DIR/fr/0.pdf
|
||||||
- $TERMS_DIR/fr/0.html
|
- $TERMS_DIR/fr/0.html
|
||||||
- $TERMS_DIR/de/0.txt *)
|
- $TERMS_DIR/de/0.txt *)
|
||||||
val terms_dir : directory
|
val terms_dir : dir_path
|
||||||
|
|
||||||
(*
|
(*
|
||||||
Basename of the file(s) in the ``TERMS_DIR`` with the current terms of service.
|
Basename of the file(s) in the ``TERMS_DIR`` with the current terms of service.
|
||||||
|
|
@ -276,7 +278,7 @@ module type Exchange = sig
|
||||||
|
|
||||||
(*
|
(*
|
||||||
Works the same as ``TERMS_DIR``, just for the privacy policy. *)
|
Works the same as ``TERMS_DIR``, just for the privacy policy. *)
|
||||||
val privacy_dir : directory
|
val privacy_dir : dir_path
|
||||||
|
|
||||||
(*
|
(*
|
||||||
Works the same as ``TERMS_ETAG``, just for the privacy policy. *)
|
Works the same as ``TERMS_ETAG``, just for the privacy policy. *)
|
||||||
|
|
@ -287,6 +289,55 @@ module type Exchange = sig
|
||||||
val enable_kyc : [ `YES | `NO ]
|
val enable_kyc : [ `YES | `NO ]
|
||||||
end
|
end
|
||||||
|
|
||||||
|
(* todo: KYC and AML options *)
|
||||||
|
|
||||||
|
(*
|
||||||
|
The functionality of the exchange can be extended by extensions. Those are
|
||||||
|
shared libraries which implement the extension-API of the exchange and are
|
||||||
|
located under ``$LIBDIR``, starting with prefix ``libtaler_extension_``. Each
|
||||||
|
extension can be enabled by adding a dedicated section
|
||||||
|
"[exchange-extension-<extensionname>]" and the following option:
|
||||||
|
*)
|
||||||
|
module type Extansions = sig
|
||||||
|
(*
|
||||||
|
If set to ``YES`` the extension ``<extensionsname>`` is enabled. Extension-specific
|
||||||
|
options might be set in the same section. *)
|
||||||
|
val enabled : [ (*`YES|*) `NO ]
|
||||||
|
end
|
||||||
|
|
||||||
|
(* The following options must be in the section "[exchange-offline]". *)
|
||||||
|
module type Offline_signing = sig
|
||||||
|
(*
|
||||||
|
Location of the master private key on disk. Only used by tools that
|
||||||
|
can be run offline (as the master key is for offline signing).
|
||||||
|
Mandatory. *)
|
||||||
|
val master_priv_file : file_path
|
||||||
|
|
||||||
|
(* TODO
|
||||||
|
- we need two different file
|
||||||
|
- there is three, not two, crypto helper modules
|
||||||
|
is it only two, because the eddsa one is not comptabilized as a "crypto helper" here? *)
|
||||||
|
(*
|
||||||
|
Where to store the public keys of both crypto helper modules.
|
||||||
|
Used to persist the keys after the first invocation of the tool,
|
||||||
|
so that if they ever change in the future, this is detected and
|
||||||
|
the tool can abort.
|
||||||
|
Mandatory. *)
|
||||||
|
val secm_tofu_file : file_path
|
||||||
|
|
||||||
|
(*
|
||||||
|
Public key of the (RSA) crypto helper module. Optional. If not given,
|
||||||
|
we will rely on TOFU. Note that once TOFU has been established,
|
||||||
|
this option will also be ignored. *)
|
||||||
|
val secm_denom_pubkey : string option
|
||||||
|
|
||||||
|
(*
|
||||||
|
Public key of the (EdDSA) crypto helper module. Optional. If not given,
|
||||||
|
we will rely on TOFU. Note that once TOFU has been established,
|
||||||
|
this option will also be ignored. *)
|
||||||
|
val secm_esign_pubkey : string option
|
||||||
|
end
|
||||||
|
|
||||||
(* -- ********************************** -- *)
|
(* -- ********************************** -- *)
|
||||||
let currency = `Eur
|
let currency = `Eur
|
||||||
let currency_to_string = function `Eur -> "EUR"
|
let currency_to_string = function `Eur -> "EUR"
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue