diff options
Diffstat (limited to 'ocaml/guestfs.ml')
| -rw-r--r-- | ocaml/guestfs.ml | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/ocaml/guestfs.ml b/ocaml/guestfs.ml index e29daea5..6477e95b 100644 --- a/ocaml/guestfs.ml +++ b/ocaml/guestfs.ml @@ -182,3 +182,13 @@ external stat : t -> string -> stat = "ocaml_guestfs_stat" external lstat : t -> string -> stat = "ocaml_guestfs_lstat" external statvfs : t -> string -> statvfs = "ocaml_guestfs_statvfs" external tune2fs_l : t -> string -> (string * string) list = "ocaml_guestfs_tune2fs_l" +external blockdev_setro : t -> string -> unit = "ocaml_guestfs_blockdev_setro" +external blockdev_setrw : t -> string -> unit = "ocaml_guestfs_blockdev_setrw" +external blockdev_getro : t -> string -> bool = "ocaml_guestfs_blockdev_getro" +external blockdev_getss : t -> string -> int = "ocaml_guestfs_blockdev_getss" +external blockdev_getbsz : t -> string -> int = "ocaml_guestfs_blockdev_getbsz" +external blockdev_setbsz : t -> string -> int -> unit = "ocaml_guestfs_blockdev_setbsz" +external blockdev_getsz : t -> string -> int64 = "ocaml_guestfs_blockdev_getsz" +external blockdev_getsize64 : t -> string -> int64 = "ocaml_guestfs_blockdev_getsize64" +external blockdev_flushbufs : t -> string -> unit = "ocaml_guestfs_blockdev_flushbufs" +external blockdev_rereadpt : t -> string -> unit = "ocaml_guestfs_blockdev_rereadpt" |