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/linker.ph

require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&_SYS_LINKER_H_)) {
    eval 'sub _SYS_LINKER_H_ () {1;}' unless defined(&_SYS_LINKER_H_);
    if(defined(&_KERNEL)) {
	require 'machine/elf.ph';
	require 'sys/kobj.ph';
	if(defined(&MALLOC_DECLARE)) {
	}
	eval 'sub LINKER_FILE_LINKED () {0x1;}' unless defined(&LINKER_FILE_LINKED);
    }
    eval 'sub MODINFO_END () {0x;}' unless defined(&MODINFO_END);
    eval 'sub MODINFO_NAME () {0x1;}' unless defined(&MODINFO_NAME);
    eval 'sub MODINFO_TYPE () {0x2;}' unless defined(&MODINFO_TYPE);
    eval 'sub MODINFO_ADDR () {0x3;}' unless defined(&MODINFO_ADDR);
    eval 'sub MODINFO_SIZE () {0x4;}' unless defined(&MODINFO_SIZE);
    eval 'sub MODINFO_EMPTY () {0x5;}' unless defined(&MODINFO_EMPTY);
    eval 'sub MODINFO_ARGS () {0x6;}' unless defined(&MODINFO_ARGS);
    eval 'sub MODINFO_METADATA () {0x8000;}' unless defined(&MODINFO_METADATA);
    eval 'sub MODINFOMD_AOUTEXEC () {0x1;}' unless defined(&MODINFOMD_AOUTEXEC);
    eval 'sub MODINFOMD_ELFHDR () {0x2;}' unless defined(&MODINFOMD_ELFHDR);
    eval 'sub MODINFOMD_SSYM () {0x3;}' unless defined(&MODINFOMD_SSYM);
    eval 'sub MODINFOMD_ESYM () {0x4;}' unless defined(&MODINFOMD_ESYM);
    eval 'sub MODINFOMD_DYNAMIC () {0x5;}' unless defined(&MODINFOMD_DYNAMIC);
    if(!defined( &__sparc64__)  && !defined( &__powerpc__)) {
	eval 'sub MODINFOMD_ENVP () {0x6;}' unless defined(&MODINFOMD_ENVP);
	eval 'sub MODINFOMD_HOWTO () {0x7;}' unless defined(&MODINFOMD_HOWTO);
	eval 'sub MODINFOMD_KERNEND () {0x8;}' unless defined(&MODINFOMD_KERNEND);
    }
    eval 'sub MODINFOMD_SHDR () {0x9;}' unless defined(&MODINFOMD_SHDR);
    eval 'sub MODINFOMD_NOCOPY () {0x8000;}' unless defined(&MODINFOMD_NOCOPY);
    eval 'sub MODINFOMD_DEPLIST () {(0x4001 |  &MODINFOMD_NOCOPY);}' unless defined(&MODINFOMD_DEPLIST);
    if(defined(&_KERNEL)) {
	eval 'sub MD_FETCH {
	    my($mdp, $info, $type) = @_;
    	    eval q(({ $type * &__p;  &__p = ($type *) &preload_search_info(($mdp),  &MODINFO_METADATA | ($info));  &__p ? * &__p : 0; }));
	}' unless defined(&MD_FETCH);
    }
    eval 'sub LINKER_HINTS_VERSION () {1;}' unless defined(&LINKER_HINTS_VERSION);
    if(defined(&_KERNEL)) {
	if(defined(&KLD_DEBUG)) {
	    eval 'sub KLD_DEBUG_FILE () {1;}' unless defined(&KLD_DEBUG_FILE);
	    eval 'sub KLD_DEBUG_SYM () {2;}' unless defined(&KLD_DEBUG_SYM);
	    eval 'sub KLD_DPF {
	        my($cat, $args) = @_;
    		eval q( &do {  &if ( &kld_debug &  &KLD_DEBUG_$cat)  &printf $args; }  &while (0));
	    }' unless defined(&KLD_DPF);
	} else {
	    eval 'sub KLD_DPF {
	        my($cat, $args) = @_;
    		eval q();
	    }' unless defined(&KLD_DPF);
	}
	eval 'sub ELF_RELOC_REL () {1;}' unless defined(&ELF_RELOC_REL);
	eval 'sub ELF_RELOC_RELA () {2;}' unless defined(&ELF_RELOC_RELA);
    }
    eval 'sub KLDSYM_LOOKUP () {1;}' unless defined(&KLDSYM_LOOKUP);
    eval 'sub LINKER_UNLOAD_NORMAL () {0;}' unless defined(&LINKER_UNLOAD_NORMAL);
    eval 'sub LINKER_UNLOAD_FORCE () {1;}' unless defined(&LINKER_UNLOAD_FORCE);
    unless(defined(&_KERNEL)) {
	require 'sys/cdefs.ph';
    }
}
1;

Man Man