aboutsummaryrefslogtreecommitdiffstats
path: root/test/examples_SUITE.erl
diff options
context:
space:
mode:
Diffstat (limited to 'test/examples_SUITE.erl')
-rw-r--r--test/examples_SUITE.erl19
1 files changed, 19 insertions, 0 deletions
diff --git a/test/examples_SUITE.erl b/test/examples_SUITE.erl
index a461d79..fb95f3b 100644
--- a/test/examples_SUITE.erl
+++ b/test/examples_SUITE.erl
@@ -111,3 +111,22 @@ do_echo_get(Transport, Protocol, Config) ->
{response, nofin, 200, _} = gun:await(ConnPid, Ref),
{ok, <<"this is fun">>} = gun:await_body(ConnPid, Ref),
ok.
+
+echo_post(Config) ->
+ doc("POST parameter echo example."),
+ try
+ do_compile_and_start(echo_post),
+ do_echo_post(tcp, http, Config),
+ do_echo_post(tcp, http2, Config)
+ after
+ do_stop(echo_post)
+ end.
+
+do_echo_post(Transport, Protocol, Config) ->
+ ConnPid = gun_open([{port, 8080}, {type, Transport}, {protocol, Protocol}|Config]),
+ Ref = gun:post(ConnPid, "/", [
+ {<<"content-type">>, <<"application/octet-stream">>}
+ ], <<"echo=this+is+fun">>),
+ {response, nofin, 200, _} = gun:await(ConnPid, Ref),
+ {ok, <<"this is fun">>} = gun:await_body(ConnPid, Ref),
+ ok.