plot a multiple rule function in mathematica -

how can write code function (complex contour) similar in mathematica:

the direct way use graphics primatives (although think prefer felix's polarplot solution)

with[{q = pi/6},   graphics[{circle[{0, 0}, 1, {q, 2 pi - q}],     arrowheads[{{.05, .8}}],     arrow[{{cos[q] + 2, sin[q]}, {cos[q], sin[q]}}],     arrow[{{cos[q], sin[-q]}, {cos[q] + 2, sin[-q]}}],    fontsize -> medium, text["\[scriptcapitalc]", {2, sin[q]}, {0, -2}]},    axes -> true, plotrange -> {{-4, 6}, {-4, 4}}]] 

i guess if want actual function contour, maybe like

contour[t_, t0_: (5 pi/6)] := piecewise[{    {exp[i (t + pi)], -t0 < t < t0},    {t - t0 + exp[i (t0 + pi)], t >= t0},    {-t - t0 + exp[-i (t0 + pi)], t <= -t0}}]  parametricplot[through[{re, im}[contour[t]]], {t, -8, 8}, plotpoints -> 30] 

and add arrows plot, guess you'd have add them in manually (using epilog or drawing tools) or use 1 of packages modifies built-in plots.