From 4ced1d09943a2f1a9e22426904560e93d41bb8bf Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Wed, 8 Jun 2016 23:35:02 +0200 Subject: Fix echo_post example --- test/examples_SUITE.erl | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) (limited to 'test/examples_SUITE.erl') 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. -- cgit v1.2.3