SIP server writen in erlang