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-rc2v2.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 | } | ||