Add support for zerofree command.

[libguestfs.git] / ocaml / guestfs.mli

diff --git a/ocaml/guestfs.mli b/ocaml/guestfs.mli
index f38fa48..3776abe 100644 (file)
--- a/ocaml/guestfs.mli
+++ b/ocaml/guestfs.mli
@@ -154,6 +154,12 @@ val set_path : t -> string -> unit
 val get_path : t -> string
 (** get the search path *)
 
+val set_append : t -> string -> unit
+(** add options to kernel command line *)
+
+val get_append : t -> string
+(** get the additional kernel options *)
+
 val set_autosync : t -> bool -> unit
 (** set autosync mode *)
 
@@ -187,6 +193,9 @@ val set_busy : t -> unit
 val set_ready : t -> unit
 (** set state to ready *)
 
+val end_busy : t -> unit
+(** leave the busy state *)
+
 val mount : t -> string -> string -> unit
 (** mount a guest disk at a position in the filesystem *)
 
@@ -424,3 +433,57 @@ val vgremove : t -> string -> unit
 val pvremove : t -> string -> unit
 (** remove an LVM physical volume *)
 
+val set_e2label : t -> string -> string -> unit
+(** set the ext2/3/4 filesystem label *)
+
+val get_e2label : t -> string -> string
+(** get the ext2/3/4 filesystem label *)
+
+val set_e2uuid : t -> string -> string -> unit
+(** set the ext2/3/4 filesystem UUID *)
+
+val get_e2uuid : t -> string -> string
+(** get the ext2/3/4 filesystem UUID *)
+
+val fsck : t -> string -> string -> int
+(** run the filesystem checker *)
+
+val zero : t -> string -> unit
+(** write zeroes to the device *)
+
+val grub_install : t -> string -> string -> unit
+(** install GRUB *)
+
+val cp : t -> string -> string -> unit
+(** copy a file *)
+
+val cp_a : t -> string -> string -> unit
+(** copy a file or directory recursively *)
+
+val mv : t -> string -> string -> unit
+(** move a file *)
+
+val drop_caches : t -> int -> unit
+(** drop kernel page cache, dentries and inodes *)
+
+val dmesg : t -> string
+(** return kernel messages *)
+
+val ping_daemon : t -> unit
+(** ping the guest daemon *)
+
+val equal : t -> string -> string -> bool
+(** test if two files have equal contents *)
+
+val strings : t -> string -> string array
+(** print the printable strings in a file *)
+
+val strings_e : t -> string -> string -> string array
+(** print the printable strings in a file *)
+
+val hexdump : t -> string -> string
+(** dump a file in hexadecimal *)
+
+val zerofree : t -> string -> unit
+(** zero unused inodes and disk blocks on ext2/3 filesystem *)
+