Difference between revisions of "Which recorder.pl"
From MythTV Official Wiki
(→Usage: Update to use a non-DB-logging log message (so it works for everyone--even those who were smart enough to disable the useless DB logging mode) and add a --text mode) |
(It's the master backend log file, now.) |
||
| Line 8: | Line 8: | ||
|S21=yes|S22=yes|S23=yes|S24=yes}} | |S21=yes|S22=yes|S23=yes|S24=yes}} | ||
| − | '''which_recorder.pl''' parses the backend log file and outputs information on which capture card was used to record shows, formatted for inclusion in the backend status page. | + | '''which_recorder.pl''' parses the master backend log file and outputs information on which capture card was used to record shows, formatted for inclusion in the backend status page. |
= Usage = | = Usage = | ||
| − | which_recorder.pl /path/to/backend/log/file | + | which_recorder.pl /path/to/master/backend/log/file |
Because <code>which_recorder.pl</code> displays information about all recordings in your log file, you'll probably want to [[Log_File_Rotation|rotate your log files]] occasionally. | Because <code>which_recorder.pl</code> displays information about all recordings in your log file, you'll probably want to [[Log_File_Rotation|rotate your log files]] occasionally. | ||
| − | If you have multiple backends, <code>which_recorder.pl</code> | + | If you have multiple backends, <code>which_recorder.pl</code> must be run against the master backend log file. The master backend must be run with a verbose level that includes the "general" verbose messages (which is part of the default verbosity). |
To output the information to the console, rather than use it in the Miscellaneous Status Info section of the backend status page, you may call the script with the <code>--text</code> argument. | To output the information to the console, rather than use it in the Miscellaneous Status Info section of the backend status page, you may call the script with the <code>--text</code> argument. | ||
| − | which_recorder.pl --text /path/to/backend/log/file | + | which_recorder.pl --text /path/to/master/backend/log/file |
Revision as of 22:40, 10 September 2011
Note: The correct title of this article is which_recorder.pl. It appears incorrectly here due to technical restrictions.
| Author | Michael T. Dean |
| Description | Parses the backend log file and outputs information on which capture card was used to record shows, formatted for inclusion in the backend status page. |
| Supports |    
|
which_recorder.pl parses the master backend log file and outputs information on which capture card was used to record shows, formatted for inclusion in the backend status page.
Usage
which_recorder.pl /path/to/master/backend/log/file
Because which_recorder.pl displays information about all recordings in your log file, you'll probably want to rotate your log files occasionally.
If you have multiple backends, which_recorder.pl must be run against the master backend log file. The master backend must be run with a verbose level that includes the "general" verbose messages (which is part of the default verbosity).
To output the information to the console, rather than use it in the Miscellaneous Status Info section of the backend status page, you may call the script with the --text argument.
which_recorder.pl --text /path/to/master/backend/log/file
which_recorder.pl
#!/usr/bin/perl -w
#
# Parses the backend log file and includes information on which capture card was used to record shows.
my $mode = shift;
my $log_file = shift;
if ($mode ne "--text")
{
$log_file = $mode;
}
#2008-08-30 15:59:41.969 Started recording: Not My Life: channel 1651 on cardid 1, sourceid 1
open($fh, "<$log_file") or die "Unable to open log file '$log_file', stopping:";
my ($time, $title, $chanid, $cardid, $sourceid);
my $subtitle;
my $index = 0;
sub print_text
{
print "$time - $title";
print ": $subtitle" if ($subtitle);
print "\n";
print " - Capture Card ID: $cardid\n";
print " - Video Source ID: $sourceid\n";
print " - Channel ID: $chanid\n";
}
sub print_xml
{
print "<a href=\"#\">$time - $title";
print ": $subtitle" if ($subtitle);
print " - Capture Card: $cardid<br />".
"<span><strong>$title</strong> $time<br />";
print "<em>$subtitle</em><br />" if ($subtitle);
print "<br />Channel ID: $chanid<br />Capture Card ID: $cardid<br />".
"Video Source ID: $sourceid<br /></span></a><hr />";
# For XML parsers
print "[]:[]capture_info$index\[]:[]time='$time':title='$title'".
":subtitle='$subtitle':chanid='$chanid':cardid='$cardid'".
":sourceid='$sourceid'\n";
}
while (<$fh>)
{
if (/^(.*) Started recording: (.*): channel (\d+) on cardid (\d+), sourceid (\d+)/)
{
print "<h3>Capture Information</h3><div class=\"schedule\""
if (($index == 0) && ($mode ne "--text"));
$index++;
($time, $title, $chanid, $cardid, $sourceid) = ($1, $2, $3, $4, $5);
if ($title =~ /(.+) "(.*)"/)
{
$title = $1;
$subtitle = $2;
}
else
{
$subtitle = '';
}
if ($mode eq "--text")
{
print_text;
}
else
{
print_xml;
}
}
}
print "</div>" if (($index > 0) && ($mode ne "--text"));
close $fh;
