albatross 1.5.3 · OCaml Package

val process : string -> Metrics.field

val init_influx : string -> (Ipaddr.t * int) option -> unit

type exit_status =

| Success
| Local_authentication_failed
| Remote_authentication_failed
| Communication_failed
| Connect_failed
| Remote_command_failed
| Cli_failed
| Internal_error
| Http_error

val output_result : 
  (Vmm_commands.header * Vmm_commands.res) ->
  (unit, exit_status) result

val create_vm : 
  bool ->
  string ->
  int ->
  int ->
  string list ->
  (string * string option * int option) list ->
  (string * string option * Macaddr.t option) list ->
  int ->
  bool ->
  Vmm_core.IS.elt list ->
  ([> `Unikernel_create of Vmm_core.Unikernel.config
   | `Unikernel_force_create of Vmm_core.Unikernel.config ],
    [> Rresult.R.msg ])
    result

val create_block : 
  int ->
  int ->
  Cstruct.t option ->
  ([> `Block_add of int * bool * Cstruct.t option ], [> `Msg of string ])
    result

val policy : 
  int ->
  int ->
  Vmm_core.IS.elt list ->
  int option ->
  Vmm_core.String_set.elt list ->
  Vmm_core.Policy.t

val setup_log : unit Cmdliner.Term.t

val ip_port : (Ipaddr.t * int) Cmdliner.Arg.conv

val influx : (Ipaddr.t * int) option Cmdliner.Term.t

val host_port : (string * int) Cmdliner.Arg.conv

val label_c : string Cmdliner.Arg.conv

val opt_path : string Cmdliner.Term.t

val path : string Cmdliner.Term.t

val bridge_tap_c : (string * string) Cmdliner.Arg.conv

val bridge_taps : (string * string) list Cmdliner.Term.t

val pid_req1 : int Cmdliner.Term.t

val vmm_dev_req0 : string Cmdliner.Term.t

val opt_vm_name : string Cmdliner.Term.t

val uri_c : string Cmdliner.Arg.conv

val http_host : string Cmdliner.Term.t

val compress_level : int -> int Cmdliner.Term.t

val force : bool Cmdliner.Term.t

val dryrun : bool Cmdliner.Term.t

val cpus : int list Cmdliner.Term.t

val vms : int Cmdliner.Term.t

val image : string Cmdliner.Term.t

val vm_name : string Cmdliner.Term.t

val block_name : string Cmdliner.Term.t

val block_size : int Cmdliner.Term.t

val data_c : Cstruct.t Cmdliner.Arg.conv

val block_data : Cstruct.t Cmdliner.Term.t

val opt_block_data : Cstruct.t option Cmdliner.Term.t

val opt_block_name : string Cmdliner.Term.t

val opt_block_size : int option Cmdliner.Term.t

val mem : int Cmdliner.Term.t

val bridge : string list Cmdliner.Term.t

val cpu : int Cmdliner.Term.t

val vm_mem : int Cmdliner.Term.t

val args : string list Cmdliner.Term.t

val colon_separated_c : 
  (string ->
  (string * string option, [> `Msg of string ]) result)
  * (Format.formatter ->
  (string * string option) ->
  unit)

val block_c : (string * string option * int option) Cmdliner.Arg.conv

val block : (string * string option * int option) list Cmdliner.Term.t

val net_with_mac : 
  (string * string option * Macaddr.t option) Cmdliner.Arg.conv

val net : (string * string option * Macaddr.t option) list Cmdliner.Term.t

val restart_on_fail : bool Cmdliner.Term.t

val exit_code : int list Cmdliner.Term.t

val timestamp_c : Ptime.t Cmdliner.Arg.conv

val since : Ptime.t option Cmdliner.Term.t

val count : int Cmdliner.Term.t

val since_count : 'a option -> 'b -> [> `Count of 'b | `Since of 'a ]

val version : string

type supported =

| FreeBSD
| Linux
| Darwin

val uname : supported

val default_tmpdir : string

val tmpdir : string Cmdliner.Term.t

val set_tmpdir : string -> unit

val default_dbdir : string

val dbdir : string Cmdliner.Term.t

val set_dbdir : string -> unit

val systemd_socket_activation : bool Cmdliner.Term.t

val port_or_socket : 
  default_port:int ->
  [> `Port of int | `Systemd_socket ] Cmdliner.Term.t

val pub_key_type : X509.Key_type.t Cmdliner.Term.t

val key_bits : int Cmdliner.Term.t

val exit_status : (unit, exit_status) result -> (exit_status, 'a) result

val remote_command_failed : int

val http_failed : int

val local_authentication_failed : int

val remote_authentication_failed : int

val communication_failed : int

val connect_failed : int

val exit_status_to_int : exit_status -> Cmdliner.Cmd.Exit.code

val exit_status_of_result : 
  ([< `Help | `Ok of exit_status | `Version ], [< `Exn | `Parse | `Term ])
    result ->
  Cmdliner.Cmd.Exit.code

val exits : Cmdliner.Cmd.Exit.info list

val auth_exits : Cmdliner.Cmd.Exit.info list

package albatross