%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /proc/self/root/backups/router/usr/local/lib/perl5/site_perl/mach/5.36/sys/
Upload File :
Create Path :
Current File : //proc/self/root/backups/router/usr/local/lib/perl5/site_perl/mach/5.36/sys/disk.ph

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_SYS_DISK_H_)) {
    eval 'sub _SYS_DISK_H_ () {1;}' unless defined(&_SYS_DISK_H_);
    require 'sys/ioccom.ph';
    require 'sys/kerneldump.ph';
    require 'sys/types.ph';
    require 'sys/disk_zone.ph';
    require 'sys/socket.ph';
    if(defined(&_KERNEL)) {
    }
    eval 'sub DIOCGSECTORSIZE () { &_IOR(ord(\'d\'), 128, \'u_int\');}' unless defined(&DIOCGSECTORSIZE);
    eval 'sub DIOCGMEDIASIZE () { &_IOR(ord(\'d\'), 129,  &off_t);}' unless defined(&DIOCGMEDIASIZE);
    eval 'sub DIOCGFWSECTORS () { &_IOR(ord(\'d\'), 130, \'u_int\');}' unless defined(&DIOCGFWSECTORS);
    eval 'sub DIOCGFWHEADS () { &_IOR(ord(\'d\'), 131, \'u_int\');}' unless defined(&DIOCGFWHEADS);
    eval 'sub DIOCGFLUSH () { &_IO(ord(\'d\'), 135);}' unless defined(&DIOCGFLUSH);
    eval 'sub DIOCGDELETE () { &_IOW(ord(\'d\'), 136,  $off_t[2]);}' unless defined(&DIOCGDELETE);
    eval 'sub DISK_IDENT_SIZE () {256;}' unless defined(&DISK_IDENT_SIZE);
    eval 'sub DIOCGIDENT () { &_IOR(ord(\'d\'), 137, \'char\'[ &DISK_IDENT_SIZE]);}' unless defined(&DIOCGIDENT);
    eval 'sub DIOCGPROVIDERNAME () { &_IOR(ord(\'d\'), 138, \'char\'[ &MAXPATHLEN]);}' unless defined(&DIOCGPROVIDERNAME);
    eval 'sub DIOCGSTRIPESIZE () { &_IOR(ord(\'d\'), 139,  &off_t);}' unless defined(&DIOCGSTRIPESIZE);
    eval 'sub DIOCGSTRIPEOFFSET () { &_IOR(ord(\'d\'), 140,  &off_t);}' unless defined(&DIOCGSTRIPEOFFSET);
    eval 'sub DIOCGPHYSPATH () { &_IOR(ord(\'d\'), 141, \'char\'[ &MAXPATHLEN]);}' unless defined(&DIOCGPHYSPATH);
    eval 'sub DIOCGATTR () { &_IOWR(ord(\'d\'), 142, \'struct diocgattr_arg\');}' unless defined(&DIOCGATTR);
    eval 'sub DIOCZONECMD () { &_IOWR(ord(\'d\'), 143, \'struct disk_zone_args\');}' unless defined(&DIOCZONECMD);
    unless(defined(&WITHOUT_NETDUMP)) {
	require 'net/if.ph';
	require 'netinet/in.ph';
	eval 'sub KDA_REMOVE () { &UINT8_MAX;}' unless defined(&KDA_REMOVE);
	eval 'sub KDA_REMOVE_ALL () {( &UINT8_MAX - 1);}' unless defined(&KDA_REMOVE_ALL);
	eval 'sub KDA_REMOVE_DEV () {( &UINT8_MAX - 2);}' unless defined(&KDA_REMOVE_DEV);
	eval 'sub KDA_APPEND () {( &UINT8_MAX - 3);}' unless defined(&KDA_APPEND);
	eval 'sub DIOCSKERNELDUMP () { &_IOW(ord(\'d\'), 145, \'struct diocskerneldump_arg\');}' unless defined(&DIOCSKERNELDUMP);
	eval 'sub DIOCGKERNELDUMP () { &_IOWR(ord(\'d\'), 146, \'struct diocskerneldump_arg\');}' unless defined(&DIOCGKERNELDUMP);
    }
}
1;

Zerion Mini Shell 1.0