Server IP : 195.201.23.43 / Your IP : 3.147.84.210 Web Server : Apache System : Linux webserver2.vercom.be 5.4.0-192-generic #212-Ubuntu SMP Fri Jul 5 09:47:39 UTC 2024 x86_64 User : kdecoratie ( 1041) PHP Version : 7.1.33-63+ubuntu20.04.1+deb.sury.org+1 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_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, MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /usr/share/webmin/virtual-server/ |
Upload File : |
#!/usr/bin/perl =head1 syncmx-domain.pl Updates allowed relay addresses in one or more domains. This command can be used to bring the lists of allowed addresses on secondary MX servers into sync with the master Virtualmin system for some or all domains. In general it should never need to be run, unless email addresses have been modified outside of Virtualmin's control. The only flags it takes are C<--domain> followed by domain name to sync, C<--user> followed by the name of a user who owns domains, or C<--all-domains>. =cut package virtual_server; if (!$module_name) { $main::no_acl_check++; $ENV{'WEBMIN_CONFIG'} ||= "/etc/webmin"; $ENV{'WEBMIN_VAR'} ||= "/var/webmin"; if ($0 =~ /^(.*)\/[^\/]+$/) { chdir($pwd = $1); } else { chop($pwd = `pwd`); } $0 = "$pwd/syncmx-domain.pl"; require './virtual-server-lib.pl'; $< == 0 || die "syncmx-domain.pl must be run as root"; } @OLDARGV = @ARGV; &set_all_text_print(); # Parse command-line args while(@ARGV > 0) { local $a = shift(@ARGV); if ($a eq "--domain") { push(@domains, shift(@ARGV)); } elsif ($a eq "--user") { push(@users, shift(@ARGV)); } elsif ($a eq "--all-domains") { $all_doms = 1; } elsif ($a eq "--multiline") { $multiline = 1; } elsif ($a eq "--help") { &usage(); } else { &usage("Unknown parameter $a"); } } # Find the domains @domains || @users || $all_doms || usage("No domains or users specified"); if ($all_doms) { # All domains @doms = &list_domains(); } else { # By domain or user @doms = &get_domains_by_names_users(\@domains, \@users, \&usage); } # Make sure MXs exist @servers = &list_mx_servers(); @servers || &usage("No secondary mail servers have been defined"); # Call the sync function on each one foreach $d (grep { $_->{'mail'} } @doms) { print $d->{'dom'},"\n"; @rv = &sync_secondary_virtusers($d); foreach $r (@rv) { print " ",$r->[0]->{'host'},": ",($r->[1] || "OK"),"\n"; } } &run_post_actions_silently(); &virtualmin_api_log(\@OLDARGV); sub usage { print $_[0],"\n\n" if ($_[0]); print "Updates allowed relay addresses in one or more domains.\n"; print "\n"; print "virtualmin syncmx-domain [--domain domain.name]*\n"; print " [--user username]*\n"; exit(1); }Private