From 54ddee710c26cb9c11f20cf6ae066c017139615b Mon Sep 17 00:00:00 2001 From: Antoine Ginies Date: Fri, 2 Apr 2004 14:03:41 +0000 Subject: first relsease --- rescue/tree/ka/gen_modules_conf.pl | 156 +++++++++++++++++++++++++++++++++++++ 1 file changed, 156 insertions(+) create mode 100644 rescue/tree/ka/gen_modules_conf.pl (limited to 'rescue/tree/ka/gen_modules_conf.pl') diff --git a/rescue/tree/ka/gen_modules_conf.pl b/rescue/tree/ka/gen_modules_conf.pl new file mode 100644 index 000000000..ca721482a --- /dev/null +++ b/rescue/tree/ka/gen_modules_conf.pl @@ -0,0 +1,156 @@ +$kinds2all_modules = { + 'usb' => [ + 'usb-uhci', + 'usb-ohci', + 'ehci-hcd' + ], + 'network' => [ + '3c501', + '3c503', + '3c505', + '3c507', + '3c509', + '3c515', + '82596', + 'abyss', + 'ac3200', + 'acenic', + 'aironet4500_card', + 'at1700', + 'atp', + 'com20020-pci', + 'cs89x0', + 'de600', + 'de620', + 'r8169', + 'defxx', + 'orinoco_plx', + 'depca', + 'dmfe', + 'e100', + 'e1000', + 'e2100', + 'eepro', + 'eepro100', + 'eexpress', + 'epic100', + 'eth16i', + 'ewrk3', + 'hamachi', + 'hp', + 'hp-plus', + 'hp100', + 'ibmtr', + 'lance', + 'natsemi', + 'ne', + 'ne2k-pci', + 'ni5010', + 'ni52', + 'ni65', + 'nvnet', + 'olympic', + 'pcnet32', + 'plip', + 'rcpci', + 'sb1000', + 'sis900', + 'sk98lin', + 'smc-ultra', + 'smc9194', + 'starfire', + 'tlan', + 'tmspci', + 'tulip', + 'via-rhine', + 'tg3', + 'bcm5700', + 'bcm5820', + 'bcm4400', + 'crc32', + 'wd', + 'winbond-840', + 'yellowfin', + 'ns83820', + 'iph5526', + '3c59x', + '8139too', + 'sundance', + 'dl2k', + 'pegasus', + 'kaweth', + 'usbnet', + 'catc', + 'CDCEther' + ], + 'scsi' => [ + '3w-xxxx', + 'AM53C974', + 'NCR53c406a', + 'a100u2w', + 'advansys', + 'aha1740', + 'atp870u', + 'dc395x_trm', + 'dtc', + 'fdomain', + 'g_NCR5380', + 'in2000', + 'initio', + 'pas16', + 'pci2220i', + 'psi240i', + 'qla1280', + 'qla2x00', + 'qlogicfas', + 'qlogicfc', + 'seagate', + 'sym53c416', + 'u14-34f', + 'ultrastor', + 'eata', + 'eata_pio', + 'eata_dma', + '53c7,8xx', + 'aic7xxx', + 'pci2000', + 'qlogicisp', + 'sym53c8xx', + 'mptscsih', + 'mptbase', + 'DAC960', + 'dpt_i2o', + 'megaraid', + 'aacraid', + 'ataraid', + 'cciss', + 'cpqarray', + 'gdth', + 'i2o_block', + 'qla2200', + 'qla2300', + 'cpqfc', + 'ips', + 'ppa', + 'imm' + ] + }; +my @l = map { /^(\S+)\s*:/ ? $1 : () } `lspcidrake`; + +my %kinds2modules = map { + $_ => [ intersection(\@l, $kinds2all_modules->{$_}) ]; +} keys %$kinds2all_modules; + +if (my @scsi = @{$kinds2modules{scsi}}) { + print "probeall scsi_hostadapter ", join(" ", @scsi), "\n"; +} +if (my @usb = @{$kinds2modules{usb}}) { + print "probeall usb-interface ", join(" ", @usb), "\n"; +} +my $eth = 0; +foreach (@{$kinds2modules{network}}) { + print "alias eth$eth $_\n"; + $eth++; +} + +sub intersection { my (%l, @m); @l{@{shift @_}} = (); foreach (@_) { @m = grep { exists $l{$_} } @$_; %l = (); @l{@m} = () } keys %l } -- cgit v1.2.1