Re: qpsmtpd-async weird ParaDNS lookup problem + code fix

[email protected] (Kaare Rasmussen) Tue, 12 Aug 2014 18:26:43 +0200
Newsgroups perl.qpsmtpd
Message-ID <[email protected]>
Hi Matt

How about putting it on Github? Then anybody can look and decide if they 
want to continue work on it and perhaps make it cpan -ready.

> To be fair I don't do perl coding any more, so I'm happy for someone 
> to take over ParaDNS maintainence.
>
> ParaDNS-XS is in my SVN server. Happy to share that with anyone who 
> wants it. It's basically ParaDNS using adns backend rather than 
> Net::DNS. It's a bit hacky and probably doesn't work 100%
>
> Matt.
>
> On Fri, 1 Aug 2014, David Favor wrote:
>
>> Matt Sergeant wrote:
>>> Do you have ParaDNS::XS installed? If not, try installing it. It's 
>>> generally likely to be better than plain ParaDNS (and will be used 
>>> automatically if it's installed).
>>
>> There is no ParaDNS::XS on cpan... At least nothing returned for...
>>
>>    http://search.cpan.org/search?query=paradns&mode=all
>>
>> Unsure what this has to do with setting a list of servers for ParaDNS
>> to query. Whether pure perl or XS, likely there still has to be a set
>> of servers to query.
>>
>> The fix I'm using right now is a slight patch to Qpsmtpd/PollServer.pm
>> which simply gives ParaDNS a list of servers to check...
>>
>>    my @nameservers = qw/127.0.0.1 8.8.8.8 8.8.4.4/;
>>
>>    my $obj = ParaDNS->new(
>>        nameservers => \@nameservers,
>>        finished => sub { $self->continue_read(); 
>> $self->run_hooks("connect"); },
>>        # NB: Setting remote_info to the same as remote_host
>>        callback => sub { 
>> $conn->remote_info($conn->remote_host($_[0])); },
>>        host     => $ip,
>>    );
>>
>> This works like a charm.
>>
>> Reading through the ParaDNS code, it's unclear to me how qpsmtpd can 
>> work
>> at all without a list of servers for ParaDNS to query.
>>
>>