Skip Menu |

This queue is for tickets about the IO-Socket-INET6 CPAN distribution.

Report information
The Basics
Id: 47320
Status: open
Priority: 0/
Queue: IO-Socket-INET6

People
Owner: Nobody in particular
Requestors: leonerd-cpan [...] leonerd.org.uk
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: 2.54
Fixed in: (no value)



Subject: Creates AF_INET rather than AF_INET6 sockets
$ perl -MIO::Socket::INET6 -E 'say "INET" if IO::Socket->new(Domain=>AF_INET6,Proto=>'tcp')->sockdomain == AF_INET' Expected output: [empty string] Actual output: INET Running this through strace shows it creates an AF_INET socket at the kernel level: ... socket(PF_INET, SOCK_STREAM, IPPROTO_TCP) = 3 ioctl(3, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfaef998) = -1 EINVAL (Invalid argument) _llseek(3, 0, 0xbfaef9e0, SEEK_CUR) = -1 ESPIPE (Illegal seek) ioctl(3, SNDCTL_TMR_TIMEBASE or TCGETS, 0xbfaef998) = -1 EINVAL (Invalid argument) _llseek(3, 0, 0xbfaef9e0, SEEK_CUR) = -1 ESPIPE (Illegal seek) fcntl64(3, F_SETFD, FD_CLOEXEC) = 0 bind(3, {sa_family=AF_INET, sin_port=htons(0), sin_addr=inet_addr("0.0.0.0")}, 16) = 0 write(1, "INET\n"..., 5) = 5 close(3) = 0 exit_group(0) = ? -- Paul Evans
Hi Paul! I cannot reproduce your problem here: {{{{ shlomi:~$ perl -MIO::Socket::INET6 -E 'say "INET" if IO::Socket->new(Domain=>AF_INET6,Proto=>"tcp")->sockdomain == AF_INET' shlomi:~$ }}}} Mandriva Linux Cooker. ifconfig is: {{{{{{{ shlomi:~$ /sbin/ifconfig eth0 Link encap:Ethernet HWaddr 00:90:27:4F:06:1B inet addr:192.168.1.105 Bcast:192.168.1.255 Mask:255.255.255.0 inet6 addr: fe80::290:27ff:fe4f:61b/64 Scope:Link UP BROADCAST RUNNING MULTICAST MTU:1394 Metric:1 RX packets:382612 errors:0 dropped:0 overruns:0 frame:0 TX packets:345962 errors:0 dropped:0 overruns:0 carrier:0 collisions:0 txqueuelen:1000 RX bytes:324914478 (309.8 MiB) TX bytes:35186816 (33.5 MiB) lo Link encap:Local Loopback inet addr:127.0.0.1 Mask:255.0.0.0 inet6 addr: ::1/128 Scope:Host UP LOOPBACK RUNNING MTU:16436 Metric:1 RX packets:82252 errors:0 dropped:0 overruns:0 frame:0 TX packets:82252 errors:0 dropped:0 overruns:0 carrier:0 collisions:0 txqueuelen:0 RX bytes:5576720 (5.3 MiB) TX bytes:5576720 (5.3 MiB) }}}}}}} Regards, -- Shlomi Fish
On Wed Jun 24 22:04:54 2009, SHLOMIF wrote: Show quoted text
> Mandriva Linux Cooker. ifconfig is: > > {{{{{{{ > shlomi:~$ /sbin/ifconfig
... ifconfig isn't the best tool for querying this. It only prints one address per family. Use "ip"; see my output below... $ ip addr ls 1: lo: <LOOPBACK,UP,LOWER_UP> mtu 16436 qdisc noqueue state UNKNOWN link/loopback 00:00:00:00:00:00 brd 00:00:00:00:00:00 inet 127.0.0.1/8 scope host lo inet6 ::1/128 scope host valid_lft forever preferred_lft forever 2: wired: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1450 qdisc pfifo_fast state UNKNOWN qlen 1000 link/ether 00:04:61:75:61:7d brd ff:ff:ff:ff:ff:ff inet 192.168.42.3/24 brd 192.168.42.255 scope global wired inet 81.187.167.227/28 scope global wired inet6 2001:8b0:3f7::3:1/48 scope global valid_lft forever preferred_lft forever inet6 fe80::204:61ff:fe75:617d/64 scope link valid_lft forever preferred_lft forever Note specifically I have a real "scope global" address; and routing: $ ip -f inet6 route 2001:8b0:3f7::/48 dev wired metric 256 mtu 1450 advmss 1390 hoplimit 0 fe80::/64 dev wired metric 256 mtu 1450 advmss 1390 hoplimit 0 default via 2001:8b0:3f7::1 dev wired metric 1024 mtu 1450 advmss 1390 hoplimit 0 My /etc/gai.conf is entirely comments. General details: Summary of my perl5 (revision 5 version 10 subversion 0) configuration: Platform: osname=linux, osvers=2.6.29.4-dsa-dl380-oldxeon, archname=i486-linux-gnu-thread-multi uname='linux murphy 2.6.29.4-dsa-dl380-oldxeon #2 smp mon may 25 13:52:52 cest 2009 i686 gnulinux ' config_args='-Dusethreads -Duselargefiles -Dccflags=-DDEBIAN -Dcccdlflags=-fPIC -Darchname=i486-linux-gnu -Dprefix=/usr -Dprivlib=/usr/share/perl/5.10 -Darchlib=/usr/lib/perl/5.10 -Dvendorprefix=/usr -Dvendorlib=/usr/share/perl5 -Dvendorarch=/usr/lib/perl5 -Dsiteprefix=/usr/local -Dsitelib=/usr/local/share/perl/5.10.0 -Dsitearch=/usr/local/lib/perl/5.10.0 -Dman1dir=/usr/share/man/man1 -Dman3dir=/usr/share/man/man3 -Dsiteman1dir=/usr/local/man/man1 -Dsiteman3dir=/usr/local/man/man3 -Dman1ext=1 -Dman3ext=3perl -Dpager=/usr/bin/sensible-pager -Uafs -Ud_csh -Ud_ualarm -Uusesfio -Uusenm -DDEBUGGING=-g -Doptimize=-O2 -Duseshrplib -Dlibperl=libperl.so.5.10.0 -Dd_dosuid -des' hint=recommended, useposix=true, d_sigaction=define useithreads=define, usemultiplicity=define useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef use64bitint=undef, use64bitall=undef, uselongdouble=undef usemymalloc=n, bincompat5005=undef ii libc6 2.9-12 GNU C Library: Shared libraries debian/testing. -- Paul Evans