aboutsummaryrefslogtreecommitdiffstats
path: root/lib/diameter/test/diameter_failover_SUITE.erl
diff options
context:
space:
mode:
authorAnders Svensson <[email protected]>2011-12-02 19:16:49 +0100
committerAnders Svensson <[email protected]>2011-12-06 18:58:14 +0100
commit3fff6006bd00cc41ed6c93a029f38b2edb630b7d (patch)
tree7c3131722b6250689aafc985bb6972ffb5bb4a22 /lib/diameter/test/diameter_failover_SUITE.erl
parentb98219cb6131b8ac8a9cbed5e67e7d8d23dadd24 (diff)
downloadotp-3fff6006bd00cc41ed6c93a029f38b2edb630b7d.tar.gz
otp-3fff6006bd00cc41ed6c93a029f38b2edb630b7d.tar.bz2
otp-3fff6006bd00cc41ed6c93a029f38b2edb630b7d.zip
Use diameter_callback in failover suite
Diffstat (limited to 'lib/diameter/test/diameter_failover_SUITE.erl')
-rw-r--r--lib/diameter/test/diameter_failover_SUITE.erl33
1 files changed, 7 insertions, 26 deletions
diff --git a/lib/diameter/test/diameter_failover_SUITE.erl b/lib/diameter/test/diameter_failover_SUITE.erl
index aef2447587..429b6328e6 100644
--- a/lib/diameter/test/diameter_failover_SUITE.erl
+++ b/lib/diameter/test/diameter_failover_SUITE.erl
@@ -48,13 +48,9 @@
stop/1]).
%% diameter callbacks
--export([peer_up/3,
- peer_down/3,
- pick_peer/4,
+-export([pick_peer/4,
prepare_request/3,
- prepare_retransmit/3,
handle_answer/4,
- handle_error/4,
handle_request/3]).
-include("diameter.hrl").
@@ -90,7 +86,12 @@
{'Acct-Application-Id', [Dict:id()]},
{application, [{alias, ?APP_ALIAS},
{dictionary, Dict},
- {module, ?MODULE},
+ {module, #diameter_callback
+ {peer_up = false,
+ peer_down = false,
+ handle_error = false,
+ prepare_retransmit = false,
+ default = ?MODULE}},
{answer_errors, callback}]}]).
-define(SUCCESS, 2001).
@@ -180,16 +181,6 @@ set([H|T], Vs) ->
%% ===========================================================================
%% diameter callbacks
-%% peer_up/3
-
-peer_up(_SvcName, _Peer, State) ->
- State.
-
-%% peer_down/3
-
-peer_down(_SvcName, _Peer, State) ->
- State.
-
%% pick_peer/4
%% Choose a server other than SERVER3 or SERVER5 if possible.
@@ -218,22 +209,12 @@ prepare(#diameter_packet{msg = Req}, Caps) ->
{'Origin-Host', OH},
{'Origin-Realm', OR}]).
-%% prepare_retransmit/3
-
-prepare_retransmit(Pkt, ?CLIENT, _Peer) ->
- {send, Pkt}.
-
%% handle_answer/4
handle_answer(Pkt, _Req, ?CLIENT, _Peer) ->
#diameter_packet{msg = Rec, errors = []} = Pkt,
Rec.
-%% handle_error/4
-
-handle_error(Reason, _Req, ?CLIENT, _Peer) ->
- {error, Reason}.
-
%% handle_request/3
%% Only SERVER3 actually answers.