Apache/2.4.7 (Ubuntu) Linux sman1baleendah 3.13.0-24-generic #46-Ubuntu SMP Thu Apr 10 19:11:08 UTC 2014 x86_64 uid=33(www-data) gid=33(www-data) groups=33(www-data) safemode : OFF MySQL: ON | Perl: ON | cURL: OFF | WGet: ON > / usr / lib / perl / 5.18.2 / sys / | server ip : 172.67.156.115 your ip : 172.71.254.56 H O M E |
Filename | /usr/lib/perl/5.18.2/sys/socket.ph |
Size | 2.12 kb |
Permission | rw-r--r-- |
Owner | root : root |
Create time | 27-Apr-2025 10:10 |
Last modified | 21-Nov-2018 01:29 |
Last accessed | 07-Jul-2025 03:12 |
Actions | edit | rename | delete | download (gzip) |
View | text | code | image |
require '_h2ph_pre.ph';
no warnings qw(redefine misc);
unless(defined(&_SYS_SOCKET_H)) {
eval 'sub _SYS_SOCKET_H () {1;}' unless defined(&_SYS_SOCKET_H);
require 'features.ph';
require 'sys/uio.ph';
eval 'sub __need_size_t () {1;}' unless defined(&__need_size_t);
require 'stddef.ph';
if(defined(&__USE_GNU)) {
require 'bits/sigset.ph';
}
require 'bits/socket.ph';
if(defined(&__USE_BSD)) {
}
eval("sub SHUT_RD () { 0; }") unless defined(&SHUT_RD);
eval("sub SHUT_WR () { 1; }") unless defined(&SHUT_WR);
eval("sub SHUT_RDWR () { 2; }") unless defined(&SHUT_RDWR);
if(defined (&__cplusplus) || ! &__GNUC_PREREQ (2, 7) || !defined (&__USE_GNU)) {
eval 'sub __SOCKADDR_ARG () {1;}' unless defined(&__SOCKADDR_ARG);
eval 'sub __CONST_SOCKADDR_ARG () { &const 1;}' unless defined(&__CONST_SOCKADDR_ARG);
} else {
eval 'sub __SOCKADDR_ALLTYPES () { &__SOCKADDR_ONETYPE ( &sockaddr) &__SOCKADDR_ONETYPE ( &sockaddr_at) &__SOCKADDR_ONETYPE ( &sockaddr_ax25) &__SOCKADDR_ONETYPE ( &sockaddr_dl) &__SOCKADDR_ONETYPE ( &sockaddr_eon) &__SOCKADDR_ONETYPE ( &sockaddr_in) &__SOCKADDR_ONETYPE ( &sockaddr_in6) &__SOCKADDR_ONETYPE ( &sockaddr_inarp) &__SOCKADDR_ONETYPE ( &sockaddr_ipx) &__SOCKADDR_ONETYPE ( &sockaddr_iso) &__SOCKADDR_ONETYPE ( &sockaddr_ns) &__SOCKADDR_ONETYPE ( &sockaddr_un) &__SOCKADDR_ONETYPE ( &sockaddr_x25);}' unless defined(&__SOCKADDR_ALLTYPES);
eval 'sub __SOCKADDR_ONETYPE {
my($type) = @_;
eval q(1;);
}' unless defined(&__SOCKADDR_ONETYPE);
undef(&__SOCKADDR_ONETYPE) if defined(&__SOCKADDR_ONETYPE);
eval 'sub __SOCKADDR_ONETYPE {
my($type) = @_;
eval q( &const 1;);
}' unless defined(&__SOCKADDR_ONETYPE);
undef(&__SOCKADDR_ONETYPE) if defined(&__SOCKADDR_ONETYPE);
}
if(defined(&__USE_GNU)) {
}
if(defined(&__USE_GNU)) {
}
if(defined(&__USE_GNU)) {
}
if(defined(&__USE_GNU)) {
}
if(defined(&__USE_XOPEN2K)) {
}
if(defined(&__USE_MISC)) {
}
if((defined(&__USE_FORTIFY_LEVEL) ? &__USE_FORTIFY_LEVEL : undef) > 0 && defined (&__fortify_function)) {
require 'bits/socket2.ph';
}
}
1;
no warnings qw(redefine misc);
unless(defined(&_SYS_SOCKET_H)) {
eval 'sub _SYS_SOCKET_H () {1;}' unless defined(&_SYS_SOCKET_H);
require 'features.ph';
require 'sys/uio.ph';
eval 'sub __need_size_t () {1;}' unless defined(&__need_size_t);
require 'stddef.ph';
if(defined(&__USE_GNU)) {
require 'bits/sigset.ph';
}
require 'bits/socket.ph';
if(defined(&__USE_BSD)) {
}
eval("sub SHUT_RD () { 0; }") unless defined(&SHUT_RD);
eval("sub SHUT_WR () { 1; }") unless defined(&SHUT_WR);
eval("sub SHUT_RDWR () { 2; }") unless defined(&SHUT_RDWR);
if(defined (&__cplusplus) || ! &__GNUC_PREREQ (2, 7) || !defined (&__USE_GNU)) {
eval 'sub __SOCKADDR_ARG () {1;}' unless defined(&__SOCKADDR_ARG);
eval 'sub __CONST_SOCKADDR_ARG () { &const 1;}' unless defined(&__CONST_SOCKADDR_ARG);
} else {
eval 'sub __SOCKADDR_ALLTYPES () { &__SOCKADDR_ONETYPE ( &sockaddr) &__SOCKADDR_ONETYPE ( &sockaddr_at) &__SOCKADDR_ONETYPE ( &sockaddr_ax25) &__SOCKADDR_ONETYPE ( &sockaddr_dl) &__SOCKADDR_ONETYPE ( &sockaddr_eon) &__SOCKADDR_ONETYPE ( &sockaddr_in) &__SOCKADDR_ONETYPE ( &sockaddr_in6) &__SOCKADDR_ONETYPE ( &sockaddr_inarp) &__SOCKADDR_ONETYPE ( &sockaddr_ipx) &__SOCKADDR_ONETYPE ( &sockaddr_iso) &__SOCKADDR_ONETYPE ( &sockaddr_ns) &__SOCKADDR_ONETYPE ( &sockaddr_un) &__SOCKADDR_ONETYPE ( &sockaddr_x25);}' unless defined(&__SOCKADDR_ALLTYPES);
eval 'sub __SOCKADDR_ONETYPE {
my($type) = @_;
eval q(1;);
}' unless defined(&__SOCKADDR_ONETYPE);
undef(&__SOCKADDR_ONETYPE) if defined(&__SOCKADDR_ONETYPE);
eval 'sub __SOCKADDR_ONETYPE {
my($type) = @_;
eval q( &const 1;);
}' unless defined(&__SOCKADDR_ONETYPE);
undef(&__SOCKADDR_ONETYPE) if defined(&__SOCKADDR_ONETYPE);
}
if(defined(&__USE_GNU)) {
}
if(defined(&__USE_GNU)) {
}
if(defined(&__USE_GNU)) {
}
if(defined(&__USE_GNU)) {
}
if(defined(&__USE_XOPEN2K)) {
}
if(defined(&__USE_MISC)) {
}
if((defined(&__USE_FORTIFY_LEVEL) ? &__USE_FORTIFY_LEVEL : undef) > 0 && defined (&__fortify_function)) {
require 'bits/socket2.ph';
}
}
1;