rhsbl: added default reject settings
This commit is contained in:
parent
b5d99eea05
commit
e40994d13f
@ -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,7 +99,8 @@ 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");
|
$self->log(LOGINFO, "fail, $result");
|
||||||
|
|
||||||
my $host = $transaction->sender->host;
|
my $host = $transaction->sender->host;
|
||||||
@ -104,7 +110,6 @@ sub hook_mail {
|
|||||||
|
|
||||||
my $hello = $self->qp->connection->hello_host;
|
my $hello = $self->qp->connection->hello_host;
|
||||||
return $self->get_reject( "Mail from HELO $hello rejected because it $result" );
|
return $self->get_reject( "Mail from HELO $hello rejected because it $result" );
|
||||||
};
|
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user