summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mageia.org>2012-04-23 23:33:00 +0000
committerPascal Terjan <pterjan@mageia.org>2012-04-23 23:33:00 +0000
commiteca86ee951a05c35bcfddba4f8988c2f0e23004f (patch)
treea4ec04d3b40d3d91449c57b445890e49400fc716 /perl-install
parentd37e1274a8553c201cc69e6865d51ebeb303fa49 (diff)
downloaddrakx-eca86ee951a05c35bcfddba4f8988c2f0e23004f.tar
drakx-eca86ee951a05c35bcfddba4f8988c2f0e23004f.tar.gz
drakx-eca86ee951a05c35bcfddba4f8988c2f0e23004f.tar.bz2
drakx-eca86ee951a05c35bcfddba4f8988c2f0e23004f.tar.xz
drakx-eca86ee951a05c35bcfddba4f8988c2f0e23004f.zip
detect LVM on top on Encrypted partitions (mga#5330)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS3
-rw-r--r--perl-install/diskdrake/interactive.pm2
-rw-r--r--perl-install/fs/dmcrypt.pm6
-rw-r--r--perl-install/install/NEWS3
4 files changed, 12 insertions, 2 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 61107602c..b073f7688 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -7,6 +7,9 @@
- drakboot:
o display mountpoint if available, and size+fs_type if we have nothing
else (mga#5460)
+- diskdrake:
+ o do not set fs_type to ext4 for raw LVM/RAID/LUKS
+ o detect LVM on top on Encrypted partitions (mga#5330)
Version 14.3 - 7 April 2012
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index 666e7b3a9..fb60f280d 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -960,6 +960,8 @@ sub dmcrypt_open {
delete $part->{dmcrypt_key};
die(($? >> 8) == 255 ? N("Invalid key") : $@);
}
+ # Detect LVMs on top of dmcrypt
+ $all_hds->{lvms} = [ fsedit::lvms($all_hds) ];
}
sub Add2RAID {
diff --git a/perl-install/fs/dmcrypt.pm b/perl-install/fs/dmcrypt.pm
index ae0f71714..a0f5b6559 100644
--- a/perl-install/fs/dmcrypt.pm
+++ b/perl-install/fs/dmcrypt.pm
@@ -127,8 +127,10 @@ sub _get_existing_one {
put_in_hash($part, $type);
}
fs::type::set_isFormatted($part, to_bool($part->{fs_type}));
-
- $part->{fs_type} or fs::type::set_fs_type($part, defaultFS());
+
+ unless (fs::type::cannotBeMountable($part)) {
+ $part->{fs_type} or fs::type::set_fs_type($part, defaultFS());
+ }
log::l("dmcrypt: found $part->{device} type $part->{fs_type} with rootDevice $part->{rootDevice}");
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 85c4273b1..240d5c9fc 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,6 @@
+- do not set fs_type to ext4 for raw LVM/RAID/LUKS
+- detect LVM on top on Encrypted partitions (mga#5330)
+
Version 14.10 - 23 April 2012
- do not offer to upgrade mdv 201[1-9] (mga#5004)