Module Blkproto.Req

type seg = {
gref : OS.Xen.Gntref.t;
first_sector : int;
last_sector : int;
}
type segs =
| Direct of seg array
| Indirect of int32 array
type op =
| Read
| Write
| Write_barrier
| Flush
| Op_reserved_1
| Trim
| Indirect_op
val string_of_op : op -> string
type t = {
op : op option;
handle : int;
id : int64;
sector : int64;
nr_segs : int;
segs : segs;
}
val get_segments : Cstruct.t -> int -> seg array
module type PROTOCOL_IMPLEMENTATION = sig ... end
module Proto_32 : PROTOCOL_IMPLEMENTATION
module Proto_64 : PROTOCOL_IMPLEMENTATION