require '_h2ph_pre.ph';

no warnings 'redefine';

unless(defined(&UDF_HASHTBLSIZE)) {
    sub UDF_HASHTBLSIZE () {	100;}
}
unless(defined(&VFSTOUDFFS)) {
    sub VFSTOUDFFS {
	local($mp) = @_;
	eval q(((($mp)-> &mnt_data)));
    }
}
unless(defined(&VTON)) {
    sub VTON {
	local($vp) = @_;
	eval q(((($vp)-> &v_data)));
    }
}
unless(defined(&RDSECTOR)) {
    sub RDSECTOR {
	local($devvp, $sector, $size, $bp) = @_;
	eval q( &bread($devvp, $sector << ( ($udfmp->{bshift}) -  &DEV_BSHIFT), $size,  &NOCRED, $bp));
    }
}
unless(defined(&udf_readlblks)) {
    sub udf_readlblks {
	local($udfmp,$sector,$size,$bp) = @_;
	eval q({ ( &RDSECTOR( ($udfmp->{im_devvp}), $sector, ($size +  ($udfmp->{bmask})) & ~ ($udfmp->{bmask}), $bp)); });
    }
}
unless(defined(&udf_readalblks)) {
    sub udf_readalblks {
	local($udfmp,$lsector,$size,$bp) = @_;
	eval q({  &daddr_t  &rablock,  &lblk; 'int'  &rasize;  &lblk = ($lsector +  ($udfmp->{part_start})) << ( ($udfmp->{bshift}) -  &DEV_BSHIFT);  &rablock = ( &lblk + 1) <<  ($udfmp->{bshift});  &rasize = $size; ( &breadn( ($udfmp->{im_devvp}),  &lblk, ($size +  ($udfmp->{bmask})) & ~ ($udfmp->{bmask}),  &rablock,  &rasize, 1,  &NOCRED, $bp)); });
    }
}
1;
