byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Set connection remote_host only when the reverse DNS lookup is successful.

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@923 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Radu Greab 2008-06-02 16:48:57 +00:00 committed by Ask Bjørn Hansen
parent b03dddcb48
commit 6db489e4f9
2 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
Changes
View File

@ -1,3 +1,6 @@
async: Set connection remote_host only when the reverse DNS lookup is
successful
Create async version of dns_whitelist_soft, rhsbl and uribl plugins. Create async version of dns_whitelist_soft, rhsbl and uribl plugins.
async: added pre- and post-connection hooks async: added pre- and post-connection hooks

2
lib/Qpsmtpd/PollServer.pm
View File

@ -183,7 +183,7 @@ sub start_conversation {
ParaDNS->new( ParaDNS->new(
finished => sub { $self->continue_read(); $self->run_hooks("connect") }, finished => sub { $self->continue_read(); $self->run_hooks("connect") },
# NB: Setting remote_info to the same as remote_host # NB: Setting remote_info to the same as remote_host
callback => sub { $conn->remote_info($conn->remote_host($_[0])) }, callback => sub { $conn->remote_info($conn->remote_host($_[0])) if $_[0] !~ /^[A-Z]+$/ },
host => $ip, host => $ip,
); );