0
Fork 0
mirror of https://github.com/ninenines/cowboy.git synced 2025-07-15 12:40:25 +00:00
cowboy/examples/echo_post/src/toppage_handler.erl

33 lines
838 B
Erlang
Raw Normal View History

2012-07-21 22:19:13 +02:00
%% Feel free to use, reuse and abuse the code in this file.
%% @doc POST echo handler.
-module(toppage_handler).
-export([init/2]).
2012-07-21 22:19:13 +02:00
init(Req, Opts) ->
Method = cowboy_req:method(Req),
HasBody = cowboy_req:has_body(Req),
Req2 = maybe_echo(Method, HasBody, Req),
{ok, Req2, Opts}.
2012-07-21 22:19:13 +02:00
maybe_echo(<<"POST">>, true, Req) ->
{ok, PostVals, Req2} = cowboy_req:body_qs(Req),
2012-07-21 22:19:13 +02:00
Echo = proplists:get_value(<<"echo">>, PostVals),
2016-06-08 23:35:02 +02:00
echo(Echo, Req2),
Req2;
maybe_echo(<<"POST">>, false, Req) ->
2016-06-08 23:35:02 +02:00
cowboy_req:reply(400, [], <<"Missing body.">>, Req),
Req;
2012-07-21 22:19:13 +02:00
maybe_echo(_, _, Req) ->
%% Method not allowed.
2016-06-08 23:35:02 +02:00
cowboy_req:reply(405, Req),
Req.
2012-07-21 22:19:13 +02:00
echo(undefined, Req) ->
2012-08-27 13:28:57 +02:00
cowboy_req:reply(400, [], <<"Missing echo parameter.">>, Req);
2012-07-21 22:19:13 +02:00
echo(Echo, Req) ->
2016-06-08 23:35:02 +02:00
cowboy_req:reply(200, #{
<<"content-type">> => <<"text/plain; charset=utf-8">>
}, Echo, Req).