POD syntax cleanup (Steve Kemp)
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@786 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
af82701fff
commit
4be7bb40e4
2
Changes
2
Changes
@ -1,5 +1,7 @@
|
||||
0.41
|
||||
|
||||
POD syntax cleanup (Steve Kemp)
|
||||
|
||||
Make connection->local_ip available from the Apache transport (Peter Eisch)
|
||||
|
||||
|
||||
|
@ -178,14 +178,14 @@ Apache::Qpsmtpd - a mod_perl-2 connection handler for qpsmtpd
|
||||
## with apache >= 2.1.5, for others it doesn't hurt. See also
|
||||
## http://httpd.apache.org/docs/2.2/mod/core.html#acceptfilter
|
||||
## and http://httpd.apache.org/docs/2.2/mod/mpm_common.html#listen
|
||||
|
||||
|
||||
LoadModule perl_module modules/mod_perl.so
|
||||
|
||||
|
||||
<Perl>
|
||||
use lib qw( /path/to/qpsmtpd/lib );
|
||||
use Apache::Qpsmtpd;
|
||||
</Perl>
|
||||
|
||||
|
||||
<VirtualHost _default_:25>
|
||||
PerlSetVar QpsmtpdDir /path/to/qpsmtpd
|
||||
PerlModule Apache::Qpsmtpd
|
||||
|
@ -35,7 +35,7 @@ Inside a plugin
|
||||
my ($self, $transaction, $cmd) = @_;
|
||||
return (OK, \&bdat_parser) if ($cmd eq 'bdat');
|
||||
}
|
||||
|
||||
|
||||
sub bdat_parser {
|
||||
my ($self,$cmd,$line) = @_;
|
||||
# .. do something with $line...
|
||||
@ -43,7 +43,7 @@ Inside a plugin
|
||||
if $some_reason_why_there_is_a_syntax_error;
|
||||
return (OK, @args);
|
||||
}
|
||||
|
||||
|
||||
sub hook_unrecognized_command {
|
||||
my ($self, $transaction, $cmd, @args) = @_;
|
||||
return (DECLINED) if ($self->qp->connection->hello eq 'helo');
|
||||
|
@ -170,8 +170,6 @@ The remote IP address of the connecting host.
|
||||
|
||||
The remote port.
|
||||
|
||||
=head2 hello( )
|
||||
|
||||
=head2 remote_info( )
|
||||
|
||||
If your server does an ident lookup on the remote host, this is the
|
||||
|
@ -247,7 +247,7 @@ default: DENY
|
||||
=cut
|
||||
|
||||
sub addr_bad_from_system { shift->_dsn(shift,shift,DENY,1,8); }
|
||||
|
||||
|
||||
=head1 MAILBOX STATUS
|
||||
|
||||
=over 5
|
||||
@ -411,7 +411,7 @@ default: DENY, but RFC says:
|
||||
transient error.
|
||||
|
||||
Why do we want to DENYSOFT something like this?
|
||||
|
||||
|
||||
=back
|
||||
|
||||
=cut
|
||||
@ -446,7 +446,7 @@ sub proto_invalid_command { shift->_dsn(shift,shift,DENY,5,1); }
|
||||
|
||||
X.5.2
|
||||
default: DENY
|
||||
|
||||
|
||||
=cut
|
||||
|
||||
sub proto_syntax_error { shift->_dsn(shift,shift,DENY,5,2); }
|
||||
|
@ -1,4 +1,5 @@
|
||||
# -*- perl -*-
|
||||
|
||||
=head1 NAME
|
||||
|
||||
check_badmailfrom - checks the badmailfrom config, with per-line reasons
|
||||
|
@ -1,4 +1,5 @@
|
||||
#! perl
|
||||
|
||||
=head1 NAME
|
||||
|
||||
check_badmailfromto - checks the badmailfromto config
|
||||
|
@ -3,11 +3,11 @@
|
||||
=head1 NAME
|
||||
|
||||
check_basicheaders - Make sure both From and Date headers are present, and
|
||||
do optional range checking on the Date header
|
||||
do optional range checking on the Date header.
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
Rejects messages that do not have a From or Date header or are completely
|
||||
Rejects messages that do not have a From or Date header or are completely
|
||||
empty.
|
||||
|
||||
Can also reject messages where the date in the Date header is more than
|
||||
|
@ -25,6 +25,7 @@ Written by Keith C. Ivey
|
||||
Released to the public domain, 17 June 2005.
|
||||
|
||||
=cut
|
||||
|
||||
use Qpsmtpd::DSN;
|
||||
|
||||
sub init {
|
||||
|
@ -28,6 +28,8 @@ the connecting MTA's IP address. Any A or TXT answer is means that the
|
||||
remote HOST address can be selectively exempted at other stages by plugins
|
||||
testing for a 'whitelisthost' connection note.
|
||||
|
||||
=back
|
||||
|
||||
NOTE: other 'connect' hooks will continue to fire (e.g. dnsbl), since the DNS
|
||||
queries happen in the background. This plugin's 'rcpt_handler' retrieves
|
||||
the results of the query and sets the connection note if found.
|
||||
|
@ -30,6 +30,8 @@ The path to use to execute the Exim BSMTP receiver; by default this is
|
||||
I</usr/sbin/rsmtp>. The commandline switch '-bS' will be added (this is
|
||||
actually redundant with rsmtp, but harmless).
|
||||
|
||||
=back
|
||||
|
||||
=cut
|
||||
|
||||
=head1 LICENSE
|
||||
|
@ -1,4 +1,5 @@
|
||||
#!/usr/bin/perl -w
|
||||
|
||||
=head1 NAME
|
||||
|
||||
relay_only - this plugin only permits relaying
|
||||
|
@ -24,6 +24,8 @@ Path to the private key file. Default: I<ssl/qpsmtpd-server.key>
|
||||
|
||||
Path to the certificate autority file. Default: I<ssl/qpsmtpd-ca.crt>
|
||||
|
||||
=back
|
||||
|
||||
=head1 DESCRIPTION
|
||||
|
||||
This plugin implements basic TLS support. It can also be used to support
|
||||
|
@ -69,7 +69,7 @@ command line, the return code corresponds to the results of scanning the last fi
|
||||
8 scan results are unavailable: file is corrupted or input/output error.
|
||||
|
||||
9 some of the required parameters are missing from the command line.
|
||||
|
||||
|
||||
=head1 VERSION
|
||||
|
||||
0.1rc first proof of concept.
|
||||
@ -87,7 +87,7 @@ AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
||||
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
||||
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
||||
SOFTWARE.
|
||||
|
||||
|
||||
=cut
|
||||
|
||||
use File::Temp qw(tempfile);
|
||||
|
@ -1,6 +1,6 @@
|
||||
#!/usr/bin/perl -w
|
||||
# Kasperski-AV plugin.
|
||||
|
||||
|
||||
=head1 NAME
|
||||
|
||||
kavscanner - plugin for qpsmtpd which calls the Kasperski anti virus scanner
|
||||
|
@ -1,4 +1,5 @@
|
||||
#!/usr/bin/perl -w
|
||||
|
||||
=head1 NAME
|
||||
|
||||
uvscan
|
||||
|
Loading…
Reference in New Issue
Block a user