initial commit of file from CVS for smeserver-altqmail on Sat Sep 7 20:06:59 AEST 2024
This commit is contained in:
@@ -0,0 +1,9 @@
|
||||
{
|
||||
|
||||
$OUT = '';
|
||||
|
||||
foreach my $domain (split /[,;]/, ($altqmail{'Domains'} || '')){
|
||||
$OUT .= "$domain:127.0.0.1:" . (${'altqmail-smtpd'}{'TCPPort'} || '27') . "\n";
|
||||
}
|
||||
|
||||
}
|
@@ -0,0 +1 @@
|
||||
{ $DomainName }
|
@@ -0,0 +1 @@
|
||||
{ $DB->get('altqmail')->prop('ConcurrencyRemote') || "5"; }
|
@@ -0,0 +1 @@
|
||||
altqmail.{$DomainName}
|
@@ -0,0 +1 @@
|
||||
{ $DB->get('altqmail')->prop('OutRateLimit') || "20/3600"; }
|
@@ -0,0 +1,18 @@
|
||||
{
|
||||
$OUT = '';
|
||||
|
||||
use esmith::DomainsDB;
|
||||
my $domainsdb = esmith::DomainsDB->open_ro();
|
||||
|
||||
for my $domain ($domainsdb->domains)
|
||||
{
|
||||
my $mail_server = $domain->prop('MailServer')
|
||||
|| $DelegateMailServer
|
||||
|| 'localhost';
|
||||
|
||||
next if ( $mail_server ne 'localhost' );
|
||||
|
||||
$emaildomain = $domain->key;
|
||||
$OUT .= "$emaildomain:127.0.0.1\n";
|
||||
}
|
||||
}
|
Reference in New Issue
Block a user