package albatross

  1. Overview
  2. Docs
type typ = [
  1. | `Solo5
]
val pp_typ : typ Fmt.t
type fail_behaviour = [
  1. | `Quit
  2. | `Restart of IS.t option
]
type config = {
  1. typ : typ;
  2. compressed : bool;
  3. image : Cstruct.t;
  4. fail_behaviour : fail_behaviour;
  5. cpuid : int;
  6. memory : int;
  7. block_devices : (string * string option) list;
  8. bridges : (string * string option) list;
  9. argv : string list option;
}
val bridges : config -> string list
val pp_config : config Fmt.t
val pp_config_with_argv : config Fmt.t
val restart_handler : config -> bool
type t = {
  1. config : config;
  2. cmd : Bos.Cmd.t;
  3. pid : int;
  4. taps : string list;
  5. digest : Cstruct.t;
}
val pp : t Fmt.t
type info = {
  1. typ : typ;
  2. fail_behaviour : fail_behaviour;
  3. cpuid : int;
  4. memory : int;
  5. block_devices : (string * string option) list;
  6. bridges : (string * string option) list;
  7. argv : string list option;
  8. digest : Cstruct.t;
}
val info : t -> info
val pp_info : info Fmt.t
val pp_info_with_argv : info Fmt.t