SOURCES: pflogsumm-amavis-rejects.patch (NEW) - recognize rejects ...

baggins baggins at pld-linux.org
Fri Sep 9 13:54:36 CEST 2005


Author: baggins                      Date: Fri Sep  9 11:54:36 2005 GMT
Module: SOURCES                       Tag: HEAD
---- Log message:
- recognize rejects from amavis

---- Files affected:
SOURCES:
   pflogsumm-amavis-rejects.patch (NONE -> 1.1)  (NEW)

---- Diffs:

================================================================
Index: SOURCES/pflogsumm-amavis-rejects.patch
diff -u /dev/null SOURCES/pflogsumm-amavis-rejects.patch:1.1
--- /dev/null	Fri Sep  9 13:54:36 2005
+++ SOURCES/pflogsumm-amavis-rejects.patch	Fri Sep  9 13:54:31 2005
@@ -0,0 +1,22 @@
+--- pflogsumm-1.1.0/pflogsumm.pl.orig	2003-12-12 15:40:19.000000000 +0100
++++ pflogsumm-1.1.0/pflogsumm.pl	2005-09-09 13:43:06.930343120 +0200
+@@ -1510,6 +1510,8 @@
+ 	    $rejReas =~ s/(Client host|Sender address) .+? blocked/blocked/o;
+ 	} elsif($rejTyp eq "MAIL") {	# *more* special treatment :-( grrrr...
+ 	    $rejReas =~ s/^\d{3} (?:<.+>: )?([^;:]+)[;:]?.*$/$1/o;
++	} elsif($rejTyp eq "END-OF-MESSAGE") {
++	    $rejReas =~ s/^(\d{3} [\d\. ]*Message content rejected, .*)[:,].*/$1/o;
+ 	} else {
+ 	    $rejReas =~ s/^(?:.*[:;] )?([^,]+).*$/$1/o;
+ 	}
+@@ -1559,6 +1563,10 @@
+ 	my $rejData = gimme_domain($rejFrom);
+ 	$rejData .= "  ($from)" if($rejAddFrom);
+ 	++$rejects->{$rejTyp}{$rejReas}{$rejData};
++    } elsif($rejReas =~ s/^(\d{3} [\d\. ]*Message content rejected, .*)[:,].*/$1/o) {
++	my $rejData = gimme_domain($rejFrom);
++	$rejData .= "  ($from)" if($rejAddFrom);
++	++$rejects->{$rejTyp}{$rejReas}{$rejData};
+     } else {
+ #	print STDERR "dbg: unknown reject reason $rejReas !\n\n";
+ 	my $rejData = gimme_domain($rejFrom);
================================================================



More information about the pld-cvs-commit mailing list