> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:mimedefang-
> [EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED]
> Sent: Thursday, September 15, 2005 3:20 PM
> To: [email protected]
> Subject: RE: [Mimedefang] Rejecting some recipients
>
> Jeff Grossman wrote:
> > Sorry for the run on message before. I have MIMEDefang set up with
> > the md_check_against_smtp_server setting.
>
> Is it possible the SMTP server check is what's causing the timeout?
>
> If it's only fifteen, I'd just hardcode this into your mimedefang-filter
(untested:)
>
[snipped code]
Actually, I am already doing something similar. Here is the code I am
using. I removed some of the e-mail addresses so it wasn't so long. But, I
am still getting the time outs. I figured using the access database method,
I would be sure to not have any e-mails get through.
sub filter_recipient {
my($recip, $sender, $ip, $host, $first, $helo, $rcpt_mailer, $rcpt_host,
$rcpt_addr) = @_;
$recip2 = $recip;
$recip2 =~ tr/<>//d;
$recip2 = lc($recip2);
$sender2 = $sender;
$sender2 =~ tr/<>//d;
$sender2 = lc($sender2);
$senderdomain = $sender;
$senderdomain =~ /.+\@(.+)>?/; # extract domain part (minus angle bracket)
if (($recip2 eq '[EMAIL PROTECTED]' or
$recip2 eq '[EMAIL PROTECTED]' or
$recip2 eq '[EMAIL PROTECTED]' or
$recip2 eq '[EMAIL PROTECTED]') and
($sender2 ne '[EMAIL PROTECTED]' and
$sender2 ne '[EMAIL PROTECTED]')) {
action_notify_administrator("Recipient: $recip2\nSender:
$sender2\nIP: $ip");
return ('REJECT', 'The intended recipient is not allowed to
receive e-mail');
}
if ($recip2 eq '[EMAIL PROTECTED]' or
$recip2 eq '[EMAIL PROTECTED]') {
return ('ACCEPT_AND_NO_MORE_FILTERING', "ok");
}
if ($recip2 eq '[EMAIL PROTECTED]' and $senderdomain =~
/^newdaydeals.com$/i) {
action_notify_administrator("Bryan received an e-mail from
$sender");
return ('REJECT', 'You are not allowed to send e-mail to this
recipient');
}
$recip =~ /.+\@(.+)>?/; # extract domain part (minus angle bracket)
my $domain = $1;
$domain =~ s#[<>]##g;
if (($domain =~ /^turners.com$/i) ||
($domain =~ /^turnersoutdoorsman.com$/i) ||
($domain =~ /^turnersoutdoorsman.net$/i) ||
($domain =~ /^turnersoutdoorsman.org$/i) ||
($domain =~ /^egunsandammo.com$/i) ||
($domain =~ /^myturners.com$/i) ||
($domain =~ /^turners.us$/i) ||
($domain =~ /^sgdistributing.us$/i) &&
($domain !~ /^lists.turners.com$/i) &&
($domain !~ /^mail.turners.com$/i)) {
return md_check_against_smtp_server($sender, $recip,
"mail.turners.com", "192.168.168.15");
}
if ($domain =~ /^lists.turners.com$/i) {
return md_check_against_smtp_server($sender, $recip,
"mail.turners.com", "192.168.168.228", "2525");
}
return('CONTINUE', "OK");
}
_______________________________________________
Visit http://www.mimedefang.org and http://www.roaringpenguin.com
MIMEDefang mailing list
[email protected]
http://lists.roaringpenguin.com/mailman/listinfo/mimedefang
