You are currently not logged in! Enter your authentication credentials below to log in. You need to have cookies enabled to log in.
Plug-in Summary
Plug-in name: | denybounce |
Info: | Deny bounces for some addresses |
Author: | tyskjohan |
Email: | Won't say |
Compatibility: | all |
Download: | here |
This plugin will deny bounces to addresses. Good for addresses that receive mail but never send mail.
sub hook_mail { my ($self, $transaction, $sender) = @_; return (DECLINED) unless ($sender->format eq "<>"); $self->log(LOGDEBUG, "sender is <>"); $transaction->notes('bounce',1); return (DECLINED); } sub hook_rcpt { my ($self, $transaction, $rcpt) = @_; my $note = $transaction->notes('bounce'); return DECLINED unless $note; my @acceptbounce = $self->qp->config("acceptbounce"); return DECLINED unless (@acceptbounce); my $user = lc($rcpt->user); my $addr = $user . '@' . lc($rcpt->host); foreach my $to (@acceptbounce) { chomp $to; return DECLINED if ($user eq $to); return DECLINED if ($addr eq $to); } $self->log(LOGDEBUG, "not accepting bounces for $addr"); return (DENY, "sorry, $user never sends mail ". "and therefore does not accept bounces"); }
The acceptbounce
file contains mail addresses (fully qualified or local part only) that do accept bounces.