Vmm_vmmd (p.albatross.2.6.0.doc.albatross.unix.Vmm

Sourcetype 'a t

Sourceval empty : 'a t

Sourceval init_block_devices : 'a t -> 'a t

Sourceval waiter : 'a t -> Vmm_core.Name.t -> 'a t * 'a option

Sourceval register : 'a t -> Vmm_core.Name.t -> (unit -> 'b * 'a) -> 'a t * 'b

val register_restart : 
  'a t ->
  Vmm_core.Name.t ->
  (unit -> 'b * 'a) ->
  ('a t * 'b) option

Sourceval may_restart : 'a t -> Vmm_core.Name.t -> 'a t * bool

Source

type 'a create =
  Vmm_commands.wire
  * ('a t ->
  ('a t
   * Vmm_commands.wire
   * Vmm_commands.res
   * Vmm_core.Name.t
   * Vmm_core.Unikernel.t,
    [ `Msg of string ])
    result)
  * (unit ->
  Vmm_commands.res)

Source

val handle_shutdown : 
  'a t ->
  Vmm_core.Name.t ->
  Vmm_core.Unikernel.t ->
  [ `Exit of int | `Signal of int | `Stop of int ] ->
  'a t * Vmm_commands.wire

Source

val handle_create : 
  'a t ->
  Vmm_core.Name.t ->
  Vmm_core.Unikernel.config ->
  ('a t * 'a create, [> `Msg of string ]) result

Source

val handle_command : 
  'a t ->
  Vmm_commands.wire ->
  ('a t
   * [ `Create of Vmm_core.Name.t * Vmm_core.Unikernel.config
     | `Loop of Vmm_commands.res
     | `Send_stream of
       (unit, [> `Msg of string ]) result Lwt.t
       * string Lwt_stream.t
       * Vmm_commands.res
     | `Recv_stream of
       (unit, [> `Msg of string ]) result Lwt.t
       * string Lwt_stream.bounded_push
       * Vmm_commands.res
       * ('a t ->
       ('a t, [> `Msg of string ]) result)
     | `End of Vmm_commands.res
     | `Wait of Vmm_core.Name.t * (Vmm_core.process_exit -> Vmm_commands.res)
     | `Wait_and_create of
       Vmm_core.Name.t * (Vmm_core.Name.t * Vmm_core.Unikernel.config)
     | `Replace_stats of Vmm_commands.res * Vmm_commands.wire list ],
    Vmm_commands.res)
    result

Sourceval killall : 'a t -> (unit -> 'b * 'a) -> 'a t * 'b list

Source

val restore_state : 
  unit ->
  (Vmm_core.Unikernel.config Vmm_trie.t * Vmm_core.Policy.t Vmm_trie.t,
    [> `Msg of string ])
    result

Sourceval dump_state : 'a t -> unit

Source

val restore_policies : 
  'a t ->
  Vmm_core.Policy.t Vmm_trie.t ->
  ('a t, [> `Msg of string ]) result