summaryrefslogtreecommitdiffstats
path: root/perl-install/modules.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/modules.pm')
-rw-r--r--perl-install/modules.pm19
1 files changed, 18 insertions, 1 deletions
diff --git a/perl-install/modules.pm b/perl-install/modules.pm
index a93c79c02..092320cc1 100644
--- a/perl-install/modules.pm
+++ b/perl-install/modules.pm
@@ -84,6 +84,10 @@ arch() =~ /^sparc/ ? (
"de4x5" => "Digital 425,434,435,450,500",
"rtl8139" => "RealTek RTL8129/8139",
"8139too" => "Realtek RTL-8139",
+arch() =~ /ppc/ ? (
+ "mace" => "Apple PowerMac Ethernet",
+ "bmac" => "Apple G3 Ethernet",
+ "gmac" => "Apple G4/iBook Ethernet") : (),
}],
[ 'net_raw', {
"8390" => "8390",
@@ -138,6 +142,9 @@ arch() =~ /^sparc/ ? (
"pci2000" => "Perceptive Solutions PCI-2000", # TODO
"qlogicisp" => "Qlogic ISP",
"sym53c8xx" => "Symbios 53c8xx",
+arch() =~ /ppc/ ? (
+ "mesh" => "Apple Internal SCSI",
+ "mac53c94" => "Apple External SCSI") : (),
}],
[ 'scsi_raw', {
"scsi_mod" => "scsi_mod",
@@ -213,6 +220,8 @@ arch() !~ /^sparc/ ? (
"snd-card-trident" => "Silicon Integrated Systems [SiS]|7018 PCI Audio",
"snd-card-via686a" => "VIA Technologies|VT82C686 [Apollo Super AC97/Audio]",
"snd-card-ymfpci" => "Yamaha Corporation|YMF-740",
+) : arch() =~ /ppc/ ? (
+ "dmasound" => "Amiga or PowerMac DMA sound",
) : (),
}],
[ 'pcmcia', {
@@ -441,6 +450,10 @@ sub load {
add_alias($_, $name) foreach difference2([ detect_devices::getNet() ], \@netdev);
}
+ if ($type eq 'sound' && arch() =~ /ppc/) {
+ add_alias($type, $name);
+ }
+
when_load($name, $type, @options);
}
sub load_multi {
@@ -629,7 +642,11 @@ sub load_thiskind {
} get_that_type($type),
$type =~ /scsi/ && arch() !~ /sparc/ ?
(map { +{ driver => $_, description => $_, try => 1 } }
- detect_devices::usbZips() ? "usb-storage" : (), "imm", "ppa") : ();
+ detect_devices::usbZips() ? "usb-storage" : (), arch() =~ /ppc/ ? ("mesh", "mac53c94",) : ("imm", "ppa",)) :
+ $type =~ /net/ && arch() =~ /ppc/ ?
+ (map { +{ driver => $_, description => $_, try => 1 } } ("bmac", "gmac", "pmac",)) :
+ $type =~ /sound/ && arch() =~ /ppc/ ?
+ (map { +{ driver => $_, description => $_, try => 1 } } "dmasound") : ();
}
sub get_that_type {