mirror of
https://github.com/vdr-projects/vdr.git
synced 2025-03-01 10:50:46 +00:00
771986b89f
- Re-implemented handling of DVB-S2, which first appeared in version 1.5.14, but was revoked in version 1.5.15 in favor of making a stable version 1.6.0. VDR now requires the "multiproto" DVB driver, e.g. from http://jusst.de/hg/multiproto. Note that the channels.conf file now supports additional parameters, so you may want to make sure you have a backup of this file in case you need to go back to the previous version of VDR! - Fixed displaying transponder data when it is modified (thanks to Reinhard Nissl). - Fixed handling the counter in detection of pre 1.3.19 PS data (thanks to Reinhard Nissl). - Improved logging system time changes to avoid problems on slow systems under heavy load (suggested by Helmut Auer). - Now setting the thread name, so that it can be seen in 'top -H' (thanks to Rolf Ahrenberg). - Fixed initializing the timer's flags in the cTimer copy constructor (thanks to Andreas Mair). - Fixed setting the OSD level in the 'osddemo' example (thanks to Wolfgang Rohdewald). - Increased the time between checking the CAM status to 500ms to avoid problems with some CAMs (reported by Arthur Konovalov).
84 lines
2.2 KiB
Perl
Executable File
84 lines
2.2 KiB
Perl
Executable File
#!/usr/bin/perl
|
|
|
|
# $Id: gendescr.pl 2.0 2003/12/13 10:40:53 kls Exp $
|
|
|
|
print "Name (ohne ...Descriptor):";
|
|
$name=<STDIN>;
|
|
$name =~ s/\n$//;
|
|
$inner = ($name =~ s/ä$//);
|
|
$name .= "Descriptor" unless ($inner);
|
|
|
|
print "Struct:";
|
|
$struct=<STDIN>;
|
|
$struct =~ s/\n$//;
|
|
|
|
mm:
|
|
$index=0;
|
|
$which=1;
|
|
print "Variablen:";
|
|
while ( <STDIN> ) {
|
|
if (/ä/) {
|
|
goto vv;
|
|
} elsif (/ü/) {
|
|
$which=1;
|
|
next;
|
|
}
|
|
$eingabe=$_;
|
|
$eingabe =~ s/(.{75,120} )/\1\n/g;
|
|
$eingabe =~ s/\n$//;
|
|
if ($which) {
|
|
$members[$index]=$eingabe;
|
|
} else {
|
|
$members_comments[$index]=$eingabe;
|
|
$index++;
|
|
print "Jep!\n";
|
|
}
|
|
$which= (! $which);
|
|
}
|
|
|
|
vv:
|
|
$filename_h="tempdescr.h";
|
|
$filename_c="tempdescr.c";
|
|
schreib();
|
|
|
|
sub schreib {
|
|
print "Danke.\n";
|
|
open(OUTPUT_H, ">>".$filename_h) or die "Could not open file!!";
|
|
open(OUTPUT_C, ">>".$filename_c) or die "Could not open file!!";
|
|
|
|
if ($inner) {
|
|
$offset=" ";
|
|
} else {
|
|
$offset="";
|
|
}
|
|
print(OUTPUT_H $offset."class ".$name);
|
|
if ($inner) {
|
|
print(OUTPUT_H " : public LoopElement {\n".$offset."public:");
|
|
} else {
|
|
print(OUTPUT_H " : public Descriptor {\n".$offset."public:");
|
|
}
|
|
#for ($i=0; $i<=$#vars;$i++) {
|
|
# print (OUTPUT "/*\n".$vars_comments[$i]." */\n".$vars[$i].";\n\n\n");
|
|
#}
|
|
for ($i=0; $i<=$#members;$i++) {
|
|
print (OUTPUT_H "\n".$offset." int get".$members[$i]."() const;");
|
|
}
|
|
print(OUTPUT_H "\n".$offset."virtual int getLength() { return sizeof(".$struct."); }") if ($inner);
|
|
|
|
print(OUTPUT_H "\n".$offset."protected:\n".$offset." virtual void Parse();");
|
|
print(OUTPUT_H "\n".$offset."private:\n".$offset." const ".$struct." *s;") if ($struct ne "");
|
|
print(OUTPUT_H "\n".$offset."};\n\n");
|
|
for ($i=0; $i<=$#members_comments;$i++) {
|
|
print (OUTPUT_C "int ".$name."::get".$members[$i]."() const {\n");
|
|
if ($members_comments[$i] =~ /^(.+)_hi$/) {
|
|
$varbase=$1;
|
|
print (OUTPUT_C " return HILO(s->".$varbase.");\n}\n\n");
|
|
} else {
|
|
print (OUTPUT_C " return s->".$members_comments[$i].";\n}\n\n");
|
|
}
|
|
}
|
|
print (OUTPUT_C "void ".$name."::Parse() {\n}\n\n");
|
|
print (OUTPUT_C "\n\n\n");
|
|
exit;
|
|
}
|