Module supporting interface to file-system -- stat, digest, glob. Services: Digest caching & inotify wrapping (as hearts).
module Ocaml_digest : sig ... endmodule Digest = Db.Digestmodule Kind = Db.Kindmodule Glob : sig ... endmodule Listing = Db.Listingval create : Config.t -> Persist.t -> t Async.Deferred.tmodule Contents_result : sig ... endmodule Digest_result : sig ... endmodule Listing_result : sig ... endval contents_file : t -> file:Path.t -> Contents_result.t Tenacious.tval digest_file : t -> file:Path.t -> Digest_result.t Tenacious.tval list_glob : t -> Glob.t -> Listing_result.t Core.Or_error.t Tenacious.tval ensure_directory :
t ->
mkdir_root:Path.Rel.t option ->
dir:Path.Rel.t ->
unit Core.Or_error.t Tenacious.tThis function either checks the directory exists if mkdir_root is None, or creates all the directories between mkdir_root and dir (mkdir_root must be a non-strict ancestor of dir).
val lock_targets_and_mask_updates :
t ->
targets:Path.Rel.t list ->
(unit -> 'a Async.Deferred.t) ->
'a Async.Deferred.tLocks targets for writing and masks the corresponding 'file changed' messages
module Mtime : sig ... endval mtime_file : t -> file:Path.t -> Mtime.t option Tenacious.tval mtime_files_right_now :
Path.t list ->
((Path.t * Mtime.t) list, string) Core.Result.t Async.Deferred.t