aboutsummaryrefslogtreecommitdiffstats
path: root/test/handlers/loop_handler_timeout_info_h.erl
blob: 7a1ccba3cdd01cb3b04c4285196bd2a55315b30d (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
%% This module implements a loop handler that changes
%% the timeout value to 500ms after the first message
%% then sends itself another message after 1000ms.
%% It is expected to timeout, that is, reply a 299.

-module(loop_handler_timeout_info_h).

-export([init/2]).
-export([info/3]).
-export([terminate/3]).

init(Req, _) ->
	self() ! message,
	{cowboy_loop, Req, undefined}.

info(message, Req, State) ->
	erlang:send_after(500, self(), message),
	{ok, Req, State, 100};
info(timeout, Req, State) ->
	{stop, cowboy_req:reply(<<"299 OK!">>, Req), State}.

terminate(stop, _, _) ->
	ok.