/[smeserver]/rpms/qpsmtpd/sme7/qpsmtpd-0.40-peer_hooks.patch
ViewVC logotype

Annotation of /rpms/qpsmtpd/sme7/qpsmtpd-0.40-peer_hooks.patch

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1 - (hide annotations) (download)
Thu Jun 14 20:01:08 2007 UTC (17 years, 4 months ago) by slords
Branch: MAIN
CVS Tags: qpsmtpd-0_40-1_3_el4_sme, qpsmtpd-0_40-1_0_el4_sme, qpsmtpd-0_40-1_5_el4_sme, qpsmtpd-0_40-1_2_el4_sme, qpsmtpd-0_40-1_7_el4_sme, qpsmtpd-0_40-1_4_el4_sme, qpsmtpd-0_40-1_9_el4_sme, qpsmtpd-0_40-1_6_el4_sme, qpsmtpd-0_40-1_12_el4_sme, qpsmtpd-0_40-1_10_el4_sme, qpsmtpd-0_40-1_11_el4_sme, qpsmtpd-0_40-1_1_el4_sme
Branch point for: qpsmtpd-0_40
Fixes for 0.40

1 slords 1.1 --- qpsmtpd-0.40/lib/Qpsmtpd/SMTP.pm.peer_hooks 2007-06-14 11:57:27.000000000 -0600
2     +++ qpsmtpd-0.40/lib/Qpsmtpd/SMTP.pm 2007-06-14 13:44:52.000000000 -0600
3     @@ -95,6 +95,11 @@
4     my $self = shift;
5     # this should maybe be called something else than "connect", see
6     # lib/Qpsmtpd/TcpServer.pm for more confusion.
7     + my ($rc, $msg) = $self->run_hooks("set_hooks");
8     + if ($rc == DENY) {
9     + $self->respond(550, ($msg || 'Connection from you denied, bye bye.'));
10     + return $rc;
11     + }
12     $self->run_hooks("connect");
13     return DONE;
14     }
15     @@ -278,7 +283,9 @@
16    
17     # if we don't have a plugin implementing this auth mechanism, 504
18     if( exists $auth_mechanisms{uc($mechanism)} ) {
19     - return $self->{_auth} = Qpsmtpd::Auth::SASL( $self, $mechanism, @stuff );
20     + $self->{_auth} = Qpsmtpd::Auth::SASL( $self, $mechanism, @stuff );
21     + $self->run_hooks("valid_auth") if $self->{_auth} == OK;
22     + return $self->{_auth};
23     } else {
24     $self->respond( 504, "Unimplemented authentification mechanism: $mechanism" );
25     return DENY;
26     --- qpsmtpd-0.40/lib/Qpsmtpd/Plugin.pm.peer_hooks 2007-06-14 11:57:27.000000000 -0600
27     +++ qpsmtpd-0.40/lib/Qpsmtpd/Plugin.pm 2007-06-14 13:43:53.000000000 -0600
28     @@ -6,7 +6,7 @@
29     our @hooks = qw(
30     logging config pre-connection connect ehlo_parse ehlo
31     helo_parse helo auth_parse auth auth-plain auth-login auth-cram-md5
32     - rcpt_parse rcpt_pre rcpt mail_parse mail mail_pre
33     + valid_auth set_hooks rcpt_parse rcpt_pre rcpt mail_parse mail mail_pre
34     data data_post queue_pre queue queue_post
35     quit reset_transaction disconnect post-connection
36     unrecognized_command deny ok received_line

admin@koozali.org
ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed