SMPP server writen in Erlang