diff options
author | Richard W.M. Jones <rjones@redhat.com> | 2008-04-15 15:33:08 +0100 |
---|---|---|
committer | Richard W.M. Jones <rjones@redhat.com> | 2008-04-15 15:33:08 +0100 |
commit | 479659599edaaf6cd9385ce00750407d61baf0f0 (patch) | |
tree | 02eac48f4d114c6578eb2e24eeb20657f8f1f63a /virt-df | |
parent | b25ac692bd7107b56850de8fa25123791dfdf73e (diff) | |
download | virt-top-479659599edaaf6cd9385ce00750407d61baf0f0.tar.gz virt-top-479659599edaaf6cd9385ce00750407d61baf0f0.tar.xz virt-top-479659599edaaf6cd9385ce00750407d61baf0f0.zip |
Cosmetic fixes and comments.
Diffstat (limited to 'virt-df')
-rw-r--r-- | virt-df/virt_df_lvm2.ml | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/virt-df/virt_df_lvm2.ml b/virt-df/virt_df_lvm2.ml index afcab66..16d8e89 100644 --- a/virt-df/virt_df_lvm2.ml +++ b/virt-df/virt_df_lvm2.ml @@ -29,7 +29,7 @@ let plugin_name = "LVM2" let sector_size = 512 let sector_size64 = 512L -(* Probe to see if it's an LVM2 PV. Look for the "LABELONE" label. *) +(* Probe to see if it's an LVM2 PV. *) let rec probe_pv lvm_plugin_id dev = try let uuid, _ = read_pv_label dev in @@ -77,7 +77,7 @@ and read_pv_label dev = and read_metadata dev offset32 len32 = if debug then - eprintf "metadata: offset 0x%lx len %ld bytes\n" offset32 len32; + eprintf "metadata: offset 0x%lx len %ld bytes\n%!" offset32 len32; (* Check the offset and length are sensible. *) let offset64 = @@ -102,6 +102,8 @@ and read_metadata dev offset32 len32 = * what is on these LVs - that will be done in the main code. *) let list_lvs devs = + (* Read the UUID and metadata (again) from each device. *) + let uuidmetas = List.map read_pv_label devs in [] (* Register with main code. *) |