Commit | Line | Data |
---|---|---|
cb77f0d6 | 1 | #!/usr/bin/env perl |
74ba9207 | 2 | # SPDX-License-Identifier: GPL-2.0-or-later |
1da177e4 LT |
3 | # DVB firmware extractor |
4 | # | |
5 | # (c) 2004 Andrew de Quincey | |
6 | # | |
1da177e4 LT |
7 | |
8 | use File::Temp qw/ tempdir /; | |
9 | use IO::Handle; | |
10 | ||
3d8466ec GG |
11 | @components = ( "sp8870", "sp887x", "tda10045", "tda10046", |
12 | "tda10046lifeview", "av7110", "dec2000t", "dec2540t", | |
f6b70ec5 | 13 | "dec3000s", "vp7041", "vp7049", "dibusb", "nxt2002", "nxt2004", |
59800555 | 14 | "or51211", "or51132_qam", "or51132_vsb", "bluebird", |
9254078c | 15 | "opera1", "cx231xx", "cx18", "cx23885", "pvrusb2", "mpc718", |
d2f918bb | 16 | "af9015", "ngene", "az6027", "lme2510_lg", "lme2510c_s7395", |
6fd7dba0 | 17 | "lme2510c_s7395_old", "drxk", "drxk_terratec_h5", |
7a016b08 | 18 | "drxk_hauppauge_hvr930c", "tda10071", "it9135", "drxk_pctv", |
9ca72fa1 | 19 | "drxk_terratec_htc_stick", "sms1xxx_hcw", "si2165"); |
1da177e4 LT |
20 | |
21 | # Check args | |
22 | syntax() if (scalar(@ARGV) != 1); | |
23 | $cid = $ARGV[0]; | |
24 | ||
25 | # Do it! | |
26 | for ($i=0; $i < scalar(@components); $i++) { | |
27 | if ($cid eq $components[$i]) { | |
28 | $outfile = eval($cid); | |
29 | die $@ if $@; | |