check_spamhelo: remove, deprecated by helo

This commit is contained in:
Matt Simerson 2012-06-23 00:05:01 -04:00
parent 9e9fcf41a7
commit f601516f9f
2 changed files with 1 additions and 35 deletions

View File

@ -40,7 +40,7 @@ rhsbl
dnsbl
badmailfrom
badrcptto
check_spamhelo
helo
# sender_permitted_from
# greylisting p0f genre,windows

View File

@ -1,34 +0,0 @@
#!perl -w
=head1 NAME
check_spamhelo - Check a HELO message delivered from a connecting host.
=head1 DESCRIPTION
Check a HELO message delivered from a connecting host. Reject any
that appear in the badhelo config -- e.g. yahoo.com and aol.com, which
neither the real Yahoo or the real AOL use, but which spammers use
rather a lot.
=head1 CONFIGURATION
Add domains or hostnames to the F<badhelo> configuration file; one
per line.
=cut
sub hook_helo {
my ($self, $transaction, $host) = @_;
($host = lc $host) or return DECLINED;
for my $bad ($self->qp->config('badhelo')) {
if ($host eq lc $bad) {
$self->log(LOGDEBUG, "Denying HELO from host claiming to be $bad");
return (DENY_DISCONNECT, "Sorry, I don't believe that you are $host.");
}
}
return DECLINED;
}
# also support EHLO
*hook_ehlo = \&hook_helo;