store envelope from and to in connection notes

This commit is contained in:
Matt Simerson 2013-04-29 23:50:18 -04:00
parent 9c095ab278
commit 55388248e4

View File

@ -354,6 +354,7 @@ sub mail {
} }
$self->log(LOGDEBUG, "full from_parameter: $line"); $self->log(LOGDEBUG, "full from_parameter: $line");
$self->connection->notes('envelope_from', $line);
$self->run_hooks("mail_parse", $line); $self->run_hooks("mail_parse", $line);
} }
@ -442,6 +443,7 @@ sub mail_respond {
sub rcpt { sub rcpt {
my ($self, $line) = @_; my ($self, $line) = @_;
$self->connection->notes('envelope_rcpt', $line);
$self->run_hooks("rcpt_parse", $line); $self->run_hooks("rcpt_parse", $line);
} }
@ -466,7 +468,7 @@ sub rcpt_parse_respond {
# (... or anything else parseable by Qpsmtpd::Address ;-)) # (... or anything else parseable by Qpsmtpd::Address ;-))
# this means, a plugin can decide to (pre-)accept # this means, a plugin can decide to (pre-)accept
# addresses like <user@example.com.> or <user@example.com > # addresses like <user@example.com.> or <user@example.com >
# by removing the trailing "."/" " from this example... # by removing the trailing dot or space from this example.
$self->run_hooks("rcpt_pre", $rcpt, \%param); $self->run_hooks("rcpt_pre", $rcpt, \%param);
} }