X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=ocaml%2Fguestfs.ml;h=39d2329369bfdd7ffd597ba683172066b0aae2af;hb=cead6fe22d32e8fcdb26c60fdad5db49bf3f0ec0;hp=b8511a4f72416a7966b48553b63aab68dd325a99;hpb=b03ee3675bed8d739ae722ed8c030ae02b3cb0ed;p=libguestfs.git

diff --git a/ocaml/guestfs.ml b/ocaml/guestfs.ml
index b8511a4..39d2329 100644
--- a/ocaml/guestfs.ml
+++ b/ocaml/guestfs.ml
@@ -136,6 +136,7 @@ external is_busy : t -> bool = "ocaml_guestfs_is_busy"
 external get_state : t -> int = "ocaml_guestfs_get_state"
 external set_busy : t -> unit = "ocaml_guestfs_set_busy"
 external set_ready : t -> unit = "ocaml_guestfs_set_ready"
+external end_busy : t -> unit = "ocaml_guestfs_end_busy"
 external mount : t -> string -> string -> unit = "ocaml_guestfs_mount"
 external sync : t -> unit = "ocaml_guestfs_sync"
 external touch : t -> string -> unit = "ocaml_guestfs_touch"
@@ -219,3 +220,16 @@ external set_e2label : t -> string -> string -> unit = "ocaml_guestfs_set_e2labe
 external get_e2label : t -> string -> string = "ocaml_guestfs_get_e2label"
 external set_e2uuid : t -> string -> string -> unit = "ocaml_guestfs_set_e2uuid"
 external get_e2uuid : t -> string -> string = "ocaml_guestfs_get_e2uuid"
+external fsck : t -> string -> string -> int = "ocaml_guestfs_fsck"
+external zero : t -> string -> unit = "ocaml_guestfs_zero"
+external grub_install : t -> string -> string -> unit = "ocaml_guestfs_grub_install"
+external cp : t -> string -> string -> unit = "ocaml_guestfs_cp"
+external cp_a : t -> string -> string -> unit = "ocaml_guestfs_cp_a"
+external mv : t -> string -> string -> unit = "ocaml_guestfs_mv"
+external drop_caches : t -> int -> unit = "ocaml_guestfs_drop_caches"
+external dmesg : t -> string = "ocaml_guestfs_dmesg"
+external ping_daemon : t -> unit = "ocaml_guestfs_ping_daemon"
+external equal : t -> string -> string -> bool = "ocaml_guestfs_equal"
+external strings : t -> string -> string array = "ocaml_guestfs_strings"
+external strings_e : t -> string -> string -> string array = "ocaml_guestfs_strings_e"
+external hexdump : t -> string -> string = "ocaml_guestfs_hexdump"