summaryrefslogtreecommitdiffstats
path: root/installer/OpenSLX/OSSetup/Distro/Base.pm
diff options
context:
space:
mode:
authorOliver Tappe2007-02-23 18:13:31 +0100
committerOliver Tappe2007-02-23 18:13:31 +0100
commite3774d4cd0224593220f45938566b6e1703e64c9 (patch)
tree696fafb19a9fc350a487d45d7d53ebbe15f28a14 /installer/OpenSLX/OSSetup/Distro/Base.pm
parent* removed superfluous 'fixing' of files (which is required for SUSE). (diff)
downloadcore-e3774d4cd0224593220f45938566b6e1703e64c9.tar.gz
core-e3774d4cd0224593220f45938566b6e1703e64c9.tar.xz
core-e3774d4cd0224593220f45938566b6e1703e64c9.zip
* added architecture check to inhibit users from trying to install a 64-bit system
on a 32-bit host, as that will fail later, anway. git-svn-id: http://svn.openslx.org/svn/openslx/trunk@717 95ad53e4-c205-0410-b2fa-d234c58c8868
Diffstat (limited to 'installer/OpenSLX/OSSetup/Distro/Base.pm')
-rw-r--r--installer/OpenSLX/OSSetup/Distro/Base.pm13
1 files changed, 13 insertions, 0 deletions
diff --git a/installer/OpenSLX/OSSetup/Distro/Base.pm b/installer/OpenSLX/OSSetup/Distro/Base.pm
index 45fcf5fd..73235c53 100644
--- a/installer/OpenSLX/OSSetup/Distro/Base.pm
+++ b/installer/OpenSLX/OSSetup/Distro/Base.pm
@@ -29,6 +29,19 @@ sub initialize
$self->{'engine'} = $engine;
+ if ($self->{'base-name'} =~ m[x86_64]) {
+ # be careful to only try installing 64-bit systems if actually
+ # running on a 64-bit host, as otherwise we are going to fail later,
+ # anyway:
+ my $arch = `uname -m`;
+ if ($?) {
+ die _tr("unable to determine architecture of host system (%s)\n", $!);
+ }
+ if ($arch !~ m[x86_64]) {
+ die _tr("you can't install a 64-bit system on a 32-bit host, sorry!\n");
+ }
+ }
+
$self->{'stage1a-binaries'} = {
"$openslxConfig{'share-path'}/busybox/busybox" => 'bin',
};