| 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/bandwidth/ |
Upload File : |
#!/usr/bin/perl
# Add needed firewall rules and syslog entry, and apply configurations
require './bandwidth-lib.pl';
&ReadParse();
$access{'setup'} || &error($text{'setup_ecannot'});
# Work out interface
$iface = $in{'iface'} || $in{'other'};
$iface =~ /^\S+$/ || &error($text{'setup_eiface'});
# Add missing firewall rules
$err = &setup_rules($iface);
&error($err) if ($err);
if ($syslog_journald) {
# Systemd journal
# No setup needed
}
elsif ($syslog_module eq "syslog") {
# Add syslog entry
$conf = &syslog::get_config();
$sysconf = &find_sysconf($conf);
if (!$sysconf) {
&lock_file($syslog::config{'syslog_conf'});
if ($syslog::config{'tags'}) {
local $conf = &syslog::get_config();
($tag) = grep { $_->{'tag'} eq '*' } @$conf;
}
&syslog::create_log({ 'file' => $bandwidth_log,
'active' => 1,
'section' => $tag,
'sel' => [ &get_loglevel() ] });
&unlock_file($syslog::config{'syslog_conf'});
$err = &syslog::restart_syslog();
&error($err) if ($err);
}
}
elsif ($syslog_module eq "syslog-ng") {
# Add syslog-ng entry
$conf = &syslog_ng::get_config();
($dest, $filter, $log) = &find_sysconf_ng($conf);
&lock_file($syslog_ng::config{'syslogng_conf'});
if (!$dest) {
# Create destination file entry
$dest = { 'name' => 'destination',
'type' => 1,
'values' => [ 'd_bandwidth' ],
'members' => [
{ 'name' => 'file',
'values' => [ $bandwidth_log ] }
]
};
&syslog_ng::save_directive($conf, undef, undef, $dest, 0);
}
if (!$filter) {
# Create filter for facility and level
local @ll = &get_loglevel();
($fac, $lvl) = split(/\./, $ll[0]);
$lvl =~ s/^=//;
$filter = { 'name' => 'filter',
'type' => 1,
'values' => [ 'f_bandwidth' ],
'members' => [ ]
};
if ($fac ne "*") {
push(@{$filter->{'members'}},
{ 'name' => 'facility',
'values' => [ $fac ] });
}
if ($fac ne "*" && $lvl ne "*") {
push(@{$filter->{'members'}}, "and");
}
if ($lvl ne "*") {
push(@{$filter->{'members'}},
{ 'name' => 'priority',
'values' => [ $lvl ] });
}
&syslog_ng::save_directive($conf, undef, undef, $filter, 0);
}
if (!$log) {
# Create log for the default source, destination and filter
@sources = &syslog_ng::find("source", $conf);
$log = { 'name' => 'log',
'type' => 1,
'values' => [ ],
'members' => [
{ 'name' => 'source',
'values' => [ $sources[0]->{'value'} ], },
{ 'name' => 'filter',
'values' => [ "f_bandwidth" ], },
{ 'name' => 'destination',
'values' => [ "d_bandwidth" ], },
]
};
&syslog_ng::save_directive($conf, undef, undef, $log, 0);
}
&unlock_file($syslog_ng::config{'syslogng_conf'});
}
# Save the interface
&lock_file($module_config_file);
$config{'iface'} = $iface;
&save_module_config();
&unlock_file($module_config_file);
# Setup the rotation cron job
$job = &find_cron_job();
if (!$job) {
&cron::create_wrapper($cron_cmd, $module_name, "rotate.pl");
$job = { 'user' => 'root',
'active' => 1,
'command' => $cron_cmd,
'mins' => '0',
'hours' => '*',
'days' => '*',
'months' => '*',
'weekdays' => '*',
};
&lock_file(&cron::cron_file($job));
&cron::create_cron_job($job);
&unlock_file(&cron::cron_file($job));
}
&webmin_log("setup", undef, $iface);
&redirect("");