Up

module Netplex_ctrl_clnt

: sig
#
module Make'Control : functor (U'C : Rpc_client.USE_CLIENT) -> sig
end
#
module Control : sig
#
module V1 : sig
#
type t = Rpc_client.t
#
val create_client : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> Rpc_client.connector -> Rpc.protocol -> Rpc_client.t
#
val create_portmapped_client : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> string -> Rpc.protocol -> Rpc_client.t
#
val create_client2 : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> Rpc_client.mode2 -> Rpc_client.t
#
val _program : Rpc_program.t
#
val ping'async : Rpc_client.t -> Netplex_ctrl_aux.t_Control'V1'ping'arg -> ((unit -> Netplex_ctrl_aux.t_Control'V1'ping'res) -> unit) -> unit
#
val poll'async : Rpc_client.t -> Netplex_ctrl_aux.t_Control'V1'poll'arg -> ((unit -> Netplex_ctrl_aux.t_Control'V1'poll'res) -> unit) -> unit
#
val accepted'async : Rpc_client.t -> Netplex_ctrl_aux.t_Control'V1'accepted'arg -> ((unit -> Netplex_ctrl_aux.t_Control'V1'accepted'res) -> unit) -> unit
end
end
#
module Make'System : functor (U'C : Rpc_client.USE_CLIENT) -> sig
#
module V1 : sig
#
type t = U'C.t
#
val _program : Rpc_program.t
#
val ping'async : U'C.t -> Netplex_ctrl_aux.t_System'V1'ping'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'ping'res) -> unit) -> unit
#
val lookup'async : U'C.t -> Netplex_ctrl_aux.t_System'V1'lookup'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'lookup'res) -> unit) -> unit
#
val send_message'async : U'C.t -> Netplex_ctrl_aux.t_System'V1'send_message'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'send_message'res) -> unit) -> unit
#
val log'async : U'C.t -> Netplex_ctrl_aux.t_System'V1'log'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'log'res) -> unit) -> unit
#
val call_plugin'async : U'C.t -> Netplex_ctrl_aux.t_System'V1'call_plugin'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'call_plugin'res) -> unit) -> unit
#
val register_container_socket'async : U'C.t -> Netplex_ctrl_aux.t_System'V1'register_container_socket'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'register_container_socket'res) -> unit) -> unit
#
val lookup_container_sockets'async : U'C.t -> Netplex_ctrl_aux.t_System'V1'lookup_container_sockets'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'lookup_container_sockets'res) -> unit) -> unit
#
val activate_lever'async : U'C.t -> Netplex_ctrl_aux.t_System'V1'activate_lever'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'activate_lever'res) -> unit) -> unit
end
end
#
module System : sig
#
module V1 : sig
#
type t = Rpc_client.t
#
val create_client : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> Rpc_client.connector -> Rpc.protocol -> Rpc_client.t
#
val create_portmapped_client : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> string -> Rpc.protocol -> Rpc_client.t
#
val create_client2 : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> Rpc_client.mode2 -> Rpc_client.t
#
val _program : Rpc_program.t
#
val ping'async : Rpc_client.t -> Netplex_ctrl_aux.t_System'V1'ping'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'ping'res) -> unit) -> unit
#
val lookup'async : Rpc_client.t -> Netplex_ctrl_aux.t_System'V1'lookup'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'lookup'res) -> unit) -> unit
#
val send_message'async : Rpc_client.t -> Netplex_ctrl_aux.t_System'V1'send_message'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'send_message'res) -> unit) -> unit
#
val log'async : Rpc_client.t -> Netplex_ctrl_aux.t_System'V1'log'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'log'res) -> unit) -> unit
#
val call_plugin'async : Rpc_client.t -> Netplex_ctrl_aux.t_System'V1'call_plugin'arg -> ((unit -> Netplex_ctrl_aux.t_System'V1'call_plugin'res) -> unit) -> unit
end
end
#
module Make'Admin : functor (U'C : Rpc_client.USE_CLIENT) -> sig
#
module V2 : sig
#
type t = U'C.t
#
val _program : Rpc_program.t
#
val ping'async : U'C.t -> Netplex_ctrl_aux.t_Admin'V2'ping'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'ping'res) -> unit) -> unit
#
val list'async : U'C.t -> Netplex_ctrl_aux.t_Admin'V2'list'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'list'res) -> unit) -> unit
#
val enable'async : U'C.t -> Netplex_ctrl_aux.t_Admin'V2'enable'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'enable'res) -> unit) -> unit
#
val disable'async : U'C.t -> Netplex_ctrl_aux.t_Admin'V2'disable'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'disable'res) -> unit) -> unit
#
val restart'async : U'C.t -> Netplex_ctrl_aux.t_Admin'V2'restart'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'restart'res) -> unit) -> unit
#
val restart_all'async : U'C.t -> Netplex_ctrl_aux.t_Admin'V2'restart_all'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'restart_all'res) -> unit) -> unit
#
val system_shutdown'async : U'C.t -> Netplex_ctrl_aux.t_Admin'V2'system_shutdown'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'system_shutdown'res) -> unit) -> unit
#
val reopen_logfiles'async : U'C.t -> Netplex_ctrl_aux.t_Admin'V2'reopen_logfiles'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'reopen_logfiles'res) -> unit) -> unit
#
val send_admin_message'async : U'C.t -> Netplex_ctrl_aux.t_Admin'V2'send_admin_message'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'send_admin_message'res) -> unit) -> unit
end
end
#
module Admin : sig
#
module V2 : sig
#
type t = Rpc_client.t
#
val create_client : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> Rpc_client.connector -> Rpc.protocol -> Rpc_client.t
#
val create_portmapped_client : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> string -> Rpc.protocol -> Rpc_client.t
#
val create_client2 : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> Rpc_client.mode2 -> Rpc_client.t
#
val _program : Rpc_program.t
#
val ping'async : Rpc_client.t -> Netplex_ctrl_aux.t_Admin'V2'ping'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'ping'res) -> unit) -> unit
#
val list'async : Rpc_client.t -> Netplex_ctrl_aux.t_Admin'V2'list'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'list'res) -> unit) -> unit
#
val enable'async : Rpc_client.t -> Netplex_ctrl_aux.t_Admin'V2'enable'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'enable'res) -> unit) -> unit
#
val disable'async : Rpc_client.t -> Netplex_ctrl_aux.t_Admin'V2'disable'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'disable'res) -> unit) -> unit
#
val restart'async : Rpc_client.t -> Netplex_ctrl_aux.t_Admin'V2'restart'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'restart'res) -> unit) -> unit
#
val restart_all'async : Rpc_client.t -> Netplex_ctrl_aux.t_Admin'V2'restart_all'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'restart_all'res) -> unit) -> unit
#
val system_shutdown'async : Rpc_client.t -> Netplex_ctrl_aux.t_Admin'V2'system_shutdown'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'system_shutdown'res) -> unit) -> unit
#
val reopen_logfiles'async : Rpc_client.t -> Netplex_ctrl_aux.t_Admin'V2'reopen_logfiles'arg -> ((unit -> Netplex_ctrl_aux.t_Admin'V2'reopen_logfiles'res) -> unit) -> unit
end
end
#
module Make'Semaphore : functor (U'C : Rpc_client.USE_CLIENT) -> sig
#
module V1 : sig
#
type t = U'C.t
#
val _program : Rpc_program.t
#
val ping'async : U'C.t -> Netplex_ctrl_aux.t_Semaphore'V1'ping'arg -> ((unit -> Netplex_ctrl_aux.t_Semaphore'V1'ping'res) -> unit) -> unit
#
val increment'async : U'C.t -> Netplex_ctrl_aux.t_Semaphore'V1'increment'arg -> ((unit -> Netplex_ctrl_aux.t_Semaphore'V1'increment'res) -> unit) -> unit
#
val decrement'async : U'C.t -> Netplex_ctrl_aux.t_Semaphore'V1'decrement'arg -> ((unit -> Netplex_ctrl_aux.t_Semaphore'V1'decrement'res) -> unit) -> unit
#
val get'async : U'C.t -> Netplex_ctrl_aux.t_Semaphore'V1'get'arg -> ((unit -> Netplex_ctrl_aux.t_Semaphore'V1'get'res) -> unit) -> unit
#
val create'async : U'C.t -> Netplex_ctrl_aux.t_Semaphore'V1'create'arg -> ((unit -> Netplex_ctrl_aux.t_Semaphore'V1'create'res) -> unit) -> unit
#
val destroy'async : U'C.t -> Netplex_ctrl_aux.t_Semaphore'V1'destroy'arg -> ((unit -> Netplex_ctrl_aux.t_Semaphore'V1'destroy'res) -> unit) -> unit
end
end
#
module Semaphore : sig
#
module V1 : sig
#
type t = Rpc_client.t
#
val create_client : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> Rpc_client.connector -> Rpc.protocol -> Rpc_client.t
#
val create_portmapped_client : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> string -> Rpc.protocol -> Rpc_client.t
#
val create_client2 : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> Rpc_client.mode2 -> Rpc_client.t
#
val _program : Rpc_program.t
end
end
#
module Make'Sharedvar : functor (U'C : Rpc_client.USE_CLIENT) -> sig
#
module V1 : sig
#
type t = U'C.t
#
val _program : Rpc_program.t
#
val ping'async : U'C.t -> Netplex_ctrl_aux.t_Sharedvar'V1'ping'arg -> ((unit -> Netplex_ctrl_aux.t_Sharedvar'V1'ping'res) -> unit) -> unit
#
val create_var'async : U'C.t -> Netplex_ctrl_aux.t_Sharedvar'V1'create_var'arg -> ((unit -> Netplex_ctrl_aux.t_Sharedvar'V1'create_var'res) -> unit) -> unit
#
val set_value'async : U'C.t -> Netplex_ctrl_aux.t_Sharedvar'V1'set_value'arg -> ((unit -> Netplex_ctrl_aux.t_Sharedvar'V1'set_value'res) -> unit) -> unit
#
val get_value'async : U'C.t -> Netplex_ctrl_aux.t_Sharedvar'V1'get_value'arg -> ((unit -> Netplex_ctrl_aux.t_Sharedvar'V1'get_value'res) -> unit) -> unit
#
val delete_var'async : U'C.t -> Netplex_ctrl_aux.t_Sharedvar'V1'delete_var'arg -> ((unit -> Netplex_ctrl_aux.t_Sharedvar'V1'delete_var'res) -> unit) -> unit
#
val wait_for_value'async : U'C.t -> Netplex_ctrl_aux.t_Sharedvar'V1'wait_for_value'arg -> ((unit -> Netplex_ctrl_aux.t_Sharedvar'V1'wait_for_value'res) -> unit) -> unit
#
val dump'async : U'C.t -> Netplex_ctrl_aux.t_Sharedvar'V1'dump'arg -> ((unit -> Netplex_ctrl_aux.t_Sharedvar'V1'dump'res) -> unit) -> unit
end
end
#
module Sharedvar : sig
#
module V1 : sig
#
type t = Rpc_client.t
#
val create_client : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> Rpc_client.connector -> Rpc.protocol -> Rpc_client.t
#
val create_portmapped_client : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> string -> Rpc.protocol -> Rpc_client.t
#
val create_client2 : ?esys:Unixqueue.event_system -> ?program_number:Netnumber.uint4 -> ?version_number:Netnumber.uint4 -> Rpc_client.mode2 -> Rpc_client.t
#
val _program : Rpc_program.t
end
end
end