Mavryk_client_base_unix.Client_config
type cli_args = {
chain : Mavryk_shell_services.Chain_services.chain;
block : Mavryk_shell_services.Shell_services.block;
confirmations : int option;
sources : Mavryk_proxy.Light.sources_config option;
password_filename : string option;
protocol : Mavryk_base.TzPervasives.Protocol_hash.t option;
print_timings : bool;
log_requests : bool;
better_errors : bool;
client_mode : client_mode;
}
val default_media_type : Mavryk_rpc_http.Media_type.Command_line.t
module Cfg_file : sig ... end
val default_cli_args : cli_args
val string_parameter : unit -> (string, 'a) Mavryk_clic.parameter
val media_type_parameter :
unit ->
(Mavryk_rpc_http.Media_type.Command_line.t,
Mavryk_client_base.Client_context.full)
Mavryk_clic.parameter
val endpoint_parameter : unit -> (Uri.t, 'a) Mavryk_clic.parameter
val sources_parameter :
unit ->
(Mavryk_proxy.Light.sources_config, 'a) Mavryk_clic.parameter
val chain_parameter :
unit ->
(Mavryk_shell_services.Chain_services.chain, 'a) Mavryk_clic.parameter
val block_parameter :
unit ->
(Mavryk_shell_services.Block_services.block, 'a) Mavryk_clic.parameter
val wait_parameter : unit -> (int option, 'a) Mavryk_clic.parameter
val protocol_parameter :
unit ->
(Mavryk_base.TzPervasives.Protocol_hash.t option, 'a) Mavryk_clic.parameter
val base_dir_arg : unit -> (string option, 'a) Mavryk_clic.arg
val no_base_dir_warnings_switch : unit -> (bool, 'a) Mavryk_clic.arg
val config_file_arg : unit -> (string option, 'a) Mavryk_clic.arg
val timings_switch : unit -> (bool, 'a) Mavryk_clic.arg
val chain_arg :
unit ->
(Mavryk_shell_services.Chain_services.chain, 'a) Mavryk_clic.arg
val block_arg :
unit ->
(Mavryk_shell_services.Block_services.block, 'a) Mavryk_clic.arg
val wait_arg : unit -> (int option option, 'a) Mavryk_clic.arg
val protocol_arg :
unit ->
(Mavryk_base.TzPervasives.Protocol_hash.t option option, 'a) Mavryk_clic.arg
val log_requests_switch : unit -> (bool, 'a) Mavryk_clic.arg
val better_errors : unit -> (bool, 'a) Mavryk_clic.arg
val addr_arg : unit -> (string option, 'a) Mavryk_clic.arg
val port_arg : unit -> (int option, 'a) Mavryk_clic.arg
val tls_switch : unit -> (bool, 'a) Mavryk_clic.arg
val media_type_arg :
unit ->
(Mavryk_rpc_http.Media_type.Command_line.t option,
Mavryk_client_base.Client_context.full)
Mavryk_clic.arg
val endpoint_arg : unit -> (Uri.t option, 'a) Mavryk_clic.arg
val sources_arg :
unit ->
(Mavryk_proxy.Light.sources_config option, 'a) Mavryk_clic.arg
val remote_signer_arg : unit -> (Uri.t option, 'a) Mavryk_clic.arg
val password_filename_arg : unit -> (string option, 'a) Mavryk_clic.arg
val client_mode_arg : unit -> (client_mode, 'a) Mavryk_clic.arg
val read_config_file :
string ->
Cfg_file.t Mavryk_base.TzPervasives.tzresult Lwt.t
val fail_on_non_mockup_dir :
Mavryk_client_base.Client_context.full ->
(unit, Mavryk_base.TzPervasives.tztrace) Stdlib.result Lwt.t
val config_show_client :
Mavryk_client_base.Client_context.full ->
string ->
Cfg_file.t ->
(unit, 'a) Stdlib.result Lwt.t
val config_show_mockup :
Mavryk_client_base.Client_context.full ->
Mavryk_base.TzPervasives.Protocol_hash.t option ->
string ->
(unit, Mavryk_base.TzPervasives.tztrace) Stdlib.result Lwt.t
val config_init_client :
string ->
Cfg_file.t ->
unit Mavryk_error_monad.Error_monad.tzresult Lwt.t
val config_init_mockup :
Mavryk_client_base.Client_context.full ->
Mavryk_base.TzPervasives.Protocol_hash.t option ->
string ->
string ->
string ->
(unit, Mavryk_base.TzPervasives.tztrace) Stdlib.result Lwt.t
val commands :
string ->
Cfg_file.t ->
client_mode ->
Mavryk_base.TzPervasives.Protocol_hash.t option ->
string ->
Mavryk_client_base.Client_context.full Mavryk_clic.command list
val global_options :
unit ->
(string option
* bool
* string option
* bool
* Mavryk_shell_services.Chain_services.chain
* Mavryk_shell_services.Block_services.block
* int option option
* Mavryk_base.TzPervasives.Protocol_hash.t option option
* bool
* bool
* string option
* int option
* bool
* Mavryk_rpc_http.Media_type.Command_line.t option
* Uri.t option
* Mavryk_proxy.Light.sources_config option
* Uri.t option
* string option
* client_mode,
Mavryk_client_base.Client_context.full)
Mavryk_clic.options
type parsed_config_args = {
parsed_config_file : Cfg_file.t option;
parsed_args : cli_args option;
config_commands : Mavryk_client_base.Client_context.full Mavryk_clic.command
list;
base_dir : string option;
require_auth : bool;
}
val default_parsed_config_args : parsed_config_args
val check_base_dir_for_mode :
Mavryk_client_base.Client_context.full ->
[< `Mode_client | `Mode_light | `Mode_mockup | `Mode_proxy ] ->
bool ->
string ->
(unit, Mavryk_base.TzPervasives.tztrace) Stdlib.result Lwt.t
val light_mode_checks :
[< `Mode_client | `Mode_light | `Mode_mockup | `Mode_proxy ] ->
Uri.t ->
Mavryk_proxy.Light.sources_config option ->
unit Mavryk_base.TzPervasives.tzresult Lwt.t
val parse_config_args :
Mavryk_client_base.Client_context.full ->
string list ->
(parsed_config_args * string list, Mavryk_error_monad.Error_monad.tztrace)
Stdlib.result
Lwt.t
type t =
string option
* bool
* string option
* bool
* Mavryk_shell_services.Shell_services.chain
* Mavryk_shell_services.Shell_services.block
* int option option
* Mavryk_base.TzPervasives.Protocol_hash.t option option
* bool
* bool
* string option
* int option
* bool
* Mavryk_rpc_http.Media_type.Command_line.t option
* Uri.t option
* Mavryk_proxy.Light.sources_config option
* Uri.t option
* string option
* client_mode
module type Remote_params = sig ... end
val other_registrations : (Cfg_file.t -> (module Remote_params) -> unit) option