
Hello Adam,
Maybe you could use the binary package [1] to always encode the portNumber,
etc. in network byte order? Such as available put/get functions:
putWord16be :: Word16 -> Put
Hope this helps...
__
Donnie
1. http://hackage.haskell.org/cgi-bin/hackage-scripts/package/binary-0.4.1
On 3/7/08, Adam Langley
On Fri, Mar 7, 2008 at 8:10 AM, Scott Bell
wrote: my test program. The Haskell version, however, does not return from recvFrom. I've also tried wrapping this in a withSocketsDo, with no effect.
So this is a long standing, ah, issue with the Network modules.
Try sending a UDP packet to port 45607 and you'll find that the Haskell code gets it.
hex(45607) = 0xb227 0x27b2 = 10162
In short, PortNum doesn't do the endian conversion for you. And I don't know a good way to figure out the endianness of the underlying system from Haskell I'm afraid. I usually end up FFIing out to htons or just assuming that the system is little-endian.
We should really fix this unless there's some trick that I've been missing all this time.
AGL
-- Adam Langley agl@imperialviolet.org http://www.imperialviolet.org
_______________________________________________ Haskell-Cafe mailing list Haskell-Cafe@haskell.org http://www.haskell.org/mailman/listinfo/haskell-cafe