config root man

require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&STRING_LENGTH)) {
    sub STRING_LENGTH () {	128;}
}
if(defined(&INET6)) {
} else {
}
unless(defined(&STRN_CPY)) {
    sub STRN_CPY {
	my($d,$s,$l) = @_;
	eval q({  &strncpy(($d),($s),($l)); ($d)[($l)-1] = 0; });
    }
}
unless(defined(&STRN_EQ)) {
    sub STRN_EQ {
	my($x,$y,$l) = @_;
	eval q(( &strncasecmp(($x),($y),($l)) == 0));
    }
}
unless(defined(&STRN_NE)) {
    sub STRN_NE {
	my($x,$y,$l) = @_;
	eval q(( &strncasecmp(($x),($y),($l)) != 0));
    }
}
unless(defined(&STR_EQ)) {
    sub STR_EQ {
	my($x,$y) = @_;
	eval q(( &strcasecmp(($x),($y)) == 0));
    }
}
unless(defined(&STR_NE)) {
    sub STR_NE {
	my($x,$y) = @_;
	eval q(( &strcasecmp(($x),($y)) != 0));
    }
}
unless(defined(&STRING_UNKNOWN)) {
    sub STRING_UNKNOWN () {	"unknown";}
}
unless(defined(&STRING_PARANOID)) {
    sub STRING_PARANOID () {	"paranoid";}
}
unless(defined(&HOSTNAME_KNOWN)) {
    sub HOSTNAME_KNOWN {
	my($s) = @_;
	eval q(( &STR_NE(($s), &unknown)  &&  &STR_NE(($s), &paranoid)));
    }
}
unless(defined(&NOT_INADDR)) {
    sub NOT_INADDR {
	my($s) = @_;
	eval q(($s->[ &strspn($s,\"01234567890./\")] != 0));
    }
}
if(defined( &TLI) || defined( &PTX) || defined( &TLI_SEQUENT)) {
} else {
    eval 'sub fromhost () { &sock_host;}' unless defined(&fromhost);
}
if(defined(&__STDC__)) {
} else {
}
unless(defined(&RQ_FILE)) {
    sub RQ_FILE () {	1;}
}
unless(defined(&RQ_DAEMON)) {
    sub RQ_DAEMON () {	2;}
}
unless(defined(&RQ_USER)) {
    sub RQ_USER () {	3;}
}
unless(defined(&RQ_CLIENT_NAME)) {
    sub RQ_CLIENT_NAME () {	4;}
}
unless(defined(&RQ_CLIENT_ADDR)) {
    sub RQ_CLIENT_ADDR () {	5;}
}
unless(defined(&RQ_CLIENT_SIN)) {
    sub RQ_CLIENT_SIN () {	6;}
}
unless(defined(&RQ_SERVER_NAME)) {
    sub RQ_SERVER_NAME () {	7;}
}
unless(defined(&RQ_SERVER_ADDR)) {
    sub RQ_SERVER_ADDR () {	8;}
}
unless(defined(&RQ_SERVER_SIN)) {
    sub RQ_SERVER_SIN () {	9;}
}
unless(defined(&eval_daemon)) {
    sub eval_daemon {
	my($r) = @_;
	eval q((($r)-> &daemon));
    }
}
unless(defined(&eval_pid)) {
    sub eval_pid {
	my($r) = @_;
	eval q((($r)-> &pid));
    }
}
unless(defined(&sock_methods)) {
    sub sock_methods {
	my($r) = @_;
	eval q({ ($r)-> &hostname =  &sock_hostname; ($r)-> &hostaddr =  &sock_hostaddr; });
    }
}
if(defined( &TLI) || defined( &PTX) || defined( &TLI_SEQUENT)) {
}
if(defined(&__STDC__)) {
} else {
}
unless(defined(&AC_PERMIT)) {
    sub AC_PERMIT () {	1;}
}
unless(defined(&AC_DENY)) {
    sub AC_DENY () {	(-1);}
}
unless(defined(&AC_ERROR)) {
    sub AC_ERROR () {	 &AC_DENY;}
}
if(defined(&INET_ADDR_BUG)) {
    eval 'sub inet_addr () { &fix_inet_addr;}' unless defined(&inet_addr);
}
if(defined(&BROKEN_FGETS)) {
    eval 'sub fgets () { &fix_fgets;}' unless defined(&fgets);
}
if(defined(&RECVFROM_BUG)) {
    eval 'sub recvfrom () { &fix_recvfrom;}' unless defined(&recvfrom);
}
if(defined(&GETPEERNAME_BUG)) {
    eval 'sub getpeername () { &fix_getpeername;}' unless defined(&getpeername);
}
if(defined(&SOLARIS_24_GETHOSTBYNAME_BUG)) {
    eval 'sub gethostbyname () { &fix_gethostbyname;}' unless defined(&gethostbyname);
}
if(defined(&USE_STRSEP)) {
    eval 'sub strtok () { &fix_strtok;}' unless defined(&strtok);
}
if(defined(&LIBC_CALLS_STRTOK)) {
    eval 'sub strtok () { &my_strtok;}' unless defined(&strtok);
}
1;