Integrate[Exp[1-(1/(x-1)^2)] + 2 + 1/Sqrt[1-Log[x-1]],x]