drop (broken) support for Alpha, PPC, Sparc & most of IA64

Including Xsun, silo & yaboot support

Rationale: it's unused/unmaintained for years and those arches are beyond
any hope of being usefull any day...
They just got in the way...

Part of IA64 support is still kept (eg: support for GPT, EFI, right xorg
driver at install, ...) as it might be usefull to extend to other arches

Next to consider: Xbox?

1 files changed, 6 insertions, 58 deletions

diff --git a/perl-install/any.pm b/perl-install/any.pm
index 1d5eb104b..80962f0ff 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -279,11 +279,6 @@ Assign a new Volume ID?", $dev)))) {
 	    $in->ask_warn('', [ N("Installation of bootloader failed. The following error occurred:"), $err ]);
 	    return;
 	}
-    } elsif (arch() =~ /ppc/) {
-	if (detect_devices::get_mac_model() !~ /IBM/) {
-            my $of_boot = bootloader::dev2yaboot($b->{boot});
-	    $in->ask_warn('', N("You may need to change your Open Firmware boot-device to\n enable the bootloader.  If you do not see the bootloader prompt at\n reboot, hold down Command-Option-O-F at reboot and enter:\n setenv boot-device %s,\\\\:tbxi\n Then type: shut-down\nAt your next boot you should see the bootloader prompt.", $of_boot));
-	}
     }
     1;
 }
@@ -295,7 +290,7 @@ sub setupBootloader_simple {
 
     require bootloader;
     bootloader::ensafe_first_bios_drive($hds)
-	|| $b->{bootUnsafe} || arch() =~ /ppc/ or return 1; #- default is good enough
+	|| $b->{bootUnsafe} or return 1; #- default is good enough
     
     if (arch() !~ /ia64/) {
 	setupBootloader__mbr_or_not($in, $b, $hds, $fstab) or return 0;
@@ -311,8 +306,7 @@ sub setupBootloader_simple {
 sub setupBootloader__boot_bios_drive {
     my ($in, $b, $hds) = @_;
 
-    if (arch() =~ /ppc/ ||
-	  !is_empty_hash_ref($b->{bios})) {
+    if (!is_empty_hash_ref($b->{bios})) {
 	#- some bios mapping already there
 	return 1;
     } elsif (bootloader::mixed_kind_of_disks($hds) && $b->{boot} =~ /\d$/) { #- on a partition
@@ -349,14 +343,6 @@ sub setupBootloader__mbr_or_not {
 
     log::l("setupBootloader__mbr_or_not");
 
-    if (arch() =~ /ppc/) {
-	if (defined $partition_table::mac::bootstrap_part) {
-	    $b->{boot} = $partition_table::mac::bootstrap_part;
-	    log::l("set bootstrap to $b->{boot}"); 
-	} else {
-	    die "no bootstrap partition - yaboot.conf creation failed";
-	}
-    } else {
 	my $floppy = detect_devices::floppy();
 
 	my @l = (
@@ -381,15 +367,9 @@ sub setupBootloader__mbr_or_not {
 	#- remove bios mapping if the user changed the boot device
 	delete $b->{bios} if $new_boot && $new_boot ne $b->{boot};
 	$b->{boot} = $new_boot or return;
-    }
     1;
 }
 
-sub get_apple_boot_parts {
-    my ($fstab) = @_;
-    map { "/dev/$_" } (map { $_->{device} } (grep { isAppleBootstrap($_) } @$fstab));
-}
-
 sub setupBootloader__general {
     my ($in, $b, $all_hds, $fstab, $_security) = @_;
 
@@ -404,7 +384,6 @@ sub setupBootloader__general {
 
     $b->{password2} ||= $b->{password} ||= '';
     $::Wizard_title = N("Boot Style Configuration");
-    if (arch() !~ /ppc/) {
 	my (@boot_devices, %boot_devices);
 	foreach (bootloader::allowed_boot_parts($b, $all_hds)) {
 	    my $dev = "/dev/$_->{device}";
@@ -448,23 +427,6 @@ sub setupBootloader__general {
 	      } },
             { label => N("Password (again)"), val => \$b->{password2}, hidden => 1 },
         ]) or return 0;
-    } else {
-	$b->{boot} = $partition_table::mac::bootstrap_part;	
-	$in->ask_from_({ messages => N("Bootloader main options"),
-			 title => N("Bootloader main options"),
-			 interactive_help_id => 'setupYabootGeneral',
-		       }, [
-            { label => N("Bootloader to use"), val => \$b->{method},
-              list => \@method_choices, format => \&bootloader::method2text },
-            { label => N("Init Message"), val => \$b->{'init-message'} },
-            { label => N("Boot device"), val => \$b->{boot}, list => [ get_apple_boot_parts($fstab) ] },
-            { label => N("Open Firmware Delay"), val => \$b->{delay} },
-            { label => N("Kernel Boot Timeout"), val => \$b->{timeout} },
-            { label => N("Enable CD Boot?"), val => \$b->{enablecdboot}, type => "bool" },
-            { label => N("Enable OF Boot?"), val => \$b->{enableofboot}, type => "bool" },
-            { label => N("Default OS?"), val => \$b->{defaultos}, list => [ 'linux', 'macos', 'macosx', 'darwin' ] },
-        ]) or return 0;				
-    }
 
     #- remove bios mapping if the user changed the boot device
     delete $b->{bios} if $b->{boot} ne $prev_boot;
@@ -535,9 +497,7 @@ sub setupBootloader__entries {
 { label => N("Xen append"), val => \$e->{xen_append} }
   ),
   if_($b->{password}, { label => N("Requires password to boot"), val => \$e->{lock}, type => "bool" }),
-  if_(arch() !~ /ppc|ia64/,
 { label => N("Video mode"), val => \$vga, list => [ '', Xconfig::resolution_and_depth::bios_vga_modes() ], format => \&Xconfig::resolution_and_depth::to_string, advanced => 1 },
-),
 { label => N("Initrd"), val => \$e->{initrd}, list => [ map { if_(/^initrd/, "/boot/$_") } all("$::prefix/boot") ], not_edit => 0, advanced => 1 },
 { label => N("Network profile"), val => \$netprofile, list => [ sort(uniq('', $netprofile, network::network::netprofile_list())) ], advanced => 1 },
 	    );
@@ -546,26 +506,15 @@ sub setupBootloader__entries {
 { label => N("Root"), val => \$e->{kernel_or_dev}, list => [ map { "/dev/$_->{device}" } @$fstab, detect_devices::floppies() ] },
 	    );
 	}
-	if (arch() !~ /ppc/) {
 	    @l = (
 		  { label => N("Label"), val => \$e->{label} },
 		  @l,
 		  { text => N("Default"), val => \$default, type => 'bool' },
 		 );
-	} else {
-	    unshift @l, { label => N("Label"), val => \$e->{label}, list => ['macos', 'macosx', 'darwin'] };
-	    if ($e->{type} eq "image") {
-		@l = ({ label => N("Label"), val => \$e->{label} },
-		(@l[1..2], { label => N("Append"), val => \$append }),
-		{ label => N("NoVideo"), val => \$e->{novideo}, type => 'bool' },
-		{ text => N("Default"), val => \$default, type => 'bool' }
-		);
-	    }
-	}
 
 	$in->ask_from_(
 	    {
-	     interactive_help_id => arch() =~ /ppc/ ? 'setupYabootAddEntry' : 'setupBootloaderAddEntry',
+	     interactive_help_id => 'setupBootloaderAddEntry',
 	     callbacks => {
 	       complete => sub {
 		   $e->{label} or $in->ask_warn('', N("Empty label not allowed")), return 1;
@@ -589,8 +538,7 @@ sub setupBootloader__entries {
 	my @labels = map { $_->{label} } @{$b->{entries}};
 	my ($e, $prefix);
 	if ($in->ask_from_list_('', N("Which type of entry do you want to add?"),
-				[ N_("Linux"), arch() =~ /sparc/ ? N_("Other OS (SunOS...)") : arch() =~ /ppc/ ? 
-				  N_("Other OS (MacOS...)") : N_("Other OS (Windows...)") ]
+				[ N_("Linux"), N_("Other OS (Windows...)") ]
 			       ) eq "Linux") {
 	    $e = { type => 'image',
 		   root => '/dev/' . fs::get::root($fstab)->{device}, #- assume a good default.
@@ -598,7 +546,7 @@ sub setupBootloader__entries {
 	    $prefix = "linux";
 	} else {
 	    $e = { type => 'other' };
-	    $prefix = arch() =~ /sparc/ ? "sunos" : arch() =~ /ppc/ ? "macos" : "windows";
+	    $prefix = "windows";
 	}
 	$e->{label} = $prefix;
 	for (my $nb = 0; member($e->{label}, @labels); $nb++) {
@@ -1285,7 +1233,7 @@ sub report_bug {
       header("lspci"), detect_devices::stringlist(),
       header("pci_devices"), cat_("/proc/bus/pci/devices"),
       header("dmidecode"), arch() =~ /86/ ? `dmidecode` : (),
-      header("fdisk"), arch() =~ /ppc/ ? `pdisk -l` : `fdisk -l`,
+      header("fdisk"), `fdisk -l`,
       header("scsi"), cat_("/proc/scsi/scsi"),
       header("/sys/bus/scsi/devices"), -d '/sys/bus/scsi/devices' ? `ls -l /sys/bus/scsi/devices` : (),
       header("lsmod"), cat_("/proc/modules"),