X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=ocaml%2Fguestfs.ml;h=90f3ca8d137c54f8966343fc39ba470779a08e50;hb=228b19aa9c28b03b339e8e23fcb46359e3ab617e;hp=fb83545ba5c22af4d59ecb821c3879432b78bb7d;hpb=ad8a256f54a6cb99f89bb444c8597a152a793dce;p=libguestfs.git

diff --git a/ocaml/guestfs.ml b/ocaml/guestfs.ml
index fb83545..90f3ca8 100644
--- a/ocaml/guestfs.ml
+++ b/ocaml/guestfs.ml
@@ -280,3 +280,17 @@ external ntfs_3g_probe : t -> bool -> string -> int = "ocaml_guestfs_ntfs_3g_pro
 external sh : t -> string -> string = "ocaml_guestfs_sh"
 external sh_lines : t -> string -> string array = "ocaml_guestfs_sh_lines"
 external glob_expand : t -> string -> string array = "ocaml_guestfs_glob_expand"
+external scrub_device : t -> string -> unit = "ocaml_guestfs_scrub_device"
+external scrub_file : t -> string -> unit = "ocaml_guestfs_scrub_file"
+external scrub_freespace : t -> string -> unit = "ocaml_guestfs_scrub_freespace"
+external mkdtemp : t -> string -> string = "ocaml_guestfs_mkdtemp"
+external wc_l : t -> string -> int = "ocaml_guestfs_wc_l"
+external wc_w : t -> string -> int = "ocaml_guestfs_wc_w"
+external wc_c : t -> string -> int = "ocaml_guestfs_wc_c"
+external head : t -> string -> string array = "ocaml_guestfs_head"
+external head_n : t -> int -> string -> string array = "ocaml_guestfs_head_n"
+external tail : t -> string -> string array = "ocaml_guestfs_tail"
+external tail_n : t -> int -> string -> string array = "ocaml_guestfs_tail_n"
+external df : t -> string = "ocaml_guestfs_df"
+external df_h : t -> string = "ocaml_guestfs_df_h"
+external du : t -> string -> int64 = "ocaml_guestfs_du"