1 (* libguestfs generated file
2 * WARNING: THIS FILE IS GENERATED BY 'src/generator.ml'.
3 * ANY CHANGES YOU MAKE TO THIS FILE WILL BE LOST.
5 * Copyright (C) 2009 Red Hat Inc.
7 * This library is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU Lesser General Public
9 * License as published by the Free Software Foundation; either
10 * version 2 of the License, or (at your option) any later version.
12 * This library is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * Lesser General Public License for more details.
17 * You should have received a copy of the GNU Lesser General Public
18 * License along with this library; if not, write to the Free Software
19 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
23 exception Error of string
24 external create : unit -> t = "ocaml_guestfs_create"
25 external close : t -> unit = "ocaml_guestfs_close"
28 Callback.register_exception "ocaml_guestfs_error" (Error "")
40 pv_pe_alloc_count : int64;
55 vg_extent_size : int64;
56 vg_extent_count : int64;
57 vg_free_count : int64;
75 lv_kernel_major : int64;
76 lv_kernel_minor : int64;
80 snap_percent : float option;
81 copy_percent : float option;
88 external launch : t -> unit = "ocaml_guestfs_launch"
89 external wait_ready : t -> unit = "ocaml_guestfs_wait_ready"
90 external kill_subprocess : t -> unit = "ocaml_guestfs_kill_subprocess"
91 external add_drive : t -> string -> unit = "ocaml_guestfs_add_drive"
92 external add_cdrom : t -> string -> unit = "ocaml_guestfs_add_cdrom"
93 external config : t -> string -> string option -> unit = "ocaml_guestfs_config"
94 external set_path : t -> string -> unit = "ocaml_guestfs_set_path"
95 external get_path : t -> string = "ocaml_guestfs_get_path"
96 external set_autosync : t -> bool -> unit = "ocaml_guestfs_set_autosync"
97 external get_autosync : t -> bool = "ocaml_guestfs_get_autosync"
98 external set_verbose : t -> bool -> unit = "ocaml_guestfs_set_verbose"
99 external get_verbose : t -> bool = "ocaml_guestfs_get_verbose"
100 external mount : t -> string -> string -> unit = "ocaml_guestfs_mount"
101 external sync : t -> unit = "ocaml_guestfs_sync"
102 external touch : t -> string -> unit = "ocaml_guestfs_touch"
103 external cat : t -> string -> string = "ocaml_guestfs_cat"
104 external ll : t -> string -> string = "ocaml_guestfs_ll"
105 external ls : t -> string -> string array = "ocaml_guestfs_ls"
106 external list_devices : t -> string array = "ocaml_guestfs_list_devices"
107 external list_partitions : t -> string array = "ocaml_guestfs_list_partitions"
108 external pvs : t -> string array = "ocaml_guestfs_pvs"
109 external vgs : t -> string array = "ocaml_guestfs_vgs"
110 external lvs : t -> string array = "ocaml_guestfs_lvs"
111 external pvs_full : t -> lvm_pv array = "ocaml_guestfs_pvs_full"
112 external vgs_full : t -> lvm_vg array = "ocaml_guestfs_vgs_full"
113 external lvs_full : t -> lvm_lv array = "ocaml_guestfs_lvs_full"