File Manager

003 File Manager

Current Path: /usr/local/lib/perl5/site_perl/mach/5.32/machine

usr / local / lib / perl5 / site_perl / mach / 5.32 / machine /

📁 ..
📄 _align.ph(85 B)
📄 _bus.ph(186 B)
📄 _inttypes.ph(88 B)
📄 _limits.ph(86 B)
📄 _stdint.ph(86 B)
📄 _types.ph(85 B)
📄 acpica_machdep.ph(93 B)
📄 apm_bios.ph(87 B)
📄 asm.ph(2.5 KB)
📄 asmacros.ph(4.5 KB)
📄 atomic.ph(23.93 KB)
📄 bus.ph(82 B)
📄 bus_dma.ph(207 B)
📄 clock.ph(303 B)
📄 counter.ph(1.6 KB)
📄 cpu.ph(1.38 KB)
📄 cpufunc.ph(21.3 KB)
📄 cputypes.ph(87 B)
📄 csan.ph(775 B)
📄 db_machdep.ph(2.72 KB)
📄 dump.ph(83 B)
📄 efi.ph(1003 B)
📄 elf.ph(82 B)
📄 endian.ph(85 B)
📄 exec.ph(236 B)
📄 fdt.ph(82 B)
📄 float.ph(84 B)
📄 floatingpoint.ph(238 B)
📄 fpu.ph(729 B)
📄 frame.ph(196 B)
📄 gdb_machdep.ph(1.85 KB)
📄 ieeefp.ph(5.91 KB)
📄 in_cksum.ph(1.19 KB)
📄 intr_machdep.ph(573 B)
📄 iodev.ph(659 B)
📄 iommu.ph(84 B)
📄 kdb.ph(956 B)
📄 limits.ph(374 B)
📄 md_var.ph(210 B)
📄 memdev.ph(324 B)
📄 metadata.ph(87 B)
📄 minidump.ph(355 B)
📄 mp_watchdog.ph(195 B)
📄 nexusvar.ph(186 B)
📄 npx.ph(82 B)
📄 ofw_machdep.ph(90 B)
📄 param.ph(5.11 KB)
📄 pcb.ph(1011 B)
📄 pci_cfgreg.ph(89 B)
📄 pcpu.ph(8.96 KB)
📄 pcpu_aux.ph(758 B)
📄 pmap.ph(13.6 KB)
📄 pmc_mdep.ph(3.2 KB)
📄 ppireg.ph(744 B)
📄 proc.ph(1.06 KB)
📄 procctl.ph(86 B)
📄 profile.ph(4.01 KB)
📄 psl.ph(82 B)
📄 ptrace.ph(85 B)
📄 pvclock.ph(86 B)
📄 reg.ph(82 B)
📄 reloc.ph(192 B)
📄 resource.ph(555 B)
📄 runq.ph(727 B)
📄 segments.ph(251 B)
📄 setjmp.ph(85 B)
📄 sf_buf.ph(305 B)
📄 sgx.ph(657 B)
📄 sgxreg.ph(2.68 KB)
📄 sigframe.ph(87 B)
📄 signal.ph(85 B)
📄 smp.ph(296 B)
📄 specialreg.ph(89 B)
📄 stack.ph(84 B)
📄 stdarg.ph(85 B)
📄 sysarch.ph(86 B)
📄 timerreg.ph(685 B)
📄 trap.ph(83 B)
📄 tss.ph(171 B)
📄 ucontext.ph(87 B)
📄 vdso.ph(83 B)
📄 vm.ph(1.04 KB)
📄 vmm.ph(11.92 KB)
📄 vmm_dev.ph(14.37 KB)
📄 vmm_instruction_emul.ph(384 B)
📄 vmm_snapshot.ph(2.65 KB)
📄 vmparam.ph(5.83 KB)

Editing: profile.ph

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_MACHINE_PROFILE_H_)) {
    eval 'sub _MACHINE_PROFILE_H_ () {1;}' unless defined(&_MACHINE_PROFILE_H_);
    unless(defined(&_SYS_CDEFS_H_)) {
	die("this\ file\ needs\ sys\/cdefs\.h\ as\ a\ prerequisite");
    }
    if(defined(&_KERNEL)) {
	eval 'sub FUNCTION_ALIGNMENT () {16;}' unless defined(&FUNCTION_ALIGNMENT);
	eval 'sub _MCOUNT_DECL () { &void  &mcount;}' unless defined(&_MCOUNT_DECL);
	eval 'sub MCOUNT () {1;}' unless defined(&MCOUNT);
	if(defined(&GUPROF)) {
	    eval 'sub MCOUNT_DECL {
	        my($s) = @_;
    		eval q();
	    }' unless defined(&MCOUNT_DECL);
	    eval 'sub MCOUNT_ENTER {
	        my($s) = @_;
    		eval q();
	    }' unless defined(&MCOUNT_ENTER);
	    eval 'sub MCOUNT_EXIT {
	        my($s) = @_;
    		eval q();
	    }' unless defined(&MCOUNT_EXIT);
	    if(defined(&__GNUCLIKE_ASM)) {
		eval 'sub MCOUNT_OVERHEAD {
		    my($label) = @_;
    		    eval q( &__asm  &__volatile(\\"pushq %0; call __mcount; popq %%rcx\\" : : \\"i\\" ($label) : \\"cx\\", \\"r10\\", \\"r11\\", \\"memory\\"));
		}' unless defined(&MCOUNT_OVERHEAD);
		eval 'sub MEXITCOUNT_OVERHEAD () {
		    eval q( &__asm  &__volatile(\\"call .mexitcount; 1:\\" : : : \\"r10\\", \\"r11\\", \\"memory\\"));
		}' unless defined(&MEXITCOUNT_OVERHEAD);
		eval 'sub MEXITCOUNT_OVERHEAD_GETLABEL {
		    my($labelp) = @_;
    		    eval q( &__asm  &__volatile(\\"movq $1b,%0\\" : \\"=rm\\" ($labelp)));
		}' unless defined(&MEXITCOUNT_OVERHEAD_GETLABEL);
	    } else {
		die("this\ file\ needs\ to\ be\ ported\ to\ your\ compiler");
	    }
	} else {
	    eval 'sub MCOUNT_DECL {
	        my($s) = @_;
    		eval q( &register_t $s;);
	    }' unless defined(&MCOUNT_DECL);
	    if(defined(&SMP)) {
		eval 'sub MCOUNT_ENTER {
		    my($s) = @_;
    		    eval q({ $s =  &intr_disable();  &while (! &atomic_cmpset_acq_int( &mcount_lock, 0, 1)) ; });
		}' unless defined(&MCOUNT_ENTER);
		eval 'sub MCOUNT_EXIT {
		    my($s) = @_;
    		    eval q({  &atomic_store_rel_int( &mcount_lock, 0);  &intr_restore($s); });
		}' unless defined(&MCOUNT_EXIT);
	    } else {
		eval 'sub MCOUNT_ENTER {
		    my($s) = @_;
    		    eval q({ $s =  &intr_disable(); });
		}' unless defined(&MCOUNT_ENTER);
		eval 'sub MCOUNT_EXIT {
		    my($s) = @_;
    		    eval q(( &intr_restore($s)));
		}' unless defined(&MCOUNT_EXIT);
	    }
	}
	eval 'sub MCOUNT_FROMPC_USER {
	    my($pc) = @_;
    	    eval q((($pc < ( &uintfptr_t) &VM_MAXUSER_ADDRESS) ? ( &uintfptr_t) &user : $pc));
	}' unless defined(&MCOUNT_FROMPC_USER);
	eval 'sub MCOUNT_FROMPC_INTR {
	    my($pc) = @_;
    	    eval q((($pc >= ( &uintfptr_t) &btrap  && $pc < ( &uintfptr_t) &eintr) ? (($pc >= ( &uintfptr_t) &bintr) ? ( &uintfptr_t) &bintr : ( &uintfptr_t) &btrap) : ~0));
	}' unless defined(&MCOUNT_FROMPC_INTR);
    } else {
	eval 'sub FUNCTION_ALIGNMENT () {4;}' unless defined(&FUNCTION_ALIGNMENT);
	eval 'sub _MCOUNT_DECL () { &static  &void  &_mcount( &uintfptr_t  &frompc,  &uintfptr_t  &selfpc)  &__used;  &static  &void  &_mcount;}' unless defined(&_MCOUNT_DECL);
	if(defined(&__GNUCLIKE_ASM)) {
	    eval 'sub MCOUNT () { &__asm("			\\n	.text				\\n	.p2align 4,0x90			\\n	.globl	.mcount			\\n	.type	.mcount,@function	\\n.mcount:				\\n	pushq	%rdi			\\n	pushq	%rsi			\\n	pushq	%rdx			\\n	pushq	%rcx			\\n	pushq	%r8			\\n	pushq	%r9			\\n	pushq	%rax			\\n	movq	8(%rbp),%rdi		\\n	movq	7*8(%rsp),%rsi		\\n	call	_mcount			\\n	popq	%rax			\\n	popq	%r9			\\n	popq	%r8			\\n	popq	%rcx			\\n	popq	%rdx			\\n	popq	%rsi			\\n	popq	%rdi			\\n	ret				\\n	.size	.mcount, . - .mcount");;}' unless defined(&MCOUNT);
	    if(0) {
		eval 'sub MCOUNT () { &void  &mcount() {  &uintfptr_t  &selfpc,  &frompc;  &__asm("movq 8(%%rbp),%0" : "=r" ( &selfpc));  &__asm("movq (%%rbp),%0" : "=r" ( &frompc));  &frompc = (( &uintfptr_t *) &frompc)[1];  &_mcount( &frompc,  &selfpc); };}' unless defined(&MCOUNT);
	    }
	} else {
	    eval 'sub MCOUNT () {1;}' unless defined(&MCOUNT);
	}
    }
    if(defined(&_KERNEL)) {
    } else {
	require 'sys/cdefs.ph';
	if(defined(&__GNUCLIKE_ASM)) {
	}
    }
}
1;

003 File Manager

Editing: profile.ph

Upload File

Create Folder