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