umgeher/cowboy
0
Fork 0
mirror of https://github.com/ninenines/cowboy.git synced 2025-07-14 12:20:24 +00:00
Code Issues Wiki Activity

Improve the reliability of some http_SUITE tests

Browse source
This commit is contained in:
Loïc Hoguin 2018-11-22 12:18:00 +01:00
parent 3f5af49cfd
commit 6f1a541fa2
No known key found for this signature in database
GPG key ID: 8A9DF795F6FED764
1 changed files with 10 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

17
test/http_SUITE.erl
View file

@ -228,17 +228,17 @@ idle_timeout_infinity(Config) ->
doc("Ensure the idle_timeout option accepts the infinity value."), doc("Ensure the idle_timeout option accepts the infinity value."),
{ok, _} = cowboy:start_clear(?FUNCTION_NAME, [{port, 0}], #{ {ok, _} = cowboy:start_clear(?FUNCTION_NAME, [{port, 0}], #{
env => #{dispatch => init_dispatch(Config)}, env => #{dispatch => init_dispatch(Config)},
request_timeout => 500,
idle_timeout => infinity idle_timeout => infinity
}), }),
Port = ranch:get_port(?FUNCTION_NAME), Port = ranch:get_port(?FUNCTION_NAME),
try try
ConnPid = gun_open([{type, tcp}, {protocol, http}, {port, Port}|Config]), ConnPid = gun_open([{type, tcp}, {protocol, http}, {port, Port}|Config]),
{ok, http} = gun:await_up(ConnPid), {ok, http} = gun:await_up(ConnPid),
_ = gun:post(ConnPid, "/echo/read_body", timer:sleep(500),
[{<<"content-type">>, <<"text/plain">>}]),
#{socket := Socket} = gun:info(ConnPid), #{socket := Socket} = gun:info(ConnPid),
Pid = get_remote_pid_tcp(Socket), Pid = get_remote_pid_tcp(Socket),
_ = gun:post(ConnPid, "/echo/read_body",
[{<<"content-type">>, <<"text/plain">>}]),
Ref = erlang:monitor(process, Pid), Ref = erlang:monitor(process, Pid),
receive receive
{'DOWN', Ref, process, Pid, Reason} -> {'DOWN', Ref, process, Pid, Reason} ->
@ -260,6 +260,7 @@ request_timeout_infinity(Config) ->
try try
ConnPid = gun_open([{type, tcp}, {protocol, http}, {port, Port}|Config]), ConnPid = gun_open([{type, tcp}, {protocol, http}, {port, Port}|Config]),
{ok, http} = gun:await_up(ConnPid), {ok, http} = gun:await_up(ConnPid),
timer:sleep(500),
#{socket := Socket} = gun:info(ConnPid), #{socket := Socket} = gun:info(ConnPid),
Pid = get_remote_pid_tcp(Socket), Pid = get_remote_pid_tcp(Socket),
Ref = erlang:monitor(process, Pid), Ref = erlang:monitor(process, Pid),
@ -340,10 +341,11 @@ set_options_idle_timeout(Config) ->
try try
ConnPid = gun_open([{type, tcp}, {protocol, http}, {port, Port}|Config]), ConnPid = gun_open([{type, tcp}, {protocol, http}, {port, Port}|Config]),
{ok, http} = gun:await_up(ConnPid), {ok, http} = gun:await_up(ConnPid),
_ = gun:post(ConnPid, "/set_options/idle_timeout_short", timer:sleep(500),
[{<<"content-type">>, <<"text/plain">>}]),
#{socket := Socket} = gun:info(ConnPid), #{socket := Socket} = gun:info(ConnPid),
Pid = get_remote_pid_tcp(Socket), Pid = get_remote_pid_tcp(Socket),
_ = gun:post(ConnPid, "/set_options/idle_timeout_short",
[{<<"content-type">>, <<"text/plain">>}]),
Ref = erlang:monitor(process, Pid), Ref = erlang:monitor(process, Pid),
receive receive
{'DOWN', Ref, process, Pid, _} -> {'DOWN', Ref, process, Pid, _} ->
@ -366,10 +368,11 @@ set_options_idle_timeout_only_applies_to_current_request(Config) ->
try try
ConnPid = gun_open([{type, tcp}, {protocol, http}, {port, Port}|Config]), ConnPid = gun_open([{type, tcp}, {protocol, http}, {port, Port}|Config]),
{ok, http} = gun:await_up(ConnPid), {ok, http} = gun:await_up(ConnPid),
StreamRef = gun:post(ConnPid, "/set_options/idle_timeout_long", timer:sleep(500),
[{<<"content-type">>, <<"text/plain">>}]),
#{socket := Socket} = gun:info(ConnPid), #{socket := Socket} = gun:info(ConnPid),
Pid = get_remote_pid_tcp(Socket), Pid = get_remote_pid_tcp(Socket),
StreamRef = gun:post(ConnPid, "/set_options/idle_timeout_long",
[{<<"content-type">>, <<"text/plain">>}]),
Ref = erlang:monitor(process, Pid), Ref = erlang:monitor(process, Pid),
receive receive
{'DOWN', Ref, process, Pid, Reason} -> {'DOWN', Ref, process, Pid, Reason} ->