aboutsummaryrefslogtreecommitdiffstats
path: root/test/old_http_SUITE_data/rest_param_all.erl
diff options
context:
space:
mode:
Diffstat (limited to 'test/old_http_SUITE_data/rest_param_all.erl')
-rw-r--r--test/old_http_SUITE_data/rest_param_all.erl36
1 files changed, 36 insertions, 0 deletions
diff --git a/test/old_http_SUITE_data/rest_param_all.erl b/test/old_http_SUITE_data/rest_param_all.erl
new file mode 100644
index 0000000..784214b
--- /dev/null
+++ b/test/old_http_SUITE_data/rest_param_all.erl
@@ -0,0 +1,36 @@
+-module(rest_param_all).
+
+-export([init/2]).
+-export([allowed_methods/2]).
+-export([content_types_provided/2]).
+-export([get_text_plain/2]).
+-export([content_types_accepted/2]).
+-export([put_text_plain/2]).
+
+init(Req, Opts) ->
+ {cowboy_rest, Req, Opts}.
+
+allowed_methods(Req, State) ->
+ {[<<"GET">>, <<"PUT">>], Req, State}.
+
+content_types_provided(Req, State) ->
+ {[{{<<"text">>, <<"plain">>, '*'}, get_text_plain}], Req, State}.
+
+get_text_plain(Req, State) ->
+ {_, _, Param} = maps:get(media_type, Req, {<<"text">>, <<"plain">>, []}),
+ Body = if
+ Param == '*' ->
+ <<"'*'">>;
+ Param == [] ->
+ <<"[]">>;
+ Param /= [] ->
+ iolist_to_binary([[Key, $=, Value] || {Key, Value} <- Param])
+ end,
+ {Body, Req, State}.
+
+content_types_accepted(Req, State) ->
+ {[{{<<"text">>, <<"plain">>, '*'}, put_text_plain}], Req, State}.
+
+put_text_plain(Req0, State) ->
+ {ok, _, Req} = cowboy_req:read_body(Req0),
+ {true, Req, State}.