sig
exception Inactive
type reserve_info = { ri_blocks : Nn_db.allocinfo list; }
val create_reserve_info :
?blocks:Nn_db.allocinfo list -> unit -> Nn_blockmap.reserve_info
type triv_range = int64 * int64
val string_of_trl : Nn_blockmap.triv_range list -> string
type owner
val create_owner : unit -> Nn_blockmap.owner
val string_of_owner : Nn_blockmap.owner -> string
class type blockmap_t =
object
method active : bool
method commit : Nn_blockmap.owner -> unit
method dump : string
method fill_blockmap : int64 -> string -> unit
method fill_done : unit -> unit
method fill_from_db : int64 -> int -> unit
method filled : bool
method free : Nn_blockmap.triv_range list -> Nn_blockmap.owner -> unit
method get_changes : Nn_blockmap.owner -> (int64 * string) list
method has_free_blocks : bool
method id : int
method identity : string
method inactivate : unit -> unit
method pin : Nn_blockmap.triv_range list -> Nn_blockmap.owner -> unit
method release : Nn_blockmap.owner -> unit
method reserve :
int ->
Nn_blockmap.owner ->
Nn_blockmap.reserve_info -> Nn_blockmap.triv_range list
method rollback : Nn_blockmap.owner -> unit
method size : int64
method stats : int64 * int64 * int64
end
class blockmap : id:int -> identity:string -> size:int64 -> blockmap_t
val blockmap_from_db_e :
id:int ->
identity:string ->
size:int64 ->
Pfs_db.ro_async_connection ->
Unixqueue.event_system -> Nn_blockmap.blockmap_t Uq_engines.engine
val fill_blockmap : Nn_blockmap.blockmap_t -> unit
end
