X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=ocaml%2Fguestfs.ml;h=53307944be7d239877ba633ac88dfabe517adbfc;hp=3e9f172d52c8dec7a6e788482aa20d13cc09ba37;hb=adefe14e308a0f8cf73f9c60693a3dbbded157b9;hpb=13339826ea01f8dbd581b5d2544e7692171cf386 diff --git a/ocaml/guestfs.ml b/ocaml/guestfs.ml index 3e9f172..5330794 100644 --- a/ocaml/guestfs.ml +++ b/ocaml/guestfs.ml @@ -111,3 +111,38 @@ external lvs : t -> string array = "ocaml_guestfs_lvs" external pvs_full : t -> lvm_pv array = "ocaml_guestfs_pvs_full" external vgs_full : t -> lvm_vg array = "ocaml_guestfs_vgs_full" external lvs_full : t -> lvm_lv array = "ocaml_guestfs_lvs_full" +external read_lines : t -> string -> string array = "ocaml_guestfs_read_lines" +external aug_init : t -> string -> int -> unit = "ocaml_guestfs_aug_init" +external aug_close : t -> unit = "ocaml_guestfs_aug_close" +external aug_defvar : t -> string -> string option -> int = "ocaml_guestfs_aug_defvar" +external aug_defnode : t -> string -> string -> string -> int * bool = "ocaml_guestfs_aug_defnode" +external aug_get : t -> string -> string = "ocaml_guestfs_aug_get" +external aug_set : t -> string -> string -> unit = "ocaml_guestfs_aug_set" +external aug_insert : t -> string -> string -> bool -> unit = "ocaml_guestfs_aug_insert" +external aug_rm : t -> string -> int = "ocaml_guestfs_aug_rm" +external aug_mv : t -> string -> string -> unit = "ocaml_guestfs_aug_mv" +external aug_match : t -> string -> string array = "ocaml_guestfs_aug_match" +external aug_save : t -> unit = "ocaml_guestfs_aug_save" +external aug_load : t -> unit = "ocaml_guestfs_aug_load" +external aug_ls : t -> string -> string array = "ocaml_guestfs_aug_ls" +external rm : t -> string -> unit = "ocaml_guestfs_rm" +external rmdir : t -> string -> unit = "ocaml_guestfs_rmdir" +external rm_rf : t -> string -> unit = "ocaml_guestfs_rm_rf" +external mkdir : t -> string -> unit = "ocaml_guestfs_mkdir" +external mkdir_p : t -> string -> unit = "ocaml_guestfs_mkdir_p" +external chmod : t -> int -> string -> unit = "ocaml_guestfs_chmod" +external chown : t -> int -> int -> string -> unit = "ocaml_guestfs_chown" +external exists : t -> string -> bool = "ocaml_guestfs_exists" +external is_file : t -> string -> bool = "ocaml_guestfs_is_file" +external is_dir : t -> string -> bool = "ocaml_guestfs_is_dir" +external pvcreate : t -> string -> unit = "ocaml_guestfs_pvcreate" +external vgcreate : t -> string -> string array -> unit = "ocaml_guestfs_vgcreate" +external lvcreate : t -> string -> string -> int -> unit = "ocaml_guestfs_lvcreate" +external mkfs : t -> string -> string -> unit = "ocaml_guestfs_mkfs" +external sfdisk : t -> string -> int -> int -> int -> string array -> unit = "ocaml_guestfs_sfdisk_byte" "ocaml_guestfs_sfdisk" +external write_file : t -> string -> string -> int -> unit = "ocaml_guestfs_write_file" +external umount : t -> string -> unit = "ocaml_guestfs_umount" +external mounts : t -> string array = "ocaml_guestfs_mounts" +external umount_all : t -> unit = "ocaml_guestfs_umount_all" +external lvm_remove_all : t -> unit = "ocaml_guestfs_lvm_remove_all" +external file : t -> string -> string = "ocaml_guestfs_file"