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