diff options
| author | Linus Torvalds <torvalds@ppc970.osdl.org> | 2005-04-16 18:20:36 -0400 |
|---|---|---|
| committer | Linus Torvalds <torvalds@ppc970.osdl.org> | 2005-04-16 18:20:36 -0400 |
| commit | 1da177e4c3f41524e886b7f1b8a0c1fc7321cac2 (patch) | |
| tree | 0bba044c4ce775e45a88a51686b5d9f90697ea9d /Documentation/dvb/get_dvb_firmware | |
Linux-2.6.12-rc2
Initial git repository build. I'm not bothering with the full history,
even though we have it. We can create a separate "historical" git
archive of that later if we want to, and in the meantime it's about
3.2GB when imported into git - space that would just make the early
git days unnecessarily complicated, when we don't have a lot of good
infrastructure for it.
Let it rip!
Diffstat (limited to 'Documentation/dvb/get_dvb_firmware')
| -rw-r--r-- | Documentation/dvb/get_dvb_firmware | 397 |
1 files changed, 397 insertions, 0 deletions
diff --git a/Documentation/dvb/get_dvb_firmware b/Documentation/dvb/get_dvb_firmware new file mode 100644 index 000000000000..3ffdcb394299 --- /dev/null +++ b/Documentation/dvb/get_dvb_firmware | |||
| @@ -0,0 +1,397 @@ | |||
| 1 | #!/usr/bin/perl | ||
| 2 | # DVB firmware extractor | ||
| 3 | # | ||
| 4 | # (c) 2004 Andrew de Quincey | ||
| 5 | # | ||
| 6 | # This program is free software; you can redistribute it and/or modify | ||
| 7 | # it under the terms of the GNU General Public License as published by | ||
| 8 | # the Free Software Foundation; either version 2 of the License, or | ||
| 9 | # (at your option) any later version. | ||
| 10 | # | ||
| 11 | # This program is distributed in the hope that it will be useful, | ||
| 12 | # but WITHOUT ANY WARRANTY; without even the implied warranty of | ||
| 13 | # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | ||
| 14 | # | ||
| 15 | # GNU General Public License for more details. | ||
| 16 | # | ||
| 17 | # You should have received a copy of the GNU General Public License | ||
| 18 | # along with this program; if not, write to the Free Software | ||
| 19 | # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. | ||
| 20 | |||
| 21 | use File::Temp qw/ tempdir /; | ||
| 22 | use IO::Handle; | ||
| 23 | |||
| 24 | @components = ( "sp8870", "sp887x", "tda10045", "tda10046", "av7110", "dec2000t", | ||
| 25 | "dec2540t", "dec3000s", "vp7041", "dibusb", "nxt2002", | ||
| 26 | "or51211", "or51132_qam", "or51132_vsb"); | ||
| 27 | |||
| 28 | # Check args | ||
| 29 | syntax() if (scalar(@ARGV) != 1); | ||
| 30 | $cid = $ARGV[0]; | ||
| 31 | |||
| 32 | # Do it! | ||
| 33 | for ($i=0; $i < scalar(@components); $i++) { | ||
| 34 | if ($cid eq $components[$i]) { | ||
| 35 | $outfile = eval($cid); | ||
| 36 | die $@ if $@; | ||
| 37 | print STDERR "Firmware $outfile extracted successfully. Now copy it to either /lib/firmware or /usr/lib/hotplug/firmware/ (depending on your hotplug version).\n"; | ||
| 38 | exit(0); | ||
| 39 | } | ||
| 40 | } | ||
| 41 | |||
| 42 | # If we get here, it wasn't found | ||
| 43 | print STDERR "Unknown component \"$cid\"\n"; | ||
| 44 | syntax(); | ||
| 45 | |||
| 46 | |||
| 47 | |||
| 48 | |||
| 49 | # --------------------------------------------------------------- | ||
| 50 | # Firmware-specific extraction subroutines | ||
| 51 | |||
| 52 | sub sp8870 { | ||
| 53 | my $sourcefile = "tt_Premium_217g.zip"; | ||
| 54 | my $url = "http://www.technotrend.de/new/217g/$sourcefile"; | ||
| 55 | my $hash = "53970ec17a538945a6d8cb608a7b3899"; | ||
| 56 | my $outfile = "dvb-fe-sp8870.fw"; | ||
| 57 | my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); | ||
| 58 | |||
| 59 | checkstandard(); | ||
| 60 | |||
| 61 | wgetfile($sourcefile, $url); | ||
| 62 | unzip($sourcefile, $tmpdir); | ||
| 63 | verify("$tmpdir/software/OEM/HE/App/boot/SC_MAIN.MC", $hash); | ||
| 64 | copy("$tmpdir/software/OEM/HE/App/boot/SC_MAIN.MC", $outfile); | ||
| 65 | |||
| 66 | $outfile; | ||
| 67 | } | ||
| 68 | |||
| 69 | sub sp887x { | ||
| 70 | my $sourcefile = "Dvbt1.3.57.6.zip"; | ||
| 71 | my $url = "http://www.avermedia.com/software/$sourcefile"; | ||
| 72 | my $cabfile = "DVBT Net Ver1.3.57.6/disk1/data1.cab"; | ||
| 73 | my $hash = "237938d53a7f834c05c42b894ca68ac3"; | ||
| 74 | my $outfile = "dvb-fe-sp887x.fw"; | ||
| 75 | my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); | ||
| 76 | |||
| 77 | checkstandard(); | ||
| 78 | checkunshield(); | ||
| 79 | |||
| 80 | wgetfile($sourcefile, $url); | ||
| 81 | unzip($sourcefile, $tmpdir); | ||
| 82 | unshield("$tmpdir/$cabfile", $tmpdir); | ||
| 83 | verify("$tmpdir/ZEnglish/sc_main.mc", $hash); | ||
| 84 | copy("$tmpdir/ZEnglish/sc_main.mc", $outfile); | ||
| 85 | |||
| 86 | $outfile; | ||
| 87 | } | ||
| 88 | |||
| 89 | sub tda10045 { | ||
| 90 | my $sourcefile = "tt_budget_217g.zip"; | ||
| 91 | my $url = "http://www.technotrend.de/new/217g/$sourcefile"; | ||
| 92 | my $hash = "2105fd5bf37842fbcdfa4bfd58f3594a"; | ||
| 93 | my $outfile = "dvb-fe-tda10045.fw"; | ||
| 94 | my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); | ||
| 95 | |||
| 96 | checkstandard(); | ||
| 97 | |||
| 98 | wgetfile($sourcefile, $url); | ||
| 99 | unzip($sourcefile, $tmpdir); | ||
| 100 | extract("$tmpdir/software/OEM/PCI/App/ttlcdacc.dll", 0x37ef9, 30555, "$tmpdir/fwtmp"); | ||
| 101 | verify("$tmpdir/fwtmp", $hash); | ||
| 102 | copy("$tmpdir/fwtmp", $outfile); | ||
| 103 | |||
| 104 | $outfile; | ||
| 105 | } | ||
| 106 | |||
| 107 | sub tda10046 { | ||
| 108 | my $sourcefile = "tt_budget_217g.zip"; | ||
| 109 | my $url = "http://www.technotrend.de/new/217g/$sourcefile"; | ||
| 110 | my $hash = "a25b579e37109af60f4a36c37893957c"; | ||
| 111 | my $outfile = "dvb-fe-tda10046.fw"; | ||
| 112 | my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); | ||
| 113 | |||
| 114 | checkstandard(); | ||
| 115 | |||
| 116 | wgetfile($sourcefile, $url); | ||
| 117 | unzip($sourcefile, $tmpdir); | ||
| 118 | extract("$tmpdir/software/OEM/PCI/App/ttlcdacc.dll", 0x3f731, 24479, "$tmpdir/fwtmp"); | ||
| 119 | verify("$tmpdir/fwtmp", $hash); | ||
| 120 | copy("$tmpdir/fwtmp", $outfile); | ||
| 121 | |||
| 122 | $outfile; | ||
| 123 | } | ||
| 124 | |||
| 125 | sub av7110 { | ||
| 126 | my $sourcefile = "dvb-ttpci-01.fw-261d"; | ||
| 127 | my $url = "http://www.linuxtv.org/downloads/firmware/$sourcefile"; | ||
| 128 | my $hash = "603431b6259715a8e88f376a53b64e2f"; | ||
| 129 | my $outfile = "dvb-ttpci-01.fw"; | ||
| 130 | |||
| 131 | checkstandard(); | ||
| 132 | |||
| 133 | wgetfile($sourcefile, $url); | ||
| 134 | verify($sourcefile, $hash); | ||
| 135 | copy($sourcefile, $outfile); | ||
| 136 | |||
| 137 | $outfile; | ||
| 138 | } | ||
| 139 | |||
| 140 | sub dec2000t { | ||
| 141 | my $sourcefile = "dec217g.exe"; | ||
| 142 | my $url = "http://hauppauge.lightpath.net/de/$sourcefile"; | ||
| 143 | my $hash = "bd86f458cee4a8f0a8ce2d20c66215a9"; | ||
| 144 | my $outfile = "dvb-ttusb-dec-2000t.fw"; | ||
| 145 | my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); | ||
| 146 | |||
| 147 | checkstandard(); | ||
| 148 | |||
| 149 | wgetfile($sourcefile, $url); | ||
| 150 | unzip($sourcefile, $tmpdir); | ||
| 151 | verify("$tmpdir/software/OEM/STB/App/Boot/STB_PC_T.bin", $hash); | ||
| 152 | copy("$tmpdir/software/OEM/STB/App/Boot/STB_PC_T.bin", $outfile); | ||
| 153 | |||
| 154 | $outfile; | ||
| 155 | } | ||
| 156 | |||
| 157 | sub dec2540t { | ||
| 158 | my $sourcefile = "dec217g.exe"; | ||
| 159 | my $url = "http://hauppauge.lightpath.net/de/$sourcefile"; | ||
| 160 | my $hash = "53e58f4f5b5c2930beee74a7681fed92"; | ||
| 161 | my $outfile = "dvb-ttusb-dec-2540t.fw"; | ||
| 162 | my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); | ||
| 163 | |||
| 164 | checkstandard(); | ||
| 165 | |||
| 166 | wgetfile($sourcefile, $url); | ||
| 167 | unzip($sourcefile, $tmpdir); | ||
| 168 | verify("$tmpdir/software/OEM/STB/App/Boot/STB_PC_X.bin", $hash); | ||
| 169 | copy("$tmpdir/software/OEM/STB/App/Boot/STB_PC_X.bin", $outfile); | ||
| 170 | |||
| 171 | $outfile; | ||
| 172 | } | ||
| 173 | |||
| 174 | sub dec3000s { | ||
| 175 | my $sourcefile = "dec217g.exe"; | ||
| 176 | my $url = "http://hauppauge.lightpath.net/de/$sourcefile"; | ||
| 177 | my $hash = "b013ececea83f4d6d8d2a29ac7c1b448"; | ||
| 178 | my $outfile = "dvb-ttusb-dec-3000s.fw"; | ||
| 179 | my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); | ||
| 180 | |||
| 181 | checkstandard(); | ||
| 182 | |||
| 183 | wgetfile($sourcefile, $url); | ||
| 184 | unzip($sourcefile, $tmpdir); | ||
| 185 | verify("$tmpdir/software/OEM/STB/App/Boot/STB_PC_S.bin", $hash); | ||
| 186 | copy("$tmpdir/software/OEM/STB/App/Boot/STB_PC_S.bin", $outfile); | ||
| 187 | |||
| 188 | $outfile; | ||
| 189 | } | ||
| 190 | |||
| 191 | sub vp7041 { | ||
| 192 | my $sourcefile = "2.422.zip"; | ||
| 193 | my $url = "http://www.twinhan.com/files/driver/USB-Ter/$sourcefile"; | ||
| 194 | my $hash = "e88c9372d1f66609a3e7b072c53fbcfe"; | ||
| 195 | my $outfile = "dvb-vp7041-2.422.fw"; | ||
| 196 | my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); | ||
| 197 | |||
| 198 | checkstandard(); | ||
| 199 | |||
| 200 | wgetfile($sourcefile, $url); | ||
| 201 | unzip($sourcefile, $tmpdir); | ||
| 202 | extract("$tmpdir/VisionDTV/Drivers/Win2K&XP/UDTTload.sys", 12503, 3036, "$tmpdir/fwtmp1"); | ||
| 203 | extract("$tmpdir/VisionDTV/Drivers/Win2K&XP/UDTTload.sys", 2207, 10274, "$tmpdir/fwtmp2"); | ||
| 204 | |||
| 205 | my $CMD = "\000\001\000\222\177\000"; | ||
| 206 | my $PAD = "\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000"; | ||
| 207 | my ($FW); | ||
| 208 | open $FW, ">$tmpdir/fwtmp3"; | ||
| 209 | print $FW "$CMD\001$PAD"; | ||
| 210 | print $FW "$CMD\001$PAD"; | ||
| 211 | appendfile($FW, "$tmpdir/fwtmp1"); | ||
| 212 | print $FW "$CMD\000$PAD"; | ||
| 213 | print $FW "$CMD\001$PAD"; | ||
| 214 | appendfile($FW, "$tmpdir/fwtmp2"); | ||
| 215 | print $FW "$CMD\001$PAD"; | ||
| 216 | print $FW "$CMD\000$PAD"; | ||
| 217 | close($FW); | ||
| 218 | |||
| 219 | verify("$tmpdir/fwtmp3", $hash); | ||
| 220 | copy("$tmpdir/fwtmp3", $outfile); | ||
| 221 | |||
| 222 | $outfile; | ||
| 223 | } | ||
| 224 | |||
| 225 | sub dibusb { | ||
| 226 | my $url = "http://www.linuxtv.org/downloads/firmware/dvb-dibusb-5.0.0.11.fw"; | ||
| 227 | my $outfile = "dvb-dibusb-5.0.0.11.fw"; | ||
| 228 | my $hash = "fa490295a527360ca16dcdf3224ca243"; | ||
| 229 | |||
| 230 | checkstandard(); | ||
| 231 | |||
| 232 | wgetfile($outfile, $url); | ||
| 233 | verify($outfile,$hash); | ||
| 234 | |||
| 235 | $outfile; | ||
| 236 | } | ||
| 237 | |||
| 238 | sub nxt2002 { | ||
| 239 | my $sourcefile = "Broadband4PC_4_2_11.zip"; | ||
| 240 | my $url = "http://www.bbti.us/download/windows/$sourcefile"; | ||
| 241 | my $hash = "c6d2ea47a8f456d887ada0cfb718ff2a"; | ||
| 242 | my $outfile = "dvb-fe-nxt2002.fw"; | ||
| 243 | my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); | ||
| 244 | |||
| 245 | checkstandard(); | ||
| 246 | |||
| 247 | wgetfile($sourcefile, $url); | ||
| 248 | unzip($sourcefile, $tmpdir); | ||
| 249 | verify("$tmpdir/SkyNETU.sys", $hash); | ||
| 250 | extract("$tmpdir/SkyNETU.sys", 375832, 5908, $outfile); | ||
| 251 | |||
| 252 | $outfile; | ||
| 253 | } | ||
| 254 | |||
| 255 | sub or51211 { | ||
| 256 | my $fwfile = "dvb-fe-or51211.fw"; | ||
| 257 | my $url = "http://linuxtv.org/downloads/firmware/$fwfile"; | ||
| 258 | my $hash = "d830949c771a289505bf9eafc225d491"; | ||
| 259 | |||
| 260 | checkstandard(); | ||
| 261 | |||
| 262 | wgetfile($fwfile, $url); | ||
| 263 | verify($fwfile, $hash); | ||
| 264 | |||
| 265 | $fwfile; | ||
| 266 | } | ||
| 267 | |||
| 268 | sub or51132_qam { | ||
| 269 | my $fwfile = "dvb-fe-or51132-qam.fw"; | ||
| 270 | my $url = "http://linuxtv.org/downloads/firmware/$fwfile"; | ||
| 271 | my $hash = "7702e8938612de46ccadfe9b413cb3b5"; | ||
| 272 | |||
| 273 | checkstandard(); | ||
| 274 | |||
| 275 | wgetfile($fwfile, $url); | ||
| 276 | verify($fwfile, $hash); | ||
| 277 | |||
| 278 | $fwfile; | ||
| 279 | } | ||
| 280 | |||
| 281 | sub or51132_vsb { | ||
| 282 | my $fwfile = "dvb-fe-or51132-vsb.fw"; | ||
| 283 | my $url = "http://linuxtv.org/downloads/firmware/$fwfile"; | ||
| 284 | my $hash = "c16208e02f36fc439a557ad4c613364a"; | ||
| 285 | |||
| 286 | checkstandard(); | ||
| 287 | |||
| 288 | wgetfile($fwfile, $url); | ||
| 289 | verify($fwfile, $hash); | ||
| 290 | |||
| 291 | $fwfile; | ||
| 292 | } | ||
| 293 | |||
| 294 | # --------------------------------------------------------------- | ||
| 295 | # Utilities | ||
| 296 | |||
| 297 | sub checkstandard { | ||
| 298 | if (system("which unzip > /dev/null 2>&1")) { | ||
| 299 | die "This firmware requires the unzip command - see ftp://ftp.info-zip.org/pub/infozip/UnZip.html\n"; | ||
| 300 | } | ||
| 301 | if (system("which md5sum > /dev/null 2>&1")) { | ||
| 302 | die "This firmware requires the md5sum command - see http://www.gnu.org/software/coreutils/\n"; | ||
| 303 | } | ||
| 304 | if (system("which wget > /dev/null 2>&1")) { | ||
| 305 | die "This firmware requires the wget command - see http://wget.sunsite.dk/\n"; | ||
| 306 | } | ||
| 307 | } | ||
| 308 | |||
| 309 | sub checkunshield { | ||
| 310 | if (system("which unshield > /dev/null 2>&1")) { | ||
| 311 | die "This firmware requires the unshield command - see http://sourceforge.net/projects/synce/\n"; | ||
| 312 | } | ||
| 313 | } | ||
| 314 | |||
| 315 | sub wgetfile { | ||
| 316 | my ($sourcefile, $url) = @_; | ||
| 317 | |||
| 318 | if (! -f $sourcefile) { | ||
| 319 | system("wget -O \"$sourcefile\" \"$url\"") and die "wget failed - unable to download firmware"; | ||
| 320 | } | ||
| 321 | } | ||
| 322 | |||
| 323 | sub unzip { | ||
| 324 | my ($sourcefile, $todir) = @_; | ||
| 325 | |||
| 326 | $status = system("unzip -q -o -d \"$todir\" \"$sourcefile\" 2>/dev/null" ); | ||
| 327 | if ((($status >> 8) > 2) || (($status & 0xff) != 0)) { | ||
| 328 | die ("unzip failed - unable to extract firmware"); | ||
| 329 | } | ||
| 330 | } | ||
| 331 | |||
| 332 | sub unshield { | ||
| 333 | my ($sourcefile, $todir) = @_; | ||
| 334 | |||
| 335 | system("unshield x -d \"$todir\" \"$sourcefile\" > /dev/null" ) and die ("unshield failed - unable to extract firmware"); | ||
| 336 | } | ||
| 337 | |||
| 338 | sub verify { | ||
| 339 | my ($filename, $hash) = @_; | ||
| 340 | my ($testhash); | ||
| 341 | |||
| 342 | open(CMD, "md5sum \"$filename\"|"); | ||
| 343 | $testhash = <CMD>; | ||
| 344 | $testhash =~ /([a-zA-Z0-9]*)/; | ||
| 345 | $testhash = $1; | ||
| 346 | close CMD; | ||
| 347 | die "Hash of extracted file does not match!\n" if ($testhash ne $hash); | ||
| 348 | } | ||
| 349 | |||
| 350 | sub copy { | ||
| 351 | my ($from, $to) = @_; | ||
| 352 | |||
| 353 | system("cp -f \"$from\" \"$to\"") and die ("cp failed"); | ||
| 354 | } | ||
| 355 | |||
| 356 | sub extract { | ||
| 357 | my ($infile, $offset, $length, $outfile) = @_; | ||
| 358 | my ($chunklength, $buf, $rcount); | ||
| 359 | |||
| 360 | open INFILE, "<$infile"; | ||
| 361 | open OUTFILE, ">$outfile"; | ||
| 362 | sysseek(INFILE, $offset, SEEK_SET); | ||
| 363 | while($length > 0) { | ||
| 364 | # Calc chunk size | ||
| 365 | $chunklength = 2048; | ||
| 366 | $chunklength = $length if ($chunklength > $length); | ||
| 367 | |||
| 368 | $rcount = sysread(INFILE, $buf, $chunklength); | ||
| 369 | die "Ran out of data\n" if ($rcount != $chunklength); | ||
| 370 | syswrite(OUTFILE, $buf); | ||
| 371 | $length -= $rcount; | ||
| 372 | } | ||
| 373 | close INFILE; | ||
| 374 | close OUTFILE; | ||
| 375 | } | ||
| 376 | |||
| 377 | sub appendfile { | ||
| 378 | my ($FH, $infile) = @_; | ||
| 379 | my ($buf); | ||
| 380 | |||
| 381 | open INFILE, "<$infile"; | ||
| 382 | while(1) { | ||
| 383 | $rcount = sysread(INFILE, $buf, 2048); | ||
| 384 | last if ($rcount == 0); | ||
| 385 | print $FH $buf; | ||
| 386 | } | ||
| 387 | close(INFILE); | ||
| 388 | } | ||
| 389 | |||
| 390 | sub syntax() { | ||
| 391 | print STDERR "syntax: get_dvb_firmware <component>\n"; | ||
| 392 | print STDERR "Supported components:\n"; | ||
| 393 | for($i=0; $i < scalar(@components); $i++) { | ||
| 394 | print STDERR "\t" . $components[$i] . "\n"; | ||
| 395 | } | ||
| 396 | exit(1); | ||
| 397 | } | ||
