| Server IP : 49.231.201.246 / Your IP : 216.73.216.149 Web Server : Apache/2.4.18 (Ubuntu) System : Linux 246 4.4.0-210-generic #242-Ubuntu SMP Fri Apr 16 09:57:56 UTC 2021 x86_64 User : root ( 0) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : exec,passthru,shell_exec,system,proc_open,popen,pcntl_exec MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /proc/11585/root/usr/share/webmin/smf/ |
Upload File : |
#!/usr/bin/perl
# log_viewer.cgi
# Display logfile
require './smf-lib.pl';
&ReadParse();
&ui_print_header(undef, $text{'log_viewer_title'}, "");
# get logfile path
if (defined($in{'logfile'})) {
$logfile = $in{'logfile'};
# remove quotes
$logfile =~ /\'([^\']*)\'/;
$logfile = $1;
} else {
&error("No logfile name supplied to logfile viewer!");
}
$numlines = 40;
if (defined($in{'numlines'})) {
$numlines = $in{'numlines'};
if ($numlines ne "all") {
$numlines = int($numlines);
}
}
if ($numlines eq "all") {
$newnumlines = &backquote_logged("/usr/bin/wc -l $logfile");
if ($newnumlines =~ /([0-9]+)\s+$logfile/) {
$numlines = $1;
}
}
$data = &backquote_logged("/usr/bin/tail -$numlines $logfile");
print "<h2>";
&text_and_whats_this("log_viewer_detail");
print " : $logfile</h2>\n";
print "<form method=\"POST\" action=\"log_viewer.cgi?logfile='$logfile'\">\n";
# show selection for number of logfile lines to display
print "<p>$text{'log_viewer_show_last'} : \n";
&print_selection("numlines", $numlines, \@logfile_numlines_values);
print "$text{'log_viewer_num_lines'} : $logfile ";
print
"<input type=submit name=\"submit\" value=\"$text{'log_viewer_submit'}\">";
print "</p></form>\n";
print &ui_hr();
print "<p><pre>";
print "$data";
print "</pre></p>\n";
&ui_print_footer("index.cgi", $text{'index'});