config root man

Current Path : /usr/local/lib/perl5/site_perl/5.8.9/mach/sys/

FreeBSD hs32.drive.ne.jp 9.1-RELEASE FreeBSD 9.1-RELEASE #1: Wed Jan 14 12:18:08 JST 2015 root@hs32.drive.ne.jp:/sys/amd64/compile/hs32 amd64
Upload File :
Current File : //usr/local/lib/perl5/site_perl/5.8.9/mach/sys/ktr.ph

require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&_SYS_KTR_H_)) {
    eval 'sub _SYS_KTR_H_ () {1;}' unless defined(&_SYS_KTR_H_);
    eval 'sub KTR_GEN () {0x1;}' unless defined(&KTR_GEN);
    eval 'sub KTR_NET () {0x2;}' unless defined(&KTR_NET);
    eval 'sub KTR_DEV () {0x4;}' unless defined(&KTR_DEV);
    eval 'sub KTR_LOCK () {0x8;}' unless defined(&KTR_LOCK);
    eval 'sub KTR_SMP () {0x10;}' unless defined(&KTR_SMP);
    eval 'sub KTR_SUBSYS () {0x20;}' unless defined(&KTR_SUBSYS);
    eval 'sub KTR_PMAP () {0x40;}' unless defined(&KTR_PMAP);
    eval 'sub KTR_MALLOC () {0x80;}' unless defined(&KTR_MALLOC);
    eval 'sub KTR_TRAP () {0x100;}' unless defined(&KTR_TRAP);
    eval 'sub KTR_INTR () {0x200;}' unless defined(&KTR_INTR);
    eval 'sub KTR_SIG () {0x400;}' unless defined(&KTR_SIG);
    eval 'sub KTR_SPARE2 () {0x800;}' unless defined(&KTR_SPARE2);
    eval 'sub KTR_PROC () {0x1000;}' unless defined(&KTR_PROC);
    eval 'sub KTR_SYSC () {0x2000;}' unless defined(&KTR_SYSC);
    eval 'sub KTR_INIT () {0x4000;}' unless defined(&KTR_INIT);
    eval 'sub KTR_SPARE3 () {0x8000;}' unless defined(&KTR_SPARE3);
    eval 'sub KTR_SPARE4 () {0x10000;}' unless defined(&KTR_SPARE4);
    eval 'sub KTR_EVH () {0x20000;}' unless defined(&KTR_EVH);
    eval 'sub KTR_VFS () {0x40000;}' unless defined(&KTR_VFS);
    eval 'sub KTR_VOP () {0x80000;}' unless defined(&KTR_VOP);
    eval 'sub KTR_VM () {0x100000;}' unless defined(&KTR_VM);
    eval 'sub KTR_INET () {0x200000;}' unless defined(&KTR_INET);
    eval 'sub KTR_RUNQ () {0x400000;}' unless defined(&KTR_RUNQ);
    eval 'sub KTR_CONTENTION () {0x800000;}' unless defined(&KTR_CONTENTION);
    eval 'sub KTR_UMA () {0x1000000;}' unless defined(&KTR_UMA);
    eval 'sub KTR_CALLOUT () {0x2000000;}' unless defined(&KTR_CALLOUT);
    eval 'sub KTR_GEOM () {0x4000000;}' unless defined(&KTR_GEOM);
    eval 'sub KTR_BUSDMA () {0x8000000;}' unless defined(&KTR_BUSDMA);
    eval 'sub KTR_INET6 () {0x10000000;}' unless defined(&KTR_INET6);
    eval 'sub KTR_SCHED () {0x20000000;}' unless defined(&KTR_SCHED);
    eval 'sub KTR_BUF () {0x40000000;}' unless defined(&KTR_BUF);
    eval 'sub KTR_ALL () {0x7fffffff;}' unless defined(&KTR_ALL);
    if(defined(&KTR)) {
	unless(defined(&KTR_COMPILE)) {
	    eval 'sub KTR_COMPILE () {( &KTR_ALL);}' unless defined(&KTR_COMPILE);
	}
    } else {
	undef(&KTR_COMPILE) if defined(&KTR_COMPILE);
	eval 'sub KTR_COMPILE () {0;}' unless defined(&KTR_COMPILE);
    }
    eval 'sub KTR_VERSION () {2;}' unless defined(&KTR_VERSION);
    eval 'sub KTR_PARMS () {6;}' unless defined(&KTR_PARMS);
    unless(defined(&LOCORE)) {
	require 'sys/param.ph';
	require 'sys/_cpuset.ph';
	if(defined(&KTR)) {
	    eval 'sub CTR6 {
	        my($m, $format, $p1, $p2, $p3, $p4, $p5, $p6) = @_;
    		eval q( &do {  &if ( &KTR_COMPILE & )  &ktr_tracepoint(,  &__FILE__,  &__LINE__, $format, , , , , , ($p6)); }  &while(0));
	    }' unless defined(&CTR6);
	    eval 'sub CTR0 {
	        my($m, $format) = @_;
    		eval q( &CTR6($m, $format, 0, 0, 0, 0, 0, 0));
	    }' unless defined(&CTR0);
	    eval 'sub CTR1 {
	        my($m, $format, $p1) = @_;
    		eval q( &CTR6($m, $format, $p1, 0, 0, 0, 0, 0));
	    }' unless defined(&CTR1);
	    eval 'sub CTR2 {
	        my($m, $format, $p1, $p2) = @_;
    		eval q( &CTR6($m, $format, $p1, $p2, 0, 0, 0, 0));
	    }' unless defined(&CTR2);
	    eval 'sub CTR3 {
	        my($m, $format, $p1, $p2, $p3) = @_;
    		eval q( &CTR6($m, $format, $p1, $p2, $p3, 0, 0, 0));
	    }' unless defined(&CTR3);
	    eval 'sub CTR4 {
	        my($m, $format, $p1, $p2, $p3, $p4) = @_;
    		eval q( &CTR6($m, $format, $p1, $p2, $p3, $p4, 0, 0));
	    }' unless defined(&CTR4);
	    eval 'sub CTR5 {
	        my($m, $format, $p1, $p2, $p3, $p4, $p5) = @_;
    		eval q( &CTR6($m, $format, $p1, $p2, $p3, $p4, $p5, 0));
	    }' unless defined(&CTR5);
	} else {
	    eval 'sub CTR0 {
	        my($m, $d) = @_;
    		eval q(( &void)0);
	    }' unless defined(&CTR0);
	    eval 'sub CTR1 {
	        my($m, $d, $p1) = @_;
    		eval q(( &void)0);
	    }' unless defined(&CTR1);
	    eval 'sub CTR2 {
	        my($m, $d, $p1, $p2) = @_;
    		eval q(( &void)0);
	    }' unless defined(&CTR2);
	    eval 'sub CTR3 {
	        my($m, $d, $p1, $p2, $p3) = @_;
    		eval q(( &void)0);
	    }' unless defined(&CTR3);
	    eval 'sub CTR4 {
	        my($m, $d, $p1, $p2, $p3, $p4) = @_;
    		eval q(( &void)0);
	    }' unless defined(&CTR4);
	    eval 'sub CTR5 {
	        my($m, $d, $p1, $p2, $p3, $p4, $p5) = @_;
    		eval q(( &void)0);
	    }' unless defined(&CTR5);
	    eval 'sub CTR6 {
	        my($m, $d, $p1, $p2, $p3, $p4, $p5, $p6) = @_;
    		eval q(( &void)0);
	    }' unless defined(&CTR6);
	}
	eval 'sub TR0 {
	    my($d) = @_;
    	    eval q( &CTR0( &KTR_GEN, $d));
	}' unless defined(&TR0);
	eval 'sub TR1 {
	    my($d, $p1) = @_;
    	    eval q( &CTR1( &KTR_GEN, $d, $p1));
	}' unless defined(&TR1);
	eval 'sub TR2 {
	    my($d, $p1, $p2) = @_;
    	    eval q( &CTR2( &KTR_GEN, $d, $p1, $p2));
	}' unless defined(&TR2);
	eval 'sub TR3 {
	    my($d, $p1, $p2, $p3) = @_;
    	    eval q( &CTR3( &KTR_GEN, $d, $p1, $p2, $p3));
	}' unless defined(&TR3);
	eval 'sub TR4 {
	    my($d, $p1, $p2, $p3, $p4) = @_;
    	    eval q( &CTR4( &KTR_GEN, $d, $p1, $p2, $p3, $p4));
	}' unless defined(&TR4);
	eval 'sub TR5 {
	    my($d, $p1, $p2, $p3, $p4, $p5) = @_;
    	    eval q( &CTR5( &KTR_GEN, $d, $p1, $p2, $p3, $p4, $p5));
	}' unless defined(&TR5);
	eval 'sub TR6 {
	    my($d, $p1, $p2, $p3, $p4, $p5, $p6) = @_;
    	    eval q( &CTR6( &KTR_GEN, $d, $p1, $p2, $p3, $p4, $p5, $p6));
	}' unless defined(&TR6);
	eval 'sub KTR_ATTR_LINKED () {"linkedto:\\"%s\\"";}' unless defined(&KTR_ATTR_LINKED);
	eval 'sub KTR_EFMT {
	    my($egroup, $ident, $etype) = @_;
    	    eval q(\\"KTRGRAPH group:\\\\\\"\\" $egroup \\"\\\\\\", id:\\\\\\"%s\\\\\\", \\" $etype \\", attributes: \\");
	}' unless defined(&KTR_EFMT);
	eval 'sub KTR_EVENT0 {
	    my($m, $egroup, $ident, $etype, $edat) = @_;
    	    eval q( &CTR2($m,  &KTR_EFMT($egroup, $ident, $etype) \\"none\\", $ident, $edat));
	}' unless defined(&KTR_EVENT0);
	eval 'sub KTR_EVENT1 {
	    my($m, $egroup, $ident, $etype, $edat, $a0, $v0) = @_;
    	    eval q( &CTR3($m,  &KTR_EFMT($egroup, $ident, $etype) $a0, $ident, $edat, ($v0)));
	}' unless defined(&KTR_EVENT1);
	eval 'sub KTR_EVENT2 {
	    my($m, $egroup, $ident, $etype, $edat, $a0, $v0, $a1, $v1) = @_;
    	    eval q( &CTR4($m,  &KTR_EFMT($egroup, $ident, $etype) $a0 \\", \\" $a1, $ident, $edat, ($v0), ($v1)));
	}' unless defined(&KTR_EVENT2);
	eval 'sub KTR_EVENT3 {
	    my($m, $egroup, $ident, $etype, $edat, $a0, $v0, $a1, $v1, $a2, $v2) = @_;
    	    eval q( &CTR5($m, &KTR_EFMT($egroup, $ident, $etype) $a0 \\", \\" $a1 \\", \\" $a2, $ident, $edat, ($v0), ($v1), ($v2)));
	}' unless defined(&KTR_EVENT3);
	eval 'sub KTR_EVENT4 {
	    my($m, $egroup, $ident, $etype, $edat,				    $a0, $v0, $a1, $v1, $a2, $v2, $a3, $v3) = @_;
    	    eval q( &CTR6($m, &KTR_EFMT($egroup, $ident, $etype) $a0 \\", \\" $a1 \\", \\" $a2 \\", \\" $a3, $ident, $edat, ($v0), ($v1), ($v2), ($v3)));
	}' unless defined(&KTR_EVENT4);
	eval 'sub KTR_STATE0 {
	    my($m, $egroup, $ident, $state) = @_;
    	    eval q( &KTR_EVENT0($m, $egroup, $ident, \\"state:\\\\\\"%s\\\\\\"\\", $state));
	}' unless defined(&KTR_STATE0);
	eval 'sub KTR_STATE1 {
	    my($m, $egroup, $ident, $state, $a0, $v0) = @_;
    	    eval q( &KTR_EVENT1($m, $egroup, $ident, \\"state:\\\\\\"%s\\\\\\"\\", $state, $a0, ($v0)));
	}' unless defined(&KTR_STATE1);
	eval 'sub KTR_STATE2 {
	    my($m, $egroup, $ident, $state, $a0, $v0, $a1, $v1) = @_;
    	    eval q( &KTR_EVENT2($m, $egroup, $ident, \\"state:\\\\\\"%s\\\\\\"\\", $state, $a0, ($v0), $a1, ($v1)));
	}' unless defined(&KTR_STATE2);
	eval 'sub KTR_STATE3 {
	    my($m, $egroup, $ident, $state, $a0, $v0, $a1, $v1, $a2, $v2) = @_;
    	    eval q( &KTR_EVENT3($m, $egroup, $ident, \\"state:\\\\\\"%s\\\\\\"\\", $state, $a0, ($v0), $a1, ($v1), $a2, ($v2)));
	}' unless defined(&KTR_STATE3);
	eval 'sub KTR_STATE4 {
	    my($m, $egroup, $ident, $state, $a0, $v0, $a1, $v1, $a2, $v2, $a3, $v3) = @_;
    	    eval q( &KTR_EVENT4($m, $egroup, $ident, \\"state:\\\\\\"%s\\\\\\"\\", $state, $a0, ($v0), $a1, ($v1), $a2, ($v2), $a3, ($v3)));
	}' unless defined(&KTR_STATE4);
	eval 'sub KTR_COUNTER0 {
	    my($m, $egroup, $ident, $counter) = @_;
    	    eval q( &KTR_EVENT0($m, $egroup, $ident, \\"counter:%d\\", $counter));
	}' unless defined(&KTR_COUNTER0);
	eval 'sub KTR_COUNTER1 {
	    my($m, $egroup, $ident, $edat, $a0, $v0) = @_;
    	    eval q( &KTR_EVENT1($m, $egroup, $ident, \\"counter:%d\\",  &counter, $a0, ($v0)));
	}' unless defined(&KTR_COUNTER1);
	eval 'sub KTR_COUNTER2 {
	    my($m, $egroup, $ident, $counter, $a0, $v0, $a1, $v1) = @_;
    	    eval q( &KTR_EVENT2($m, $egroup, $ident, \\"counter:%d\\", $counter, $a0, ($v0), $a1, ($v1)));
	}' unless defined(&KTR_COUNTER2);
	eval 'sub KTR_COUNTER3 {
	    my($m, $egroup, $ident, $counter, $a0, $v0, $a1, $v1, $a2, $v2) = @_;
    	    eval q( &KTR_EVENT3($m, $egroup, $ident, \\"counter:%d\\", $counter, $a0, ($v0), $a1, ($v1), $a2, ($v2)));
	}' unless defined(&KTR_COUNTER3);
	eval 'sub KTR_COUNTER4 {
	    my($m, $egroup, $ident, $counter, $a0, $v0, $a1, $v1, $a2, $v2, $a3, $v3) = @_;
    	    eval q( &KTR_EVENT4($m, $egroup, $ident, \\"counter:%d\\", $counter, $a0, ($v0), $a1, ($v1), $a2, ($v2), $a3, ($v3)));
	}' unless defined(&KTR_COUNTER4);
	eval 'sub KTR_POINT0 {
	    my($m, $egroup, $ident, $point) = @_;
    	    eval q( &KTR_EVENT0($m, $egroup, $ident, \\"point:\\\\\\"%s\\\\\\"\\", $point));
	}' unless defined(&KTR_POINT0);
	eval 'sub KTR_POINT1 {
	    my($m, $egroup, $ident, $point, $a0, $v0) = @_;
    	    eval q( &KTR_EVENT1($m, $egroup, $ident, \\"point:\\\\\\"%s\\\\\\"\\", $point, $a0, ($v0)));
	}' unless defined(&KTR_POINT1);
	eval 'sub KTR_POINT2 {
	    my($m, $egroup, $ident, $point, $a0, $v0, $a1, $v1) = @_;
    	    eval q( &KTR_EVENT2($m, $egroup, $ident, \\"point:\\\\\\"%s\\\\\\"\\", $point, $a0, ($v0), $a1, ($v1)));
	}' unless defined(&KTR_POINT2);
	eval 'sub KTR_POINT3 {
	    my($m, $egroup, $ident, $point, $a0, $v0, $a1, $v1, $a2, $v2) = @_;
    	    eval q( &KTR_EVENT3($m, $egroup, $ident, \\"point:\\\\\\"%s\\\\\\"\\", $point, $a0, ($v0), $a1, ($v1), $a2, ($v2)));
	}' unless defined(&KTR_POINT3);
	eval 'sub KTR_POINT4 {
	    my($m, $egroup, $ident, $point, $a0, $v0, $a1, $v1, $a2, $v2, $a3, $v3) = @_;
    	    eval q( &KTR_EVENT4($m, $egroup, $ident, \\"point:\\\\\\"%s\\\\\\"\\", $point, $a0, ($v0), $a1, ($v1), $a2, ($v2), $a3, ($v3)));
	}' unless defined(&KTR_POINT4);
	if(((defined(&KTR_COMPILE) ? &KTR_COMPILE : undef) & (defined(&KTR_INIT) ? &KTR_INIT : undef)) != 0) {
	    eval 'sub ITR0 {
	        my($d) = @_;
    		eval q( &CTR0( &KTR_INIT, $d));
	    }' unless defined(&ITR0);
	    eval 'sub ITR1 {
	        my($d, $p1) = @_;
    		eval q( &CTR1( &KTR_INIT, $d, $p1));
	    }' unless defined(&ITR1);
	    eval 'sub ITR2 {
	        my($d, $p1, $p2) = @_;
    		eval q( &CTR2( &KTR_INIT, $d, $p1, $p2));
	    }' unless defined(&ITR2);
	    eval 'sub ITR3 {
	        my($d, $p1, $p2, $p3) = @_;
    		eval q( &CTR3( &KTR_INIT, $d, $p1, $p2, $p3));
	    }' unless defined(&ITR3);
	    eval 'sub ITR4 {
	        my($d, $p1, $p2, $p3, $p4) = @_;
    		eval q( &CTR4( &KTR_INIT, $d, $p1, $p2, $p3, $p4));
	    }' unless defined(&ITR4);
	    eval 'sub ITR5 {
	        my($d, $p1, $p2, $p3, $p4, $p5) = @_;
    		eval q( &CTR5( &KTR_INIT, $d, $p1, $p2, $p3, $p4, $p5));
	    }' unless defined(&ITR5);
	    eval 'sub ITR6 {
	        my($d, $p1, $p2, $p3, $p4, $p5, $p6) = @_;
    		eval q( &CTR6( &KTR_INIT, $d, $p1, $p2, $p3, $p4, $p5, $p6));
	    }' unless defined(&ITR6);
	} else {
	    eval 'sub ITR0 {
	        my($d) = @_;
    		eval q();
	    }' unless defined(&ITR0);
	    eval 'sub ITR1 {
	        my($d, $p1) = @_;
    		eval q();
	    }' unless defined(&ITR1);
	    eval 'sub ITR2 {
	        my($d, $p1, $p2) = @_;
    		eval q();
	    }' unless defined(&ITR2);
	    eval 'sub ITR3 {
	        my($d, $p1, $p2, $p3) = @_;
    		eval q();
	    }' unless defined(&ITR3);
	    eval 'sub ITR4 {
	        my($d, $p1, $p2, $p3, $p4) = @_;
    		eval q();
	    }' unless defined(&ITR4);
	    eval 'sub ITR5 {
	        my($d, $p1, $p2, $p3, $p4, $p5) = @_;
    		eval q();
	    }' unless defined(&ITR5);
	    eval 'sub ITR6 {
	        my($d, $p1, $p2, $p3, $p4, $p5, $p6) = @_;
    		eval q();
	    }' unless defined(&ITR6);
	}
    }
}
1;

Man Man