anchor.diff:  	Id = 1,
   	NasId = ?config(nas_id, Config),
   	PeerID = list_to_binary(?config(peer_id, Config)),
  +	Password = ?config(password, Config),
   	AcctAddress = {127, 0, 0, 1},
   	AuthAddress = {127, 0, 0, 1},
   	{ok, AcctPort} = application:get_env(ocs, radius_acct_port),
  
positive.code: 	SharedSecret = ct:get_config(radius_shared_secret),
  	ok = ocs:add_client({127, 0, 0, 1}, SharedSecret),
  	PeerId = "25252525",
  	PeerPassword = ocs:generate_password(),
  	ok = ocs:add_subscriber(PeerId, PeerPassword, [], 1000),
  	Config1 = [{peer_id, PeerId} | Config],
  	NasId = atom_to_list(node()),
  	[{nas_id, NasId} | Config1].
  
  -spec end_per_suite(Config :: [tuple()]) -> any().
  %% Cleanup after the whole suite.
  
negative.code: 		data = CommitReqData} = ocs_eap_codec:eap_pwd(CommitData),
  	#eap_pwd_commit{element = Element_S, scalar = Scalar_S} = ocs_eap_codec:eap_pwd_commit(CommitReqData),
  	P_Rand = crypto:rand_uniform(1, ?R),
  	PWE = ocs_eap_pwd:compute_pwe(Token, PeerID, ServerID, Password),
  	{Scalar_P, Element_P} = ocs_eap_pwd:compute_scalar(<<P_Rand:256>>, PWE),
  	CommitRespBody = #eap_pwd_commit{scalar = Scalar_P, element = Element_P},
  