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

rhsbl: added default reject settings

Browse Source
This commit is contained in:
Matt Simerson 2012-06-26 01:03:00 -04:00
parent 7a045474f9
commit 723fe314fa
1 changed files with 13 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
plugins/rhsbl
View File

@ -46,6 +46,11 @@ sub register {
else { else {
$self->{_args} = { @_ }; $self->{_args} = { @_ };
}; };
if ( ! defined $self->{_args}{reject} ) {
$self->{_args}{reject} = 1;
};
$self->{_args}{reject_type} ||= 'perm';
} }
sub hook_mail { sub hook_mail {
@ -94,17 +99,17 @@ sub hook_mail {
$self->log(LOGDEBUG, "TXT record found: " . $rr->txtdata); $self->log(LOGDEBUG, "TXT record found: " . $rr->txtdata);
}; };
if ( $result ) { next if ! $result;
$self->log(LOGINFO, "fail, $result");
my $host = $transaction->sender->host; $self->log(LOGINFO, "fail, $result");
if ($result =~ /^$host\./ ) {
return $self->get_reject( "Mail from $host rejected because it $result" );
};
my $hello = $self->qp->connection->hello_host; my $host = $transaction->sender->host;
return $self->get_reject( "Mail from HELO $hello rejected because it $result" ); if ($result =~ /^$host\./ ) {
return $self->get_reject( "Mail from $host rejected because it $result" );
}; };
my $hello = $self->qp->connection->hello_host;
return $self->get_reject( "Mail from HELO $hello rejected because it $result" );
} }
} }
} }