send_trailer(SocketData) ->
send(SocketData, <<"</stream:stream>">>).
--spec send(socket_state(), iodata()) -> ok | {error, inet:posix()}.
+-spec send(socket_state(), iodata()) -> ok | {error, closed | inet:posix()}.
send(#socket_state{sockmod = SockMod, socket = Socket} = SocketData, Data) ->
?DEBUG("(~s) Send XML on stream = ~p", [pp(SocketData), Data]),
- try SockMod:send(Socket, Data)
+ try SockMod:send(Socket, Data) of
+ {error, einval} -> {error, closed};
+ Result -> Result
catch _:badarg ->
%% Some modules throw badarg exceptions on closed sockets
%% TODO: their code should be improved
- {error, einval}
+ {error, closed}
end.
-spec send_xml(socket_state(),
Pkt.
-spec format_inet_error(atom()) -> string().
+format_inet_error(closed) ->
+ "connection closed";
format_inet_error(Reason) ->
case inet:format_error(Reason) of
"unknown POSIX error" -> atom_to_list(Reason);
select_lang(_, Lang) -> Lang.
-spec format_inet_error(atom()) -> string().
+format_inet_error(closed) ->
+ "connection closed";
format_inet_error(Reason) ->
case inet:format_error(Reason) of
"unknown POSIX error" -> atom_to_list(Reason);