| Server IP : 49.231.201.246 / Your IP : 216.73.216.248 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 : 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_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority, MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/sendmail/ |
Upload File : |
#!/usr/bin/perl
# create_file.cgi
# Create the file for virtusers, domains, mailers or access_db
require './sendmail-lib.pl';
&ReadParse();
$conf = &get_sendmailcf();
if ($in{'mode'} eq 'virtusers') {
require './virtusers-lib.pl';
$access{'vmode'} || &error($text{'virtusers_ecannot'});
$file = &virtusers_file($conf);
($dbm, $dbmtype) = &virtusers_dbm($conf);
$log = "virtuser";
}
elsif ($in{'mode'} eq 'mailers') {
require './mailers-lib.pl';
$access{'mailers'} || &error($text{'mailers_ecannot'});
$file = &mailers_file($conf);
($dbm, $dbmtype) = &mailers_dbm($conf);
$log = "mailer";
}
elsif ($in{'mode'} eq 'generics') {
require './generics-lib.pl';
$access{'omode'} || &error($text{'generics_cannot'});
$file = &generics_file($conf);
($dbm, $dbmtype) = &generics_dbm($conf);
$log = "generic";
}
elsif ($in{'mode'} eq 'domains') {
require './domain-lib.pl';
$access{'domains'} || &error($text{'domains_ecannot'});
$file = &domains_file($conf);
($dbm, $dbmtype) = &domains_dbm($conf);
$log = "domain";
}
elsif ($in{'mode'} eq 'access') {
require './access-lib.pl';
$access{'access'} || &error($text{'access_ecannot'});
$file = &access_file($conf);
($dbm, $dbmtype) = &access_dbm($conf);
$log = "access";
}
&open_lock_tempfile(DFILE, ">>$file");
&close_tempfile(DFILE);
&system_logged("$config{'makemap_path'} $dbmtype $dbm <$file");
&webmin_log("manual", $log, $file);
&redirect("list_$in{'mode'}.cgi");