%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/local/lib/perl5/site_perl/mach/5.32/
Upload File :
Create Path :
Current File : //usr/local/lib/perl5/site_perl/mach/5.32/skein_port.ph

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_SKEIN_PORT_H_)) {
    eval 'sub _SKEIN_PORT_H_ () {1;}' unless defined(&_SKEIN_PORT_H_);
    require 'sys/endian.ph';
    require 'sys/types.ph';
    unless(defined(&_OPENSOLARIS_SYS_TYPES_H_)) {
    }
    unless(defined(&RotL_64)) {
	eval 'sub RotL_64 {
	    my($x,$N) = @_;
    	    eval q(((($x) << ($N)) | (($x) >> (64-($N)))));
	}' unless defined(&RotL_64);
    }
    unless(defined(&SKEIN_NEED_SWAP)) {
	if((defined(&BYTE_ORDER) ? &BYTE_ORDER : undef) == (defined(&BIG_ENDIAN) ? &BIG_ENDIAN : undef)) {
	    eval 'sub SKEIN_NEED_SWAP () {(1);}' unless defined(&SKEIN_NEED_SWAP);
	    if(defined(&SKEIN_PORT_CODE)) {
	    }
	}
 elsif((defined(&BYTE_ORDER) ? &BYTE_ORDER : undef) == (defined(&LITTLE_ENDIAN) ? &LITTLE_ENDIAN : undef)) {
	    eval 'sub SKEIN_NEED_SWAP () {(0);}' unless defined(&SKEIN_NEED_SWAP);
	    eval 'sub Skein_Put64_LSB_First {
	        my($dst08,$src64,$bCnt) = @_;
    		eval q( &memcpy($dst08,$src64,$bCnt));
	    }' unless defined(&Skein_Put64_LSB_First);
	    eval 'sub Skein_Get64_LSB_First {
	        my($dst64,$src08,$wCnt) = @_;
    		eval q( &memcpy($dst64,$src08,8*($wCnt)));
	    }' unless defined(&Skein_Get64_LSB_First);
	} else {
	    die("Skein needs endianness setting!");
	}
    }
    unless(defined(&Skein_Swap64)) {
	if((defined(&SKEIN_NEED_SWAP) ? &SKEIN_NEED_SWAP : undef)) {
	    eval 'sub Skein_Swap64 {
	        my($w64) = @_;
    		eval q( &bswap64($w64));
	    }' unless defined(&Skein_Swap64);
	} else {
	    eval 'sub Skein_Swap64 {
	        my($w64) = @_;
    		eval q(($w64));
	    }' unless defined(&Skein_Swap64);
	}
    }
    unless(defined(&Skein_Put64_LSB_First)) {
	if(defined(&SKEIN_PORT_CODE)) {
	} else {
	}
    }
    unless(defined(&Skein_Get64_LSB_First)) {
	if(defined(&SKEIN_PORT_CODE)) {
	} else {
	}
    }
    unless(defined(&SKEIN256_Init)) {
	eval 'sub SKEIN256_Init () { &_libmd_SKEIN256_Init;}' unless defined(&SKEIN256_Init);
	eval 'sub SKEIN512_Init () { &_libmd_SKEIN512_Init;}' unless defined(&SKEIN512_Init);
	eval 'sub SKEIN1024_Init () { &_libmd_SKEIN1024_Init;}' unless defined(&SKEIN1024_Init);
    }
    unless(defined(&SKEIN256_Update)) {
	eval 'sub SKEIN256_Update () { &_libmd_SKEIN256_Update;}' unless defined(&SKEIN256_Update);
	eval 'sub SKEIN512_Update () { &_libmd_SKEIN512_Update;}' unless defined(&SKEIN512_Update);
	eval 'sub SKEIN1024_Update () { &_libmd_SKEIN1024_Update;}' unless defined(&SKEIN1024_Update);
    }
    unless(defined(&SKEIN256_Final)) {
	eval 'sub SKEIN256_Final () { &_libmd_SKEIN256_Final;}' unless defined(&SKEIN256_Final);
	eval 'sub SKEIN512_Final () { &_libmd_SKEIN512_Final;}' unless defined(&SKEIN512_Final);
	eval 'sub SKEIN1024_Final () { &_libmd_SKEIN1024_Final;}' unless defined(&SKEIN1024_Final);
    }
    unless(defined(&SKEIN256_End)) {
	eval 'sub SKEIN256_End () { &_libmd_SKEIN256_End;}' unless defined(&SKEIN256_End);
	eval 'sub SKEIN512_End () { &_libmd_SKEIN512_End;}' unless defined(&SKEIN512_End);
	eval 'sub SKEIN1024_End () { &_libmd_SKEIN1024_End;}' unless defined(&SKEIN1024_End);
    }
    unless(defined(&SKEIN256_Fd)) {
	eval 'sub SKEIN256_Fd () { &_libmd_SKEIN256_Fd;}' unless defined(&SKEIN256_Fd);
	eval 'sub SKEIN512_Fd () { &_libmd_SKEIN512_Fd;}' unless defined(&SKEIN512_Fd);
	eval 'sub SKEIN1024_Fd () { &_libmd_SKEIN1024_Fd;}' unless defined(&SKEIN1024_Fd);
    }
    unless(defined(&SKEIN256_FdChunk)) {
	eval 'sub SKEIN256_FdChunk () { &_libmd_SKEIN256_FdChunk;}' unless defined(&SKEIN256_FdChunk);
	eval 'sub SKEIN512_FdChunk () { &_libmd_SKEIN512_FdChunk;}' unless defined(&SKEIN512_FdChunk);
	eval 'sub SKEIN1024_FdChunk () { &_libmd_SKEIN1024_FdChunk;}' unless defined(&SKEIN1024_FdChunk);
    }
    unless(defined(&SKEIN256_File)) {
	eval 'sub SKEIN256_File () { &_libmd_SKEIN256_File;}' unless defined(&SKEIN256_File);
	eval 'sub SKEIN512_File () { &_libmd_SKEIN512_File;}' unless defined(&SKEIN512_File);
	eval 'sub SKEIN1024_File () { &_libmd_SKEIN1024_File;}' unless defined(&SKEIN1024_File);
    }
    unless(defined(&SKEIN256_FileChunk)) {
	eval 'sub SKEIN256_FileChunk () { &_libmd_SKEIN256_FileChunk;}' unless defined(&SKEIN256_FileChunk);
	eval 'sub SKEIN512_FileChunk () { &_libmd_SKEIN512_FileChunk;}' unless defined(&SKEIN512_FileChunk);
	eval 'sub SKEIN1024_FileChunk () { &_libmd_SKEIN1024_FileChunk;}' unless defined(&SKEIN1024_FileChunk);
    }
    unless(defined(&SKEIN256_Data)) {
	eval 'sub SKEIN256_Data () { &_libmd_SKEIN256_Data;}' unless defined(&SKEIN256_Data);
	eval 'sub SKEIN512_Data () { &_libmd_SKEIN512_Data;}' unless defined(&SKEIN512_Data);
	eval 'sub SKEIN1024_Data () { &_libmd_SKEIN1024_Data;}' unless defined(&SKEIN1024_Data);
    }
}
1;

Zerion Mini Shell 1.0