aboutsummaryrefslogtreecommitdiffstats
path: root/examples/rest_basic_auth/src/toppage_h.erl
diff options
context:
space:
mode:
Diffstat (limited to 'examples/rest_basic_auth/src/toppage_h.erl')
-rw-r--r--examples/rest_basic_auth/src/toppage_h.erl28
1 files changed, 28 insertions, 0 deletions
diff --git a/examples/rest_basic_auth/src/toppage_h.erl b/examples/rest_basic_auth/src/toppage_h.erl
new file mode 100644
index 0000000..21b66ab
--- /dev/null
+++ b/examples/rest_basic_auth/src/toppage_h.erl
@@ -0,0 +1,28 @@
+%% Feel free to use, reuse and abuse the code in this file.
+
+%% @doc Handler with basic HTTP authorization.
+-module(toppage_h).
+
+-export([init/2]).
+-export([content_types_provided/2]).
+-export([is_authorized/2]).
+-export([to_text/2]).
+
+init(Req, Opts) ->
+ {cowboy_rest, Req, Opts}.
+
+is_authorized(Req, State) ->
+ case cowboy_req:parse_header(<<"authorization">>, Req) of
+ {basic, User = <<"Alladin">>, <<"open sesame">>} ->
+ {true, Req, User};
+ _ ->
+ {{false, <<"Basic realm=\"cowboy\"">>}, Req, State}
+ end.
+
+content_types_provided(Req, State) ->
+ {[
+ {<<"text/plain">>, to_text}
+ ], Req, State}.
+
+to_text(Req, User) ->
+ {<< "Hello, ", User/binary, "!\n" >>, Req, User}.