summaryrefslogtreecommitdiffstats
path: root/perl-install/diskdrake
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2002-08-16 11:29:17 +0000
committerPascal Rigaux <pixel@mandriva.com>2002-08-16 11:29:17 +0000
commit4b304e3392d6546633c8145f4866808ad3d43876 (patch)
tree145d4b44483c8adeb28c967355e9ac01277499ff /perl-install/diskdrake
parentc8798da6103b835a7ac68907c193ab6e96b6a040 (diff)
downloaddrakx-4b304e3392d6546633c8145f4866808ad3d43876.tar
drakx-4b304e3392d6546633c8145f4866808ad3d43876.tar.gz
drakx-4b304e3392d6546633c8145f4866808ad3d43876.tar.bz2
drakx-4b304e3392d6546633c8145f4866808ad3d43876.tar.xz
drakx-4b304e3392d6546633c8145f4866808ad3d43876.zip
limit max size of loopback to 2GB on FAT
Diffstat (limited to 'perl-install/diskdrake')
-rw-r--r--perl-install/diskdrake/interactive.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/diskdrake/interactive.pm b/perl-install/diskdrake/interactive.pm
index 3d9425037..70f8ea60d 100644
--- a/perl-install/diskdrake/interactive.pm
+++ b/perl-install/diskdrake/interactive.pm
@@ -789,7 +789,8 @@ sub Loopback {
my $handle = any::inspect($real_part) or $in->ask_warn('', _("This partition can't be used for loopback")), return;
- my ($min, $max) = (1, loopback::getFree($handle->{dir}, $real_part));
+ my ($min, $max) = (1, loopback::getFree($handle->{dir}, $real_part));
+ $max = max($max, 1 << (31 - 9)) if isFat($real_part); #- FAT doesn't handle file size bigger than 2GB
my $part = { maxsize => $max, size => 0, loopback_device => $real_part, notFormatted => 1 };
if (!fsedit::suggest_part($part, $all_hds)) {
$part->{size} = $part->{maxsize};