byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

dkim: corrected log entry, added comment

Browse Source
This commit is contained in:
Matt Simerson 2013-03-27 20:09:42 -04:00
parent 9fdf741a20
commit 00a6d61c43
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
plugins/dkim
View File

@ -80,9 +80,7 @@ use Socket qw(:DEFAULT :crlf);
sub init { sub init {
my ($self, $qp) = (shift, shift); my ($self, $qp) = (shift, shift);
$self->{_args} = { @_ }; $self->{_args} = { @_ };
$self->{_args}{reject} = 1 if ! defined $self->{_args}{reject}; $self->{_args}{reject} = 1 if ! defined $self->{_args}{reject};
$self->{_args}{reject_type} ||= 'perm'; $self->{_args}{reject_type} ||= 'perm';
} }
@ -196,7 +194,7 @@ sub handle_sig_invalid {
elsif ( $prs->{reject} ) { elsif ( $prs->{reject} ) {
return $self->get_reject( return $self->get_reject(
"invalid DKIM signature: " . $dkim->result_detail, "invalid DKIM signature: " . $dkim->result_detail,
"fail, invalid signature, reject policy" "invalid signature, reject policy"
); );
} }
@ -332,6 +330,7 @@ sub add_header {
my $self = shift; my $self = shift;
my $header = shift or return; my $header = shift or return;
# consider adding Authentication-Results header here as well
$self->qp->transaction->header->add( 'X-DKIM-Authentication', $header, 0 ); $self->qp->transaction->header->add( 'X-DKIM-Authentication', $header, 0 );
} }