package mirage-block-xen

  1. Overview
  2. Docs
type seg = {
  1. gref : Xen_os.Xen.Gntref.t;
  2. first_sector : int;
  3. last_sector : int;
}
type segs =
  1. | Direct of seg array
  2. | Indirect of int32 array
type op =
  1. | Read
  2. | Write
  3. | Write_barrier
  4. | Flush
  5. | Op_reserved_1
  6. | Trim
  7. | Indirect_op
val string_of_op : op -> string
type t = {
  1. op : op option;
  2. handle : int;
  3. id : int64;
  4. sector : int64;
  5. nr_segs : int;
  6. segs : segs;
}
val get_segments : Cstruct.t -> int -> seg array
module type PROTOCOL_IMPLEMENTATION = sig ... end