1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
%% This module implements a loop handler that sends
%% itself a timeout that will intentionally arrive
%% too late, as it configures itself to only wait
%% 200ms before closing the connection in init/3.
%% This results in a 204 reply being sent back by Cowboy.
-module(loop_handler_timeout_h).
-behaviour(cowboy_loop_handler).
-export([init/3]).
-export([info/3]).
-export([terminate/3]).
init(_, Req, _) ->
erlang:send_after(1000, self(), timeout),
{loop, Req, undefined, 200, hibernate}.
info(timeout, Req, State) ->
{ok, cowboy_req:reply(500, Req), State}.
terminate({normal, timeout}, _, _) ->
ok.
|
