rashell 0.2.1 (latest) · OCaml Package

type file_kind = Unix.file_kind =

| S_REG
| S_DIR
| S_CHR
| S_BLK
| S_LNK
| S_FIFO
| S_SOCK

type file_perm = Unix.file_perm

type stats = Unix.stats = {

st_dev : int;
st_ino : int;
st_kind : file_kind;
st_perm : file_perm;
st_nlink : int;
st_uid : int;
st_gid : int;
st_rdev : int;
st_size : int;
st_atime : float;
st_mtime : float;
st_ctime : float;

}

type predicate =

| Prune
| Has_kind of file_kind
| Has_suffix of string
| Is_owned_by_user of int
| Is_owned_by_group of int
| Is_newer_than of string
| Has_exact_permission of int
| Has_at_least_permission of int
| Name of string
| And of predicate list
| Or of predicate list
| Not of predicate

val find : 
  ?workdir:string ->
  ?env:string array ->
  ?follow:bool ->
  ?depthfirst:bool ->
  ?onefilesystem:bool ->
  predicate ->
  string list ->
  string Lwt_stream.t

val test : 
  ?workdir:string ->
  ?env:string array ->
  ?follow:bool ->
  predicate ->
  string ->
  bool Lwt.t

val cp : 
  ?workdir:string ->
  ?env:string array ->
  ?follow:bool ->
  ?force:bool ->
  ?recursive:bool ->
  string list ->
  string ->
  string Lwt_stream.t

val rm : 
  ?workdir:string ->
  ?env:string array ->
  ?force:bool ->
  ?recursive:bool ->
  string list ->
  string Lwt_stream.t

val mv : 
  ?workdir:string ->
  ?env:string array ->
  ?force:bool ->
  string list ->
  string ->
  string Lwt_stream.t

val ln : 
  ?workdir:string ->
  ?env:string array ->
  ?force:bool ->
  ?symbolic:bool ->
  string list ->
  string ->
  string Lwt_stream.t

val sed : 
  ?workdir:string ->
  ?env:string array ->
  ?echo:bool ->
  string ->
  string list ->
  string Lwt_stream.t

val sed_inplace : 
  ?workdir:string ->
  ?env:string array ->
  ?suffix:string ->
  string ->
  string list ->
  unit Lwt.t

val sed_filter : 
  ?workdir:string ->
  ?env:string array ->
  ?echo:bool ->
  string ->
  string Lwt_stream.t ->
  string Lwt_stream.t

val awk : 
  ?workdir:string ->
  ?env:string array ->
  ?fs:string ->
  ?bindings:(string * string) list ->
  string ->
  string list ->
  string Lwt_stream.t

val awk_filter : 
  ?workdir:string ->
  ?env:string array ->
  ?fs:string ->
  ?bindings:(string * string) list ->
  string ->
  string Lwt_stream.t ->
  string Lwt_stream.t

type free_disk_space = {

df_device : string;
df_blocks : int;
df_used : int;
df_free : int;
df_capacity : float;
df_mounted_on : string;

}

val df : string list -> free_disk_space list Lwt.t

val du : string list -> (string * int) list Lwt.t

package rashell