(* (c) 2017, 2018 Hannes Mehnert, all rights reserved *) open Vmm_core (** ASN.1 encoding of resources and configuration *) (** {1 Object Identifier} *) (** OID in the Mirage namespace (enterprise arc 1.3.6.1.4.1.49836.43) *) val oid : Asn.OID.t val wire_to_cstruct : Vmm_commands.wire -> Cstruct.t val wire_of_cstruct : Cstruct.t -> (Vmm_commands.wire, [> `Msg of string ]) result val log_entry_to_cstruct : Log.t -> Cstruct.t val log_entry_of_cstruct : Cstruct.t -> (Log.t, [> `Msg of string ]) result val log_to_disk : Vmm_commands.version -> Log.t -> Cstruct.t val logs_of_disk : Vmm_commands.version -> Cstruct.t -> Log.t list type cert_extension = Vmm_commands.version * Vmm_commands.t val cert_extension_of_cstruct : Cstruct.t -> (cert_extension, [> `Msg of string ]) result val cert_extension_to_cstruct : cert_extension -> Cstruct.t