X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=ocaml%2Fguestfs.mli;h=859774aaf9ee496ae20e3e713e2c043d3621eb2f;hp=5ce912204f5728d3ed5e6b5114f2a5fd795fb740;hb=b7e094fa14b306fe776b9b2695cf82fa32d4923f;hpb=85ed8cef99c19b4143844991d14e0b848fecc5da

diff --git a/ocaml/guestfs.mli b/ocaml/guestfs.mli
index 5ce9122..859774a 100644
--- a/ocaml/guestfs.mli
+++ b/ocaml/guestfs.mli
@@ -124,6 +124,87 @@ type statvfs = {
   namemax : int64;
 }
 
+val test0 : t -> string -> string option -> string array -> bool -> int -> string -> string -> unit
+(** internal test function - do not use *)
+
+val test0rint : t -> string -> int
+(** internal test function - do not use *)
+
+val test0rinterr : t -> int
+(** internal test function - do not use *)
+
+val test0rint64 : t -> string -> int64
+(** internal test function - do not use *)
+
+val test0rint64err : t -> int64
+(** internal test function - do not use *)
+
+val test0rbool : t -> string -> bool
+(** internal test function - do not use *)
+
+val test0rboolerr : t -> bool
+(** internal test function - do not use *)
+
+val test0rconststring : t -> string -> string
+(** internal test function - do not use *)
+
+val test0rconststringerr : t -> string
+(** internal test function - do not use *)
+
+val test0rstring : t -> string -> string
+(** internal test function - do not use *)
+
+val test0rstringerr : t -> string
+(** internal test function - do not use *)
+
+val test0rstringlist : t -> string -> string array
+(** internal test function - do not use *)
+
+val test0rstringlisterr : t -> string array
+(** internal test function - do not use *)
+
+val test0rintbool : t -> string -> int * bool
+(** internal test function - do not use *)
+
+val test0rintboolerr : t -> int * bool
+(** internal test function - do not use *)
+
+val test0rpvlist : t -> string -> lvm_pv array
+(** internal test function - do not use *)
+
+val test0rpvlisterr : t -> lvm_pv array
+(** internal test function - do not use *)
+
+val test0rvglist : t -> string -> lvm_vg array
+(** internal test function - do not use *)
+
+val test0rvglisterr : t -> lvm_vg array
+(** internal test function - do not use *)
+
+val test0rlvlist : t -> string -> lvm_lv array
+(** internal test function - do not use *)
+
+val test0rlvlisterr : t -> lvm_lv array
+(** internal test function - do not use *)
+
+val test0rstat : t -> string -> stat
+(** internal test function - do not use *)
+
+val test0rstaterr : t -> stat
+(** internal test function - do not use *)
+
+val test0rstatvfs : t -> string -> statvfs
+(** internal test function - do not use *)
+
+val test0rstatvfserr : t -> statvfs
+(** internal test function - do not use *)
+
+val test0rhashtable : t -> string -> (string * string) list
+(** internal test function - do not use *)
+
+val test0rhashtableerr : t -> (string * string) list
+(** internal test function - do not use *)
+
 val launch : t -> unit
 (** launch the qemu subprocess *)
 
@@ -139,6 +220,9 @@ val add_drive : t -> string -> unit
 val add_cdrom : t -> string -> unit
 (** add a CD-ROM disk image to examine *)
 
+val add_drive_ro : t -> string -> unit
+(** add a drive in snapshot mode (read-only) *)
+
 val config : t -> string -> string option -> unit
 (** add qemu parameters *)
 
@@ -508,3 +592,21 @@ val vg_activate_all : t -> bool -> unit
 val vg_activate : t -> bool -> string array -> unit
 (** activate or deactivate some volume groups *)
 
+val lvresize : t -> string -> int -> unit
+(** resize an LVM logical volume *)
+
+val resize2fs : t -> string -> unit
+(** resize an ext2/ext3 filesystem *)
+
+val find : t -> string -> string array
+(** find all files and directories *)
+
+val e2fsck_f : t -> string -> unit
+(** check an ext2/ext3 filesystem *)
+
+val sleep : t -> int -> unit
+(** sleep for some seconds *)
+
+val ntfs_3g_probe : t -> bool -> string -> int
+(** probe NTFS volume *)
+