%PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµùÕ5sLOšuY
| Server IP : 14.207.165.8 / Your IP : 216.73.216.35 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/thread-self/root/usr/share/webmin/ipsec/ |
Upload File : |
#!/usr/bin/perl
# save_config.cgi
# Update or create the config section
require './ipsec-lib.pl';
&ReadParse();
&error_setup($text{'config_err'});
@conf = &get_config();
($config) = grep { $_->{'name'} eq 'config' } @conf;
if (!$config) {
$config = { 'name' => 'config',
'value' => 'setup',
'values' => { } };
}
# Validate and store inputs
if ($in{'ifaces_mode'} == 0) {
delete($config->{'values'}->{'interfaces'});
}
elsif ($in{'ifaces_mode'} == 1) {
$config->{'values'}->{'interfaces'} = '%none';
}
elsif ($in{'ifaces_mode'} == 2) {
$config->{'values'}->{'interfaces'} = '%defaultroute';
}
else {
for($n=0; defined($ri = $in{"ri_$n"}); $n++) {
next if (!$ri);
$ii = $in{"ii_$n"};
$done{$ri}++ && &error(&text('config_eri', $ri));
push(@ifaces, "$ii=$ri");
}
@ifaces || &error($text{'config_enone'});
$config->{'values'}->{'interfaces'} = join(" ", @ifaces);
}
if ($in{'syslog_def'}) {
delete($config->{'values'}->{'syslog'});
}
else {
$config->{'values'}->{'syslog'} = $in{'fac'}.".".$in{'pri'};
}
if ($in{'fwd'} eq 'yes' || $config->{'values'}->{'forwardcontrol'}) {
$config->{'values'}->{'forwardcontrol'} = $in{'fwd'};
}
else {
delete($config->{'values'}->{'forwardcontrol'});
}
if ($in{'fwd'} eq 'yes' || $config->{'values'}->{'forwardcontrol'}) {
$config->{'values'}->{'forwardcontrol'} = $in{'fwd'};
}
else {
delete($config->{'values'}->{'forwardcontrol'});
}
if ($in{'nat'} eq 'yes' || $config->{'values'}->{'nat_traversal'}) {
$config->{'values'}->{'nat_traversal'} = $in{'nat'};
}
else {
delete($config->{'values'}->{'nat_traversal'});
}
# Create or update the section
$file = $config->{'file'} || $config{'file'};
&lock_file($file);
if ($config->{'file'}) {
&modify_conn($config);
}
else {
&create_conn($config);
}
&unlock_file($file);
&webmin_log("config");
&redirect("");