require '_h2ph_pre.ph';

unless(defined(&SF_ACKNOW)) {
    sub SF_ACKNOW () {	0x01;}
}
unless(defined(&SF_DELACK)) {
    sub SF_DELACK () {	0x02;}
}
unless(defined(&SF_HI)) {
    sub SF_HI () {	0x04;}
}
unless(defined(&SF_HO)) {
    sub SF_HO () {	0x08;}
}
unless(defined(&SF_PI)) {
    sub SF_PI () {	0x10;}
}
unless(defined(&SF_WIN)) {
    sub SF_WIN () {	0x20;}
}
unless(defined(&SF_RXT)) {
    sub SF_RXT () {	0x40;}
}
unless(defined(&SF_RVD)) {
    sub SF_RVD () {	0x80;}
}
unless(defined(&s_cc)) {
    sub s_cc () {	 ($s_shdr->{sp_cc});}
}
unless(defined(&s_dt)) {
    sub s_dt () {	 ($s_shdr->{sp_dt});}
}
unless(defined(&s_sid)) {
    sub s_sid () {	 ($s_shdr->{sp_sid});}
}
unless(defined(&s_did)) {
    sub s_did () {	 ($s_shdr->{sp_did});}
}
unless(defined(&s_seq)) {
    sub s_seq () {	 ($s_shdr->{sp_seq});}
}
unless(defined(&s_ack)) {
    sub s_ack () {	 ($s_shdr->{sp_ack});}
}
unless(defined(&s_alo)) {
    sub s_alo () {	 ($s_shdr->{sp_alo});}
}
unless(defined(&s_dport)) {
    sub s_dport () {	 ($s_idp->{idp_dna}->{x_port});}
}
unless(defined(&CUNIT)) {
    sub CUNIT () {	1024;}
}
unless(defined(&SF_SOOB)) {
    sub SF_SOOB () {	0x08;}
}
unless(defined(&SF_IOOB)) {
    sub SF_IOOB () {	0x10;}
}
unless(defined(&SF_NEWCALL)) {
    sub SF_NEWCALL () {	0x100;}
}
unless(defined(&SO_NEWCALL)) {
    sub SO_NEWCALL () {	10;}
}
unless(defined(&nstosppcb)) {
    sub nstosppcb {
	local($np) = @_;
	eval q((($np)-> &nsp_pcb));
    }
}
unless(defined(&sotosppcb)) {
    sub sotosppcb {
	local($so) = @_;
	eval q(( &nstosppcb( &sotonspcb($so))));
    }
}
if(defined(&_KERNEL)) {
    unless(defined(&sppstat)) {
	eval 'sub sppstat () { ($spp_istat->{newstats});}' unless defined(&sppstat);
    }
}
unless(defined(&SPP_ISSINCR)) {
    sub SPP_ISSINCR () {	128;}
}
if(defined(&sun)) {
    eval 'sub SSEQ_LT {
        local($a,$b) = @_;
	    eval q((( &xnsCbug = (($a)-($b))) < 0));
    }' unless defined(&SSEQ_LT);
    eval 'sub SSEQ_LEQ {
        local($a,$b) = @_;
	    eval q((( &xnsCbug = (($a)-($b))) <= 0));
    }' unless defined(&SSEQ_LEQ);
    eval 'sub SSEQ_GT {
        local($a,$b) = @_;
	    eval q((( &xnsCbug = (($a)-($b))) > 0));
    }' unless defined(&SSEQ_GT);
    eval 'sub SSEQ_GEQ {
        local($a,$b) = @_;
	    eval q((( &xnsCbug = (($a)-($b))) >= 0));
    }' unless defined(&SSEQ_GEQ);
} else {
    eval 'sub SSEQ_LT {
        local($a,$b) = @_;
	    eval q((((($a)-($b))) < 0));
    }' unless defined(&SSEQ_LT);
    eval 'sub SSEQ_LEQ {
        local($a,$b) = @_;
	    eval q((((($a)-($b))) <= 0));
    }' unless defined(&SSEQ_LEQ);
    eval 'sub SSEQ_GT {
        local($a,$b) = @_;
	    eval q((((($a)-($b))) > 0));
    }' unless defined(&SSEQ_GT);
    eval 'sub SSEQ_GEQ {
        local($a,$b) = @_;
	    eval q((((($a)-($b))) >= 0));
    }' unless defined(&SSEQ_GEQ);
}
1;
