initial commit of file from CVS for e-smith-pop3 on Wed 12 Jul 09:03:33 BST 2023

This commit is contained in:
Brian Read
2023-07-12 09:03:33 +01:00
parent fd65f49c93
commit bbdce93f7c
57 changed files with 761 additions and 2 deletions

View File

@@ -0,0 +1 @@
110

View File

@@ -0,0 +1 @@
private

View File

@@ -0,0 +1 @@
enabled

View File

@@ -0,0 +1 @@
service

View File

@@ -0,0 +1 @@
995

View File

@@ -0,0 +1 @@
private

View File

@@ -0,0 +1 @@
enabled

View File

@@ -0,0 +1 @@
service

View File

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

View File

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

View File

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

View File

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

View File

@@ -0,0 +1,3 @@
{
$DB->hosts_allow_spec('pop3s', 'pop3s');
}

View File

@@ -0,0 +1,3 @@
{
$DB->hosts_allow_spec('pop3', 'qmail-popup');
}

View File

@@ -0,0 +1 @@
auth required pam_listfile.so item=user sense=allow file=/etc/e-smith/pam/accounts.allow onerr=fail

View File

@@ -0,0 +1,3 @@
auth { -f "/lib/security/pam_pwdb.so" ||
-f "/lib64/security/pam_pwdb.so" ? "required pam_stack.so service=system-auth" :
"include system-auth" }

View File

@@ -0,0 +1,3 @@
account { -f "/lib/security/pam_pwdb.so" ||
-f "/lib64/security/pam_pwdb.so" ? "required pam_stack.so service=system-auth" :
"include system-auth" }

View File

@@ -0,0 +1,3 @@
session { -f "/lib/security/pam_pwdb.so" ||
-f "/lib64/security/pam_pwdb.so" ? "required pam_stack.so service=system-auth" :
"include system-auth" }

View File

@@ -0,0 +1 @@
/etc/e-smith/templates-default/template-begin-pam

View File

@@ -0,0 +1 @@
FQDN={ $SystemName . '.' . $DomainName }

View File

@@ -0,0 +1,2 @@
PER_IP_INSTANCES={ $pop3{ConcurrencyLimitPerIP} || '4' }
CONCURRENCYREMOTE={ $pop3{ConcurrencyLimit} || '40' }

View File

@@ -0,0 +1,9 @@
{
# memory limit to catch any memory leak before it kills the system
my $MIN_MEMORY_LIMIT = 40000000;
# The MIN_MEMORY_LIMIT is returned unless the DB variable is defined and greater than MIN_MEMORY_LIMIT
my $limit = $pop3{MemLimit} || $MIN_MEMORY_LIMIT;
$limit = $MIN_MEMORY_LIMIT if $limit < $MIN_MEMORY_LIMIT;
$OUT = "MEM=$limit";
}

View File

@@ -0,0 +1,2 @@
LISTENIP={ $pop3{ListenIP} || '0' }
PORT={ $pop3{TCPPort} || '110' }

View File

@@ -0,0 +1 @@
FQDN={ $SystemName . '.' . $DomainName }

View File

@@ -0,0 +1,2 @@
PER_IP_INSTANCES={ $pop3s{ConcurrencyLimitPerIP} || '4' }
CONCURRENCYREMOTE={ $pop3s{ConcurrencyLimit} || '40' }

View File

@@ -0,0 +1,9 @@
{
# memory limit to catch any memory leak before it kills the system
my $MIN_MEMORY_LIMIT = 80000000;
# The MIN_MEMORY_LIMIT is returned unless the DB variable is defined and greater than MIN_MEMORY_LIMIT
my $limit = $pop3s{MemLimit} || $MIN_MEMORY_LIMIT;
$limit = $MIN_MEMORY_LIMIT if $limit < $MIN_MEMORY_LIMIT;
$OUT = "MEM=$limit";
}

View File

@@ -0,0 +1,2 @@
LISTENIP={ $pop3s{ListenIP} || '0' }
PORT={ $pop3s{TCPPort} || '110' }

View File

@@ -0,0 +1,11 @@
cert = /service/imap/ssl/imapd.pem
sslVersion = all
{
$OUT .= "# SSL protocols can be set with DB props SSLv2, SSLv3 and TLSv1\n";
$OUT .= "options = NO_SSLv2\n" unless ($pop3s{SSLv2} || 'disabled') eq 'enabled';
$OUT .= "options = NO_SSLv3\n" unless ($pop3s{SSLv3} || 'disabled') eq 'enabled';
$OUT .= "options = NO_TLSv1\n" unless ($pop3s{TLSv1} || 'enabled') eq 'enabled';
}
fips = no

View File

@@ -0,0 +1 @@
foreground = yes

View File

@@ -0,0 +1 @@
service = pop3s

View File

@@ -0,0 +1,2 @@
exec = /var/qmail/bin/qmail-popup
execargs = qmail-popup {$SystemName}.{$DomainName} checkpassword-pam -s pop3 /var/qmail/bin/qmail-pop3d Maildir

1
root/service/pop3 Symbolic link
View File

@@ -0,0 +1 @@
/var/service/pop3

1
root/service/pop3s Symbolic link
View File

@@ -0,0 +1 @@
/var/service/pop3s

0
root/var/log/pop3/.gitignore vendored Normal file
View File

0
root/var/log/pop3s/.gitignore vendored Normal file
View File

View File

@@ -0,0 +1,27 @@
#!/usr/bin/perl -w
#----------------------------------------------------------------------
# copyright (C) 2005 Mitel Networks Corporation
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#
# Technical support for this program is available from Mitel Networks
# Please visit our web site www.mitel.com/sme/ for details.
#----------------------------------------------------------------------
use esmith::tcpsvd;
esmith::tcpsvd::configure_peers('pop3');
esmith::tcpsvd::configure_peers('pop3s');

View File

0
root/var/service/pop3/env/.gitignore vendored Normal file
View File

View File

@@ -0,0 +1,27 @@
#!/bin/sh
#----------------------------------------------------------------------
# copyright (C) 2002 Mitel Networks Corporation
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#
# Technical support for this program is available from Mitel Networks
# Please visit our web site www.mitel.com/sme/ for details.
#----------------------------------------------------------------------
exec \
/usr/local/bin/setuidgid smelog \
/usr/local/bin/multilog t s5000000 \
/var/log/pop3

View File

18
root/var/service/pop3/run Normal file
View File

@@ -0,0 +1,18 @@
#!/bin/sh
[ -f ./runenv ] && . ./runenv
exec 2>&1
# Generate ACL files in ./peers
./control/1
exec /usr/local/bin/softlimit -m ${MEM} \
tcpsvd \
-v \
-i ./peers \
-c ${CONCURRENCYREMOTE:-40} \
-C ${PER_IP_INSTANCES:-4}:'421 per host concurrency limit reached\r\n' \
-l ${LOCALNAME:-0} \
${LISTENIP:-0} \
${PORT:-pop3} \
/var/qmail/bin/qmail-popup $FQDN \
checkpassword-pam -s pop3 /var/qmail/bin/qmail-pop3d Maildir

View File

0
root/var/service/pop3s/env/.gitignore vendored Normal file
View File

View File

@@ -0,0 +1,27 @@
#!/bin/sh
#----------------------------------------------------------------------
# copyright (C) 2005 Mitel Networks Corporation
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#
# Technical support for this program is available from Mitel Networks
# Please visit our web site www.mitel.com/sme/ for details.
#----------------------------------------------------------------------
exec \
/usr/local/bin/setuidgid smelog \
/usr/local/bin/multilog t s5000000 \
/var/log/pop3s

View File

View File

@@ -0,0 +1,15 @@
#!/bin/sh
[ -f ./runenv ] && . ./runenv
exec 2>&1
exec /usr/local/bin/softlimit -m ${MEM} \
tcpsvd \
-v \
-i ./peers \
-c ${CONCURRENCYREMOTE:-40} \
-C ${PER_IP_INSTANCES:-4}:'421 per host concurrency limit reached\r\n' \
-l ${LOCALNAME:-0} \
${LISTENIP:-0} \
${PORT:-pop3s} \
/usr/bin/stunnel stunnel.conf