Merge pull request #1 from smtpd/master

Update from original.
This commit is contained in:
salvis 2015-01-19 23:06:46 +01:00
commit de08a11e04
3 changed files with 6 additions and 3 deletions

View File

@ -44,7 +44,7 @@ With SPF:
With DMARC: With DMARC:
_dmarc TXT "v=DMARC1; p=reject; adkim=s; aspf=r; rua=mailto:dmarc-feedback@$DOMAIN; ruf=mailto:dmarc-feedback@'$DOMAIN; pct=100" _dmarc TXT "v=DMARC1; p=reject; adkim=s; aspf=r; rua=mailto:dmarc-feedback@$DOMAIN; ruf=mailto:dmarc-feedback@$DOMAIN; pct=100"
With DomainKeys (deprecated) With DomainKeys (deprecated)

View File

@ -869,7 +869,7 @@ sub received_line {
. $self->config('me') . $self->config('me')
. " (qpsmtpd/" . " (qpsmtpd/"
. $self->version . $self->version
. ") with $sslheader$smtp; " . ") with $smtp $sslheader; "
. (strftime('%a, %d %b %Y %H:%M:%S %z', localtime)); . (strftime('%a, %d %b %Y %H:%M:%S %z', localtime));
} }
$self->transaction->header->add('Received', $header_str, 0); $self->transaction->header->add('Received', $header_str, 0);

View File

@ -86,6 +86,9 @@ sub init {
local $^W; # this bit is very noisy... local $^W; # this bit is very noisy...
my $ssl_ctx = my $ssl_ctx =
IO::Socket::SSL::SSL_Context->new( IO::Socket::SSL::SSL_Context->new(
# Disable SSLv2 and SSLv3 to avoid POODLE attacks. This is already
# the default in sufficiently recent versions of IO::Socket::SSL
SSL_version => 'SSLv23:!SSLv3:!SSLv2',
SSL_use_cert => 1, SSL_use_cert => 1,
SSL_cert_file => $self->tls_cert, SSL_cert_file => $self->tls_cert,
SSL_key_file => $self->tls_key, SSL_key_file => $self->tls_key,