anchor.diff:  -include_lib("radius/include/radius.hrl").
   -include("ocs_eap_codec.hrl").
   -include_lib("common_test/include/ct.hrl").
  +-include_lib("diameter/include/diameter.hrl").
  +-include_lib("diameter/include/diameter_gen_base_rfc6733.hrl").
  +-include_lib("../include/diameter_gen_nas_application_rfc7155.hrl").
  +-include_lib("../include/diameter_gen_cc_application_rfc4006.hrl").
  +
  +-define(SVC, diameter_client_service).
  +-define(BASE_APPLICATION_ID, 0).
  +-define(NAS_APPLICATION_ID, 1).
  +-define(CC_APPLICATION_ID, 4).
   
   %%---------------------------------------------------------------------
   %%  Test server callback functions
  
positive.code: 	Config1 = [{radius_shared_secret, SharedSecret} | Config],
  	ok = ocs:add_client({127, 0, 0, 1}, 3799, Protocol, SharedSecret),
  	NasID = atom_to_list(node()),
  	[{nas_id, NasID} | Config1].
  
  -spec end_per_suite(Config :: [tuple()]) -> any().
  %% Cleanup after the whole suite.
  %%
  end_per_suite(Config) ->
  	ok = ocs_test_lib:stop(),
  	ok = ocs:delete_subscriber("25252525"),
  	Config.
  
negative.code: -spec init_per_testcase(TestCase :: atom(), Config :: [tuple()]) -> Config :: [tuple()].
  %% Initialization before each test case.
  %%
  init_per_testcase(TestCase, Config) when
  		TestCase == diameter_accounting ->
  	UserName = "SlimShady",
  	Password = "TeRcEs",
  	{ok, [{auth, AuthInstance}, {acct, _}]} = application:get_env(ocs, diameter),
  	[{Address, Port, _}] = AuthInstance,
  	Secret = "s3cr3t",
  	ok = ocs:add_client(Address, Port, diameter, Secret),
  	ok = ocs:add_subscriber(UserName, Password, [], 1000000),
  	[{username, UserName}, {password, Password}] ++ Config;
  init_per_testcase(_TestCase, Config) ->
  	Config.
  
  -spec end_per_testcase(TestCase :: atom(), Config :: [tuple()]) -> any().
  %% Cleanup after each test case.
  %%
  end_per_testcase(TestCase, Config) when
  		TestCase == diameter_accounting ->
  	UserName= ?config(username, Config),
  	Client = ?config(diameter_client, Config),
  	ok = ocs:delete_client(Client),
  	ok = ocs:delete_subscriber(UserName);
  end_per_testcase(_TestCase, Config) ->
  	Config.
  
  