mirror of
https://github.com/ninenines/cowboy.git
synced 2025-07-14 20:30:23 +00:00
30 lines
757 B
Erlang
30 lines
757 B
Erlang
|
%% Feel free to use, reuse and abuse the code in this file.
|
||
|
|
|
||
|
|
%% @doc Cookie handler.
|
||
|
|
-module(toppage_handler).
|
||
|
|
|
||
|
|
-export([init/3]).
|
||
|
|
-export([handle/2]).
|
||
|
|
-export([terminate/2]).
|
||
|
|
|
||
|
|
init(_Transport, Req, []) ->
|
||
|
|
{ok, Req, undefined}.
|
||
|
|
|
||
|
|
handle(Req, State) ->
|
||
|
|
NewValue = integer_to_list(random:uniform(1000000)),
|
||
|
|
Req2 = cowboy_req:set_resp_cookie(
|
||
|
|
<<"server">>, NewValue, [{path, <<"/">>}], Req),
|
||
|
|
{ClientCookie, Req3} = cowboy_req:cookie(<<"client">>, Req2),
|
||
|
|
{ServerCookie, Req4} = cowboy_req:cookie(<<"server">>, Req3),
|
||
|
|
{ok, Body} = toppage_dtl:render([
|
||
|
|
{client, ClientCookie},
|
||
|
|
{server, ServerCookie}
|
||
|
|
]),
|
||
|
|
{ok, Req5} = cowboy_req:reply(200,
|
||
|
|
[{<<"content-type">>, <<"text/html">>}],
|
||
|
|
Body, Req4),
|
||
|
|
{ok, Req5, State}.
|
||
|
|
|
||
|
|
terminate(_Req, _State) ->
|
||
|
|
ok.
|