DSolve[(-1 + a)*a*y[x] + (-a + (2 + 4*a)*x)*Derivative[1][y][x] + x*(-1 + 4*x)*Derivative[2][y][x] == 0,y[x],x]