mirage-qubes 0.9.3 · OCaml Package

val sizeof_msg_header : int

val get_msg_header_ty : Cstruct.t -> Cstruct.uint32

val set_msg_header_ty : Cstruct.t -> Cstruct.uint32 -> unit

val get_msg_header_len : Cstruct.t -> Cstruct.uint32

val set_msg_header_len : Cstruct.t -> Cstruct.uint32 -> unit

val hexdump_msg_header_to_buffer : Stdlib.Buffer.t -> Cstruct.t -> unit

val hexdump_msg_header : Cstruct.t -> unit

val sizeof_peer_info : int

val get_peer_info_version : Cstruct.t -> Cstruct.uint32

val set_peer_info_version : Cstruct.t -> Cstruct.uint32 -> unit

val hexdump_peer_info_to_buffer : Stdlib.Buffer.t -> Cstruct.t -> unit

val hexdump_peer_info : Cstruct.t -> unit

val sizeof_exec_params : int

val get_exec_params_connect_domain : Cstruct.t -> Cstruct.uint32

val set_exec_params_connect_domain : Cstruct.t -> Cstruct.uint32 -> unit

val get_exec_params_connect_port : Cstruct.t -> Cstruct.uint32

val set_exec_params_connect_port : Cstruct.t -> Cstruct.uint32 -> unit

val hexdump_exec_params_to_buffer : Stdlib.Buffer.t -> Cstruct.t -> unit

val hexdump_exec_params : Cstruct.t -> unit

val sizeof_exit_status : int

val get_exit_status_return_code : Cstruct.t -> Cstruct.uint32

val set_exit_status_return_code : Cstruct.t -> Cstruct.uint32 -> unit

val hexdump_exit_status_to_buffer : Stdlib.Buffer.t -> Cstruct.t -> unit

val hexdump_exit_status : Cstruct.t -> unit

val sizeof_trigger_service_params : int

val get_trigger_service_params_service_name : Cstruct.t -> Cstruct.t

val copy_trigger_service_params_service_name : Cstruct.t -> string

val set_trigger_service_params_service_name : 
  string ->
  int ->
  Cstruct.t ->
  unit

val blit_trigger_service_params_service_name : 
  Cstruct.t ->
  int ->
  Cstruct.t ->
  unit

val get_trigger_service_params_target_domain : Cstruct.t -> Cstruct.t

val copy_trigger_service_params_target_domain : Cstruct.t -> string

val set_trigger_service_params_target_domain : 
  string ->
  int ->
  Cstruct.t ->
  unit

val blit_trigger_service_params_target_domain : 
  Cstruct.t ->
  int ->
  Cstruct.t ->
  unit

val get_trigger_service_params_request_id : Cstruct.t -> Cstruct.t

val copy_trigger_service_params_request_id : Cstruct.t -> string

val set_trigger_service_params_request_id : string -> int -> Cstruct.t -> unit

val blit_trigger_service_params_request_id : 
  Cstruct.t ->
  int ->
  Cstruct.t ->
  unit

val hexdump_trigger_service_params_to_buffer : 
  Stdlib.Buffer.t ->
  Cstruct.t ->
  unit

val hexdump_trigger_service_params : Cstruct.t -> unit

val sizeof_trigger_service_params3 : int

val get_trigger_service_params3_target_domain : Cstruct.t -> Cstruct.t

val copy_trigger_service_params3_target_domain : Cstruct.t -> string

val set_trigger_service_params3_target_domain : 
  string ->
  int ->
  Cstruct.t ->
  unit

val blit_trigger_service_params3_target_domain : 
  Cstruct.t ->
  int ->
  Cstruct.t ->
  unit

val get_trigger_service_params3_request_id : Cstruct.t -> Cstruct.t

val copy_trigger_service_params3_request_id : Cstruct.t -> string

val set_trigger_service_params3_request_id : string -> int -> Cstruct.t -> unit

val blit_trigger_service_params3_request_id : 
  Cstruct.t ->
  int ->
  Cstruct.t ->
  unit

val hexdump_trigger_service_params3_to_buffer : 
  Stdlib.Buffer.t ->
  Cstruct.t ->
  unit

val hexdump_trigger_service_params3 : Cstruct.t -> unit

type msg_type = [

| `Exec_cmdline
| `Just_exec
| `Service_connect
| `Service_refused
| `Trigger_service
| `Connection_terminated
| `Trigger_service3
| `Hello
| `Data_stdin
| `Data_stdout
| `Data_stderr
| `Data_exit_code

]

val type_of_int : 
  int32 ->
  [> `Connection_terminated
  | `Data_exit_code
  | `Data_stderr
  | `Data_stdin
  | `Data_stdout
  | `Exec_cmdline
  | `Hello
  | `Just_exec
  | `Service_connect
  | `Service_refused
  | `Trigger_service
  | `Trigger_service3
  | `Unknown of int32 ]

val int_of_type : 
  [< `Connection_terminated
  | `Data_exit_code
  | `Data_stderr
  | `Data_stdin
  | `Data_stdout
  | `Exec_cmdline
  | `Hello
  | `Just_exec
  | `Service_connect
  | `Service_refused
  | `Trigger_service
  | `Trigger_service3
  | `Unknown of int32 ] ->
  int32

val string_of_type : 
  [< `Connection_terminated
  | `Data_exit_code
  | `Data_stderr
  | `Data_stdin
  | `Data_stdout
  | `Exec_cmdline
  | `Hello
  | `Just_exec
  | `Service_connect
  | `Service_refused
  | `Trigger_service
  | `Trigger_service3
  | `Unknown of int32 ] ->
  string

type version = [

| `V2
| `V3

]

val version_of_int : int32 -> [> `Unknown_version of int32 | `V2 | `V3 ]

val int_of_version : [< `Unknown_version of int32 | `V2 | `V3 ] -> int32

module Framing : sig ... end

package mirage-qubes