Near-lithostatic pore pressure at seismogenic depths: a thermoporoelastic model