summaryrefslogtreecommitdiffstats
path: root/perl-install/detect_devices.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-12-16 15:24:53 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-12-16 15:24:53 +0000
commitaba3aac607e4be847b5a24bf851655645b1a7033 (patch)
tree08f41033f91eb10e25075b3ef97950b1c4359e23 /perl-install/detect_devices.pm
parent256a3d708f01887deb6b10fd20bcd867550c0aff (diff)
downloaddrakx-backup-do-not-use-aba3aac607e4be847b5a24bf851655645b1a7033.tar
drakx-backup-do-not-use-aba3aac607e4be847b5a24bf851655645b1a7033.tar.gz
drakx-backup-do-not-use-aba3aac607e4be847b5a24bf851655645b1a7033.tar.bz2
drakx-backup-do-not-use-aba3aac607e4be847b5a24bf851655645b1a7033.tar.xz
drakx-backup-do-not-use-aba3aac607e4be847b5a24bf851655645b1a7033.zip
create function detect_devices::BIGMEM() which calls c::dmiDetectMemory(), but only
if we are root (this helps testings install without dying)
Diffstat (limited to 'perl-install/detect_devices.pm')
-rw-r--r--perl-install/detect_devices.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/detect_devices.pm b/perl-install/detect_devices.pm
index f21abc636..67296c01a 100644
--- a/perl-install/detect_devices.pm
+++ b/perl-install/detect_devices.pm
@@ -837,6 +837,10 @@ sub isLaptop() {
|| cat_('/proc/cpuinfo') =~ /\bmobile\b/i;
}
+sub BIGMEM() {
+ arch() !~ /x86_64|ia64/ && $> == 0 && c::dmiDetectMemory() > 4 * 1024;
+}
+
sub is_i586() {
my $cpuinfo = cat_('/proc/cpuinfo');
$cpuinfo =~ /^cpu family\s*:\s*(\d+)/m && $1 < 6 ||