|
|
@@ -1,6 +1,18 @@
|
|
|
---- pflogsumm.pl.orig Tue Dec 31 19:30:43 2002
|
|
|
-+++ pflogsumm.pl Fri Jan 10 13:07:39 2003
|
|
|
-@@ -557,7 +557,7 @@
|
|
|
+This patch makes Pflogsumm working with the particular format
|
|
|
+of the OSSP fsl based Postfix logfile.
|
|
|
+
|
|
|
+--- pflogsumm.pl.orig Wed Feb 19 23:36:07 2003
|
|
|
++++ pflogsumm.pl Wed Mar 5 10:34:11 2003
|
|
|
+@@ -470,7 +470,7 @@
|
|
|
+ next if(defined($dateStr) && ! /^$dateStr/o);
|
|
|
+ s/: \[ID \d+\s+[^\]]+\] /: /o; # lose "[ID nnnnnn some.thing]" stuff
|
|
|
+ unless((($msgMonStr, $msgDay, $msgTimeStr, $cmd, $qid) =
|
|
|
+- m#^(...)\s+(\d+)\s(..:..:..)\s\S+\s(?:vmailer|$syslogName)[-/]([^\[:]*).*?: ([^:]+)#o) == 5)
|
|
|
++ m#^(...)\s+(\d+)\s(..:..:..)\s\S+\s+\S+\s(?:vmailer|$syslogName)[-/]([^\[:]*).*?: ([^:]+)#o) == 5)
|
|
|
+ {
|
|
|
+ unless((($msgMonStr, $msgDay, $msgTimeStr, $cmd, $qid) =
|
|
|
+ m#^(...)\s+(\d+)\s(..:..:..)\s\S+\s(vmailer|$syslogName[^\[:]*).*?: ([^:]+)#o) == 5)
|
|
|
+@@ -581,7 +581,7 @@
|
|
|
@{$connTime{$1}} =
|
|
|
($msgYr, $msgMon + 1, $msgDay, $msgHr, $msgMin, $msgSec);
|
|
|
} elsif(/: disconnect from /o) {
|
|
|
@@ -9,7 +21,7 @@
|
|
|
if(exists($connTime{$pid})) {
|
|
|
$hostID = gimme_domain($hostID);
|
|
|
my($d, $h, $m, $s) = Delta_DHMS(@{$connTime{$pid}},
|
|
|
-@@ -1267,7 +1267,7 @@
|
|
|
+@@ -1299,7 +1299,7 @@
|
|
|
}
|
|
|
my ($t_mday, $t_mon) = (localtime($time))[3,4];
|
|
|
|