Add patch to count milter rejects provided by Matus Uhlar.

[sven/pflogsumm.git] / debian / patches / milter-rejects

diff --git a/debian/patches/milter-rejects b/debian/patches/milter-rejects
new file mode 100644 (file)
index 0000000..2e15cca
--- /dev/null
+++ b/debian/patches/milter-rejects
@@ -0,0 +1,18 @@
+Index: pflogsumm/pflogsumm.pl
+===================================================================
+--- pflogsumm.orig/pflogsumm.pl
++++ pflogsumm/pflogsumm.pl
+@@ -666,11 +666,11 @@ while(<>) {
+ 
+     # regexp rejects happen in "cleanup"
+     if($cmd eq "cleanup" && (my($rejSubTyp, $rejReas, $rejRmdr) = $logRmdr =~
+-      /\/cleanup\[\d+\]: .*?\b(reject|warning|hold|discard): (header|body) (.*)$/) == 3)
++       /\/cleanup\[\d+\]: .*?\b((?:milter-)reject|warning|hold|discard): (header|body|END-OF-MESSAGE) (.*)$/) == 3)
+     {
+       $rejRmdr =~ s/( from \S+?)?; from=<.*$// unless($opts{'verbMsgDetail'});
+       $rejRmdr = string_trimmer($rejRmdr, 64, $opts{'verbMsgDetail'});
+-      if($rejSubTyp eq "reject") {
++       if($rejSubTyp eq "reject" or $rejSubTyp eq "milter-reject") {
+           ++$rejects{$cmd}{$rejReas}{$rejRmdr} unless($opts{'rejectDetail'} == 0);
+           ++$msgsRjctd;
+       } elsif($rejSubTyp eq "warning") {