# HG changeset patch # User Heiko Schlittermann # Date 1263973981 -3600 # Node ID b99dbfa83db2b7e0610a875c8c8a310ac0240bdf # Parent 998ccc03375ba387ae2ccb6dd7af94baf38e09f6 changed structure in image-* dir diff -r 998ccc03375b -r b99dbfa83db2 si --- a/si Wed Jan 20 08:49:21 2010 +0100 +++ b/si Wed Jan 20 08:53:01 2010 +0100 @@ -46,7 +46,7 @@ remove_tree($dir); -d $dir or mkdir($dir, 0700) or die "Can't mkdir $dir: $!\n"; } - make_path(map { "$dir/$_" } qw(ptable lvm blkid mbr dump)); + make_path(map { "$dir/$_" } qw(info ptable lvm blkid mbr dump)); SI::ptable::volumes("$dir/ptable/%s", %devices); die Dumper \%devices if $opt_exit =~ /ptable/; @@ -70,8 +70,10 @@ unlink("../image-$id{name}") if -l "../image-$id{name}"; symlink(basename($dir), "../image-$id{name}"); - print {new IO::File ">$dir/devices"} Dumper \%devices - or die "ERR: Can't open $dir/devices: $!\n"; + print {new IO::File ">$dir/info/mac"} "$id{mac}\n"; + print {new IO::File ">$dir/info/name"} "$id{name}\n"; + print {new IO::File ">$dir/info/devices"} Dumper \%devices + or die "ERR: Can't open $dir/info/devices: $!\n"; SI::dumper::dump("$dir/dump/%s", %devices);