Also, what other MTA's support this on the sending side? We don't.
-R
At Sun, 18 Jun 2006 10:55:00 -0700,
Robert Spier wrote:
>
>
>
> I like the idea, but nothing else in qpsmtpd knows about local
> delivery.
>
> Can you rewrite this to be a plugin?
>
> -R
>
> At Sun, 18 Jun 2006 19:27:11 +0200,
> Robert Millan wrote:
> >
> > diff -ur qpsmtpd-0.32.old/lib/Qpsmtpd/Constants.pm
> > qpsmtpd-0.32/lib/Qpsmtpd/Constants.pm
> > --- qpsmtpd-0.32.old/lib/Qpsmtpd/Constants.pm 2006-02-26
> > 13:22:16.000000000 +0100
> > +++ qpsmtpd-0.32/lib/Qpsmtpd/Constants.pm 2006-06-18 18:08:21.285787752
> > +0200
> > @@ -23,6 +23,7 @@
> > DENYHARD => 903, # 550 + disconnect (deprecated in 0.29)
> > DENY_DISCONNECT => 903, # 550 + disconnect
> > DENYSOFT_DISCONNECT => 904, # 450 + disconnect
> > + PREFORWARD => 905, # 551
> > DECLINED => 909,
> > DONE => 910,
> > );
> > diff -ur qpsmtpd-0.32.old/lib/Qpsmtpd/DSN.pm qpsmtpd-0.32/lib/Qpsmtpd/DSN.pm
> > --- qpsmtpd-0.32.old/lib/Qpsmtpd/DSN.pm 2006-02-26 13:22:16.000000000
> > +0100
> > +++ qpsmtpd-0.32/lib/Qpsmtpd/DSN.pm 2006-06-18 18:07:11.175446144 +0200
> > @@ -172,7 +172,7 @@
> >
> > sub addr_unspecified { shift->_dsn(shift,shift,DENYSOFT,1,0); }
> >
> > -=item no_such_user, addr_bad_dest_mbox
> > +=item no_such_user, addr_bad_dest_mbox, user_not_local
> >
> > X.1.1
> > default: DENY
> > @@ -181,6 +181,7 @@
> >
> > sub no_such_user { shift->_dsn(shift,(shift||"No such
> > user"),DENY,1,1); }
> > sub addr_bad_dest_mbox { shift->_dsn(shift,shift,DENY,1,1); }
> > +sub user_not_local { shift->_dsn(shift,shift,PREFORWARD,1,1); }
> >
> > =item addr_bad_dest_system
> >
> > diff -ur qpsmtpd-0.32.old/lib/Qpsmtpd/SMTP.pm
> > qpsmtpd-0.32/lib/Qpsmtpd/SMTP.pm
> > --- qpsmtpd-0.32.old/lib/Qpsmtpd/SMTP.pm 2006-02-26 13:22:16.000000000
> > +0100
> > +++ qpsmtpd-0.32/lib/Qpsmtpd/SMTP.pm 2006-06-18 18:06:53.639112072
> > +0200
> > @@ -355,6 +355,9 @@
> > $self->respond(421, $msg);
> > $self->disconnect;
> > }
> > + elsif ($rc == PREFORWARD) {
> > + $self->respond(551, $msg);
> > + }
> > elsif ($rc == OK) {
> > $self->respond(250, $rcpt->format . ", recipient ok");
> > return $self->transaction->add_recipient($rcpt);
> > diff -ur qpsmtpd-0.32.old/plugins/rcpt_ok qpsmtpd-0.32/plugins/rcpt_ok
> > --- qpsmtpd-0.32.old/plugins/rcpt_ok 2006-02-26 13:22:16.000000000
> > +0100
> > +++ qpsmtpd-0.32/plugins/rcpt_ok 2006-06-18 18:39:03.695698872 +0200
> > @@ -3,6 +3,7 @@
> > # It should be configured to be run _LAST_!
> > #
> > use Qpsmtpd::DSN;
> > +use File::HomeDir;
> >
> > sub hook_rcpt {
> > my ($self, $transaction, $recipient) = @_;
> > @@ -16,6 +17,14 @@
> > my $user = $recipient->user;
> > $host = $self->qp->config("me")
> > if ($host eq "" && (lc $user eq "postmaster" || lc $user eq "abuse"));
> > +
> > + # Check for ~/.preforward
> > + if (open (PREFWD, home(lc($user)) . "/.preforward")) {
> > + my ($prefwd) = <PREFWD>;
> > + close(PREFWD);
> > + chomp ($prefwd);
> > + return Qpsmtpd::DSN->user_not_local("User not local; please try
> > <$prefwd>");
> > + }
> >
> > # Check if this recipient host is allowed
> > for my $allowed (@rcpt_hosts) {
