summaryrefslogtreecommitdiffstats
path: root/rescue/tree/ka/gen_modules_conf.pl
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-08-28 21:38:32 +0000
committerOlivier Blin <oblin@mandriva.org>2005-08-28 21:38:32 +0000
commitc33096066f32297bbc275ea820531fe55e45b705 (patch)
tree85b5c4fcb02b38d30805a4b22320924f7be41391 /rescue/tree/ka/gen_modules_conf.pl
parentfcd42ef1d7175f46663fde210e4e6cd9f059cfef (diff)
downloaddrakx-c33096066f32297bbc275ea820531fe55e45b705.tar
drakx-c33096066f32297bbc275ea820531fe55e45b705.tar.gz
drakx-c33096066f32297bbc275ea820531fe55e45b705.tar.bz2
drakx-c33096066f32297bbc275ea820531fe55e45b705.tar.xz
drakx-c33096066f32297bbc275ea820531fe55e45b705.zip
ka support (initially from Antoine Ginies and Erwan Velu)
Diffstat (limited to 'rescue/tree/ka/gen_modules_conf.pl')
-rw-r--r--rescue/tree/ka/gen_modules_conf.pl191
1 files changed, 191 insertions, 0 deletions
diff --git a/rescue/tree/ka/gen_modules_conf.pl b/rescue/tree/ka/gen_modules_conf.pl
new file mode 100644
index 000000000..ae6c5bec6
--- /dev/null
+++ b/rescue/tree/ka/gen_modules_conf.pl
@@ -0,0 +1,191 @@
+$kinds2all_modules = {
+ 'usb' => [
+ 'usb-uhci',
+ 'usb-ohci',
+ 'ehci-hcd'
+ ],
+ 'network' => [
+ '3c501',
+ '3c503',
+ '3c505',
+ '3c507',
+ '3c509',
+ '3c515',
+ '3c90x',
+ '82596',
+ 'abyss',
+ 'ac3200',
+ 'acenic',
+ 'aironet4500_card',
+ 'at1700',
+ 'atp',
+ 'com20020-pci',
+ 'cs89x0',
+ 'de600',
+ 'de620',
+ 'defxx',
+ 'depca',
+ 'dgrs',
+ 'dmfe',
+ 'e100',
+ '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',
+ 'smc-ultra',
+ 'smc9194',
+ 'starfire',
+ 'tlan',
+ 'tmspci',
+ 'tulip',
+ 'via-rhine',
+ 'wd',
+ 'winbond-840',
+ 'forcedeth',
+ 'fealnx',
+ '3c990',
+ '3c990fx',
+ 'b44',
+ 'bcm4400',
+ 'skfp',
+ 'tc35815',
+ 'lanstreamer',
+ 'farsync',
+ 'sdladrv',
+ 'prism2_plx',
+ 'iph5526',
+ '3c59x',
+ '8139too',
+ '8139cp',
+ 'sundance',
+ 'catc',
+ 'CDCEther',
+ 'kaweth',
+ 'pegasus',
+ 'rtl8150',
+ 'usbnet',
+ 'dl2k',
+ 'myri_sbus',
+ 'yellowfin',
+ 'ns83820',
+ 'r8169',
+ 'tg3',
+ 'e1000',
+ 'sk98lin',
+ 'bcm5820',
+ 'bcm5700'
+ ],
+ 'scsi' => [
+ '3w-xxxx',
+ 'AM53C974',
+ 'BusLogic',
+ 'NCR53c406a',
+ 'a100u2w',
+ 'advansys',
+ 'aha152x',
+ 'aha1542',
+ 'aha1740',
+ 'atp870u',
+ 'dc395x_trm',
+ 'dtc',
+ 'g_NCR5380',
+ 'in2000',
+ 'initio',
+ 'pas16',
+ 'pci2220i',
+ 'psi240i',
+ 'fdomain',
+ 'qla1280',
+ 'qla2x00',
+ 'qlogicfas',
+ 'qlogicfc',
+ 'seagate',
+ 'wd7000',
+ 'sim710',
+ 'sym53c416',
+ 't128',
+ 'tmscsim',
+ 'u14-34f',
+ 'ultrastor',
+ 'eata',
+ 'eata_pio',
+ 'eata_dma',
+ 'mptscsih',
+ 'nsp32',
+ 'ata_piix',
+ 'sata_promise',
+ 'sata_svw',
+ 'sata_via',
+ '53c7,8xx',
+ 'aic7xxx',
+ 'aic7xxx_old',
+ 'aic79xx',
+ 'pci2000',
+ 'qlogicisp',
+ 'sym53c8xx',
+ 'lpfcdd',
+ 'DAC960',
+ 'dpt_i2o',
+ 'megaraid',
+ 'aacraid',
+ 'cciss',
+ 'cpqarray',
+ 'gdth',
+ 'i2o_block',
+ 'cpqfc',
+ 'qla2200',
+ 'qla2300',
+ 'pdc-ultra',
+ 'ips',
+ 'ppa',
+ 'imm'
+ ]
+ };
+my @l = map { /^(\S+)\s*:/ ? $1 : () } `lspcidrake`;
+
+my %kinds2modules = map {
+ $_ => [ intersection(\@l, $kinds2all_modules->{$_}) ];
+} qw(usb scsi);
+
+$kinds2modules{network} = [
+ grep {
+ my $l = $_;
+ scalar grep { $_ eq $l } @{ $kinds2all_modules->{network} }
+ } @l
+];
+
+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 }