added new t/config directory, with developer tests

run when $ENV{QPSMTPD_DEVELOPER} is set

plugins file is same as in config.sample, but with more stuff enabled

config.sample/flat_auth_pw

@@ -1,2 +1,3 @@
+# example entries
 good@example.com:good_pass
 bad@example.com:bad_pass

t/Test/Qpsmtpd.pm

@@ -69,6 +69,7 @@ sub input {
 }
 
 sub config_dir {
+    return './t/config' if $ENV{QPSMTPD_DEVELOPER};
     './config.sample';
 }
 

t/config.t

@@ -5,12 +5,17 @@ use strict;
 use lib 't';
 use_ok('Test::Qpsmtpd');
 
+my @mes;
+
 BEGIN { # need this to happen before anything else
     my $cwd = `pwd`;
     chomp($cwd);
-    open my $me_config, '>', "./config.sample/me";
-    print $me_config "some.host.example.org";
-    close $me_config;
+    @mes = qw{ ./config.sample/me ./t/config/me };
+    foreach my $f ( @mes ) {
+        open my $me_config, '>', $f;
+        print $me_config "some.host.example.org";
+        close $me_config;
+    };
 }
 
 ok(my ($smtpd, $conn) = Test::Qpsmtpd->new_conn(), "get new connection");
@@ -22,6 +27,8 @@ is($smtpd->config('me'), 'some.host.example.org', 'config("me")');
 my $relayclients = join ",", sort $smtpd->config('relayclients');
 is($relayclients, '127.0.0.1,192.0.', 'config("relayclients") are trimmed');
 
-unlink "./config.sample/me";
+foreach my $f ( @mes ) {
+    unlink $f if -f $f;
+};
 
 

t/config/badhelo

@@ -0,0 +1,4 @@
+# these domains never uses their domain when greeting us, so reject transactions
+aol.com
+yahoo.com
+

t/config/badrcptto

@@ -0,0 +1,9 @@
+######## entries used for testing ###
+bad@example.com
+@bad.example.com
+########    Example patterns   #######
+# Format is pattern\s+Response
+# Don't forget to anchor the pattern if required
+!       Sorry, bang paths not accepted here
+@.*@    Sorry, multiple at signs not accepted here
+%       Sorry, percent hack not accepted here 

t/config/dnsbl_zones

@@ -0,0 +1 @@
+zen.spamhaus.org

t/config/flat_auth_pw

@@ -0,0 +1,2 @@
+good@example.com:good_pass
+bad@example.com:bad_pass

t/config/plugins

@@ -0,0 +1,94 @@
+#
+#  Example configuration file for plugins
+#
+
+# enable this to get configuration via http; see perldoc
+# plugins/http_config for details.
+#   http_config http://localhost/~smtpd/config/  http://www.example.com/smtp.pl?config=
+
+# hosts_allow does not work with the tcpserver deployment model!
+#   perldoc plugins/hosts_allow for an alternative.
+#
+# The hosts_allow module must be loaded if you want the -m / --max-from-ip /
+# my $MAXCONNIP = 5; # max simultaneous connections from one IP
+# settings... without this it will NOT refuse more than $MAXCONNIP connections
+# from one IP!
+hosts_allow
+
+# information plugins
+ident/geoip
+#ident/p0f /tmp/.p0f_socket version 3
+connection_time
+
+# enable to accept MAIL FROM:/RCPT TO: addresses without surrounding <>
+dont_require_anglebrackets
+
+# enable to reject MAIL FROM:/RCPT TO: parameters if client helo was HELO
+# (strict RFC 821)... this is not used in EHLO ...
+parse_addr_withhelo
+
+quit_fortune
+# tls should load before count_unrecognized_commands
+#tls
+check_earlytalker
+count_unrecognized_commands 4
+check_relay
+
+require_resolvable_fromhost
+
+rhsbl
+dnsbl
+check_badmailfrom
+check_badrcptto
+check_spamhelo
+
+sender_permitted_from
+greylisting p0f genre,windows
+
+auth/auth_checkpassword checkpw /usr/local/vpopmail/bin/vchkpw true /usr/bin/true
+auth/auth_vpopmail
+auth/auth_vpopmaild
+auth/auth_vpopmail_sql
+auth/auth_flat_file
+auth/authdeny
+
+# this plugin needs to run after all other "rcpt" plugins
+rcpt_ok
+
+check_basicheaders days 5 reject_type temp
+domainkeys
+
+# content filters
+virus/klez_filter
+
+
+# You can run the spamassassin plugin with options.  See perldoc
+# plugins/spamassassin for details.
+#
+spamassassin
+
+# rejects mails with a SA score higher than 20 and munges the subject
+# of the score is higher than 10.
+#
+#   spamassassin reject_threshold 20 munge_subject_threshold 10
+
+# dspam must run after spamassassin for the learn_from_sa feature to work
+dspam learn_from_sa 7 reject 1
+
+# run the clamav virus checking plugin
+virus/clamav
+
+# You must enable a queue plugin - see the options in plugins/queue/ - for example:
+
+# queue to a maildir
+# queue/maildir /home/spamtrap/mail
+
+# queue the mail with qmail-queue
+queue/qmail-queue
+
+
+# If you need to run the same plugin multiple times, you can do
+# something like the following
+#    check_relay
+#    check_relay:0 somearg
+#    check_relay:1 someotherarg

t/config/rcpthosts

@@ -0,0 +1 @@
+localhost

t/config/relayclients

@@ -0,0 +1,5 @@
+# Format is IP, or IP part with trailing dot
+# e.g. "127.0.0.1", or "192.168."
+127.0.0.1 
+# leading/trailing whitespace is ignored
+ 192.168. 

t/plugin_tests.t

@@ -7,3 +7,11 @@ my $qp = Test::Qpsmtpd->new();
 
 $qp->run_plugin_tests();
 
+foreach my $file ( 
+        "./t/config/greylist.dbm",
+        "./t/config/greylist.dbm.lock"
+        ) {
+    next if ! -f $file;
+    unlink $file;
+};
+