smeserver/smeserver-qpsmtpd
6
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

initial commit of file from CVS for smeserver-qpsmtpd on Thu 26 Oct 11:25:19 BST 2023

Browse Source
This commit is contained in:
Brian Read
2023-10-26 11:25:19 +01:00
parent c8bfca82cb
commit c45ac2b2d0
197 changed files with 3867 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/Authentication Normal file
View File

@@ -0,0 +1 @@
enabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/Bcc Normal file
View File

@@ -0,0 +1 @@
disabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/BccMode Normal file
View File

@@ -0,0 +1 @@
cc

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/BccUser Normal file
View File

@@ -0,0 +1 @@
maillog

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/DNSBL Normal file
View File

@@ -0,0 +1 @@
disabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/Instances Normal file
View File

@@ -0,0 +1 @@
40

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/InstancesPerIP Normal file
View File

@@ -0,0 +1 @@
5

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/LogLevel Normal file
View File

@@ -0,0 +1 @@
6

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/MaxScannerSize Normal file
View File

@@ -0,0 +1 @@
25000000

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/MaximumDateOffset Normal file
View File

@@ -0,0 +1 @@
0

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/PatternsScan Normal file
View File

@@ -0,0 +1 @@
disabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/Proxy Normal file
View File

@@ -0,0 +1 @@
blocked

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/RBLList Normal file
View File

@@ -0,0 +1 @@
bl.spamcop.net,dnsbl-1.uceprotect.net,dnsbl-2.uceprotect.net,psbl.surriel.com,zen.spamhaus.org

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/RHSBL Normal file
View File

@@ -0,0 +1 @@
disabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/RelayRequiresAuth Normal file
View File

@@ -0,0 +1 @@
enabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/SBLList Normal file
View File

@@ -0,0 +1 @@
multi.surbl.org,black.uribl.com,rhsbl.sorbs.net

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/TCPPort Normal file
View File

@@ -0,0 +1 @@
25

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/TCPProxyPort Normal file
View File

@@ -0,0 +1 @@
25

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/TlsBeforeAuth Normal file
View File

@@ -0,0 +1 @@
1

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/UBLList Normal file
View File

@@ -0,0 +1 @@
multi.surbl.org:8-16-64-128,black.uribl.com,rhsbl.sorbs.net

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/URIBL Normal file
View File

@@ -0,0 +1 @@
disabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/VirusScan Normal file
View File

@@ -0,0 +1 @@
enabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/access Normal file
View File

@@ -0,0 +1 @@
public

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/qplogsumm Normal file
View File

@@ -0,0 +1 @@
disabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/status Normal file
View File

@@ -0,0 +1 @@
enabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/tnef2mime Normal file
View File

@@ -0,0 +1 @@
enabled

1
root/etc/e-smith/db/configuration/defaults/qpsmtpd/type Normal file
View File

@@ -0,0 +1 @@
service

1
root/etc/e-smith/db/configuration/defaults/sqpsmtpd/Authentication Normal file
View File

@@ -0,0 +1 @@
enabled

1
root/etc/e-smith/db/configuration/defaults/sqpsmtpd/Instances Normal file
View File

@@ -0,0 +1 @@
10

1
root/etc/e-smith/db/configuration/defaults/sqpsmtpd/TCPPort Normal file
View File

@@ -0,0 +1 @@
465

1
root/etc/e-smith/db/configuration/defaults/sqpsmtpd/access Normal file
View File

@@ -0,0 +1 @@
public

1
root/etc/e-smith/db/configuration/defaults/sqpsmtpd/status Normal file
View File

@@ -0,0 +1 @@
enabled

1
root/etc/e-smith/db/configuration/defaults/sqpsmtpd/type Normal file
View File

@@ -0,0 +1 @@
service

35
root/etc/e-smith/db/configuration/migrate/20RBLList Normal file
View File

@@ -0,0 +1,35 @@
{
$qpsmtpd = $DB->get('qpsmtpd');
return unless $qpsmtpd;
my $rbl = $qpsmtpd->prop('RBLList');
return unless $rbl;
my @rbl = ();
# Migrate to use , as separator instead of :
if ($rbl !~ m/,/){
my @zones = split /[:]/, $rbl;
my $fqdn_re = qr/([a-zA-Z0-9][a-zA-Z0-9\-]{1,61}\.)*[a-zA-Z0-9][a-zA-Z0-9\-]{1,61}\.[a-zA-Z]{2,}/;
if (scalar @zones == 2 && $zones[1] !~ m/^$fqdn_re$/){
# When we have only two entries, check if the second one looks like a valid hostname
# so if you only have something like dnsbl.foo.net:Sorry you are blacklisted
# it won't be migrated to dnsbl.foo.net,Sorry you are blacklisted
@rbl = ($rbl);
}
else{
@rbl = @zones;
}
}
else{
@rbl = split /[,]/, $rbl;
}
my %obsolete = map { $_ => 1} qw(
combined.njabl.org
list.dsbl.org
multihop.dsbl.org
dnsbl.ahbl.org
);
@rbl = grep { ! $obsolete{$_} } @rbl;
$qpsmtpd->set_prop('RBLList', join ',', @rbl);
}

3
root/etc/e-smith/db/configuration/migrate/20RequireResolvableFromHost Normal file
View File

@@ -0,0 +1,3 @@
{
return unless $DB->get_prop_and_delete('qpsmtpd', 'RequireResolvableFromHost');
}

38
root/etc/e-smith/db/configuration/migrate/20SBLLIST Normal file
View File

@@ -0,0 +1,38 @@
{
$qpsmtpd = $DB->get('qpsmtpd');
return unless $qpsmtpd;
my $sbl = $qpsmtpd->prop('SBLList');
return unless $sbl;
my @sbl = ();
# Migrate to use , as separator instead of :
if ($sbl !~ m/,/){
my @zones = split /[:]/, $sbl;
my $fqdn_re = qr/([a-zA-Z0-9][a-zA-Z0-9\-]{1,61}\.)*[a-zA-Z0-9][a-zA-Z0-9\-]{1,61}\.[a-zA-Z]{2,}/;
if (scalar @zones == 2 && $zones[1] !~ m/^$fqdn_re$/){
# When we have only two entries, check if the second one looks like a valid hostname
# so if you only have something like rhsbl.foo.net:Sorry you are blacklisted
# it won't be migrated to rhsbl.foo.net,Sorry you are blacklisted
@sbl = ($sbl);
}
else{
@sbl = @zones;
}
}
else{
@sbl = split /[,]/, $sbl;
}
my %obsolete = map { $_ => 1} qw(
blackhole.securitysage.com
bulk.rhs.mailpolice.com
fraud.rhs.mailpolice.com
porn.rhs.mailpolice.com
adult.rhs.mailpolice.com
bogusmx.rfc-ignorant.org
ex.dnsbl.org
);
@sbl = grep { !$obsolete{$_} } @sbl;
$qpsmtpd->set_prop('SBLList', join ',', @sbl);
}

19
root/etc/e-smith/db/configuration/migrate/80Qpsmtpd Normal file
View File

@@ -0,0 +1,19 @@
{
my $smtpd = $DB->get("smtpd");
if ($smtpd){
my $qpsmtpd = $DB->get("qpsmtpd") ||
$DB->new_record("qpsmtpd", { type => "service" });
$qpsmtpd->merge_props($smtpd->props);
$smtpd->delete;
}
my $ssmtpd = $DB->get("ssmtpd");
if ($ssmtpd){
my $sqpsmtpd = $DB->get("sqpsmtpd") ||
$DB->new_record("sqpsmtpd", { type => "service" });
$sqpsmtpd->merge_props($ssmtpd->props);
$ssmtpd->delete;
}
}

40
root/etc/e-smith/events/actions/domains-update-dkim Normal file
View File

@@ -0,0 +1,40 @@
#!/usr/bin/perl -w
use esmith::DomainsDB;
use esmith::ConfigDB;
use File::Find;
my $d = esmith::DomainsDB->open_ro || die "Couldn't open the domains database";
my $c = esmith::ConfigDB->open_ro || die "Couldn't open the configurtion database";
my $qpsmtpd = $c->get('qpsmtpd');
die "qpsmtpd service entry not found" unless ($qpsmtpd);
my $dkim_sign = $qpsmtpd->prop('DKIMSigning') || 'disabled';
find({ wanted => \&wanted }, qw(/var/service/qpsmtpd/config/dkim/));
# Build a list of domain for which we want to sign emails
my @dkim_domains = ();
if ($dkim_sign =~ m/^enabled|yes|1|on$/){
foreach my $dom ($d->domains){
next if ($dom->prop('DKIMSigning') || 'enabled') eq 'disabled';
next if ($dom->prop('MailServer'));
push @dkim_domains, $dom->key;
}
}
sub wanted{
my $domain = $d->get($_);
if ( -l && !grep { $_ eq $domain->key } @dkim_domains ){
unlink $_;
}
}
foreach my $dom (@dkim_domains){
next if (-e '/var/service/qpsmtpd/config/dkim/' . $dom);
my $src = ( -e '/home/e-smith/dkim_keys/' . $dom ) ? '/home/e-smith/dkim_keys/' . $dom : '/home/e-smith/dkim_keys/default';
symlink $src, '/var/service/qpsmtpd/config/dkim/' . $dom;
}

1
root/etc/e-smith/templates.metadata/var/service/qpsmtpd/config/plugins Normal file
View File

@@ -0,0 +1 @@
OUTPUT_FILENAME="/var/service/qpsmtpd/config/peers/0"

1
root/etc/e-smith/templates.metadata/var/service/qpsmtpd/peers/0 Normal file
View File

@@ -0,0 +1 @@
PERMS=use esmith::ConfigDB; (esmith::ConfigDB->open_ro->get('qpsmtpd')->prop('access') eq "private") ? "000" : "0644"

1
root/etc/e-smith/templates.metadata/var/service/qpsmtpd/peers/locals Normal file
View File

@@ -0,0 +1 @@
PERMS=use esmith::ConfigDB; (esmith::ConfigDB->open_ro->get('qpsmtpd')->prop('status') eq "enabled") ? "0644" : "0000"

4
root/etc/e-smith/templates.metadata/var/service/qpsmtpd/ssl/cert.pem Normal file
View File

@@ -0,0 +1,4 @@
TEMPLATE_PATH="/home/e-smith/ssl.pem"
OUTPUT_FILENAME="/var/service/qpsmtpd/ssl/cert.pem"
GID="qpsmtpd"
PERMS=0640

8
root/etc/e-smith/templates/etc/crontab/DMARCReports Normal file
View File

@@ -0,0 +1,8 @@
{
if (( $qpsmtpd{DMARCReporting} || 'disabled' ) =~ m/^1|on|enabled|yes$/){
$OUT .= '15 0 * * * qpsmtpd /usr/bin/dmarc_send_reports 2>&1 | grep -v "SSL connection failed" | logger -t "DMARC Reporting"' . "\n";
}
else{
$OUT .= "# DMARC Reporting is disabled\n";
}
}

5
root/etc/e-smith/templates/etc/mail-dmarc.ini/100organization Normal file
View File

@@ -0,0 +1,5 @@
[organization]
domain = { $DomainName }
org_name = { $ldap{defaultCompany} || 'SME Server powered company' }
email = { $qpsmtpd{DMARCReportEmail} || 'admin@' . $DomainName }
extra_contact_info = { $qpsmtpd{DMARCContactInfo} || 'http://' . $DomainName }

3
root/etc/e-smith/templates/etc/mail-dmarc.ini/200ReportStore Normal file
View File

@@ -0,0 +1,3 @@
[report_store]
backend = SQL
dsn = dbi:SQLite:dbname=/var/lib/qpsmtpd/dmarc/reports.sqlite

2
root/etc/e-smith/templates/etc/mail-dmarc.ini/300Dmarc Normal file
View File

@@ -0,0 +1,2 @@
[dmarc]
backend = perl

3
root/etc/e-smith/templates/etc/mail-dmarc.ini/400Dns Normal file
View File

@@ -0,0 +1,3 @@
[dns]
timeout = 5
public_suffix_list = public_suffix_list

3
root/etc/e-smith/templates/etc/mail-dmarc.ini/500Smtp Normal file
View File

@@ -0,0 +1,3 @@
[smtp]
hostname = { $SystemName . '.' . $DomainName }
smarthost = 127.0.0.1

1
root/etc/e-smith/templates/home/e-smith/dkim_keys/default/selector/template-begin Normal file
View File

@@ -0,0 +1 @@
{ $qpsmtpd{'DKIMSelector'} || 'default' }

2
root/etc/e-smith/templates/var/qmail/control/badmailfrom/10sample Normal file
View File

@@ -0,0 +1,2 @@
#spamer@spamdomain.com
#@spamdomain.com

9
root/etc/e-smith/templates/var/qmail/control/badrcptto/00setup Normal file
View File

@@ -0,0 +1,9 @@
{
require esmith::AccountsDB;
require esmith::DomainsDB;
%Accounts = esmith::AccountsDB->as_hash;
%Domains = esmith::DomainsDB->as_hash;
"";
}

16
root/etc/e-smith/templates/var/qmail/control/badrcptto/10blockVisibleInternal Normal file
View File

@@ -0,0 +1,16 @@
{
foreach my $account ( keys %Accounts )
{
next unless ( exists $Accounts{$account}{Visible}
and $Accounts{$account}{Visible} eq "internal" );
$OUT .= "$account\n";
$OUT .= "$account\@$DomainName\n";
foreach my $domain ( keys %Domains )
{
next unless $Domains{$domain}{type} eq "domain";
$OUT .= "$account\@$domain\n";
}
}
}

14
root/etc/e-smith/templates/var/qmail/control/rcpthosts/10standard Normal file
View File

@@ -0,0 +1,14 @@
{
use esmith::DomainsDB;
my $ddb = esmith::DomainsDB->open_ro or die "Couldn't open DomainsDB\n";
my @rcpt_hosts = ( "$SystemName.$DomainName" );
foreach my $domain ( $ddb->get_all_by_prop( type => "domain" ) )
{
push @rcpt_hosts, $domain->key;
}
$OUT = join "\n", @rcpt_hosts;
}

5
root/etc/e-smith/templates/var/qmail/control/rcpthosts/12LiteralIP Normal file
View File

@@ -0,0 +1,5 @@
{
return "" unless (defined $ExternalIP);
return "[$ExternalIP]";
}

6
root/etc/e-smith/templates/var/service/qpsmtpd/config/IP/10IP Normal file
View File

@@ -0,0 +1,6 @@
0
{
# the first line of this file is being used as the IP
# address tcpserver will bind to. Use 0 to bind to all
# interfaces.
}

3
root/etc/e-smith/templates/var/service/qpsmtpd/config/badhelo/10ExternalIP Normal file
View File

@@ -0,0 +1,3 @@
{
$ExternalIP || "# ExternalIP not defined";
}

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/badhelo/10begin Normal file
View File

@@ -0,0 +1 @@
# these domains never uses their domain when greeting us, so reject transactions

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/badhelo/20aol.com Normal file
View File

@@ -0,0 +1 @@
aol.com

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/badhelo/20yahoo.com Normal file
View File

@@ -0,0 +1 @@
yahoo.com

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/badrcptto/10NoBangPaths Normal file
View File

@@ -0,0 +1 @@
! Sorry, bang paths not accepted here

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/badrcptto/10NoDoubleAt Normal file
View File

@@ -0,0 +1 @@
@.*@ Sorry, multiple at signs not accepted here

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/badrcptto/10NoEmptyLocalPart Normal file
View File

@@ -0,0 +1 @@
^@ Invalid recipient address

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/badrcptto/10NoPercentHack Normal file
View File

@@ -0,0 +1 @@
% Sorry, percent hack not accepted here

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/badrcptto/10header Normal file
View File

@@ -0,0 +1 @@
# Format is pattern\s+Response - don't forget to tie the pattern if required

8
root/etc/e-smith/templates/var/service/qpsmtpd/config/badrcptto_ext/00Setup Normal file
View File

@@ -0,0 +1,8 @@
{
use esmith::AccountsDB;
use esmith::DomainsDB;
$a = esmith::AccountsDB->open_ro or die "Couldn't open AccountsDB";
$d = esmith::DomainsDB->open_ro or die "Couldn't open DomainsDB";
$OUT = '';
}

12
root/etc/e-smith/templates/var/service/qpsmtpd/config/badrcptto_ext/10InternalPeudonymes Normal file
View File

@@ -0,0 +1,12 @@
{
$OUT .= '';
foreach my $alias ( $a->users, $a->groups, $a->pseudonyms ){
next unless ( $alias->prop('Visible') || '') =~ m/^(internal|none)$/i;
$OUT .= $alias->key . "\n" and next if $alias->key =~ m/@/;
foreach my $domain ( $d->domains ){
$OUT .= $alias->key . '@' . $domain->key . "\n";
}
}
}

23
root/etc/e-smith/templates/var/service/qpsmtpd/config/dnsbl_allow/80LocalNetworks Normal file
View File

@@ -0,0 +1,23 @@
{
use esmith::util;
my @prefixes = esmith::util::computeAllLocalNetworkPrefixes($LocalIP,
$LocalNetmask);
require esmith::NetworksDB;
my $n = esmith::NetworksDB->open;
foreach my $network ($n->get_all_by_prop(type => 'network'))
{
push(@prefixes,
esmith::util::computeAllLocalNetworkPrefixes(
$network->key, $network->prop('Mask')));
}
foreach my $prefix ( @prefixes )
{
my $dot = ( $prefix =~ /\d+\.\d+\.\d+\.\d+/ ) ? '' : '.';
$OUT .= $prefix . $dot . "\n";
}
$OUT .= "127.0.0.1";
}

7
root/etc/e-smith/templates/var/service/qpsmtpd/config/dnsbl_zones/10RBLList Normal file
View File

@@ -0,0 +1,7 @@
{
my @rbllist = split /[,]/, ${qpsmtpd}{RBLList} || '';
return "# No RBLs are defined" unless (scalar @rbllist);
return join "\n", @rbllist;
}

6
root/etc/e-smith/templates/var/service/qpsmtpd/config/dnsbl_zones/10header Normal file
View File

@@ -0,0 +1,6 @@
{
# rbl.mail-abuse.org
# spamsources.fabel.dk
# relays.ordb.org
# sbl.spamhaus.org
}

9
root/etc/e-smith/templates/var/service/qpsmtpd/config/goodrcptto/00setup Normal file
View File

@@ -0,0 +1,9 @@
{
use esmith::DomainsDB;
my $ddb = esmith::DomainsDB->open_ro or die "Couldn't open DomainsDB";
@domains = map $_->key, $ddb->domains;
"";
}

5
root/etc/e-smith/templates/var/service/qpsmtpd/config/goodrcptto/12PostmasterAtBracketLiteralIP Normal file
View File

@@ -0,0 +1,5 @@
{
return "" unless (defined $ExternalIP);
return "postmaster\@[$ExternalIP]";
}

8
root/etc/e-smith/templates/var/service/qpsmtpd/config/goodrcptto/30ValidAdmin Normal file
View File

@@ -0,0 +1,8 @@
{
$OUT = "";
for my $user ( qw(admin root) )
{
$OUT .= "$user\@$_\n" for (@domains);
}
}

24
root/etc/e-smith/templates/var/service/qpsmtpd/config/goodrcptto/40ValidLocalRecipients Normal file
View File

@@ -0,0 +1,24 @@
{
# Make a list of all valid local recipients
use esmith::AccountsDB;
my %valid = map { $_ => 1 } qw(group pseudonym user mailmanlist mailinglist);
$OUT = "";
my $adb = esmith::AccountsDB->open_ro();
foreach my $account ($adb->get_all)
{
my $key = $account->key;
next unless $valid{$account->prop('type')};
if ($key =~ /\@/)
{
$OUT .= "$key\n";
}
else
{
$OUT .= "$key\@$_\n" for (@domains);
}
}
}

17
root/etc/e-smith/templates/var/service/qpsmtpd/config/goodrcptto/50DelegatedDomains Normal file
View File

@@ -0,0 +1,17 @@
{
$OUT = "";
use esmith::DomainsDB;
my $ddb = esmith::DomainsDB->open_ro();
for my $domain ( $ddb->domains )
{
my $mail_server = $domain->prop('MailServer')
|| $DelegateMailServer
|| 'localhost';
next if ( $mail_server eq 'localhost' );
$OUT .= '@' . $domain->key . "\n";
}
}

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/invalid_resolvable_fromhost/link_local Normal file
View File

@@ -0,0 +1 @@
169.254.0.0/16

2
root/etc/e-smith/templates/var/service/qpsmtpd/config/invalid_resolvable_fromhost/loopback Normal file
View File

@@ -0,0 +1,2 @@
127.0.0.0/8
0.0.0.0/8

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/invalid_resolvable_fromhost/multicast Normal file
View File

@@ -0,0 +1 @@
224.0.0.0/4

14
root/etc/e-smith/templates/var/service/qpsmtpd/config/loglevel/10loglevel Normal file
View File

@@ -0,0 +1,14 @@
{
# Log levels
# LOGDEBUG = 8
# LOGINFO = 7
# LOGNOTICE = 6
# LOGWARN = 5
# LOGERROR = 4
# LOGCRIT = 3
# LOGALERT = 2
# LOGEMERG = 1
# LOGRADAR = 0
return $qpsmtpd{LogLevel};
}

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/memory_threshold/10memory Normal file
View File

@@ -0,0 +1 @@
1

2
root/etc/e-smith/templates/var/service/qpsmtpd/config/norelayclients/10header Normal file
View File

@@ -0,0 +1,2 @@
# Format is IP, or IP part with trailing dot
# e.g. "127.0.0.1", or "192.168."

6
root/etc/e-smith/templates/var/service/qpsmtpd/config/norelayclients/20norelayFromRouter Normal file
View File

@@ -0,0 +1,6 @@
{
return '' unless $GatewayIP;
# we allow access from the router, but we do not allow relaying
return $GatewayIP;
}

39
root/etc/e-smith/templates/var/service/qpsmtpd/config/peers/local/71forcespamcheck Normal file
View File

@@ -0,0 +1,39 @@
{
# this is based on 70spamassassin fragment
# it does the same except it will force check on fetchmail inputs
# You can run the spamassassin plugin with options. See perldoc
# plugins/spamassassin for details.
#
# spamassassin
# rejects mails with a SA score higher than 20 and munges the subject
# of the score is higher than 10.
#
# spamassassin reject_threshold 20 munge_subject_threshold 10
my $status = $spamassassin{status} || 'disabled';
return "# spamassassin disabled" unless ($status eq "enabled");
my @options = qw(forcespamcheck);
if ($spamassassin{Sensitivity} eq "custom")
{
if ($spamassassin{RejectLevel} > $spamassassin{TagLevel})
{
push @options, "reject", $spamassassin{RejectLevel};
}
}
if ($spamassassin{SubjectTag} eq "enabled")
{
push @options, "munge_subject_threshold", $spamassassin{TagLevel};
}
my $size = $spamassassin{MaxMessageSize} || '';
if ($size =~ m/^\d+$/)
{
push @options, "size_limit", $size;
}
return join " ", @options;
}

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugin_dirs/10plugins Normal file
View File

@@ -0,0 +1 @@
/usr/share/qpsmtpd/plugins

11
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/00setup Normal file
View File

@@ -0,0 +1,11 @@
{
$bounce_unknown_user = 1;
$bounce_unknown_user = 0
if (defined $EmailUnknownUser and $EmailUnknownUser ne 'returntosender');
$bounce_unknown_user = 0
if (defined $DelegateMailServer and $DelegateMailServer);
"";
}

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/02logterse Normal file
View File

@@ -0,0 +1 @@
logging/logterse

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/04tls Normal file
View File

@@ -0,0 +1 @@
tls ssl/cert.pem ssl/cert.pem ssl/cert.pem ssl/dhparam.pem

9
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/05auth_cvm_unix_local Normal file
View File

@@ -0,0 +1,9 @@
{
# my $auth_smtp = ($qpsmtpd{Authentication} eq 'enabled') ? 'yes' : 'no';
# my $auth_ssmtp = ($sqpsmtpd{Authentication} eq 'enabled') ? 'yes' : 'no';
# $OUT = "auth/auth_cvm_unix_local";
# $OUT .= " cvm_socket /var/lib/cvm/cvm-unix-local.socket";
# $OUT .= " enable_smtp $auth_smtp";
# $OUT .= " enable_ssmtp $auth_ssmtp";
}

3
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/06auth_imap Normal file
View File

@@ -0,0 +1,3 @@
{
$OUT .= "auth/auth_imap 127.0.0.1 143";
}

6
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/09karma Normal file
View File

@@ -0,0 +1,6 @@
{
return "# Karma plugin is disabled" unless (($qpsmtpd{Karma} || 'disabled') =~ m/^1|on|yes|enabled$/i);
my $negative = $qpsmtpd{KarmaNegative} || '2';
my $strikes = $qpsmtpd{KarmaStrikes} || '3';
$OUT .= "karma negative $negative strikes $strikes reject naughty db_dir /var/lib/qpsmtpd/karma";
}

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/10earlytalker Normal file
View File

@@ -0,0 +1 @@
earlytalker

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/11bogus_bounce Normal file
View File

@@ -0,0 +1 @@
bogus_bounce

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/12count_unrecognized_commands Normal file
View File

@@ -0,0 +1 @@
count_unrecognized_commands 4

7
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/13bcc Normal file
View File

@@ -0,0 +1,7 @@
{
return "# bcc disabled" unless ($qpsmtpd{Bcc} eq "enabled");
my $user = $qpsmtpd{BccUser} || '';
return "# bcc user not set" if $user eq '';
$user .= '@' . $DomainName unless $user =~ m/\@/;
return "bcc mode " . $qpsmtpd{BccMode} . " all " . $user;
}

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/14relay Normal file
View File

@@ -0,0 +1 @@
relay

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/15helo Normal file
View File

@@ -0,0 +1 @@
helo policy { $qpsmtpd{HeloPolicy} || 'lenient' } reject naughty

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/16resolvable_fromhost Normal file
View File

@@ -0,0 +1 @@
resolvable_fromhost

8
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/17headers Normal file
View File

@@ -0,0 +1,8 @@
{
$OUT = "headers";
# Note: You can't specify a maximum offset of 0 days, but that's fair
my $days = $qpsmtpd{MaximumDateOffset} || '';
$OUT .= " future $days past $days" if ($days);
}

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/19loadcheck Normal file
View File

@@ -0,0 +1 @@
loadcheck max_load { $qpsmtpd{MaxLoad} || '7' }

5
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/20rhsbl Normal file
View File

@@ -0,0 +1,5 @@
{
return "# rhsbl disabled" unless (${qpsmtpd}{RHSBL} eq "enabled");
"rhsbl";
}

1
root/etc/e-smith/templates/var/service/qpsmtpd/config/plugins/221spf Normal file
View File

@@ -0,0 +1 @@
sender_permitted_from reject 1 no_dmarc_policy { $qpsmtpd{SPFRejectPolicy} || '0' }

Some files were not shown because too many files have changed in this diff Show More