git.annexia.org
/
virt-df.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Ownership using segment tree (not finished).
[virt-df.git]
/
lib
/
diskimage.mli
diff --git
a/lib/diskimage.mli
b/lib/diskimage.mli
index
b926193
..
2373341
100644
(file)
--- a/
lib/diskimage.mli
+++ b/
lib/diskimage.mli
@@
-203,6
+203,7
@@
and disk_content =
and partitions = {
parts_plugin_id : parts_plugin_id; (** Partitioning scheme. *)
and partitions = {
parts_plugin_id : parts_plugin_id; (** Partitioning scheme. *)
+ parts_dev : device; (** Partitions (whole) device. *)
parts : partition list; (** Partitions. *)
}
and partition = {
parts : partition list; (** Partitions. *)
}
and partition = {
@@
-239,6
+240,7
@@
and filesystem = {
and pv = {
lvm_plugin_id : lvm_plugin_id; (** The LVM plug-in which detected
this. *)
and pv = {
lvm_plugin_id : lvm_plugin_id; (** The LVM plug-in which detected
this. *)
+ pv_dev : device; (** Device covering whole PV. *)
pv_uuid : string; (** UUID. *)
}
and lv = {
pv_uuid : string; (** UUID. *)
}
and lv = {
@@
-256,7
+258,9
@@
val name_of_filesystem : fs_plugin_id -> string
val name_of_lvm : lvm_plugin_id -> string
(** Convert plug-in IDs to printable strings. *)
val name_of_lvm : lvm_plugin_id -> string
(** Convert plug-in IDs to printable strings. *)
-(** {2 Scanning functions} *)
+(** {2 Functions} *)
+
+(** {3 Create 'machine'} *)
val open_machine : string -> (string * string) list -> machine
(** [open_machine m_name devs]
val open_machine : string -> (string * string) list -> machine
(** [open_machine m_name devs]
@@
-278,6
+282,8
@@
val close_machine : machine -> unit
opened by these devices.
*)
opened by these devices.
*)
+(** {3 Scanning for filesystems} *)
+
val scan_machine : machine -> machine
(** This does a complete scan of all devices owned by a machine,
identifying all partitions, filesystems, physical and logical
val scan_machine : machine -> machine
(** This does a complete scan of all devices owned by a machine,
identifying all partitions, filesystems, physical and logical
@@
-288,6
+294,15
@@
val scan_machine : machine -> machine
Returns an updated {!machine} structure with the scan results.
*)
Returns an updated {!machine} structure with the scan results.
*)
+(** {3 Create ownership tables} *)
+
+type ownership
+
+val create_ownership : machine -> ownership
+ (** This creates the ownership tables (mapping disk blocks to the
+ ultimate filesystem, etc., which owns each one).
+ *)
+
(** {2 Debugging} *)
val debug : bool ref
(** {2 Debugging} *)
val debug : bool ref