Ensure we can fetch the body in the info/3 function of loop handlers

test/http_handler_loop_recv.erl

@@ -0,0 +1,18 @@
+%% Feel free to use, reuse and abuse the code in this file.
+
+-module(http_handler_loop_recv).
+-behaviour(cowboy_loop_handler).
+-export([init/3, info/3, terminate/3]).
+
+init({_, http}, Req, _) ->
+	self() ! recv_timeout,
+	{loop, Req, undefined, 500, hibernate}.
+
+info(recv_timeout, Req, State) ->
+	{ok, Body, Req1} = cowboy_req:body(Req),
+	100000 = byte_size(Body),
+	{ok, Req2} = cowboy_req:reply(200, Req1),
+	{ok, Req2, State}.
+
+terminate({normal, shutdown}, _, _) ->
+	ok.