anchor.diff:  %%
   init_per_testcase(TestCase, Config) when
   		TestCase == diameter_accounting; TestCase == diameter_disconnect_session ->
  -	UserName = "SlimShady",
  -	Password = "TeRcEs",
  +	UserName = ocs:generate_identity(),
  +	Password = ocs:generate_password(),
   	ProdID = ?config(product_id, Config),
   	{ok, EnvList} = application:get_env(ocs, diameter),
   	{acct, [{Address, _Port, _Options } | _]} = lists:keyfind(acct, 1, EnvList),
  
positive.code: 	RadID1 = 10,
  	NasID = ?config(nas_id, Config),
  	ProdID = ?config(product_id, Config),
  	AcctSessionID = "0B0055D1",
  	{ok, [{auth, AuthInstance}, {acct, AcctInstance}]} = application:get_env(ocs, radius),
  	[{AuthAddress, AuthPort, _} | _] = AuthInstance,
  	[{AcctAddress, AcctPort, _} | _] = AcctInstance,
  	{ok, Socket} = gen_udp:open(0, [{active, false}, inet, binary]), 
  	PeerID = "458565788",
  	Secret = ct:get_config(radius_shared_secret),
  	Password = ocs:generate_password(),
  	Now = erlang:system_time(?MILLISECOND),
  
negative.code: 	%% Authenticate session 2
  	Rad2ID1 = 5,
  	NasID2 = "axe2@ap-2.org",
  	AcctSessionID2 = ocs:generate_identity(),
  	authenticate_subscriber(Socket, AuthAddress, AuthPort, PeerID,
  			HiddenPassword, Secret, NasID2, ReqAuth, Rad2ID1),
  	ct:sleep(500),
  