X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=ocaml%2Fguestfs.ml;h=d218b3e32d5bc8a8ccd06d4c6601fec9c6fdc556;hp=d50b2d8cca296e6b4fdbe1d688ee04ba1daa9039;hb=c41fe04a652437c920acb0e820762c53bf44a139;hpb=5cd39c83e23eb300d1bdfa806902a31b409ff420 diff --git a/ocaml/guestfs.ml b/ocaml/guestfs.ml index d50b2d8..d218b3e 100644 --- a/ocaml/guestfs.ml +++ b/ocaml/guestfs.ml @@ -115,6 +115,33 @@ type statvfs = { namemax : int64; } +external test0 : t -> string -> string option -> string array -> bool -> int -> string -> string -> unit = "ocaml_guestfs_test0_byte" "ocaml_guestfs_test0" +external test0rint : t -> string -> int = "ocaml_guestfs_test0rint" +external test0rinterr : t -> int = "ocaml_guestfs_test0rinterr" +external test0rint64 : t -> string -> int64 = "ocaml_guestfs_test0rint64" +external test0rint64err : t -> int64 = "ocaml_guestfs_test0rint64err" +external test0rbool : t -> string -> bool = "ocaml_guestfs_test0rbool" +external test0rboolerr : t -> bool = "ocaml_guestfs_test0rboolerr" +external test0rconststring : t -> string -> string = "ocaml_guestfs_test0rconststring" +external test0rconststringerr : t -> string = "ocaml_guestfs_test0rconststringerr" +external test0rstring : t -> string -> string = "ocaml_guestfs_test0rstring" +external test0rstringerr : t -> string = "ocaml_guestfs_test0rstringerr" +external test0rstringlist : t -> string -> string array = "ocaml_guestfs_test0rstringlist" +external test0rstringlisterr : t -> string array = "ocaml_guestfs_test0rstringlisterr" +external test0rintbool : t -> string -> int * bool = "ocaml_guestfs_test0rintbool" +external test0rintboolerr : t -> int * bool = "ocaml_guestfs_test0rintboolerr" +external test0rpvlist : t -> string -> lvm_pv array = "ocaml_guestfs_test0rpvlist" +external test0rpvlisterr : t -> lvm_pv array = "ocaml_guestfs_test0rpvlisterr" +external test0rvglist : t -> string -> lvm_vg array = "ocaml_guestfs_test0rvglist" +external test0rvglisterr : t -> lvm_vg array = "ocaml_guestfs_test0rvglisterr" +external test0rlvlist : t -> string -> lvm_lv array = "ocaml_guestfs_test0rlvlist" +external test0rlvlisterr : t -> lvm_lv array = "ocaml_guestfs_test0rlvlisterr" +external test0rstat : t -> string -> stat = "ocaml_guestfs_test0rstat" +external test0rstaterr : t -> stat = "ocaml_guestfs_test0rstaterr" +external test0rstatvfs : t -> string -> statvfs = "ocaml_guestfs_test0rstatvfs" +external test0rstatvfserr : t -> statvfs = "ocaml_guestfs_test0rstatvfserr" +external test0rhashtable : t -> string -> (string * string) list = "ocaml_guestfs_test0rhashtable" +external test0rhashtableerr : t -> (string * string) list = "ocaml_guestfs_test0rhashtableerr" external launch : t -> unit = "ocaml_guestfs_launch" external wait_ready : t -> unit = "ocaml_guestfs_wait_ready" external kill_subprocess : t -> unit = "ocaml_guestfs_kill_subprocess" @@ -241,3 +268,9 @@ external sfdisk_N : t -> string -> int -> int -> int -> int -> string -> unit = external sfdisk_l : t -> string -> string = "ocaml_guestfs_sfdisk_l" external sfdisk_kernel_geometry : t -> string -> string = "ocaml_guestfs_sfdisk_kernel_geometry" external sfdisk_disk_geometry : t -> string -> string = "ocaml_guestfs_sfdisk_disk_geometry" +external vg_activate_all : t -> bool -> unit = "ocaml_guestfs_vg_activate_all" +external vg_activate : t -> bool -> string array -> unit = "ocaml_guestfs_vg_activate" +external lvresize : t -> string -> int -> unit = "ocaml_guestfs_lvresize" +external resize2fs : t -> string -> unit = "ocaml_guestfs_resize2fs" +external find : t -> string -> string array = "ocaml_guestfs_find" +external e2fsck_f : t -> string -> unit = "ocaml_guestfs_e2fsck_f"