A pseudospectral method for the simulation of 3-D ultrasonic and seismic waves in heterogeneous poroelastic borehole environments