Subject: | Bug in POE::Wheel::SocketFactory |
Date: | Mon, 20 Jun 2011 16:06:47 -0400 |
To: | "rcaputo [...] cpan.org" <rcaputo [...] cpan.org> |
From: | Luiz Eduardo Roncato Cordeiro <cordeiro [...] cert.br> |
Hello Mr Caputo,
I'm using POE::Wheel::SocketFactory with IPv6 and noticed the swap between
address<->port as arguments ARG1 and ARG2 in SuccessEvent calling.
I fixed this bug in the SocketFactory.pm file, where you find (I've found 2
times in code):
((my $error), $peer_port, $peer_addr) = getnameinfo($peer);
Replace with:
((my $error), $peer_addr, $peer_port) = getnameinfo($peer);
The output of getnameinfo function swap these two fields in relation to the
unpack_sockaddr_in function.
I hope I was clear enough explaining this issue.
Best Regards,
--
Luiz Eduardo Roncato Cordeiro
CERT.br
<cert@cert.br>
http://www.cert.br/