/trunk/debian/changelog |
---|
7,8 → 7,11 |
XS-). |
* Greylisting.pm: Bail out if a non-IPv4 address is encountered |
(Closes: #300103, #479955). |
* Greylisting.pm: Simplify the sender address so that senders using |
VERP, SRS, etc. hopefully won't be greylisted each and every time |
(Closes: #347590). |
-- Magnus Holmgren <holmgren@debian.org> Tue, 03 Jun 2008 22:19:14 +0200 |
-- Magnus Holmgren <holmgren@debian.org> Tue, 03 Jun 2008 23:01:19 +0200 |
sa-exim (4.2.1-9) unstable; urgency=high |
/trunk/Greylisting.pm |
---|
160,6 → 160,8 |
# work around bug in perl untaint in perl 5.8 |
$envfrom=undef; |
$envfrom=$tmpvar; |
$envfrom =~ s/^([a-z0-9._]*)[^@]*/$1/i; |
$rcptto =~ tr/!#%()*+,-.0123456789:<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_abcdefghijklmnopqrstuvwxyz{|}~/_/c; |
$rcptto =~ /(.+)/; |
$tmpvar = ($1 or ""); |