assemble-firmware.pl

   1 #!/usr/bin/perl -w
   2
   3 use strict;
   4 use File::Basename;
   5 use File::Path;
   6
   7 my $fwsrc0 = "linux-2.6-2.6.32/firmware";
   8 my $fwsrc1 = "linux-firmware.git";
   9 my $fwsrc3 = "firmware-misc";
  10
  11 my $fwlist = shift;
  12 die "no firmware list specified" if !$fwlist || ! -f $fwlist;
  13
  14 my $target = shift;
  15 die "no target directory" if !$target || ! -d $target;
  16
  17 my $force_skip = {
  18
  19     # not needed, the HBA has burned-in firmware
  20     'ql8100_fw.bin' => 1,
  21 };
  22
  23 my $skip = {};
  24 # debian squeeze also misses those files
  25 foreach my $fw (qw(
  26 libertas/gspi8385.bin libertas/gspi8385_hlp.bin
  27 ctfw.bin ct2fw.bin ctfw-3.0.3.1.bin ct2fw-3.0.3.1.bin
  28 cbfw.bin cbfw-3.0.3.1.bin
  29 tehuti/firmware.bin
  30 cyzfirm.bin
  31 isi4616.bin
  32 isi4608.bin
  33 isi616em.bin
  34 isi608.bin
  35 isi608em.bin
  36 c320tunx.cod
  37 cp204unx.cod
  38 c218tunx.cod
  39 isight.fw
  40 BT3CPCC.bin
  41 bfubase.frm
  42 solos-db-FPGA.bin
  43 solos-Firmware.bin
  44 solos-FPGA.bin
  45 pca200e_ecd.bin2
  46 prism2_ru.fw
  47 tms380tr.bin
  48 FW10
  49 FW13
  50 comedi/jr3pci.idm
  51
  52 sd8686.bin
  53 sd8686_helper.bin
  54 usb8388.bin
  55 libertas_cs_helper.fw
  56 lbtf_usb.bin
  57
  58 wl1271-fw.bin
  59 wl1251-fw.bin
  60 symbol_sp24t_sec_fw
  61 symbol_sp24t_prim_fw
  62 prism_ap_fw.bin
  63 prism_sta_fw.bin
  64 ar9170.fw
  65 iwmc3200wifi-lmac-sdio.bin
  66 iwmc3200wifi-calib-sdio.bin
  67 iwmc3200wifi-umac-sdio.bin
  68 iwmc3200top.1.fw
  69 zd1201.fw
  70 zd1201-ap.fw
  71 isl3887usb
  72 isl3886usb
  73 isl3886pci
  74 3826.arm
  75
  76 i2400m-fw-sdio-1.3.sbcf
  77
  78 nx3fwmn.bin
  79 nx3fwct.bin
  80 nxromimg.bin
  81
  82 myri10ge_rss_eth_z8e.dat
  83 myri10ge_rss_ethp_z8e.dat
  84 myri10ge_eth_z8e.dat
  85 myri10ge_ethp_z8e.dat
  86
  87 i1480-phy-0.0.bin
  88 i1480-usb-0.0.bin
  89 i1480-pre-phy-0.0.bin
  90
  91 go7007fw.bin
  92 go7007tv.bin
  93
  94 sep/resident.image.bin
  95 sep/cache.image.bin
  96 b43legacy/ucode4.fw
  97 b43legacy/ucode2.fw
  98 b43/ucode9.fw
  99 b43/ucode5.fw
 100 b43/ucode15.fw
 101 b43/ucode14.fw
 102 b43/ucode13.fw
 103 b43/ucode11.fw
 104 b43/ucode16_mimo.fw
 105 orinoco_ezusb_fw
 106 isl3890
 107 isl3886
 108 isl3877
 109 mwl8k/fmimage_8366.fw
 110 mwl8k/helper_8366.fw
 111 mwl8k/fmimage_8363.fw
 112 mwl8k/helper_8363.fw
 113 iwlwifi-6000g2a-4.ucode
 114 iwlwifi-6000g2a-6.ucode
 115 iwlwifi-130-5.ucode
 116 iwlwifi-100-6.ucode
 117 iwlwifi-1000-6.ucode
 118 cxgb4/t4fw.bin
 119 cxgb4/t4fw-1.3.10.0.bin
 120
 121 )) {
 122     $skip->{$fw} = 1;
 123 }
 124
 125 sub copy_fw {
 126     my ($src, $dstfw) = @_;
 127
 128     my $dest = "$target/$dstfw";
 129
 130     return if -f $dest;
 131
 132     mkpath dirname($dest);
 133     system ("cp '$src' '$dest'") == 0 || die "copy $src to $dest failed";
 134 }
 135
 136 my $fwdone = {};
 137
 138 open(TMP, $fwlist);
 139 while(defined(my $line = <TMP>)) {
 140     chomp $line;
 141     my ($fw, $mod) = split(/\s+/, $line, 2);
 142
 143     next if $mod =~ m|^kernel/sound|;
 144     next if $mod =~ m|^kernel/drivers/isdn|;
 145
 146     # skip ZyDas usb wireless, use package zd1211-firmware instead
 147     next if $fw =~ m|^zd1211/|;
 148
 149     # skip atmel at76c50x wireless networking chips.
 150     # use package atmel-firmware instead
 151     next if $fw =~ m|^atmel_at76c50|;
 152
 153     # skip Bluetooth dongles based on the Broadcom BCM203x
 154     # use package bluez-firmware instead
 155     next if $fw =~ m|^BCM2033|;
 156
 157     next if $force_skip->{$fw};
 158
 159     next if $fwdone->{$fw};
 160     $fwdone->{$fw} = 1;
 161
 162     my $fwdest = $fw;
 163     if ($fw eq 'libertas/gspi8686.bin') {
 164         $fw = 'libertas/gspi8686_v9.bin';
 165     }
 166     if ($fw eq 'libertas/gspi8686_hlp.bin') {
 167         $fw = 'libertas/gspi8686_v9_helper.bin';
 168     }
 169
 170     if ($fw eq 'PE520.cis') {
 171         $fw = 'cis/PE520.cis';
 172     }
 173
 174     # the rtl_nic/rtl8168d-1.fw file is buggy in current kernel tree
 175     if (-f "$fwsrc0/$fw" &&
 176         ($fw ne 'rtl_nic/rtl8168d-1.fw')) {
 177         copy_fw("$fwsrc0/$fw", $fwdest);
 178         next;
 179     }
 180     if (-f "$fwsrc1/$fw") {
 181         copy_fw("$fwsrc1/$fw", $fwdest);
 182         next;
 183     }
 184     if (-f "$fwsrc3/$fw") {
 185         copy_fw("$fwsrc3/$fw", $fwdest);
 186         next;
 187     }
 188
 189     if ($fw =~ m|/|) {
 190         next if $skip->{$fw};
 191         die "unable to find firmware: $fw $mod\n";
 192     }
 193
 194     my $name = basename($fw);
 195
 196     my $sr = `find '$fwsrc1' -type f -name '$name'`;
 197     chomp $sr;
 198     if ($sr) {
 199         #print "found $fw in $sr\n";
 200         copy_fw($sr, $fwdest);
 201         next;
 202     }
 203     $sr = `find '$fwsrc3' -type f -name '$name'`;
 204     chomp $sr;
 205     if ($sr) {
 206         #print "found $fw in $sr\n";
 207         copy_fw($sr, $fwdest);
 208         next;
 209     }
 210
 211     next if $skip->{$fw};
 212
 213     die "unable to find firmware: $fw $mod\n";
 214 }
 215 close(TMP);
 216
 217 exit(0);