Module Unix_extended.Quota

type bytes = private Core.Int63.t
val sexp_of_bytes : bytes -> Ppx_sexp_conv_lib.Sexp.t
val bytes_of_sexp : Ppx_sexp_conv_lib.Sexp.t -> bytes
type inodes = private Core.Int63.t
val sexp_of_inodes : inodes -> Ppx_sexp_conv_lib.Sexp.t
val inodes_of_sexp : Ppx_sexp_conv_lib.Sexp.t -> inodes
val bytes : Core.Int63.t -> bytes
val inodes : Core.Int63.t -> inodes
type 'units limit = {
soft : 'units option;
hard : 'units option;
grace : Core.Time.t option;
}
val sexp_of_limit : ('units -> Ppx_sexp_conv_lib.Sexp.t) -> 'units limit -> Ppx_sexp_conv_lib.Sexp.t
val limit_of_sexp : (Ppx_sexp_conv_lib.Sexp.t -> 'units) -> Ppx_sexp_conv_lib.Sexp.t -> 'units limit
type 'units usage = private 'units
val query : [ `User | `Group ] -> id:int -> path:string -> (bytes limit * bytes usage * inodes limit * inodes usage) Core.Or_error.t
val set : [ `User | `Group ] -> id:int -> path:string -> bytes limit -> inodes limit -> unit Core.Or_error.t