require '_h2ph_pre.ph';

unless(defined(&KRB_DB_DEFS)) {
    eval 'sub KRB_DB_DEFS () {1;}' unless defined(&KRB_DB_DEFS);
    require 'stdio.ph';
    eval 'sub KERB_M_NAME () {"K";}' unless defined(&KERB_M_NAME);
    eval 'sub KERB_M_INST () {"M";}' unless defined(&KERB_M_INST);
    eval 'sub KERB_DEFAULT_NAME () {"default";}' unless defined(&KERB_DEFAULT_NAME);
    eval 'sub KERB_DEFAULT_INST () {"";}' unless defined(&KERB_DEFAULT_INST);
    unless(defined(&DB_DIR)) {
	eval 'sub DB_DIR () {"/var/kerberos";}' unless defined(&DB_DIR);
    }
    unless(defined(&DBM_FILE)) {
	eval 'sub DBM_FILE () { &DB_DIR "/principal";}' unless defined(&DBM_FILE);
    }
    eval 'sub KERB_DB_HASH_MODULO () {64;}' unless defined(&KERB_DB_HASH_MODULO);
    eval 'sub KERB_DBL_EXCLUSIVE () {1;}' unless defined(&KERB_DBL_EXCLUSIVE);
    eval 'sub KERB_DBL_SHARED () {0;}' unless defined(&KERB_DBL_SHARED);
    eval 'sub KERB_DBL_BLOCKING () {0;}' unless defined(&KERB_DBL_BLOCKING);
    eval 'sub KERB_DBL_NONBLOCKING () {1;}' unless defined(&KERB_DBL_NONBLOCKING);
    eval 'sub KDB_GET_PROMPT () {1;}' unless defined(&KDB_GET_PROMPT);
    eval 'sub KDB_GET_TWICE () {2;}' unless defined(&KDB_GET_TWICE);
}
1;
