diff options
| author | Anders Svensson <[email protected]> | 2016-05-24 14:58:50 +0200 |
|---|---|---|
| committer | Anders Svensson <[email protected]> | 2016-05-30 08:56:15 +0200 |
| commit | 80dc4f14b21cf316a8000f91cd77b1f0653afa7c (patch) | |
| tree | 100db1b5357bf27415e08270d272c3229c1c0922 /lib/diameter/test/diameter_relay_SUITE.erl | |
| parent | 5ca5fb71695ccdf7267007b8405f7a13497a2f17 (diff) | |
| download | otp-80dc4f14b21cf316a8000f91cd77b1f0653afa7c.tar.gz otp-80dc4f14b21cf316a8000f91cd77b1f0653afa7c.tar.bz2 otp-80dc4f14b21cf316a8000f91cd77b1f0653afa7c.zip | |
Fix leaking transports in traffic/relay suites
Listening transports weren't removed, which diameter_reg:subs/0 revealed.
Diffstat (limited to 'lib/diameter/test/diameter_relay_SUITE.erl')
| -rw-r--r-- | lib/diameter/test/diameter_relay_SUITE.erl | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/lib/diameter/test/diameter_relay_SUITE.erl b/lib/diameter/test/diameter_relay_SUITE.erl index f766f54a80..b5e520e642 100644 --- a/lib/diameter/test/diameter_relay_SUITE.erl +++ b/lib/diameter/test/diameter_relay_SUITE.erl @@ -171,8 +171,9 @@ connect(Config) -> Conns)). disconnect(Config) -> - lists:foreach(fun({{CN,CR},{SN,SR}}) -> ?util:disconnect(CN,CR,SN,SR) end, - ?util:read_priv(Config, "cfg")). + [] = [{T,C} || C <- ?util:read_priv(Config, "cfg"), + T <- [break(C)], + T /= ok]. stop_services(_Config) -> [] = [{H,T} || H <- ?SERVICES, @@ -184,6 +185,13 @@ stop(_Config) -> %% ---------------------------------------- +break({{CN,CR},{SN,SR}}) -> + try + ?util:disconnect(CN,CR,SN,SR) + after + diameter:remove_transport(SN, SR) + end. + server(Name, Dict) -> ok = diameter:start_service(Name, ?SERVICE(Name, Dict)), {Name, ?util:listen(Name, tcp)}. |