[PATCH 3/7] basicheaders, add reject option, loglevel
[email protected] (Matt Simerson) Fri, 18 May 2012 04:25:07 -0400
| Newsgroups | perl.qpsmtpd |
|---|---|
| Message-ID | <[email protected]> |
added reject option
document the existence of the loglevel option
---
plugins/check_basicheaders | 13 +++++++++++++
1 file changed, 13 insertions(+)
diff --git a/plugins/check_basicheaders b/plugins/check_basicheaders
index 114867a..ef0e42d 100644
--- a/plugins/check_basicheaders
+++ b/plugins/check_basicheaders
@@ -24,6 +24,14 @@ unset, messages are not rejected based on the date.
check_basicheaders [ days 3 ]
+=head2 reject
+
+A boolean. Determines if the connection is denied or not. Use this option
+when first enabling the plugin, and then watch your logs to see what would
+have been rejected.
+
+Default policy is to reject.
+
=head2 reject_type
Whether to issue a permanent or temporary rejection. The default is permanent.
@@ -34,6 +42,10 @@ Switching to a temporary rejection is most useful when testing the plugin. It
allows an administrator to watch for a test period and make sure no valid mail
is getting rejected.
+=head2 loglevel
+
+Adjust the quantity of logging for this plugin. See docs/logging.pod
+
=head1 AUTHOR
2004 - Written by Jim Winstead Jr.
@@ -67,6 +79,7 @@ sub hook_data_post {
my ($self, $transaction) = @_;
my $deny = $self->{_args}{reject_type} eq 'temp' ? DENYSOFT : DENY;
+ $deny = DECLINED if defined $self->{_args}{reject} && ! $self->{_args}{reject};
if ( $transaction->data_size == 0 ) {
$self->log(LOGINFO, "fail: no data");
--
1.7.9.6