Assuming[{0<r<1,q>0},Integrate[q E^(-q x)(r^x(w-u)-w)/Log[r], {x,0,Infinity}]]