Mark Martinec wrote:
>
> leeyc0,
>> I have to comment a line Net/DNS/Resolver/Base.pm to fix this problem.
>>
>> (below is some lines in Net/DNS/Resolver/Base.pm send_tcp function)
>> $buf = read_tcp($sock, $len, $self->{'debug'});
>>
>> # comment this line, this should be a class property but used as a
>> function
>> # apparently mixed up with Net::DNS::Packet
>> #$self->answerfrom($sock->peerhost);
>>
>> print ';; received ', length($buf), " bytes\n"
>> if $self->{'debug'};
>
> Thanks, good work - except that I can't reproduce the problem,
> and the fallback to TCP in Net::DNS 0.66 works just fine
> with your first sample message.
>
> Which version of Net::DNS are you using?
>
I am using 0.66, installed using CPAN.
Turns out that, the problem is not in the Net::DNS package, but rather the
function call $sock->peerhost (which is a Socket object). $sock->peerhost
runs normally until some data is read from the socket (to be exact, that
particular failing line is in Net::DNS::Base read_tcp function, the line
that reads "unless ($sock->recv($read_buf, $nread))". After the $sock->recv
call "$sock->peerhost" fails with "Bad arg length for
Socket::unpack_sockaddr_in". At this point I gave up to trobleshoot, since I
knew that it would be futile to proceed further, because seems that the
problem is because the mail server OS is too old, and having some
compatibility problems with new software.
--
View this message in context:
http://old.nabble.com/the-dkim-sigature-is-valid%2C-but-still-triggered-T_DKIM_INVALID-in-mail-server-tp28178215p28201004.html
Sent from the SpamAssassin - Users mailing list archive at Nabble.com.
