Package: logwatch
Version: 7.3.1-5
Severity: normal
The following patch will summarise the grey-listing on receipt by Postgrey
(may need some changes for other grey-listing implementations) and the
grey-listing on transmission for all the records I found in the logs of a
couple of mail servers I run.
--- postfix.orig 2007-09-07 14:28:51.000000000 +1000
+++ /usr/share/logwatch/scripts/services/postfix 2007-09-07
14:36:54.000000000 +1000
@@ -166,6 +166,8 @@
$RejectUnknownClients = 0;
$Undeliverable = 0;
$Deliverable = 0;
+$PostgreyReceived = 0;
+$GreyListSent = 0;
while (defined($ThisLine = <STDIN>)) {
if (
@@ -241,6 +243,10 @@
$Temp = "To " . $Dest . " Msg=\"" . $Msg . "\"";
$ForeignBounce{$Temp}++;
}
+ } elsif ($ThisLine =~ /reject: RCPT from .*: Recipient address rejected:
Greylisted, see/) {
+ $PostgreyReceived++;
+ } elsif ($ThisLine =~ /status=deferred.*Recipient address rejected:
.*[Gg]reylist/) {
+ $GreyListSent++;
} elsif ( ($Relay,$Dest) = ($ThisLine =~ m/reject: RCPT from ([^ ]*):
$re_DSN <([^ ]*)>.* Relay access denied.* to=([^ ]*)/) ) {
# print "reject: " . $ThisLine . "\n";
# print "Relay :" . $Relay . " to " . $Dest . "\n";
@@ -433,6 +439,14 @@
print "\n$RemovedFromQueue messages removed from queue";
}
+if ($PostgreyReceived > 0) {
+ print "\n$PostgreyReceived messages temporarily deferred on receipt by
Postgrey";
+}
+
+if ($GreyListSent > 0) {
+ print "\n$GreyListSent transmitted messages temporarily deferred by remote
Greylisting";
+}
+
if ($QueueSizeExceeded > 0) {
print "\n$QueueSizeExceeded messages exceeded queue or message file size
limit and removed";
}
-- System Information:
Debian Release: 4.0
APT prefers stable
APT policy: (500, 'stable')
Architecture: i386 (i686)
Shell: /bin/sh linked to /bin/bash
Kernel: Linux 2.6.18-3-xen-686
Locale: LANG=en_AU.UTF-8, LC_CTYPE=en_AU.UTF-8 (charmap=UTF-8)
Versions of packages logwatch depends on:
ii perl 5.8.8-7 Larry Wall's Practical Extraction
ii postfix [mail-transport-agent 2.3.8-2+b1 A high-performance mail transport
Versions of packages logwatch recommends:
ii libdate-manip-perl 5.44-5 a perl library for manipulating da
-- no debconf information
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
