没有初等数学答案.
Mathematica给出
x (Log[1 - I E^(I x)] - Log[1 + I E^(I x)]) + I (PolyLog[2,-I E^(I x)] - PolyLog[2,I E^(I x)])