2017-05-26 14:30:34 +00:00
|
|
|
(* (c) 2017 Hannes Mehnert, all rights reserved *)
|
|
|
|
|
|
|
|
open Rresult
|
|
|
|
|
|
|
|
open Vmm_core
|
|
|
|
|
2018-11-13 00:02:05 +00:00
|
|
|
val prepare : Name.t -> Unikernel.config -> (string list, [> R.msg ]) result
|
2017-05-26 14:30:34 +00:00
|
|
|
|
2018-11-13 00:02:05 +00:00
|
|
|
val exec : Name.t -> Unikernel.config -> string list -> Name.t option ->
|
|
|
|
(Unikernel.t, [> R.msg ]) result
|
2017-05-26 14:30:34 +00:00
|
|
|
|
2019-01-27 15:07:53 +00:00
|
|
|
val free_resources : Name.t -> string list -> (unit, [> R.msg ]) result
|
|
|
|
|
2018-11-13 00:02:05 +00:00
|
|
|
val shutdown : Name.t -> Unikernel.t -> (unit, [> R.msg ]) result
|
2017-05-26 14:30:34 +00:00
|
|
|
|
2018-11-13 00:02:05 +00:00
|
|
|
val destroy : Unikernel.t -> unit
|
2017-05-26 14:30:34 +00:00
|
|
|
|
|
|
|
val close_no_err : Unix.file_descr -> unit
|
2018-11-10 00:02:07 +00:00
|
|
|
|
2018-11-11 00:21:12 +00:00
|
|
|
val create_block : Name.t -> int -> (unit, [> R.msg ]) result
|
2018-11-10 00:02:07 +00:00
|
|
|
|
2018-11-11 00:21:12 +00:00
|
|
|
val destroy_block : Name.t -> (unit, [> R.msg ]) result
|
2018-11-10 00:02:07 +00:00
|
|
|
|
2018-11-11 00:21:12 +00:00
|
|
|
val find_block_devices : unit -> ((Name.t * int) list, [> R.msg ]) result
|
2019-01-20 21:17:59 +00:00
|
|
|
|
|
|
|
val dump : Cstruct.t -> (unit, [> R.msg ]) result
|
|
|
|
|
|
|
|
val restore : unit -> (Cstruct.t, [> R.msg | `NoFile ]) result
|
2019-01-20 22:02:01 +00:00
|
|
|
|
|
|
|
val vm_device : Unikernel.t -> (string, [> R.msg ]) result
|