/*

* 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 14 

	#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_file_config.h"

#include "eap_automatic_variable.h"

#include "eap_tlv_message_data.h"

#include "eap_process_tlv_message_data.h"

#include "eap_config.h"

#if defined(_WIN32) && !defined(__GNUC__)

	#pragma warning( disable : 4355 ) // 'this' : used in base member initializer list

#endif

#if 0

	const u32_t TRACE_FLAGS_CONFIGURE_DATA = TRACE_FLAGS_DEFAULT;

#else

	const u32_t TRACE_FLAGS_CONFIGURE_DATA = eap_am_tools_c::eap_trace_mask_none;

#endif

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

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

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

EAP_FUNC_EXPORT eap_config_value_c::~eap_config_value_c()

{

	delete m_subsection_map;

	m_subsection_map = 0;

}

EAP_FUNC_EXPORT eap_config_value_c::eap_config_value_c(

	abs_eap_am_tools_c* const tools)

	: m_am_tools(tools)

	, m_subsection_map(0)

	, m_data(tools)

	, m_type(eap_configure_type_none)

	, m_is_valid(false)

{

	EAP_ASSERT(eap_configure_type_id[eap_configure_type_none].type == eap_configure_type_none);	

	EAP_ASSERT(eap_configure_type_id[eap_configure_type_u32_t].type == eap_configure_type_u32_t);	

	EAP_ASSERT(eap_configure_type_id[eap_configure_type_boolean].type == eap_configure_type_boolean);	

	EAP_ASSERT(eap_configure_type_id[eap_configure_type_string].type == eap_configure_type_string);	

	EAP_ASSERT(eap_configure_type_id[eap_configure_type_hex_data].type == eap_configure_type_hex_data);	

	EAP_ASSERT(eap_configure_type_id[eap_configure_type_u32array].type == eap_configure_type_u32array);	

	if (m_data.get_is_valid() == false)

	{

		return;

	}

	m_is_valid = true;

}

EAP_FUNC_EXPORT void eap_config_value_c::set_subsection(

	eap_core_map_c<eap_config_value_c, abs_eap_core_map_c, eap_variable_data_c> * const subsection_map)

{

	m_subsection_map = subsection_map;

}

EAP_FUNC_EXPORT eap_core_map_c<eap_config_value_c, abs_eap_core_map_c, eap_variable_data_c> * eap_config_value_c::get_subsection()

{

	return m_subsection_map;

}

EAP_FUNC_EXPORT eap_variable_data_c * eap_config_value_c::get_data()

{

	return &m_data;

}

EAP_FUNC_EXPORT const eap_variable_data_c * eap_config_value_c::get_const_data() const

{

	return &m_data;

}

EAP_FUNC_EXPORT void eap_config_value_c::set_type(const eap_configure_type_e type)

{

	m_type = type;

}

EAP_FUNC_EXPORT eap_configure_type_e eap_config_value_c::get_type()

{

	return m_type;

}

EAP_FUNC_EXPORT eap_configure_type_e eap_config_value_c::get_const_type() const

{

	return m_type;

}

EAP_FUNC_EXPORT void eap_config_value_c::object_increase_reference_count()

{

}

EAP_FUNC_EXPORT bool eap_config_value_c::get_is_valid() const

{

	return m_is_valid;

}

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

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

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

EAP_FUNC_EXPORT eap_file_config_c::eap_file_config_c(

	abs_eap_am_tools_c* const tools)

  : m_am_tools(tools)

  , m_config_map(tools, this)

  , m_value_buffer(tools)

  , m_is_valid(false)

{

	EAP_UNREFERENCED_PARAMETER(TRACE_FLAGS_CONFIGURE_DATA); // in release

	set_is_valid();

}

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

EAP_FUNC_EXPORT eap_file_config_c::~eap_file_config_c()

{

}

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

EAP_FUNC_EXPORT eap_status_e eap_file_config_c::configure(

	abs_eap_am_file_input_c * const file)

{

	eap_status_e status = read_subsections(file, &m_config_map);

	if (status != eap_status_ok)

	{

		EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

		return EAP_STATUS_RETURN(m_am_tools, status);

	}

	EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

	return EAP_STATUS_RETURN(m_am_tools, status);

}

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

eap_status_e eap_file_config_c::expand_environment_variables(

	eap_core_map_c<eap_config_value_c, abs_eap_core_map_c, eap_variable_data_c> * const config_map,

	const eap_variable_data_c * const original_value,

	eap_variable_data_c * const expanded_value

	)

{

	eap_status_e status = eap_status_process_general_error;

	if (original_value == 0

		|| expanded_value == 0

		)

	{

		EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

		return EAP_STATUS_RETURN(m_am_tools, eap_status_illegal_parameter);

	}

	const u8_t env_char = '$';

	const u8_t char_left_parenthesis = '(';

	const u8_t char_right_parenthesis = ')';

	bool expanded_value_when_true = false;

	if (m_value_buffer.get_buffer_length() < MAX_LINE_LENGTH)

	{

		status = m_value_buffer.set_buffer_length(MAX_LINE_LENGTH);

		if (status != eap_status_ok)

		{

			EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

			return EAP_STATUS_RETURN(m_am_tools, status);

		}

	}

	status = expanded_value->set_copy_of_buffer(original_value);

	if (status != eap_status_ok)

	{

		EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

		return EAP_STATUS_RETURN(m_am_tools, status);

	}

	for (;;)

	{

		u8_t * const start_of_value = expanded_value->get_data(expanded_value->get_data_length());

		u8_t * const env_start = static_cast<u8_t *>(m_am_tools->memchr(

			start_of_value,

			env_char,

			expanded_value->get_data_length()));

		if (env_start == 0)

		{

			status = eap_status_ok;

			break;

		}

		else

		{

			if (static_cast<u32_t>((env_start+2)-start_of_value) < expanded_value->get_data_length()

				&& env_start[1] == char_left_parenthesis)

			{

				u8_t *tmp_end = start_of_value + expanded_value->get_data_length();

				u8_t *env_end = static_cast<u8_t *>(m_am_tools->memchr(

					env_start,

					char_right_parenthesis,

					tmp_end-env_start));

				if (env_end != 0)

				{

					*env_end = '\0';

					u8_t *env_name = env_start+2;

					eap_variable_data_c env_name_buffer(m_am_tools);

					if (env_name_buffer.get_is_valid() == false)

					{

						return EAP_STATUS_RETURN(m_am_tools, eap_status_allocation_error);

					}

					status = env_name_buffer.set_buffer(

						env_name,

						env_end-env_name,

						false,

						false);

					if (status != eap_status_ok)

					{

						EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

						return EAP_STATUS_RETURN(m_am_tools, status);

					}

					eap_variable_data_c env_value_buffer(m_am_tools);

					if (env_value_buffer.get_is_valid() == false)

					{

						return EAP_STATUS_RETURN(m_am_tools, eap_status_allocation_error);

					}

					eap_status_e env_status = m_am_tools->getenv(

						&env_name_buffer,

						&env_value_buffer);

					eap_variable_data_c parsed_value_buffer(m_am_tools);

					if (parsed_value_buffer.get_is_valid() == false)

					{

						return EAP_STATUS_RETURN(m_am_tools, eap_status_allocation_error);

					}

					status = parsed_value_buffer.set_buffer_length(MAX_LINE_LENGTH);

					if (status != eap_status_ok)

					{

						EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

						return EAP_STATUS_RETURN(m_am_tools, status);

					}

					parsed_value_buffer.set_data_length(MAX_LINE_LENGTH);

					eap_variable_data_c configure_option(m_am_tools);

					if (configure_option.get_is_valid() == false)

					{

						return EAP_STATUS_RETURN(m_am_tools, eap_status_allocation_error);

					}

					if (env_status != eap_status_ok)

					{

						// Next check whether a one of the defined configuration

						// options match to the variable.

						eap_configure_type_e configuration_data_type = eap_configure_type_none;

						static const u32_t EAP_MAX_CONFIG_BUFFER_LENGTH = 256;

						eap_configuration_field_template_c<EAP_MAX_CONFIG_BUFFER_LENGTH> * const tmp_env_name

							= new eap_configuration_field_template_c<EAP_MAX_CONFIG_BUFFER_LENGTH>;

						eap_automatic_variable_c<eap_configuration_field_template_c<EAP_MAX_CONFIG_BUFFER_LENGTH> >

							automatic_tmp_env_name(m_am_tools, tmp_env_name);

						if (tmp_env_name == 0)

						{

							return EAP_STATUS_RETURN(m_am_tools, eap_status_allocation_error);

						}

						eap_status_e status = tmp_env_name->set_fields(

							m_am_tools,

							env_name,

							eap_configure_type_none,

							false);

						if (status != eap_status_ok)

						{

							EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

							return EAP_STATUS_RETURN(m_am_tools, status);

						}

						status = read_configure(

							config_map,

							tmp_env_name->get_field(),

							&configure_option,

							&configuration_data_type,

							false);

						if (status == eap_status_ok)

						{

							if (configuration_data_type == eap_configure_type_string)

							{

								status = configure_option.add_end_null();

							}

							else if (configuration_data_type == eap_configure_type_u32_t)

							{

								u32_t * const p_value = reinterpret_cast<u32_t *>(

									configure_option.get_data(

										configure_option.get_data_length()));

								if (p_value != 0)

								{

									u32_t value = *p_value;

									status = configure_option.set_buffer_length(EAP_MAX_CONFIG_BUFFER_LENGTH);

									if (status != eap_status_ok)

									{

										EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

										return EAP_STATUS_RETURN(m_am_tools, status);

									}

									status = configure_option.set_data_length(EAP_MAX_CONFIG_BUFFER_LENGTH);

									if (status != eap_status_ok)

									{

										EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

										return EAP_STATUS_RETURN(m_am_tools, status);

									}

									u32_t length = m_am_tools->snprintf(

											reinterpret_cast<u8_t *>(

												configure_option.get_data(

													configure_option.get_data_length())),

											EAP_MAX_CONFIG_BUFFER_LENGTH,

											EAPL("%u"),

											value);

									status = configure_option.set_data_length(length);

									if (status != eap_status_ok)

									{

										EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

										return EAP_STATUS_RETURN(m_am_tools, status);

									}

									status = configure_option.add_end_null();

									if (status != eap_status_ok)

									{

										EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

										return EAP_STATUS_RETURN(m_am_tools, status);

									}

								}

							}

							else if (configuration_data_type == eap_configure_type_boolean)

							{

								u32_t * const p_value = reinterpret_cast<u32_t *>(

									configure_option.get_data(

										configure_option.get_data_length()));

								if (p_value != 0)

								{

									bool value = (*p_value == 0) ? false : true;

									status = configure_option.set_buffer_length(EAP_MAX_CONFIG_BUFFER_LENGTH);

									if (status != eap_status_ok)

									{

										EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

										return EAP_STATUS_RETURN(m_am_tools, status);

									}

									status = configure_option.set_data_length(EAP_MAX_CONFIG_BUFFER_LENGTH);

									if (status != eap_status_ok)

									{

										EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

										return EAP_STATUS_RETURN(m_am_tools, status);

									}

									if (value == true)

									{

										u32_t length = m_am_tools->snprintf(

												reinterpret_cast<u8_t *>(

													configure_option.get_data(

														configure_option.get_data_length())),

												EAP_MAX_CONFIG_BUFFER_LENGTH,

												EAPL("true"));

										status = configure_option.set_data_length(length);

										if (status != eap_status_ok)

										{

											EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

											return EAP_STATUS_RETURN(m_am_tools, status);

										}

									}

									else

									{

										u32_t length = m_am_tools->snprintf(

												reinterpret_cast<u8_t *>(

													configure_option.get_data(

														configure_option.get_data_length())),

												EAP_MAX_CONFIG_BUFFER_LENGTH,

												EAPL("false"));

										configure_option.set_data_length(length);

									}

									status = configure_option.add_end_null();

									if (status != eap_status_ok)

									{

										EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

										return EAP_STATUS_RETURN(m_am_tools, status);

									}

								}

							}

							else if (configuration_data_type == eap_configure_type_hex_data)

							{

								u8_t * const p_value = reinterpret_cast<u8_t *>(

									configure_option.get_data(

										configure_option.get_data_length()));

								u8_t buffer[3];

								u8_t comma(',');

								eap_variable_data_c tmp(m_am_tools);

								if (tmp.get_is_valid() == false)

								{

									return EAP_STATUS_RETURN(m_am_tools, eap_status_allocation_error);

								}

								for (u32_t ind = 0ul; ind < configure_option.get_data_length(); ind++)

								{

									u32_t length = m_am_tools->snprintf(

											buffer,

											sizeof(buffer),

											EAPL("%02x"),

											p_value[ind]);

									status = tmp.add_data(buffer, length);

									if (status != eap_status_ok)

									{

										EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

										return EAP_STATUS_RETURN(m_am_tools, status);

									}

									if ((ind+1) < configure_option.get_data_length())

									{

										status = tmp.add_data(&comma, sizeof(comma));

										if (status != eap_status_ok)

										{

											EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

											return EAP_STATUS_RETURN(m_am_tools, status);

										}

									}

								} // for()

								status = configure_option.set_copy_of_buffer(&tmp);

								if (status != eap_status_ok)

								{

									EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

									return EAP_STATUS_RETURN(m_am_tools, status);

								}

								status = configure_option.add_end_null();

								if (status != eap_status_ok)

								{

									EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

									return EAP_STATUS_RETURN(m_am_tools, status);

								}

							}

						}

						if (configure_option.get_is_valid_data() == false

							|| configure_option.get_data_length() == 0ul)

						{

							#if defined(EAP_FILE_CONFIG_USE_CONSOLE_PRINTS)

								printf("WARNING: CONFIG: unknown environment variable %s.\n",

									   env_name);

							#endif //#if defined(EAP_FILE_CONFIG_USE_CONSOLE_PRINTS)

							EAP_TRACE_DEBUG(

								m_am_tools,

								TRACE_FLAGS_DEFAULT,

								(EAPL("WARNING: CONFIG: unknown environment variable %s.\n"),

								 env_name));

							// This is empty environment value.

						}

					}

					else

					{

						// OK environment variable found.

						eap_configure_type_e type = eap_configure_type_none;

						status = cnf_parse_value(

							&env_value_buffer,

							&env_name_buffer,

							&type,

							&configure_option,

							true

							);

						if (status != eap_status_ok)

						{

							EAP_TRACE_END(m_am_tools, TRACE_FLAGS_DEFAULT);

							return EAP_STATUS_RETURN(m_am_tools, status);

						}

					}

					if (configure_option.get_is_valid_data() == true

						&& configure_option.get_data_length() > 0ul)