From 4b6f1195c690e7532a11342921abdab3d9c9de6b Mon Sep 17 00:00:00 2001
From: Evgeny Khramtsov <ekhramtsov@process-one.net>
Date: Thu, 9 May 2019 22:06:23 +0300
Subject: [PATCH] Handle TCP errors in websockets

---
 src/ejabberd_websocket.erl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/src/ejabberd_websocket.erl b/src/ejabberd_websocket.erl
index e954b42c2..2dde8add2 100644
--- a/src/ejabberd_websocket.erl
+++ b/src/ejabberd_websocket.erl
@@ -203,6 +203,9 @@ ws_loop(FrameInfo, Socket, WsHandleLoopPid, SocketMode) ->
         {tcp_closed, _Socket} ->
             ?DEBUG("tcp connection was closed, exit", []),
             websocket_close(Socket, WsHandleLoopPid, SocketMode, 0);
+	{tcp_error, Socket, Reason} ->
+	    ?DEBUG("tcp connection error: ~s", [inet:format_error(Reason)]),
+	    websocket_close(Socket, WsHandleLoopPid, SocketMode, 0);
         {'DOWN', Ref, process, WsHandleLoopPid, Reason} ->
             Code = case Reason of
                        normal ->