Module Blkback

val src : Logs.src
module Log : Logs.LOG
module type ACTIVATIONS = sig ... end
module Gntref = OS.Xen.Gntref
type ops = {
read : int64 -> Cstruct.t list -> unit Lwt.t;
write : int64 -> Cstruct.t list -> unit Lwt.t;
}
type stats = {
ring_utilisation : int array;
segments_per_request : int array;
mutable total_requests : int;
mutable total_ok : int;
mutable total_error : int;
}
type ('a, 'b) t = {
domid : int;
xe : Eventchn.handle;
evtchn : Eventchn.t;
ring : ('a, 'b) Ring.Rpc.Back.t;
ops : ops;
parse_req : Cstruct.t -> Blkproto.Req.t;
}
val page_size : int
module Opt : sig ... end
module Request : sig ... end
val is_writable : Blkproto.Req.t -> bool
module Make : functor (A : ACTIVATIONS) -> functor (X : Xs_client_lwt.S) -> functor (B : Mirage_block.S) -> sig ... end