cowboy/test/http_handler_loop_timeout.erl

%% Feel free to use, reuse and abuse the code in this file.

-module(http_handler_loop_timeout).
-behaviour(cowboy_loop_handler).
-export([init/3, info/3, terminate/3]).

init({_, http}, Req, _) ->
	erlang:send_after(1000, self(), error_timeout),
	{loop, Req, undefined, 500, hibernate}.

info(error_timeout, Req, State) ->
	{ok, Req2} = cowboy_req:reply(500, Req),
	{ok, Req2, State}.

terminate({normal, timeout}, _, _) ->
	ok.
Add a test for HTTP handlers loop timeouts 2012-05-02 20:27:44 +02:00			`%% Feel free to use, reuse and abuse the code in this file.`

			`-module(http_handler_loop_timeout).`
Update behaviours for R15B+ This effectively drops the R14B compatibility. The cowboy_req:req() type will be introduced in a future commit. It refers to the #http_req{} record. 2012-08-27 12:46:42 +02:00			`-behaviour(cowboy_loop_handler).`
Replace terminate/2 with terminate/3, adding a Reason This should have been done a long time ago, back when I initially added Websocket support. This is the first part of two in improving loop handler support with regards to socket closure. Reason may include: {normal, shutdown} for the most normal shutdown, {normal, timeout} for a loop handler timeout shutdown, or {error, _} if an error occured. 2013-01-22 02:34:18 +01:00			`-export([init/3, info/3, terminate/3]).`
Add a test for HTTP handlers loop timeouts 2012-05-02 20:27:44 +02:00
			`init({_, http}, Req, _) ->`
			`erlang:send_after(1000, self(), error_timeout),`
			`{loop, Req, undefined, 500, hibernate}.`

			`info(error_timeout, Req, State) ->`
Rename cowboy_http_req to cowboy_req 2012-08-27 13:28:57 +02:00			`{ok, Req2} = cowboy_req:reply(500, Req),`
Add a test for HTTP handlers loop timeouts 2012-05-02 20:27:44 +02:00			`{ok, Req2, State}.`

Replace terminate/2 with terminate/3, adding a Reason This should have been done a long time ago, back when I initially added Websocket support. This is the first part of two in improving loop handler support with regards to socket closure. Reason may include: {normal, shutdown} for the most normal shutdown, {normal, timeout} for a loop handler timeout shutdown, or {error, _} if an error occured. 2013-01-22 02:34:18 +01:00			`terminate({normal, timeout}, _, _) ->`
Add a test for HTTP handlers loop timeouts 2012-05-02 20:27:44 +02:00			`ok.`