From acd19f773b5fb572ed2e090e5a938ab6b0c1391d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= <essen@ninenines.eu>
Date: Thu, 14 Nov 2013 15:22:22 +0100
Subject: Flush any message acceptors may receive and log them

Inspired by what supervisor does.
---
 src/ranch_acceptor.erl | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to 'src/ranch_acceptor.erl')

diff --git a/src/ranch_acceptor.erl b/src/ranch_acceptor.erl
index f838b7d..da1aac5 100644
--- a/src/ranch_acceptor.erl
+++ b/src/ranch_acceptor.erl
@@ -48,4 +48,15 @@ loop(LSocket, Transport, ConnsSup) ->
 		{error, Reason} when Reason =/= closed ->
 			ok
 	end,
+	flush(),
 	?MODULE:loop(LSocket, Transport, ConnsSup).
+
+flush() ->
+	receive Msg ->
+		error_logger:error_msg(
+			"Ranch acceptor received unexpected message: ~p~n",
+			[Msg]),
+		flush()
+	after 0 ->
+		ok
+	end.
-- 
cgit v1.2.3