X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=ocaml%2Fguestfs.mli;h=ef6a14237c2b9c43c3d655c1c8eab4bcbf472bc6;hp=859774aaf9ee496ae20e3e713e2c043d3621eb2f;hb=f68b3ac861ae607a333211c775dded82ae2b2c4a;hpb=460d139e6a52da67a4f1947035b1978610349f78

diff --git a/ocaml/guestfs.mli b/ocaml/guestfs.mli
index 859774a..ef6a142 100644
--- a/ocaml/guestfs.mli
+++ b/ocaml/guestfs.mli
@@ -280,6 +280,12 @@ val set_ready : t -> unit
 val end_busy : t -> unit
 (** leave the busy state *)
 
+val set_memsize : t -> int -> unit
+(** set memory allocated to the qemu subprocess *)
+
+val get_memsize : t -> int
+(** get memory allocated to the qemu subprocess *)
+
 val mount : t -> string -> string -> unit
 (** mount a guest disk at a position in the filesystem *)
 
@@ -610,3 +616,69 @@ val sleep : t -> int -> unit
 val ntfs_3g_probe : t -> bool -> string -> int
 (** probe NTFS volume *)
 
+val sh : t -> string -> string
+(** run a command via the shell *)
+
+val sh_lines : t -> string -> string array
+(** run a command via the shell returning lines *)
+
+val glob_expand : t -> string -> string array
+(** expand a wildcard path *)
+
+val scrub_device : t -> string -> unit
+(** scrub (securely wipe) a device *)
+
+val scrub_file : t -> string -> unit
+(** scrub (securely wipe) a file *)
+
+val scrub_freespace : t -> string -> unit
+(** scrub (securely wipe) free space *)
+
+val mkdtemp : t -> string -> string
+(** create a temporary directory *)
+
+val wc_l : t -> string -> int
+(** count lines in a file *)
+
+val wc_w : t -> string -> int
+(** count words in a file *)
+
+val wc_c : t -> string -> int
+(** count characters in a file *)
+
+val head : t -> string -> string array
+(** return first 10 lines of a file *)
+
+val head_n : t -> int -> string -> string array
+(** return first N lines of a file *)
+
+val tail : t -> string -> string array
+(** return last 10 lines of a file *)
+
+val tail_n : t -> int -> string -> string array
+(** return last N lines of a file *)
+
+val df : t -> string
+(** report file system disk space usage *)
+
+val df_h : t -> string
+(** report file system disk space usage (human readable) *)
+
+val du : t -> string -> int64
+(** estimate file space usage *)
+
+val initrd_list : t -> string -> string array
+(** list files in an initrd *)
+
+val mount_loop : t -> string -> string -> unit
+(** mount a file using the loop device *)
+
+val mkswap : t -> string -> unit
+(** create a swap partition *)
+
+val mkswap_L : t -> string -> string -> unit
+(** create a swap partition with a label *)
+
+val mkswap_U : t -> string -> string -> unit
+(** create a swap partition with an explicit UUID *)
+