| Server IP : 49.231.201.246 / Your IP : 216.73.216.149 Web Server : Apache/2.4.18 (Ubuntu) System : User : root ( 0) PHP Version : 7.0.33-0ubuntu0.16.04.16 Disable Function : exec,passthru,mail,shell_exec,system,proc_open,popen,ini_alter,dl,proc_close,curl_exec,curl_multi_exec,readfile,parse_ini_file,escapeshellarg,escapeshellcmd,show_source,pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,pcntl_unshare,mail,php_uname,phpinfo MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/logviewer/ |
Upload File : |
require 'logviewer-lib.pl';
# acl_security_form(&options)
# Output HTML for editing security options for the syslog module
sub acl_security_form
{
# Can enter arbitrary filename
print &ui_table_row($text{'acl_any'},
&ui_yesno_radio("any", int($_[0]->{'any'})));
# Can view syslog logs and logs from other modules
print &ui_table_row($text{'acl_syslog'},
&ui_yesno_radio("syslog", int($_[0]->{'syslog'})));
print &ui_table_row($text{'acl_others'},
&ui_yesno_radio("others", int($_[0]->{'others'})));
# Allowed directories
print &ui_table_row($text{'acl_logs'},
&ui_radio("logs_def", $_[0]->{'logs'} ? 0 : 1,
[ [ 1, $text{'acl_all'} ], [ 0, $text{'acl_sel'} ] ]).
"<br>\n".
&ui_textarea("logs", join("\n", split(/\t+/, $_[0]->{'logs'})),
5, 50), 3);
# Extra per-user log files
print &ui_table_row($text{'acl_extra'},
&ui_textarea("extras", join("\n", split(/\t+/, $_[0]->{'extras'})),
5, 50), 3);
}
# acl_security_save(&options)
# Parse the form for security options for the syslog module
sub acl_security_save
{
$_[0]->{'any'} = $in{'any'};
$_[0]->{'syslog'} = $in{'syslog'};
$_[0]->{'others'} = $in{'others'};
$in{'logs'} =~ s/\r//g;
$_[0]->{'logs'} = $in{'logs_def'} ? undef :
join("\t", split(/\n/, $in{'logs'}));
$_[0]->{'extras'} = join("\t", split(/\n/, $in{'extras'}));
}