2018-10-23 22:13:47 +00:00
|
|
|
(* (c) 2018 Hannes Mehnert, all rights reserved *)
|
|
|
|
|
2018-10-22 21:20:00 +00:00
|
|
|
val pp_sockaddr : Format.formatter -> Lwt_unix.sockaddr -> unit
|
2018-10-23 22:03:36 +00:00
|
|
|
|
2018-10-22 21:20:00 +00:00
|
|
|
val pp_process_status : Format.formatter -> Unix.process_status -> unit
|
2018-10-23 22:03:36 +00:00
|
|
|
|
|
|
|
val ret : Unix.process_status -> Vmm_core.process_exit
|
|
|
|
|
2018-10-22 21:20:00 +00:00
|
|
|
val waitpid : int -> (int * Lwt_unix.process_status, unit) result Lwt.t
|
2018-10-23 22:03:36 +00:00
|
|
|
|
|
|
|
val wait_and_clear : int -> Unix.file_descr -> Vmm_core.process_exit Lwt.t
|
|
|
|
|
|
|
|
val read_wire : Lwt_unix.file_descr ->
|
|
|
|
(Vmm_commands.wire, [> `Eof | `Exception | `Toomuch ]) result Lwt.t
|
|
|
|
|
2018-10-22 22:02:05 +00:00
|
|
|
val write_raw :
|
|
|
|
Lwt_unix.file_descr -> bytes -> (unit, [> `Exception ]) result Lwt.t
|
2018-10-23 22:03:36 +00:00
|
|
|
|
2018-10-22 21:20:00 +00:00
|
|
|
val write_wire :
|
2018-10-23 22:03:36 +00:00
|
|
|
Lwt_unix.file_descr -> Vmm_commands.wire -> (unit, [> `Exception ]) result Lwt.t
|
|
|
|
|
2018-10-22 21:20:00 +00:00
|
|
|
val safe_close : Lwt_unix.file_descr -> unit Lwt.t
|
2018-10-28 00:03:27 +00:00
|
|
|
|
|
|
|
val read_from_file : string -> Cstruct.t Lwt.t
|