Sindbad~EG File Manager

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_SYS_LIBKERN_H_)) {
    eval 'sub _SYS_LIBKERN_H_ () {1;}' unless defined(&_SYS_LIBKERN_H_);
    require 'sys/cdefs.ph';
    require 'sys/types.ph';
    if(defined(&_KERNEL)) {
	require 'sys/systm.ph';
    }
    unless(defined(&LIBKERN_INLINE)) {
	eval 'sub LIBKERN_INLINE () { &static  &__inline;}' unless defined(&LIBKERN_INLINE);
	eval 'sub LIBKERN_BODY () {1;}' unless defined(&LIBKERN_BODY);
    }
    eval 'sub LIBKERN_LEN_BCD2BIN () {154;}' unless defined(&LIBKERN_LEN_BCD2BIN);
    eval 'sub LIBKERN_LEN_BIN2BCD () {100;}' unless defined(&LIBKERN_LEN_BIN2BCD);
    eval 'sub LIBKERN_LEN_HEX2ASCII () {36;}' unless defined(&LIBKERN_LEN_HEX2ASCII);
    eval 'sub bcd2bin {
        my($bcd) = @_;
	    eval q({  &KASSERT($bcd >= 0 && $bcd <  &LIBKERN_LEN_BCD2BIN, (\\"invalid bcd %d\\", $bcd)); ( $bcd2bin_data[$bcd]); });
    }' unless defined(&bcd2bin);
    eval 'sub bin2bcd {
        my($bin) = @_;
	    eval q({  &KASSERT($bin >= 0 && $bin <  &LIBKERN_LEN_BIN2BCD, (\\"invalid bin %d\\", $bin)); ( $bin2bcd_data[$bin]); });
    }' unless defined(&bin2bcd);
    eval 'sub hex2ascii {
        my($hex) = @_;
	    eval q({  &KASSERT($hex >= 0 && $hex <  &LIBKERN_LEN_HEX2ASCII, (\\"invalid hex %d\\", $hex)); ( $hex2ascii_data[$hex]); });
    }' unless defined(&hex2ascii);
    eval 'sub validbcd {
        my($bcd) = @_;
	    eval q({ ($bcd == 0|| ($bcd > 0 && $bcd <= 0x99  &&  $bcd2bin_data[$bcd] != 0)); });
    }' unless defined(&validbcd);
    eval 'sub ummax {
        my($a,$b) = @_;
	    eval q({ ($a > $b ? $a : $b); });
    }' unless defined(&ummax);
    eval 'sub ummin {
        my($a,$b) = @_;
	    eval q({ ($a < $b ? $a : $b); });
    }' unless defined(&ummin);
}
unless(defined(&HAVE_INLINE_FFS)) {
}
unless(defined(&HAVE_INLINE_FFSL)) {
}
unless(defined(&HAVE_INLINE_FFSLL)) {
}
unless(defined(&HAVE_INLINE_FLS)) {
}
unless(defined(&HAVE_INLINE_FLSL)) {
}
unless(defined(&HAVE_INLINE_FLSLL)) {
}
unless(defined(&bitcount64)) {
    sub bitcount64 {
	my($x) = @_;
	eval q( &__bitcount64(( &uint64_t)($x)));
    }
}
unless(defined(&bitcount32)) {
    sub bitcount32 {
	my($x) = @_;
	eval q( &__bitcount32(( &uint32_t)($x)));
    }
}
unless(defined(&bitcount16)) {
    sub bitcount16 {
	my($x) = @_;
	eval q( &__bitcount16(( &uint16_t)($x)));
    }
}
unless(defined(&bitcountl)) {
    sub bitcountl {
	my($x) = @_;
	eval q( &__bitcountl(($x)));
    }
}
unless(defined(&bitcount)) {
    sub bitcount {
	my($x) = @_;
	eval q( &__bitcount(($x)));
    }
}
if(defined(&SAN_PREFIX)) {
    unless(defined(&SAN_RUNTIME)) {
	eval 'sub strcpy {
	    my($d, $s) = @_;
    	    eval q( &SAN_INTERCEPTOR( &strcpy)(($d), ($s)));
	}' unless defined(&strcpy);
	eval 'sub strcmp {
	    my($s1, $s2) = @_;
    	    eval q( &SAN_INTERCEPTOR( &strcmp)(($s1), ($s2)));
	}' unless defined(&strcmp);
	eval 'sub strlen {
	    my($s) = @_;
    	    eval q( &SAN_INTERCEPTOR( &strlen)($s));
	}' unless defined(&strlen);
    }
} else {
    eval 'sub strcpy {
        my($d, $s) = @_;
	    eval q( &__builtin_strcpy(($d), ($s)));
    }' unless defined(&strcpy);
    eval 'sub strcmp {
        my($s1, $s2) = @_;
	    eval q( &__builtin_strcmp(($s1), ($s2)));
    }' unless defined(&strcmp);
    eval 'sub strlen {
        my($s) = @_;
	    eval q( &__builtin_strlen(($s)));
    }' unless defined(&strlen);
}
unless(defined(&index)) {
    sub index {
	my($p,$ch) = @_;
	eval q({ ( &strchr($p, $ch)); });
    }
}
unless(defined(&rindex)) {
    sub rindex {
	my($p,$ch) = @_;
	eval q({ ( &strrchr($p, $ch)); });
    }
}
eval 'sub FNM_NOMATCH () {1;}' unless defined(&FNM_NOMATCH);
eval 'sub FNM_NOESCAPE () {0x1;}' unless defined(&FNM_NOESCAPE);
eval 'sub FNM_PATHNAME () {0x2;}' unless defined(&FNM_PATHNAME);
eval 'sub FNM_PERIOD () {0x4;}' unless defined(&FNM_PERIOD);
eval 'sub FNM_LEADING_DIR () {0x8;}' unless defined(&FNM_LEADING_DIR);
eval 'sub FNM_CASEFOLD () {0x10;}' unless defined(&FNM_CASEFOLD);
eval 'sub FNM_IGNORECASE () { &FNM_CASEFOLD;}' unless defined(&FNM_IGNORECASE);
eval 'sub FNM_FILE_NAME () { &FNM_PATHNAME;}' unless defined(&FNM_FILE_NAME);
    }
1;