anchor.diff:  			Secret, MAC, Auth, RadId).
   
   receive_ttls_start_radius(Socket, Address, Port, Secret, Auth, RadId) ->
  -	EapMsg = access_challenge(Socket, Address, Port, Secret, RadId, Auth),
  +	Radius = access_challenge(Socket, Address, Port, Secret, RadId, Auth),
  +	EapMsg = get_eap(Radius),
   	#eap_packet{code = request, type = ?TTLS, identifier = EapId,
   			data = EapData} = ocs_eap_codec:eap_packet(EapMsg),
   	#eap_ttls{start = true} = ocs_eap_codec:eap_ttls(EapData),
  
positive.code: 		NasId, UserName, Secret, MAC, Auth, RadId, EapId, Buf) ->
  	send_ack(Socket, Address, Port, NasId, UserName, Secret,
  			MAC, Auth, RadId, EapId),
  	EapMsg = access_challenge(Socket, Address, Port, Secret, RadId, Auth),
  	#eap_packet{code = request, identifier = NewEapId, type = ?TTLS,
  			data = EapData} = ocs_eap_codec:eap_packet(EapMsg),
  	TtlsPacket = ocs_eap_codec:eap_ttls(EapData),
  
negative.code: 
  server_hello_radius(Socket, Address, Port, NasId, UserName, Secret,
  		MAC, Auth, RadId) ->
  	Radius = access_challenge(Socket, Address, Port,
  			Secret, RadId, Auth),
  	EapMsg = get_eap(Radius),
  	#eap_packet{code = request, identifier = EapId, type = ?TTLS,
  			data = EapData} = ocs_eap_codec:eap_packet(EapMsg),
  	TtlsData = ocs_eap_codec:eap_ttls(EapData),
  