view release on metacpan or search on metacpan
2001-03-27 Hajimu UMEMOTO <ume@mahoroba.org>
* Socket6.pm: Bump version number to 0.10.
* Socket6.xs: Make compilable under OpenBSD. Though OpenBSD has
KAME, OpenBSD doesn't have netinet6/ipsec.h.
Reported by: Tim Ayers <cpantest@quaday.com>
2001-03-21 Hajimu UMEMOTO <ume@mahoroba.org>
* Socket6.pm: Bump version number to 0.09.
view release on metacpan or search on metacpan
lib/Syntax/Kamelon/XML/apparmor.xml view on Meta::CPAN
<item>appletalk</item>
<item>netrom</item>
<item>bridge</item>
<item>atmpvc</item>
<item>x25</item>
<item>inet6</item>
<item>rose</item>
<item>netbeui</item>
<item>security</item>
<item>key</item>
<item>packet</item>
view release on metacpan or search on metacpan
HostAddr.pm view on Meta::CPAN
$cmd = 'ipconfig';
$param = '/all';
}else{
$cmd = 'ifconfig';
$param = $getint || '-a';
$param .= ' inet6' if($self->{ipv} eq '6' && $^O eq 'solaris');
}
my @config = $self->_get_stdout($cmd, $param);
return( \@config );
}
HostAddr.pm view on Meta::CPAN
sub _mkipv {
my $self = shift;
return ( ($^O eq 'MSWin32' || $^O eq 'cygwin') && $self->{ipv} eq '6' ) ? 'IPv6 Address' :
($^O eq 'MSWin32' || $^O eq 'cygwin') ? 'IPv4 Address' :
($self->{ipv} eq '6') ? 'inet6' :
'inet';
}
sub _get_stdout {
my $self = shift;
view release on metacpan or search on metacpan
lib/Sys/HostIP.pm view on Meta::CPAN
# [goldenboy:~] adamb $ ip address
# 1: lo: <LOOPBACK,UP,LOWER_UP> mtu 65536 qdisc noqueue state UNKNOWN group default
# link/loopback 00:00:00:00:00:00 brd 00:00:00:00:00:00
# inet 127.0.0.1/8 scope host lo
# valid_lft forever preferred_lft forever
# inet6 ::1/128 scope host
# valid_lft forever preferred_lft forever
# 2: eth0: <NO-CARRIER,BROADCAST,MULTICAST,UP> mtu 1500 qdisc pfifo_fast state DOWN group default qlen 1000
# link/ether 9c:b6:54:a5:64:60 brd ff:ff:ff:ff:ff:ff
#
# so the regexen involved here have to deal with the following: 1)
view release on metacpan or search on metacpan
t/backcompat/tap_archive_oprofile_reallive.tap view on Meta::CPAN
## CC net/netlink/genetlink.o
## CC fs/isofs/dir.o
## CC net/ipv4/ip_forward.o
## CC drivers/acpi/acpica/evregion.o
## CC lib/decompress_inflate.o
## CC net/ipv6/af_inet6.o
## CC fs/isofs/util.o
## CC drivers/base/map.o
## LD net/netlink/built-in.o
## CC drivers/base/devres.o
## LD drivers/cdrom/built-in.o
t/backcompat/tap_archive_oprofile_reallive.tap view on Meta::CPAN
## LD net/unix/built-in.o
## CC drivers/acpi/acpica/hwregs.o
## CC fs/nfs/inode.o
## CC drivers/acpi/acpica/hwsleep.o
## CC net/sunrpc/rpcb_clnt.o
## CC net/ipv6/inet6_connection_sock.o
## CC net/ipv4/fib_semantics.o
## CC net/sunrpc/timer.o
## CC fs/nfsd/nfssvc.o
## CC drivers/char/agp/frontend.o
## CC drivers/acpi/acpica/hwxface.o
t/backcompat/tap_archive_oprofile_reallive.tap view on Meta::CPAN
## CC drivers/acpi/acpica/nsalloc.o
## CC fs/nfs/symlink.o
## CC drivers/acpi/acpica/nseval.o
## CC net/ipv4/ipconfig.o
## CC net/sunrpc/stats.o
## CC net/ipv6/inet6_hashtables.o
## CC drivers/cpufreq/cpufreq.o
## CC fs/nfs/unlink.o
## LD drivers/char/agp/agpgart.o
## LD drivers/char/agp/built-in.o
## CC net/ipv4/inet_diag.o
view release on metacpan or search on metacpan
inc/Net/FTP.pm view on Meta::CPAN
my $nossl_warn = !$ssl_class &&
'To use SSL please install IO::Socket::SSL with version>=2.007';
# Code for detecting if we can use IPv6
my $inet6_class = eval {
require IO::Socket::IP;
no warnings 'numeric';
IO::Socket::IP->VERSION(0.25);
} && 'IO::Socket::IP' || eval {
require IO::Socket::INET6;
no warnings 'numeric';
IO::Socket::INET6->VERSION(2.62);
} && 'IO::Socket::INET6';
sub can_ssl { $ssl_class };
sub can_inet6 { $inet6_class };
$IOCLASS = $ssl_class || $inet6_class || 'IO::Socket::INET';
$family_key =
( $ssl_class ? $ssl_class->can_ipv6 : $inet6_class || '' )
eq 'IO::Socket::IP'
? 'Family' : 'Domain';
}
our @ISA = ('Exporter','Net::Cmd',$IOCLASS);
view release on metacpan or search on metacpan
clib/src/panda/unievent/socks/SocksFilter.cc view on Meta::CPAN
panda_log_debug("tcp_connect: " << req << " state:" << state);
if (state == State::terminal) return NextFilter::tcp_connect(req);
if (req->addr) {
addr = req->addr;
if (!addr.is_inet4() && !addr.is_inet6()) throw Error("Unknown address family");
} else {
host = req->host;
port = req->port;
hints = req->hints;
}
clib/src/panda/unievent/socks/SocksFilter.cc view on Meta::CPAN
if (addr) {
if (addr.is_inet4()) {
auto& sa4 = addr.as_inet4();
data = string("\x05\x01\x00\x01") + string_view((char*)&sa4.addr(), 4) + string_view((char*)&sa4.get()->sin_port, 2);
} else {
auto& sa6 = addr.as_inet6();
data = string("\x05\x01\x00\x04") + string((char*)&sa6.addr(), 16) + string((char*)&sa6.get()->sin6_port, 2);
}
} else {
uint16_t nport = htons(port);
data = string("\x05\x01\x00\x03") + (char)host.length() + host + string((char*)&nport, 2);
view release on metacpan or search on metacpan
clib/tests/resolver.cc view on Meta::CPAN
for (auto ai = v.res[0]; ai; ai = ai.next()) {
auto addr = ai.addr();
CHECK(addr.port() == 80);
if (addr.is_inet4()) CHECK(addr.ip() == "127.0.0.1");
else if (addr.is_inet6()) CHECK(addr.ip() == "::1");
}
}
TEST("cache limit") {
Vars v(3);
view release on metacpan or search on metacpan
bin/mock_onfido.pl view on Meta::CPAN
my $loop = IO::Async::Loop->new();
$loop->add($httpserver);
$httpserver->listen(
addr => {
family => "inet6",
socktype => "stream",
port => 3000
},
)->get;
view release on metacpan or search on metacpan
c-ares-1.34.3/CMakeLists.txt view on Meta::CPAN
CHECK_INCLUDE_FILES (limits.h HAVE_LIMITS_H)
CHECK_INCLUDE_FILES (malloc.h HAVE_MALLOC_H)
CHECK_INCLUDE_FILES (memory.h HAVE_MEMORY_H)
CHECK_INCLUDE_FILES (netdb.h HAVE_NETDB_H)
CHECK_INCLUDE_FILES (netinet/in.h HAVE_NETINET_IN_H)
CHECK_INCLUDE_FILES (netinet6/in6.h HAVE_NETINET6_IN6_H)
# On old MacOS SDK versions, you must include sys/socket.h before net/if.h
IF (HAVE_SYS_SOCKET_H)
CHECK_INCLUDE_FILES ("sys/socket.h;net/if.h" HAVE_NET_IF_H)
ELSE ()
CHECK_INCLUDE_FILES (net/if.h HAVE_NET_IF_H)
c-ares-1.34.3/CMakeLists.txt view on Meta::CPAN
CARES_EXTRAINCLUDE_IFSET (HAVE_ARPA_NAMESER_H arpa/nameser.h)
CARES_EXTRAINCLUDE_IFSET (HAVE_NETDB_H netdb.h)
CARES_EXTRAINCLUDE_IFSET (HAVE_NET_IF_H net/if.h)
CARES_EXTRAINCLUDE_IFSET (HAVE_IFADDRS_H ifaddrs.h)
CARES_EXTRAINCLUDE_IFSET (HAVE_NETINET_IN_H netinet/in.h)
CARES_EXTRAINCLUDE_IFSET (HAVE_NETINET6_IN6_H netinet6/in6.h)
CARES_EXTRAINCLUDE_IFSET (HAVE_NETINET_TCP_H netinet/tcp.h)
CARES_EXTRAINCLUDE_IFSET (HAVE_SIGNAL_H signal.h)
CARES_EXTRAINCLUDE_IFSET (HAVE_STDLIB_H stdlib.h)
CARES_EXTRAINCLUDE_IFSET (HAVE_STRING_H string.h)
CARES_EXTRAINCLUDE_IFSET (HAVE_STRINGS_H strings.h)
view release on metacpan or search on metacpan
libunievent/tests/resolver.cc view on Meta::CPAN
for (auto ai = v.res[0]; ai; ai = ai.next()) {
auto addr = ai.addr();
CHECK(addr.port() == 80);
if (addr.is_inet4()) CHECK(addr.ip() == "127.0.0.1");
else if (addr.is_inet6()) CHECK(addr.ip() == "::1");
}
}
TEST("cache limit") {
Vars v(3);
view release on metacpan or search on metacpan
libuv-1.49.2/src/unix/aix.c view on Meta::CPAN
}
int uv_interface_addresses(uv_interface_address_t** addresses, int* count) {
uv_interface_address_t* address;
int sockfd, sock6fd, inet6, i, r, size = 1;
struct ifconf ifc;
struct ifreq *ifr, *p, flg;
struct in6_ifreq if6;
struct sockaddr_dl* sa_addr;
libuv-1.49.2/src/unix/aix.c view on Meta::CPAN
if (!(p->ifr_addr.sa_family == AF_INET6 ||
p->ifr_addr.sa_family == AF_INET))
continue;
inet6 = (p->ifr_addr.sa_family == AF_INET6);
memcpy(flg.ifr_name, p->ifr_name, sizeof(flg.ifr_name));
if (ioctl(sockfd, SIOCGIFFLAGS, &flg) == -1)
goto syserror;
libuv-1.49.2/src/unix/aix.c view on Meta::CPAN
/* All conditions above must match count loop */
address->name = uv__strdup(p->ifr_name);
if (inet6)
address->address.address6 = *((struct sockaddr_in6*) &p->ifr_addr);
else
address->address.address4 = *((struct sockaddr_in*) &p->ifr_addr);
if (inet6) {
memset(&if6, 0, sizeof(if6));
r = uv__strscpy(if6.ifr_name, p->ifr_name, sizeof(if6.ifr_name));
if (r == UV_E2BIG)
goto cleanup;
r = 0;
view release on metacpan or search on metacpan
Config_xs.in view on Meta::CPAN
i_memory, T_INV,0,ALN64I"@@i_memory@@"
i_mntent, T_INV,0,ALN64I"@@i_mntent@@"
i_ndbm, T_INV,0,ALN64I"@@i_ndbm@@"
i_netdb, T_INV,0,ALN64I"@@i_netdb@@"
i_neterrno, T_INV,0,ALN64I"@@i_neterrno@@"
i_netinet6_in6, T_INV,0,ALN64I"@@i_netinet6_in6@@"
i_netinet_ip, T_INV,0,ALN64I"@@i_netinet_ip@@"
i_netinet_ip6, T_INV,0,ALN64I"@@i_netinet_ip6@@"
i_netinettcp, T_INV,0,ALN64I"@@i_netinettcp@@"
i_niin, T_INV,0,ALN64I"@@i_niin@@"
i_poll, T_INV,0,ALN64I"@@i_poll@@"
view release on metacpan or search on metacpan
docs/installation.md view on Meta::CPAN
```
2) Install all necessary packages.
```sh
sudo apt-get install build-essential libfile-slurp-perl libjson-perl liblist-moreutils-perl libio-socket-inet6-perl libmodule-find-perl libmoose-perl libfile-sharedir-perl libhash-merge-perl libreadonly-perl libmail-rfc822-address-perl libintl-xs-per...
```
3) Install the Zonemaster engine
```sh
view release on metacpan or search on metacpan
local/lib/perl5/IO/Socket/SSL.pm view on Meta::CPAN
}
}
# Export some stuff
# inet4|inet6|debug will be handled by myself, everything
# else will be handled the Exporter way
sub import {
my $class = shift;
my @export;
foreach (@_) {
if ( /^inet4$/i ) {
# explicitly fall back to inet4
@ISA = 'IO::Socket::INET';
@caller_force_inet4 = caller(); # save for warnings for 'inet6' case
} elsif ( /^inet6$/i ) {
# check if we have already ipv6 as base
if ( ! UNIVERSAL::isa( $class, 'IO::Socket::INET6')
and ! UNIVERSAL::isa( $class, 'IO::Socket::IP' )) {
# either we don't support it or we disabled it by explicitly
# loading it with 'inet4'. In this case re-enable but warn
view release on metacpan or search on metacpan
bin/circle-fe-term view on Meta::CPAN
GetOptions(
'identity|i=s' => \$IDENTITY,
'metrics-port=i' => \my $METRICS_PORT,
'help' => sub { usage(0) },
'4|ipv4' => sub { $FAMILY = "inet4" },
'6|ipv6' => sub { $FAMILY = "inet6" },
) or usage(1);
sub usage
{
my ( $exitcode ) = @_;
view release on metacpan or search on metacpan
lib/JUNOS/6.4I0/jroute_methods.pl view on Meta::CPAN
get_isis_route_information => {
logical_router => $STRING,
instance => $STRING,
destination => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
topology => $STRING,
},
## Method : <get-isis-spf-information>
## Returns: <isis-spf-information>
lib/JUNOS/6.4I0/jroute_methods.pl view on Meta::CPAN
inactive => $TOGGLE,
brief => $TOGGLE,
detail => $TOGGLE,
extensive => $TOGGLE,
inet => $TOGGLE,
inet6 => $TOGGLE,
group => $STRING,
source_prefix => $STRING,
regexp => $STRING,
instance => $STRING,
},
lib/JUNOS/6.4I0/jroute_methods.pl view on Meta::CPAN
logical_router => $STRING,
brief => $TOGGLE,
detail => $TOGGLE,
identifier => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
},
## Method : <get-multicast-rpf-information>
## Returns: <multicast-rpf-information>
## Command: "show multicast rpf"
get_multicast_rpf_information => {
logical_router => $STRING,
summary => $TOGGLE,
prefix => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
instance => $STRING,
},
## Method : <get-multicast-scope-information>
## Returns: <multicast-scope-information>
## Command: "show multicast scope"
get_multicast_scope_information => {
logical_router => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
instance => $STRING,
},
## Method : <get-multicast-sessions-information>
## Returns: <multicast-sessions-information>
lib/JUNOS/6.4I0/jroute_methods.pl view on Meta::CPAN
## Returns: <multicast-statistics-information>
## Command: "show multicast statistics"
get_multicast_statistics_information => {
logical_router => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
instance => $STRING,
},
## Method : <get-multicast-usage-information>
## Returns: <multicast-usage-information>
lib/JUNOS/6.4I0/jroute_methods.pl view on Meta::CPAN
logical_router => $STRING,
brief => $TOGGLE,
detail => $TOGGLE,
instance => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
},
## Method : <get-pim-bootstrap-information>
## Returns: <pim-bootstrap-information>
## Command: "show pim bootstrap"
lib/JUNOS/6.4I0/jroute_methods.pl view on Meta::CPAN
get_pim_interfaces_information => {
logical_router => $STRING,
interface_name => $STRING,
instance => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
},
## Method : <get-pim-join-information>
## Returns: <pim-join-information>
## Command: "show pim join"
lib/JUNOS/6.4I0/jroute_methods.pl view on Meta::CPAN
detail => $TOGGLE,
extensive => $TOGGLE,
range => $STRING,
instance => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
},
## Method : <get-pim-neighbors-information>
## Returns: <pim-neighbors-information>
## Command: "show pim neighbors"
lib/JUNOS/6.4I0/jroute_methods.pl view on Meta::CPAN
logical_router => $STRING,
brief => $TOGGLE,
detail => $TOGGLE,
instance => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
},
## Method : <get-pim-rps-information>
## Returns: <pim-rps-information>
## Command: "show pim rps"
lib/JUNOS/6.4I0/jroute_methods.pl view on Meta::CPAN
detail => $TOGGLE,
extensive => $TOGGLE,
group_address => $STRING,
instance => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
},
## Method : <get-pim-source-information>
## Returns: <pim-source-information>
## Command: "show pim source"
lib/JUNOS/6.4I0/jroute_methods.pl view on Meta::CPAN
brief => $TOGGLE,
detail => $TOGGLE,
source => $STRING,
instance => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
},
## Method : <get-pim-statistics-information>
## Returns: <pim-statistics-information>
## Command: "show pim statistics"
get_pim_statistics_information => {
logical_router => $STRING,
interface => $STRING,
inet => $TOGGLE,
inet6 => $TOGGLE,
instance => $STRING,
},
## Method : <get-sap-listen-information>
## Returns: <sap-listen-information>
view release on metacpan or search on metacpan
lib/Net/FTP.pm view on Meta::CPAN
my $nossl_warn = !$ssl_class &&
'To use SSL please install IO::Socket::SSL with version>=2.007';
# Code for detecting if we can use IPv6
my $inet6_class = eval {
require IO::Socket::IP;
no warnings 'numeric';
IO::Socket::IP->VERSION(0.25);
} && 'IO::Socket::IP' || eval {
require IO::Socket::INET6;
no warnings 'numeric';
IO::Socket::INET6->VERSION(2.62);
} && 'IO::Socket::INET6';
sub can_ssl { $ssl_class };
sub can_inet6 { $inet6_class };
$IOCLASS = $ssl_class || $inet6_class || 'IO::Socket::INET';
$family_key =
( $ssl_class ? $ssl_class->can_ipv6 : $inet6_class || '' )
eq 'IO::Socket::IP'
? 'Family' : 'Domain';
}
our @ISA = ('Exporter','Net::Cmd',$IOCLASS);
lib/Net/FTP.pm view on Meta::CPAN
Returns most significant digit of the response code.
B<WARNING> This call should only be used on commands that do not require
data connections. Misuse of this method can hang the connection.
=item C<can_inet6()>
Returns whether we can use IPv6.
=item C<can_ssl()>
view release on metacpan or search on metacpan
lib/Net/LDAP.pm view on Meta::CPAN
sub connect_ldap {
my ($ldap, $host, $arg) = @_;
my $port = $arg->{port} || 389;
my $class = (CAN_IPV6) ? CAN_IPV6 : 'IO::Socket::INET';
my $domain = $arg->{inet4} ? AF_INET : ($arg->{inet6} ? AF_INET6 : AF_UNSPEC);
# separate port from host overwriting given/default port
$host =~ s/^([^:]+|\[.*\]):(\d+)$/$1/ and $port = $2;
if ($arg->{inet6} && !CAN_IPV6) {
$@ = 'unable to load IO::Socket::INET6; no IPv6 support';
return undef;
}
$ldap->{net_ldap_socket} = $class->new(
lib/Net/LDAP.pm view on Meta::CPAN
my %ssl_verify = qw(none 0 optional 1 require 3);
sub connect_ldaps {
my ($ldap, $host, $arg) = @_;
my $port = $arg->{port} || 636;
my $domain = $arg->{inet4} ? AF_INET : ($arg->{inet6} ? AF_INET6 : AF_UNSPEC);
if ($arg->{inet6} && !CAN_IPV6) {
$@ = 'unable to load IO::Socket::INET6; no IPv6 support';
return undef;
}
require IO::Socket::SSL;
view release on metacpan or search on metacpan
cpan/libnet/lib/Net/FTP.pm view on Meta::CPAN
my $nossl_warn = !$ssl_class &&
'To use SSL please install IO::Socket::SSL with version>=2.007';
# Code for detecting if we can use IPv6
my $inet6_class = eval {
require IO::Socket::IP;
no warnings 'numeric';
IO::Socket::IP->VERSION(0.25);
} && 'IO::Socket::IP' || eval {
require IO::Socket::INET6;
no warnings 'numeric';
IO::Socket::INET6->VERSION(2.62);
} && 'IO::Socket::INET6';
sub can_ssl { $ssl_class };
sub can_inet6 { $inet6_class };
$IOCLASS = $ssl_class || $inet6_class || 'IO::Socket::INET';
$family_key =
( $ssl_class ? $ssl_class->can_ipv6 : $inet6_class || '' )
eq 'IO::Socket::IP'
? 'Family' : 'Domain';
}
our @ISA = ('Exporter','Net::Cmd',$IOCLASS);
cpan/libnet/lib/Net/FTP.pm view on Meta::CPAN
Returns most significant digit of the response code.
B<WARNING> This call should only be used on commands that do not require
data connections. Misuse of this method can hang the connection.
=item C<can_inet6()>
Returns whether we can use IPv6.
=item C<can_ssl()>