diff options
Diffstat (limited to 'perl-install/modules.pm')
| -rw-r--r-- | perl-install/modules.pm | 19 |
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 { |