%PDF- %PDF-
| Direktori : /backups/router/usr/local/lib/perl5/site_perl/mach/5.36/sys/ |
| Current File : //backups/router/usr/local/lib/perl5/site_perl/mach/5.36/sys/jail.ph |
require '_h2ph_pre.ph';
no warnings qw(redefine misc);
unless(defined(&_SYS_JAIL_H_)) {
eval 'sub _SYS_JAIL_H_ () {1;}' unless defined(&_SYS_JAIL_H_);
if(defined(&_KERNEL)) {
}
eval 'sub JAIL_API_VERSION () {2;}' unless defined(&JAIL_API_VERSION);
unless(defined(&_KERNEL)) {
}
if(0) {
}
eval 'sub XPRISON_VERSION () {3;}' unless defined(&XPRISON_VERSION);
eval("sub PRISON_STATE_INVALID () { 0; }") unless defined(&PRISON_STATE_INVALID);
eval("sub PRISON_STATE_ALIVE () { 1; }") unless defined(&PRISON_STATE_ALIVE);
eval("sub PRISON_STATE_DYING () { 2; }") unless defined(&PRISON_STATE_DYING);
eval 'sub JAIL_CREATE () {0x1;}' unless defined(&JAIL_CREATE);
eval 'sub JAIL_UPDATE () {0x2;}' unless defined(&JAIL_UPDATE);
eval 'sub JAIL_ATTACH () {0x4;}' unless defined(&JAIL_ATTACH);
eval 'sub JAIL_DYING () {0x8;}' unless defined(&JAIL_DYING);
eval 'sub JAIL_SET_MASK () {0xf;}' unless defined(&JAIL_SET_MASK);
eval 'sub JAIL_GET_MASK () {0x8;}' unless defined(&JAIL_GET_MASK);
eval 'sub JAIL_SYS_DISABLE () {0;}' unless defined(&JAIL_SYS_DISABLE);
eval 'sub JAIL_SYS_NEW () {1;}' unless defined(&JAIL_SYS_NEW);
eval 'sub JAIL_SYS_INHERIT () {2;}' unless defined(&JAIL_SYS_INHERIT);
unless(defined(&_KERNEL)) {
} else {
require 'sys/queue.ph';
require 'sys/sysctl.ph';
require 'sys/lock.ph';
require 'sys/mutex.ph';
require 'sys/_task.ph';
eval 'sub JAIL_MAX () {999999;}' unless defined(&JAIL_MAX);
if(defined(&MALLOC_DECLARE)) {
}
}
if(defined(&_KERNEL) || defined(&_WANT_PRISON)) {
require 'sys/osd.ph';
eval 'sub HOSTUUIDLEN () {64;}' unless defined(&HOSTUUIDLEN);
eval 'sub DEFAULT_HOSTUUID () {"00000000-0000-0000-0000-000000000000";}' unless defined(&DEFAULT_HOSTUUID);
eval 'sub OSRELEASELEN () {32;}' unless defined(&OSRELEASELEN);
eval("sub PR_INET () { 0; }") unless defined(&PR_INET);
eval("sub PR_INET6 () { 1; }") unless defined(&PR_INET6);
eval("sub PR_FAMILY_MAX () { 2; }") unless defined(&PR_FAMILY_MAX);
}
if(defined(&_KERNEL)) {
eval 'sub PR_PERSIST () {0x1;}' unless defined(&PR_PERSIST);
eval 'sub PR_HOST () {0x2;}' unless defined(&PR_HOST);
eval 'sub PR_IP4_USER () {0x4;}' unless defined(&PR_IP4_USER);
eval 'sub PR_IP6_USER () {0x8;}' unless defined(&PR_IP6_USER);
eval 'sub PR_VNET () {0x10;}' unless defined(&PR_VNET);
eval 'sub PR_IP4_SADDRSEL () {0x80;}' unless defined(&PR_IP4_SADDRSEL);
eval 'sub PR_IP6_SADDRSEL () {0x100;}' unless defined(&PR_IP6_SADDRSEL);
eval 'sub PR_REMOVE () {0x1000000;}' unless defined(&PR_REMOVE);
eval 'sub PR_IP4 () {0x2000000;}' unless defined(&PR_IP4);
eval 'sub PR_IP6 () {0x4000000;}' unless defined(&PR_IP6);
eval 'sub PR_COMPLETE_PROC () {0x8000000;}' unless defined(&PR_COMPLETE_PROC);
eval 'sub PR_ALLOW_SET_HOSTNAME () {0x1;}' unless defined(&PR_ALLOW_SET_HOSTNAME);
eval 'sub PR_ALLOW_SYSVIPC () {0x2;}' unless defined(&PR_ALLOW_SYSVIPC);
eval 'sub PR_ALLOW_RAW_SOCKETS () {0x4;}' unless defined(&PR_ALLOW_RAW_SOCKETS);
eval 'sub PR_ALLOW_CHFLAGS () {0x8;}' unless defined(&PR_ALLOW_CHFLAGS);
eval 'sub PR_ALLOW_MOUNT () {0x10;}' unless defined(&PR_ALLOW_MOUNT);
eval 'sub PR_ALLOW_QUOTAS () {0x20;}' unless defined(&PR_ALLOW_QUOTAS);
eval 'sub PR_ALLOW_SOCKET_AF () {0x40;}' unless defined(&PR_ALLOW_SOCKET_AF);
eval 'sub PR_ALLOW_MLOCK () {0x80;}' unless defined(&PR_ALLOW_MLOCK);
eval 'sub PR_ALLOW_READ_MSGBUF () {0x100;}' unless defined(&PR_ALLOW_READ_MSGBUF);
eval 'sub PR_ALLOW_UNPRIV_DEBUG () {0x200;}' unless defined(&PR_ALLOW_UNPRIV_DEBUG);
eval 'sub PR_ALLOW_SUSER () {0x400;}' unless defined(&PR_ALLOW_SUSER);
eval 'sub PR_ALLOW_RESERVED_PORTS () {0x8000;}' unless defined(&PR_ALLOW_RESERVED_PORTS);
eval 'sub PR_ALLOW_KMEM_ACCESS () {0x10000;}' unless defined(&PR_ALLOW_KMEM_ACCESS);
eval 'sub PR_ALLOW_NFSD () {0x20000;}' unless defined(&PR_ALLOW_NFSD);
eval 'sub PR_ALLOW_ALL_STATIC () {0x387ff;}' unless defined(&PR_ALLOW_ALL_STATIC);
eval 'sub PR_ALLOW_DIFFERENCES () {( &PR_ALLOW_UNPRIV_DEBUG);}' unless defined(&PR_ALLOW_DIFFERENCES);
eval 'sub PR_METHOD_CREATE () {0;}' unless defined(&PR_METHOD_CREATE);
eval 'sub PR_METHOD_GET () {1;}' unless defined(&PR_METHOD_GET);
eval 'sub PR_METHOD_SET () {2;}' unless defined(&PR_METHOD_SET);
eval 'sub PR_METHOD_CHECK () {3;}' unless defined(&PR_METHOD_CHECK);
eval 'sub PR_METHOD_ATTACH () {4;}' unless defined(&PR_METHOD_ATTACH);
eval 'sub PR_METHOD_REMOVE () {5;}' unless defined(&PR_METHOD_REMOVE);
eval 'sub PR_MAXMETHOD () {6;}' unless defined(&PR_MAXMETHOD);
eval 'sub prison_unlock {
my($pr) = @_;
eval q({ &mtx_unlock( ($pr->{pr_mtx})); });
}' unless defined(&prison_unlock);
eval 'sub FOREACH_PRISON_CHILD {
my($ppr, $cpr) = @_;
eval q( &LIST_FOREACH($cpr, ($ppr)-> &pr_children, &pr_sibling));
}' unless defined(&FOREACH_PRISON_CHILD);
eval 'sub FOREACH_PRISON_DESCENDANT {
my($ppr, $cpr, $descend) = @_;
eval q( &for (($cpr) = ($ppr), ($descend) = 1; (($cpr) = ((($descend) && ! &LIST_EMPTY(($cpr)-> &pr_children)) ? &LIST_FIRST(($cpr)-> &pr_children) : (($cpr) == ($ppr) ? &NULL : ((($descend) = &LIST_NEXT($cpr, &pr_sibling) != &NULL) ? &LIST_NEXT($cpr, &pr_sibling) : ($cpr)-> &pr_parent))));) &if (!($descend)) ; &else);
}' unless defined(&FOREACH_PRISON_DESCENDANT);
eval 'sub FOREACH_PRISON_DESCENDANT_LOCKED {
my($ppr, $cpr, $descend) = @_;
eval q( &for (($cpr) = ($ppr), ($descend) = 1; (($cpr) = ((($descend) && ! &LIST_EMPTY(($cpr)-> &pr_children)) ? &LIST_FIRST(($cpr)-> &pr_children) : (($cpr) == ($ppr) ? &NULL : (( &prison_unlock($cpr), ($descend) = &LIST_NEXT($cpr, &pr_sibling) != &NULL) ? &LIST_NEXT($cpr, &pr_sibling) : ($cpr)-> &pr_parent))));) &if (($descend) ? ( &prison_lock($cpr), 0) : 1) ; &else);
}' unless defined(&FOREACH_PRISON_DESCENDANT_LOCKED);
eval 'sub FOREACH_PRISON_DESCENDANT_LOCKED_LEVEL {
my($ppr, $cpr, $descend, $level) = @_;
eval q( &for (($cpr) = ($ppr), ($descend) = 1, ($level) = 0; (($cpr) = ((($descend) && ! &LIST_EMPTY(($cpr)-> &pr_children)) ? ($level++, &LIST_FIRST(($cpr)-> &pr_children)) : (($cpr) == ($ppr) ? &NULL : (( &prison_unlock($cpr), ($descend) = &LIST_NEXT($cpr, &pr_sibling) != &NULL) ? &LIST_NEXT($cpr, &pr_sibling) : ($level--, ($cpr)-> &pr_parent)))));) &if (($descend) ? ( &prison_lock($cpr), 0) : 1) ; &else);
}' unless defined(&FOREACH_PRISON_DESCENDANT_LOCKED_LEVEL);
eval 'sub FOREACH_PRISON_DESCENDANT_PRE_POST {
my($ppr, $cpr, $descend) = @_;
eval q( &for (($cpr) = ($ppr), ($descend) = 1; (($cpr) = ($descend) ? (($descend) = ! &LIST_EMPTY(($cpr)-> &pr_children)) ? &LIST_FIRST(($cpr)-> &pr_children) : ($cpr) : (($descend) = &LIST_NEXT($cpr, &pr_sibling) != &NULL) ? &LIST_NEXT($cpr, &pr_sibling) : ($cpr->{pr_parent})) != ($ppr);));
}' unless defined(&FOREACH_PRISON_DESCENDANT_PRE_POST);
eval 'sub SYSCTL_JAIL_PARAM {
my($module, $param, $type, $fmt, $descr) = @_;
eval q( &SYSCTL_PROC( &_security_jail_param $module, &OID_AUTO, $param, ($type) | &CTLFLAG_MPSAFE, &NULL, 0, &sysctl_jail_param, $fmt, $descr));
}' unless defined(&SYSCTL_JAIL_PARAM);
eval 'sub SYSCTL_JAIL_PARAM_STRING {
my($module, $param, $access, $len, $descr) = @_;
eval q( &SYSCTL_PROC( &_security_jail_param $module, &OID_AUTO, $param, &CTLTYPE_STRING | &CTLFLAG_MPSAFE | ($access), &NULL, $len, &sysctl_jail_param, \\"A\\", $descr));
}' unless defined(&SYSCTL_JAIL_PARAM_STRING);
eval 'sub SYSCTL_JAIL_PARAM_STRUCT {
my($module, $param, $access, $len, $fmt, $descr) = @_;
eval q( &SYSCTL_PROC( &_security_jail_param $module, &OID_AUTO, $param, &CTLTYPE_STRUCT | &CTLFLAG_MPSAFE | ($access), &NULL, $len, &sysctl_jail_param, $fmt, $descr));
}' unless defined(&SYSCTL_JAIL_PARAM_STRUCT);
eval 'sub SYSCTL_JAIL_PARAM_NODE {
my($module, $descr) = @_;
eval q( &SYSCTL_NODE( &_security_jail_param, &OID_AUTO, $module, &CTLFLAG_MPSAFE, 0, $descr));
}' unless defined(&SYSCTL_JAIL_PARAM_NODE);
eval 'sub SYSCTL_JAIL_PARAM_SUBNODE {
my($parent, $module, $descr) = @_;
eval q( &SYSCTL_NODE( &_security_jail_param_$parent, &OID_AUTO, $module, &CTLFLAG_MPSAFE, 0, $descr));
}' unless defined(&SYSCTL_JAIL_PARAM_SUBNODE);
eval 'sub SYSCTL_JAIL_PARAM_SYS_NODE {
my($module, $access, $descr) = @_;
eval q( &SYSCTL_JAIL_PARAM_NODE($module, $descr); &SYSCTL_JAIL_PARAM( &_$module, , &CTLTYPE_INT | ($access), \\"E,jailsys\\", $descr));
}' unless defined(&SYSCTL_JAIL_PARAM_SYS_NODE);
eval 'sub jailed {
my($cred) = @_;
eval q(( ($cred->{cr_prison}) != &prison0));
}' unless defined(&jailed);
if(defined(&INET) || defined(&INET6)) {
}
if(defined(&INET)) {
}
if(defined(&INET6)) {
}
}
}
1;