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