aboutsummaryrefslogtreecommitdiffstats
path: root/lib/diameter/test/diameter_failover_SUITE.erl
diff options
context:
space:
mode:
authorAnders Svensson <[email protected]>2014-05-18 09:45:30 +0200
committerAnders Svensson <[email protected]>2014-05-18 10:10:14 +0200
commit089267c646e3cc8441383602573660a72735bd50 (patch)
tree8996742490ae514e16f0a9591d0f50bd6a584e37 /lib/diameter/test/diameter_failover_SUITE.erl
parent9d71674251e904efbe159ceb4f7049fedf12d26f (diff)
downloadotp-089267c646e3cc8441383602573660a72735bd50.tar.gz
otp-089267c646e3cc8441383602573660a72735bd50.tar.bz2
otp-089267c646e3cc8441383602573660a72735bd50.zip
Add check that request table is empty to failover suite
The way in which this suite causes transport connections to be broken - by stopping the service - makes it prone to orphaning entries in the request table, which is a bug we're about to fix.
Diffstat (limited to 'lib/diameter/test/diameter_failover_SUITE.erl')
-rw-r--r--lib/diameter/test/diameter_failover_SUITE.erl8
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/diameter/test/diameter_failover_SUITE.erl b/lib/diameter/test/diameter_failover_SUITE.erl
index dfd3253827..c1494dcdb1 100644
--- a/lib/diameter/test/diameter_failover_SUITE.erl
+++ b/lib/diameter/test/diameter_failover_SUITE.erl
@@ -1,7 +1,7 @@
%%
%% %CopyrightBegin%
%%
-%% Copyright Ericsson AB 2010-2013. All Rights Reserved.
+%% Copyright Ericsson AB 2010-2014. All Rights Reserved.
%%
%% The contents of this file are subject to the Erlang Public License,
%% Version 1.1, (the "License"); you may not use this file except in
@@ -47,6 +47,7 @@
send_discard_1/1,
send_discard_2/1,
stop_services/1,
+ empty/1,
stop/1]).
%% diameter callbacks
@@ -121,6 +122,7 @@ all() ->
send_discard_1,
send_discard_2,
stop_services,
+ empty,
stop].
%% ===========================================================================
@@ -147,6 +149,10 @@ stop_services(_Config) ->
T <- [diameter:stop_service(H)],
T /= ok].
+%% Ensure transports have been removed from request table.
+empty(_Config) ->
+ [] = ets:tab2list(diameter_request).
+
stop(_Config) ->
ok = diameter:stop().