albatross/src/vmm_tls.mli

11 lines
385 B
OCaml
Raw Normal View History

2018-10-23 22:13:47 +00:00
(* (c) 2018 Hannes Mehnert, all rights reserved *)
2018-10-23 22:03:36 +00:00
2018-10-25 14:55:54 +00:00
val wire_command_of_cert : Vmm_commands.version -> X509.t ->
(Vmm_commands.t, [> `Parse of string | `Not_present | `Version of Vmm_commands.version ]) result
2018-10-25 14:55:54 +00:00
2018-10-23 22:10:08 +00:00
val handle :
'a -> Vmm_commands.version ->
X509.t list ->
(string list * (Vmm_core.id * Vmm_core.policy) list * Vmm_commands.t,
[> `Msg of string ]) Result.result