/*

* Copyright (c) 2001-2006 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of the License "Eclipse Public License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.eclipse.org/legal/epl-v10.html".

*

* Initial Contributors:

* Nokia Corporation - initial contribution.

*

* Contributors:

*

* Description:  EAP and WLAN authentication protocols.

*

*/

// This is enumeration of EAPOL source code.

#if defined(USE_EAP_MINIMUM_RELEASE_TRACES)

	#undef EAP_FILE_NUMBER_ENUM

	#define EAP_FILE_NUMBER_ENUM 119 

	#undef EAP_FILE_NUMBER_DATE 

	#define EAP_FILE_NUMBER_DATE 1127594498 

#endif //#if defined(USE_EAP_MINIMUM_RELEASE_TRACES)

#include "eap_am_memory.h"

#include "eap_type_tls_peap_types.h"

#include "eap_type_tls_peap.h"

#include "eap_type_tls_peap_header.h"

#include "eap_type_tls_peap_state_notification.h"

#include "eap_am_type_tls_peap.h"

#include "eap_state_notification.h"

#include "tls_record_header.h"

#include "tls_base_record.h"

#include "eap_config.h"

#include "eap_header_string.h"

#include "eap_automatic_variable.h"

//--------------------------------------------------

//

EAP_FUNC_EXPORT eap_type_tls_peap_c::~eap_type_tls_peap_c()

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_DEBUG(

		m_am_tools,

		TRACE_FLAGS_DEFAULT,

		(EAPL("this = 0x%08x => 0x%08x, %s: function: eap_type_tls_peap_c::~eap_type_tls_peap_c():,")

		 EAPL(" m_am_type_tls_peap = 0x%08x (validity %d).\n"),

		 this,

		 dynamic_cast<abs_eap_base_timer_c *>(this),

		 (m_is_client == true ? "client": "server"),

		 m_am_type_tls_peap,

		 m_am_type_tls_peap->get_is_valid()));

	EAP_ASSERT(m_shutdown_was_called == true);

	if (m_free_tls_record == true)

	{

		delete m_tls_record;

		m_tls_record = 0;

	}

	if (m_free_am_type_tls_peap == true)

	{

		delete m_am_type_tls_peap;

		m_am_type_tls_peap = 0;

	}

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT eap_type_tls_peap_c::eap_type_tls_peap_c(

	abs_eap_am_tools_c * const tools, ///< This is pointer to the tools AM of current platform.

	abs_eap_base_type_c * const partner, ///< This is back pointer to object which created this object.

	eap_am_type_tls_peap_c * const am_type_tls_peap, ///< This is pointer to adaptation module of TLS/PEAP EAP type.

	const bool free_am_type_tls_peap,

	tls_base_record_c * const tls_record, /// This is pointer to TLS implementation.

	const bool free_tls_record,

	const bool is_client_when_true, ///< Indicates whether this is client (true) or server (false).

	const eap_type_value_e current_eap_type, ///< This the current EAP-type (TLS or PEAP).

	const eap_am_network_id_c * const receive_network_id)

	: eap_base_type_c(tools, partner)

	  , m_am_tools(tools)

	  , m_am_type_tls_peap(am_type_tls_peap)

	  , m_tls_record(tls_record)

	  , m_nai_realm(tools)

	  , m_NAI(tools)

	  , m_current_identity(tools)

	  , m_send_network_id(tools)

	  , m_tls_peap_header_offset(0u)

	  , m_MTU(0u)

	  , m_trailer_length(0u)

	  , m_state(eap_type_tls_peap_state_waiting_for_identity_request)

	  , m_saved_previous_state(eap_type_tls_peap_state_waiting_for_identity_request)

	  , m_reassembly_state(eap_type_tls_peap_reassembly_state_wait_first_message)

	  , m_saved_previous_reassembly_state(eap_type_tls_peap_reassembly_state_wait_first_message)

	  , m_tls_message_send_offset(0ul)

	  , m_tls_message_buffer(tools)

	  , m_master_session_key(tools, current_eap_type)

	  , m_accepted_PEAP_versions(tools)

	  , m_current_eap_type(current_eap_type)

	  , m_configured_peap_version(peap_version_none)

	  , m_current_peap_version(peap_version_none)

	  , m_first_fragment_eap_identifier(0ul)

	  , m_tls_session_type(tls_session_type_none)

	  , m_tunneled_eap_type_active(false)

	  , m_tunneled_eap_type_authentication_state(eap_state_none)

	  , m_free_am_type_tls_peap(free_am_type_tls_peap)

	  , m_free_tls_record(free_tls_record)

	  , m_is_valid(false)

	  , m_is_client(is_client_when_true)

	  , m_wait_eap_success_packet(true)

	  , m_check_identifier_of_eap_identity_response(false)

	  , m_tls_peap_test_version(false)

	  , m_check_nai_realm(false)

#if defined(USE_EAP_TLS_IDENTITY_PRIVACY)

	  , m_tls_use_identity_privacy(false)

#endif //#if defined(USE_EAP_TLS_IDENTITY_PRIVACY)

	  , m_failure_message_received(false)

	  , m_authentication_finished_successfully(false)

	  , m_last_eap_identifier(0ul)

	  , m_shutdown_was_called(false)

	  , m_use_tppd_tls_peap(true)

	  , m_use_tppd_peapv1_acknowledge_hack(true)

	  , m_includes_tls_handshake_message(false)

	  , m_use_eap_expanded_type(false)

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_DEBUG(

		m_am_tools,

		TRACE_FLAGS_DEFAULT,

		(EAPL("this = 0x%08x => 0x%08x, %s: function: eap_type_tls_peap_c::eap_type_tls_peap_c(): compiled %s %s\n"),

		 this,

		 dynamic_cast<abs_eap_base_timer_c *>(this),

		 (m_is_client == true ? "client": "server"),

		 __DATE__,

		 __TIME__));

	if (receive_network_id == 0

		|| receive_network_id->get_is_valid_data() == false)

	{

		// No need to delete anything here because it is done in destructor.

		EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

		return;

	}

	if (tls_record == 0)

	{

		// No need to delete anything here because it is done in destructor.

		EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

		return;

	}

	m_tls_record->set_type_partner(this);

	if (m_am_type_tls_peap == 0)

	{

		// Something wrong with AM.

		EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

		return;

	}

	m_am_type_tls_peap->set_am_partner(this);

	// Here we swap the addresses.

	eap_am_network_id_c send_network_id(

		m_am_tools,

		receive_network_id->get_destination_id(),

		receive_network_id->get_source_id(),

		receive_network_id->get_type());

	eap_status_e status = get_send_network_id()->set_copy_of_network_id(

		&send_network_id);

	if (status != eap_status_ok)

	{

		EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

		return;

	}

	if (m_is_client == false)

	{

		// Server waits EAP-Response/Identity.

		m_state = eap_type_tls_peap_state_waiting_for_identity_response;

		m_saved_previous_state

			= eap_type_tls_peap_state_waiting_for_identity_response;

	}

	set_is_valid();

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT void eap_type_tls_peap_c::save_current_state()

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	m_saved_previous_state = m_state;

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT void eap_type_tls_peap_c::restore_saved_previous_state()

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	set_state(m_saved_previous_state);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT void eap_type_tls_peap_c::set_state(

	const eap_type_tls_peap_state_variable_e state)

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	eap_type_tls_peap_state_variable_e previous_state = m_state;

	if (m_state != eap_type_tls_peap_state_failure)

	{

		m_state = state;

	}

	EAP_TRACE_DEBUG(

		m_am_tools,

		TRACE_FLAGS_DEFAULT,

		(EAPL("this = 0x%08x, %s, %s: eap_type_tls_peap_c::set_state(): ")

		 EAPL(" Previous state %d=%s, new state %d=%s.\n"),

		 this,

		 (m_is_client == true ? "client": "server"),

		 (get_type_partner()->get_is_tunneled_eap() == true ? "tunneled" : "outer most"),

		 previous_state,

		 get_state_string(previous_state),

		 m_state,

		 get_state_string(m_state)));

	eap_type_tls_peap_state_notification_c notification(

		m_am_tools,

		get_send_network_id(),

		m_is_client,

		eap_state_notification_eap,

		eap_protocol_layer_eap_type,

		m_current_eap_type,

		previous_state,

		state,

		m_last_eap_identifier,

		false);

	get_type_partner()->state_notification(&notification);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT eap_type_tls_peap_reassembly_state_e eap_type_tls_peap_c::get_reassembly_state() const

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return m_reassembly_state;

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT void eap_type_tls_peap_c::set_reassembly_state(

	const eap_type_tls_peap_reassembly_state_e state)

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	m_reassembly_state = state;

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT void eap_type_tls_peap_c::save_current_reassembly_state()

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	m_saved_previous_reassembly_state = m_reassembly_state;

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT void eap_type_tls_peap_c::restore_saved_reassembly_state()

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	m_reassembly_state = m_saved_previous_reassembly_state;

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT eap_am_network_id_c * eap_type_tls_peap_c::get_send_network_id()

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return &m_send_network_id;

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT void eap_type_tls_peap_c::set_last_eap_identifier(const u8_t last_eap_identifier)

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	m_last_eap_identifier = last_eap_identifier;

	EAP_TRACE_DEBUG(

		m_am_tools,

		TRACE_FLAGS_DEFAULT,

		(EAPL("this = 0x%08x, %s, %s, eap_type_tls_peap_c::set_last_eap_identifier():")

		 EAPL(" saved EAP-identifier %d, state %s\n"),

		 this,

		 (m_is_client == true ? "client": "server"),

		 (get_type_partner()->get_is_tunneled_eap() == true ? "tunneled" : "outer most"),

		 m_last_eap_identifier,

		 get_state_string()));

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT u8_t eap_type_tls_peap_c::get_last_eap_identifier() const

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_DEBUG(

		m_am_tools,

		TRACE_FLAGS_DEFAULT,

		(EAPL("this = 0x%08x, eap_type_tls_peap_c::get_last_eap_identifier():")

		 EAPL("%s, saved EAP-identifier %d, state %s\n"),

		 this,

		 (m_is_client == true ? "client": "server"),

		 m_last_eap_identifier,

		 get_state_string()));

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return m_last_eap_identifier;

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT eap_const_string eap_type_tls_peap_c::get_state_string(

	eap_type_tls_peap_state_variable_e state)

{

#if defined(USE_EAP_TRACE_STRINGS)

	EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_waiting_for_identity_request)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_pending_identity_query)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_waiting_for_tls_start)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_process_tls_start)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_waiting_for_request)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_waiting_for_success)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_tppd_peapv1_waits_eap_success_or_tunneled_packet)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_waiting_for_identity_response)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_waiting_for_first_response)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_waiting_for_response)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_waiting_for_empty_response)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_process_tls_message)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_success)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_state_failure)

	else

#else

EAP_UNREFERENCED_PARAMETER(state);	

#endif // #if defined(USE_EAP_TRACE_STRINGS)

	{

		return EAPL("Unknown EAP-TLS/PEAP state");

	}

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT eap_const_string eap_type_tls_peap_c::get_reassembly_state_string(

	eap_type_tls_peap_reassembly_state_e state)

{

#if defined(USE_EAP_TRACE_STRINGS)

	EAP_IF_RETURN_STRING(state, eap_type_tls_peap_reassembly_state_none)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_reassembly_state_wait_first_message)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_reassembly_state_wait_last_fragment)

	else EAP_IF_RETURN_STRING(state, eap_type_tls_peap_reassembly_state_message_reassembled)

	else

#else

EAP_UNREFERENCED_PARAMETER(state);		

#endif // #if defined(USE_EAP_TRACE_STRINGS)

	{

		return EAPL("Unknown TLS_PEAP reassembly state");

	}

}

//--------------------------------------------------

EAP_FUNC_EXPORT eap_const_string eap_type_tls_peap_c::get_state_string() const

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return get_state_string(m_state);

}

//--------------------------------------------------

EAP_FUNC_EXPORT eap_const_string eap_type_tls_peap_c::get_reassembly_state_string() const

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return get_reassembly_state_string(m_reassembly_state);

}

//--------------------------------------------------

EAP_FUNC_EXPORT eap_const_string eap_type_tls_peap_c::get_saved_previous_state_string() const

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return get_state_string(m_saved_previous_state);

}

//--------------------------------------------------

EAP_FUNC_EXPORT void eap_type_tls_peap_c::set_failure_message_received()

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	m_failure_message_received = true;

}

//--------------------------------------------------

EAP_FUNC_EXPORT void eap_type_tls_peap_c::unset_failure_message_received()

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	m_failure_message_received = false;

}

//--------------------------------------------------

EAP_FUNC_EXPORT bool eap_type_tls_peap_c::get_failure_message_received() const

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return m_failure_message_received;

}

//--------------------------------------------------

EAP_FUNC_EXPORT eap_type_tls_peap_state_variable_e eap_type_tls_peap_c::get_state() const

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return m_state;

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT eap_status_e eap_type_tls_peap_c::generate_nai(

	eap_variable_data_c * const /*new_nai*/, ///< This is the new generated NAI.

	const eap_variable_data_c * const /*domain*/, ///< This is the domain part of the NAI.

	const eap_variable_data_c * const /*identity*/ ///< This is identity.

	)

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return EAP_STATUS_RETURN(m_am_tools, eap_status_not_supported);

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT eap_status_e eap_type_tls_peap_c::handle_tls_peap_packet(

	const eap_am_network_id_c * const /*receive_network_id*/, ///< This is the network identity of the received EAP packet.

	eap_tls_peap_header_c * const /*tls_peap*/, ///< This is pointer to EAP header including EAP-TLS/PEAP fields.

	const u32_t /*tls_peap_length*/ ///< This is length of received TLS/PEAP EAP packet.

	)

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return EAP_STATUS_RETURN(m_am_tools, eap_status_not_supported);

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT eap_status_e eap_type_tls_peap_c::analyse_tls_peap_packet(

	const eap_am_network_id_c * const /*receive_network_id*/, ///< This is the network identity of the received EAP packet.

	eap_tls_peap_header_c * const /*received_tls_peap*/, ///< This is pointer to EAP header including EAP-TLS/PEAP fields.

	const u32_t /*tls_peap_packet_length*/ ///< This is length of received TLS/PEAP EAP packet.

	)

{

	EAP_TRACE_BEGIN(m_am_tools, TRACE_FLAGS_DEFAULT);

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return EAP_STATUS_RETURN(m_am_tools, eap_status_not_supported);

}

//--------------------------------------------------

//

EAP_FUNC_EXPORT eap_status_e eap_type_tls_peap_c::parse_tls_peap_payload(

	u32_t * const /*buffer_length*/ ///< This is the length of the buffer. This must match with the length of all payloads.

	)

{