anchor.diff:  			data = _EapPwdData2} = ocs_eap_codec:eap_pwd(EapData2),
   	ok = ocs:delete_service(PeerId).
   	
  -pwd_confirm_over_radius() ->
  +pwd_confirm_radius() ->
   	[{userdata, [{doc, "Send an EAP-pwd-Confirm/Response using RADIUS to peer"}]}].
   
  -pwd_confirm_over_radius(Config) ->
  +pwd_confirm_radius(Config) ->
   	P1 = price(usage, octets, rand:uniform(1000000), rand:uniform(100)),
   	OfferId = add_offer([P1], 4),
   	ProdRef = add_product(OfferId),
  
positive.code: 			UserName, Secret, MAC, ReqAuth2, RadId2, EapMsg),
  	EapId2 = receive_radius_failure(Socket, Address, Port, Secret, ReqAuth2, RadId2).
  
  validate_pwd_id_prep_over_radius() ->
  	[{userdata, [{doc, "Send invalid EAP-pwd-ID (bad prep) using RADIUS"}]}].
  
  validate_pwd_id_prep_over_radius(Config) ->
  	P1 = price(usage, octets, rand:uniform(1000000), rand:uniform(100)),
  	OfferId = add_offer([P1], 4),
  	ProdRef = add_product(OfferId),
  
negative.code: 			Secret, PeerId, MAC, ReqAuth, EapId, RadId),
  	{error, timeout} = gen_udp:recv(Socket, 0, 2000).
  
  role_reversal_radius() ->
  	[{userdata, [{doc, "Send EAP-Request (unsupported role reversal) using RADIUS"}]}].
  
  role_reversal_radius(Config) ->
  	P1 = price(usage, octets, rand:uniform(1000000), rand:uniform(100)),
  	OfferId = add_offer([P1], 4),
  	ProdRef = add_product(OfferId),
  