File Manager

X7ROOT File Manager

Current Path: /usr/lib64/perl5/bits

📁 ..
📄 byteswap-16.ph(730 B)
📄 byteswap.ph(3.79 KB)
📄 endian.ph(247 B)
📄 ioctl-types.ph(1.72 KB)
📄 ioctls.ph(3.74 KB)
📄 pthreadtypes.ph(3.92 KB)
📄 select.ph(1.36 KB)
📄 select2.ph(490 B)
📄 sigaction.ph(1.5 KB)
📄 sigcontext.ph(860 B)
📄 siginfo.ph(6.79 KB)
📄 signum.ph(2.76 KB)
📄 sigset.ph(2.99 KB)
📄 sigstack.ph(408 B)
📄 sigthread.ph(346 B)
📄 sockaddr.ph(507 B)
📄 socket.ph(12.27 KB)
📄 socket2.ph(177 B)
📄 socket_type.ph(766 B)
📄 syscall.ph(73.15 KB)
📄 syslog-ldbl.ph(353 B)
📄 syslog-path.ph(363 B)
📄 syslog.ph(403 B)
📄 time.ph(1.76 KB)
📄 timex.ph(3.03 KB)
📄 types.ph(2.51 KB)
📄 typesizes.ph(3.87 KB)
📄 uio.ph(581 B)
📄 waitflags.ph(731 B)
📄 waitstatus.ph(2.52 KB)
📄 wordsize.ph(457 B)

Editing: byteswap.ph

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

if(!defined (&_BYTESWAP_H)  && !defined (&_NETINET_IN_H)  && !defined (&_ENDIAN_H)) {
    die("Never use <bits/byteswap.h> directly; include <byteswap.h> instead.");
}
unless(defined(&_BITS_BYTESWAP_H)) {
    eval 'sub _BITS_BYTESWAP_H () {1;}' unless defined(&_BITS_BYTESWAP_H);
    require 'features.ph';
    require 'bits/types.ph';
    require 'bits/wordsize.ph';
    eval 'sub __bswap_constant_16 {
        my($x) = @_;
	    eval q(( (((($x) >> 8) & 0xff) | ((($x) & 0xff) << 8))));
    }' unless defined(&__bswap_constant_16);
    require 'bits/byteswap-16.ph';
    eval 'sub __bswap_constant_32 {
        my($x) = @_;
	    eval q((((($x) & 0xff000000) >> 24) | ((($x) & 0xff0000) >> 8) | ((($x) & 0xff00) << 8) | ((($x) & 0xff) << 24)));
    }' unless defined(&__bswap_constant_32);
    if(defined(&__GNUC__)) {
	if( &__GNUC_PREREQ (4, 3)) {
	    eval 'sub __bswap_32 {
	        my($__bsx) = @_;
    		eval q({  &__builtin_bswap32 ($__bsx); });
	    }' unless defined(&__bswap_32);
	}
 elsif((defined(&__GNUC__) ? &__GNUC__ : undef) >= 2) {
	    if((defined(&__WORDSIZE) ? &__WORDSIZE : undef) == 64|| (defined (&__i486__) || defined (&__pentium__) || defined (&__pentiumpro__) || defined (&__pentium4__) || defined (&__k8__) || defined (&__athlon__) || defined (&__k6__) || defined (&__nocona__) || defined (&__core2__) || defined (&__geode__) || defined (&__amdfam10__))) {
		eval 'sub __bswap_32 {
		    my($x) = @_;
    		    eval q(\\"(assembly code)\\");
		}' unless defined(&__bswap_32);
	    } else {
		eval 'sub __bswap_32 {
		    my($x) = @_;
    		    eval q(\\"(assembly code)\\");
		}' unless defined(&__bswap_32);
	    }
	} else {
	    eval 'sub __bswap_32 {
	        my($x) = @_;
    		eval q(( &__extension__ ({ \'unsigned int __x\' = ($x);  &__bswap_constant_32 ( &__x); })));
	    }' unless defined(&__bswap_32);
	}
    } else {
	eval 'sub __bswap_32 {
	    my($__bsx) = @_;
    	    eval q({  &__bswap_constant_32 ($__bsx); });
	}' unless defined(&__bswap_32);
    }
    if( &__GNUC_PREREQ (2, 0)) {
	eval 'sub __bswap_constant_64 {
	    my($x) = @_;
    	    eval q(( &__extension__ (((($x) & 0xff00000000000000) >> 56) | ((($x) & 0xff000000000000) >> 40) | ((($x) & 0xff0000000000) >> 24) | ((($x) & 0xff00000000) >> 8) | ((($x) & 0xff000000) << 8) | ((($x) & 0xff0000) << 24) | ((($x) & 0xff00) << 40) | ((($x) & 0xff) << 56))));
	}' unless defined(&__bswap_constant_64);
	if( &__GNUC_PREREQ (4, 3)) {
	    eval 'sub __bswap_64 {
	        my($__bsx) = @_;
    		eval q({  &__builtin_bswap64 ($__bsx); });
	    }' unless defined(&__bswap_64);
	}
 elsif((defined(&__WORDSIZE) ? &__WORDSIZE : undef) == 64) {
	    eval 'sub __bswap_64 {
	        my($x) = @_;
    		eval q(\\"(assembly code)\\");
	    }' unless defined(&__bswap_64);
	} else {
	    eval 'sub __bswap_64 {
	        my($x) = @_;
    		eval q(( &__extension__ ({ \'union union\' {  &__extension__  &__uint64_t  &__ll; \'unsigned int __l\'[2]; }  &__w,  &__r;  &if ( &__builtin_constant_p ($x))  ($__r->{__ll}) =  &__bswap_constant_64 ($x);  &else {  ($__w->{__ll}) = ($x);  ($__r->{__l[0]}) =  &__bswap_32 ( ($__w->{__l[1]}));  ($__r->{__l[1]}) =  &__bswap_32 ( ($__w->{__l[0]})); }  ($__r->{__ll}); })));
	    }' unless defined(&__bswap_64);
	}
    }
 elsif((defined(&__GLIBC_HAVE_LONG_LONG) ? &__GLIBC_HAVE_LONG_LONG : undef)) {
	eval 'sub __bswap_constant_64 {
	    my($x) = @_;
    	    eval q((((($x) & 0xff00000000000000) >> 56) | ((($x) & 0xff000000000000) >> 40) | ((($x) & 0xff0000000000) >> 24) | ((($x) & 0xff00000000) >> 8) | ((($x) & 0xff000000) << 8) | ((($x) & 0xff0000) << 24) | ((($x) & 0xff00) << 40) | ((($x) & 0xff) << 56)));
	}' unless defined(&__bswap_constant_64);
	eval 'sub __bswap_64 {
	    my($__bsx) = @_;
    	    eval q({  &__bswap_constant_64 ($__bsx); });
	}' unless defined(&__bswap_64);
    }
}
1;

X7ROOT File Manager

Editing: byteswap.ph

Upload File

Create Folder