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 cbfw.bin ctfw.bin ct2fw.bin
  28 tehuti/firmware.bin
  29 cyzfirm.bin
  30 isi4616.bin
  31 isi4608.bin
  32 isi616em.bin
  33 isi608.bin
  34 isi608em.bin
  35 c320tunx.cod
  36 cp204unx.cod
  37 c218tunx.cod
  38 isight.fw
  39 BT3CPCC.bin
  40 bfubase.frm
  41 solos-db-FPGA.bin
  42 solos-Firmware.bin
  43 solos-FPGA.bin
  44 pca200e_ecd.bin2
  45 prism2_ru.fw
  46 tms380tr.bin
  47 FW10
  48 FW13
  49 comedi/jr3pci.idm
  50
  51 sd8686.bin
  52 sd8686_helper.bin
  53 usb8388.bin
  54 libertas_cs_helper.fw
  55 lbtf_usb.bin
  56
  57 wl1271-fw.bin
  58 wl1251-fw.bin
  59 symbol_sp24t_sec_fw
  60 symbol_sp24t_prim_fw
  61 prism_ap_fw.bin
  62 prism_sta_fw.bin
  63 ar9170.fw
  64 iwmc3200wifi-lmac-sdio.bin
  65 iwmc3200wifi-calib-sdio.bin
  66 iwmc3200wifi-umac-sdio.bin
  67 iwmc3200top.1.fw
  68 zd1201.fw
  69 zd1201-ap.fw
  70 isl3887usb
  71 isl3886usb
  72 isl3886pci
  73 3826.arm
  74
  75 rtl8168d-1.fw
  76 rtl8168d-2.fw
  77
  78 i2400m-fw-sdio-1.3.sbcf
  79
  80 nx3fwmn.bin
  81 nx3fwct.bin
  82 nxromimg.bin
  83
  84 myri10ge_rss_eth_z8e.dat
  85 myri10ge_rss_ethp_z8e.dat
  86 myri10ge_eth_z8e.dat
  87 myri10ge_ethp_z8e.dat
  88
  89 i1480-phy-0.0.bin
  90 i1480-usb-0.0.bin
  91 i1480-pre-phy-0.0.bin
  92
  93 go7007fw.bin
  94 go7007tv.bin
  95
  96 sep/resident.image.bin
  97 sep/cache.image.bin
  98 b43legacy/ucode4.fw
  99 b43legacy/ucode2.fw
 100 b43/ucode9.fw
 101 b43/ucode5.fw
 102 b43/ucode15.fw
 103 b43/ucode14.fw
 104 b43/ucode13.fw
 105 b43/ucode11.fw
 106 b43/ucode16_mimo.fw
 107 orinoco_ezusb_fw
 108 isl3890
 109 isl3886
 110 isl3877
 111 mwl8k/fmimage_8366.fw
 112 mwl8k/helper_8366.fw
 113 mwl8k/fmimage_8363.fw
 114 mwl8k/helper_8363.fw
 115 iwlwifi-6000g2a-4.ucode
 116 iwlwifi-6000g2a-6.ucode
 117 iwlwifi-130-5.ucode
 118 iwlwifi-100-6.ucode
 119 iwlwifi-1000-6.ucode
 120 cxgb4/t4fw.bin
 121 cxgb4/t4fw-1.3.10.0.bin
 122
 123 )) {
 124     $skip->{$fw} = 1;
 125 }
 126
 127 sub copy_fw {
 128     my ($src, $dstfw) = @_;
 129
 130     my $dest = "$target/$dstfw";
 131
 132     return if -f $dest;
 133
 134     mkpath dirname($dest);
 135     system ("cp '$src' '$dest'") == 0 || die "copy $src to $dest failed";
 136 }
 137
 138 my $fwdone = {};
 139
 140 open(TMP, $fwlist);
 141 while(defined(my $line = <TMP>)) {
 142     chomp $line;
 143     my ($fw, $mod) = split(/\s+/, $line, 2);
 144
 145     next if $mod =~ m|^kernel/sound|;
 146     next if $mod =~ m|^kernel/drivers/isdn|;
 147
 148     # skip ZyDas usb wireless, use package zd1211-firmware instead
 149     next if $fw =~ m|^zd1211/|;
 150
 151     # skip atmel at76c50x wireless networking chips.
 152     # use package atmel-firmware instead
 153     next if $fw =~ m|^atmel_at76c50|;
 154
 155     # skip Bluetooth dongles based on the Broadcom BCM203x
 156     # use package bluez-firmware instead
 157     next if $fw =~ m|^BCM2033|;
 158
 159     next if $force_skip->{$fw};
 160
 161     next if $fwdone->{$fw};
 162     $fwdone->{$fw} = 1;
 163
 164     my $fwdest = $fw;
 165     if ($fw eq 'libertas/gspi8686.bin') {
 166         $fw = 'libertas/gspi8686_v9.bin';
 167     }
 168     if ($fw eq 'libertas/gspi8686_hlp.bin') {
 169         $fw = 'libertas/gspi8686_v9_helper.bin';
 170     }
 171
 172     if ($fw eq 'PE520.cis') {
 173         $fw = 'cis/PE520.cis';
 174     }
 175
 176     if (-f "$fwsrc0/$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' -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' -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);