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