Multiscale solver for subsurface poromechanical problems