DSolve[Derivative[1][y][x] == (x^3 + x^4 + Log[-1 + x]*y[x] + x*y[x]^2 + x^2*y[x]^2)/(x*Log[-1 + x]),y[x],x]