2014-04-26 13:46:55 +02:00
|
|
|
%% This module implements a loop handler for long-polling.
|
|
|
|
%% It starts by sending itself a message after 200ms,
|
|
|
|
%% then sends another after that for a total of 3 messages.
|
|
|
|
%% When it receives the last message, it sends a 102 reply back.
|
|
|
|
|
|
|
|
-module(long_polling_h).
|
|
|
|
|
2014-09-26 15:58:44 +03:00
|
|
|
-export([init/2]).
|
2014-04-26 13:46:55 +02:00
|
|
|
-export([info/3]).
|
|
|
|
-export([terminate/3]).
|
|
|
|
|
2014-09-26 15:58:44 +03:00
|
|
|
init(Req, _) ->
|
2014-04-26 13:46:55 +02:00
|
|
|
erlang:send_after(200, self(), timeout),
|
Allow passing options to sub protocols
Before this commit we had an issue where configuring a
Websocket connection was simply not possible without
doing magic, adding callbacks or extra return values.
The init/2 function only allowed setting hibernate
and timeout options.
After this commit, when switching to a different
type of handler you can either return
{module, Req, State}
or
{module, Req, State, Opts}
where Opts is any value (as far as the sub protocol
interface is concerned) and is ultimately checked
by the custom handlers.
A large protocol like Websocket would accept only
a map there, with many different options, while a
small interface like loop handlers would allow
passing hibernate and nothing else.
For Websocket, hibernate must be set from the
websocket_init/1 callback, because init/2 executes
in a separate process.
Sub protocols now have two callbacks: one with the
Opts value, one without.
The loop handler code was largely reworked and
simplified. It does not need to manage a timeout
or read from the socket anymore, it's the job of
the protocol code. A lot of unnecessary stuff was
therefore removed.
Websocket compression must now be enabled from
the handler options instead of per listener. This
means that a project can have two separate Websocket
handlers with different options. Compression is
still disabled by default, and the idle_timeout
value was changed from inifnity to 60000 (60 seconds),
as that's safer and is also a good value for mobile
devices.
2017-02-18 18:26:20 +01:00
|
|
|
{cowboy_loop, Req, 2, hibernate}.
|
2014-04-26 13:46:55 +02:00
|
|
|
|
|
|
|
info(timeout, Req, 0) ->
|
2016-08-10 11:52:41 +02:00
|
|
|
%% @todo Why 102?
|
2014-11-07 19:22:36 +02:00
|
|
|
{stop, cowboy_req:reply(102, Req), 0};
|
2014-04-26 13:46:55 +02:00
|
|
|
info(timeout, Req, Count) ->
|
|
|
|
erlang:send_after(200, self(), timeout),
|
2014-09-30 20:12:13 +03:00
|
|
|
{ok, Req, Count - 1, hibernate}.
|
2014-04-26 13:46:55 +02:00
|
|
|
|
2014-11-07 19:22:36 +02:00
|
|
|
terminate(stop, _, 0) ->
|
2014-04-26 13:46:55 +02:00
|
|
|
ok;
|
|
|
|
terminate({error, overflow}, _, _) ->
|
|
|
|
ok.
|