diff options
| author | Anders Svensson <[email protected]> | 2017-09-03 13:31:40 +0200 |
|---|---|---|
| committer | Anders Svensson <[email protected]> | 2017-09-03 13:31:40 +0200 |
| commit | 58d6f069744d9528a5059b8b4398f3368c798150 (patch) | |
| tree | 7760c042d59ed9809f8ac2ddbe99a427281c99a9 /lib/diameter/test/diameter_traffic_SUITE.erl | |
| parent | 50da40f8404969b5a1533026d49e2e2669ffadff (diff) | |
| parent | a3749fd240260958053f90539b0f7e04e720d070 (diff) | |
| download | otp-58d6f069744d9528a5059b8b4398f3368c798150.tar.gz otp-58d6f069744d9528a5059b8b4398f3368c798150.tar.bz2 otp-58d6f069744d9528a5059b8b4398f3368c798150.zip | |
Merge branch 'anders/diameter/sctp/OTP-10889' into maint
* anders/diameter/sctp/OTP-10889:
Send unordered on all outbound diameter_sctp streams
Delay rotation of diameter_sctp outbound streams
Exercise unordered delivery in traffic suite
Use unordered delivery on a lone outbound stream in diameter_sctp
Diffstat (limited to 'lib/diameter/test/diameter_traffic_SUITE.erl')
| -rw-r--r-- | lib/diameter/test/diameter_traffic_SUITE.erl | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/lib/diameter/test/diameter_traffic_SUITE.erl b/lib/diameter/test/diameter_traffic_SUITE.erl index 6f30055a0a..f2c7ac0ff9 100644 --- a/lib/diameter/test/diameter_traffic_SUITE.erl +++ b/lib/diameter/test/diameter_traffic_SUITE.erl @@ -114,6 +114,8 @@ %% diameter_{tcp,sctp} callbacks -export([message/3]). +-include_lib("kernel/include/inet_sctp.hrl"). + -include("diameter.hrl"). -include("diameter_gen_base_rfc3588.hrl"). -include("diameter_gen_base_accounting.hrl"). @@ -533,7 +535,7 @@ add_transports(Config) -> | server_apps()] ++ [{spawn_opt, {erlang, spawn, []}} || CS]), Cs = [?util:connect(CN, - [T, {sender, CS}], + [T, {sender, CS} | client_opts(T)], LRef, [{id, Id} | client_apps(R, [{'Origin-State-Id', origin(Id)}])]) @@ -543,6 +545,14 @@ add_transports(Config) -> Id <- [{D,E}]], ?util:write_priv(Config, "transport", [LRef | Cs]). +client_opts(tcp) -> + []; +client_opts(sctp) -> + [{sctp_initmsg, #sctp_initmsg{num_ostreams = N, + max_instreams = 5}} + || N <- [rand:uniform(8)], + N =< 6]. + server_apps() -> B = have_nas(), [{applications, [diameter_gen_base_rfc3588, |