anchor.diff:  			{<<0:512>>, <<0:512>>}
   	end.
   
  +%% @hidden
  +generate_diameter_response(SId, AuthType, ResultCode, OH, OR, EapPacket) ->
  +	try
  +		EapData = ocs_eap_codec:eap_packet(EapPacket),
  +		#diameter_eap_app_DEA{'Session-Id' = SId, 'Auth-Application-Id' = 5,
  +				'Auth-Request-Type' = AuthType, 'Result-Code' = ResultCode,
  +				'Origin-Host' = OH, 'Origin-Realm' = OR, 'EAP-Payload' = [EapData]}
  +	catch
  +		_:_ ->
  +		#diameter_eap_app_DEA{'Session-Id' = SId, 'Auth-Application-Id' = 5,
  +				'Auth-Request-Type' = AuthType,
  +				'Result-Code' = ?'DIAMETER_BASE_RESULT-CODE_UNABLE_TO_COMPLY',
  +				'Origin-Host' = OH, 'Origin-Realm' = OR}
  +	end.
  +
  
positive.code: 		server_rand :: undefined | binary(),
  		tls_key :: string(),
  		tls_cert :: string(),
  		tls_cacert :: string()}).
  -type statedata() :: #statedata{}.
  
  -define(TIMEOUT, 30000).
  
negative.code: 			start = AccessRequest, tls_key = TLSkey, tls_cert = TLScert,
  			tls_cacert = TLScacert},
  	process_flag(trap_exit, true),
  	{ok, ssl_start, StateData, 0};
  init([Sup, diameter, ServerAddress, ServerPort, SessionID, AppId, ReqType, OHost,
  			ORealm, DiameterRequest, _Options] = _Args) ->
  	{ok, TLSkey} = application:get_env(ocs, tls_key),
  	{ok, TLScert} = application:get_env(ocs, tls_cert),
  	{ok, TLScacert} = application:get_env(ocs, tls_cacert),
  	{ok, Hostname} = inet:gethostname(),
  	case global:whereis_name({ocs_diameter_auth, ServerAddress, ServerPort}) of
  		undefined ->
  			{stop, ocs_diameter_auth_port_server_not_found};
  		PortServer ->
  			StateData = #statedata{sup = Sup, server_address = ServerAddress,
  					server_port = ServerPort, session_id = SessionID,
  					server_id = list_to_binary(Hostname), start = DiameterRequest,
  					tls_key = TLSkey, tls_cert = TLScert, tls_cacert = TLScacert,
  					app_id = AppId, auth_req_type = ReqType, origin_host = OHost,
  					origin_realm = ORealm, port_server = PortServer},
  			process_flag(trap_exit, true),
  			{ok, ssl_start, StateData, 0}
  		end.
  
  -spec ssl_start(Event, StateData) -> Result
  	when
  