|
Lines 58-64
Link Here
|
| 58 |
|
58 |
|
| 59 |
sub sp8870 { |
59 |
sub sp8870 { |
| 60 |
my $sourcefile = "tt_Premium_217g.zip"; |
60 |
my $sourcefile = "tt_Premium_217g.zip"; |
| 61 |
my $url = "http://www.softwarepatch.pl/9999ccd06a4813cb827dbb0005071c71/$sourcefile"; |
61 |
my $url = "http://2.download.softwarepatch.pl/1619edb0dcb493dd5337b94a1f79c3f6/$sourcefile"; |
| 62 |
my $hash = "53970ec17a538945a6d8cb608a7b3899"; |
62 |
my $hash = "53970ec17a538945a6d8cb608a7b3899"; |
| 63 |
my $outfile = "dvb-fe-sp8870.fw"; |
63 |
my $outfile = "dvb-fe-sp8870.fw"; |
| 64 |
my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); |
64 |
my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); |
|
Lines 253-260
Link Here
|
| 253 |
} |
253 |
} |
| 254 |
|
254 |
|
| 255 |
sub vp7041 { |
255 |
sub vp7041 { |
| 256 |
my $sourcefile = "2.422.zip"; |
256 |
my $sourcefile = "TwinhanDTV2.608a.zip"; |
| 257 |
my $url = "http://www.twinhan.com/files/driver/USB-Ter/$sourcefile"; |
257 |
my $url = "http://www.twinhan.com/files/AW/Software/$sourcefile"; |
| 258 |
my $hash = "e88c9372d1f66609a3e7b072c53fbcfe"; |
258 |
my $hash = "e88c9372d1f66609a3e7b072c53fbcfe"; |
| 259 |
my $outfile = "dvb-vp7041-2.422.fw"; |
259 |
my $outfile = "dvb-vp7041-2.422.fw"; |
| 260 |
my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); |
260 |
my $tmpdir = tempdir(DIR => "/tmp", CLEANUP => 1); |
|
Lines 263-270
Link Here
|
| 263 |
|
263 |
|
| 264 |
wgetfile($sourcefile, $url); |
264 |
wgetfile($sourcefile, $url); |
| 265 |
unzip($sourcefile, $tmpdir); |
265 |
unzip($sourcefile, $tmpdir); |
| 266 |
extract("$tmpdir/VisionDTV/Drivers/Win2K&XP/UDTTload.sys", 12503, 3036, "$tmpdir/fwtmp1"); |
266 |
extract("$tmpdir/TwinhanDTV2.608a/Drivers/7041/WinXP/UDTTload.sys", 12503, 3036, "$tmpdir/fwtmp1"); |
| 267 |
extract("$tmpdir/VisionDTV/Drivers/Win2K&XP/UDTTload.sys", 2207, 10274, "$tmpdir/fwtmp2"); |
267 |
extract("$tmpdir/TwinhanDTV2.608a/Drivers/7041/WinXP/UDTTload.sys", 2207, 10274, "$tmpdir/fwtmp2"); |
| 268 |
|
268 |
|
| 269 |
my $CMD = "\000\001\000\222\177\000"; |
269 |
my $CMD = "\000\001\000\222\177\000"; |
| 270 |
my $PAD = "\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000"; |
270 |
my $PAD = "\000\000\000\000\000\000\000\000\000\000\000\000\000\000\000"; |
