//-----------------------------------------------------------------------------
//
//	ThermostatFanMode.cpp
//
//	Implementation of the Z-Wave COMMAND_CLASS_THERMOSTAT_FAN_MODE
//
//	Copyright (c) 2010 Mal Lansell <openzwave@lansell.org>
//
//	SOFTWARE NOTICE AND LICENSE
//
//	This file is part of OpenZWave.
//
//	OpenZWave is free software: you can redistribute it and/or modify
//	it under the terms of the GNU Lesser General Public License as published
//	by the Free Software Foundation, either version 3 of the License,
//	or (at your option) any later version.
//
//	OpenZWave is distributed in the hope that it will be useful,
//	but WITHOUT ANY WARRANTY; without even the implied warranty of
//	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
//	GNU Lesser General Public License for more details.
//
//	You should have received a copy of the GNU Lesser General Public License
//	along with OpenZWave.  If not, see <http://www.gnu.org/licenses/>.
//
//-----------------------------------------------------------------------------

#include <string>
#include "command_classes/CommandClasses.h"
#include "command_classes/ThermostatFanMode.h"
#include "Defs.h"
#include "Msg.h"
#include "Node.h"
#include "Driver.h"
#include "platform/Log.h"

#include "value_classes/ValueList.h"

#include "tinyxml.h"

namespace OpenZWave
{
	namespace Internal
	{
		namespace CC
		{

			enum ThermostatFanModeCmd
			{
				ThermostatFanModeCmd_Set = 0x01,
				ThermostatFanModeCmd_Get = 0x02,
				ThermostatFanModeCmd_Report = 0x03,
				ThermostatFanModeCmd_SupportedGet = 0x04,
				ThermostatFanModeCmd_SupportedReport = 0x05
			};

			static std::string const c_modeName[] =
			{ "Auto Low", "On Low", "Auto High", "On High", "Unknown 4", "Unknown 5", "Circulate", "Unknown" };

//-----------------------------------------------------------------------------
// <ThermostatFanMode::ReadXML>
// Read the supported modes
//-----------------------------------------------------------------------------
			void ThermostatFanMode::ReadXML(TiXmlElement const* _ccElement)
			{
				CommandClass::ReadXML(_ccElement);

				if (GetNodeUnsafe())
				{
					vector<Internal::VC::ValueList::Item> supportedModes;

					TiXmlElement const* supportedModesElement = _ccElement->FirstChildElement("SupportedModes");
					if (supportedModesElement)
					{
						TiXmlElement const* modeElement = supportedModesElement->FirstChildElement();
						while (modeElement)
						{
							char const* str = modeElement->Value();
							if (str && !strcmp(str, "Mode"))
							{
								int index;
								if (TIXML_SUCCESS == modeElement->QueryIntAttribute("index", &index))
								{
									if (index > 6) /* size of c_modeName excluding Invalid */
									{
										Log::Write(LogLevel_Warning, GetNodeId(), "index Value in XML was greater than range. Setting to Invalid");
										index = 7;
									}
									Internal::VC::ValueList::Item item;
									item.m_value = index;
									item.m_label = c_modeName[index];
									supportedModes.push_back(item);
								}
							}

							modeElement = modeElement->NextSiblingElement();
						}
					}

					if (!supportedModes.empty())
					{
						m_supportedModes = supportedModes;
						ClearStaticRequest(StaticRequest_Values);
						CreateVars(1);
					}
				}
			}

//-----------------------------------------------------------------------------
// <ThermostatFanMode::WriteXML>
// Save the supported modes
//-----------------------------------------------------------------------------
			void ThermostatFanMode::WriteXML(TiXmlElement* _ccElement)
			{
				CommandClass::WriteXML(_ccElement);

				if (GetNodeUnsafe())
				{
					TiXmlElement* supportedModesElement = new TiXmlElement("SupportedModes");
					_ccElement->LinkEndChild(supportedModesElement);

					for (vector<Internal::VC::ValueList::Item>::iterator it = m_supportedModes.begin(); it != m_supportedModes.end(); ++it)
					{
						Internal::VC::ValueList::Item const& item = *it;

						TiXmlElement* modeElement = new TiXmlElement("Mode");
						supportedModesElement->LinkEndChild(modeElement);

						char str[8];
						snprintf(str, 8, "%d", item.m_value);
						modeElement->SetAttribute("index", str);
						modeElement->SetAttribute("label", item.m_label.c_str());
					}
				}
			}

//-----------------------------------------------------------------------------
// <ThermostatFanMode::RequestState>
// Get the static thermostat fan mode details from the device
//-----------------------------------------------------------------------------
			bool ThermostatFanMode::RequestState(uint32 const _requestFlags, uint8 const _instance, Driver::MsgQueue const _queue)
			{
				bool requests = false;
				if ((_requestFlags & RequestFlag_Static) && HasStaticRequest(StaticRequest_Values))
				{
					// Request the supported modes
					requests |= RequestValue(_requestFlags, ThermostatFanModeCmd_SupportedGet, _instance, _queue);
				}

				if (_requestFlags & RequestFlag_Dynamic)
				{
					// Request the current fan mode
					requests |= RequestValue(_requestFlags, ThermostatFanModeCmd_Get, _instance, _queue);
				}

				return requests;
			}

//-----------------------------------------------------------------------------
// <ThermostatFanMode::RequestValue>
// Get the thermostat fan mode details from the device
//-----------------------------------------------------------------------------
			bool ThermostatFanMode::RequestValue(uint32 const _requestFlags, uint16 const _getTypeEnum, uint8 const _instance, Driver::MsgQueue const _queue)
			{
				if (_getTypeEnum == ThermostatFanModeCmd_SupportedGet)
				{
					// Request the supported modes
					Msg* msg = new Msg("ThermostatFanModeCmd_SupportedGet", GetNodeId(), REQUEST, FUNC_ID_ZW_SEND_DATA, true, true, FUNC_ID_APPLICATION_COMMAND_HANDLER, GetCommandClassId());
					msg->SetInstance(this, _instance);
					msg->Append(GetNodeId());
					msg->Append(2);
					msg->Append(GetCommandClassId());
					msg->Append(ThermostatFanModeCmd_SupportedGet);
					msg->Append(GetDriver()->GetTransmitOptions());
					GetDriver()->SendMsg(msg, _queue);
					return true;
				}

				if (_getTypeEnum == ThermostatFanModeCmd_Get || _getTypeEnum == 0)
				{
					if (m_com.GetFlagBool(COMPAT_FLAG_GETSUPPORTED))
					{
						// Request the current fan mode
						Msg* msg = new Msg("ThermostatFanModeCmd_Get", GetNodeId(), REQUEST, FUNC_ID_ZW_SEND_DATA, true, true, FUNC_ID_APPLICATION_COMMAND_HANDLER, GetCommandClassId());
						msg->SetInstance(this, _instance);
						msg->Append(GetNodeId());
						msg->Append(2);
						msg->Append(GetCommandClassId());
						msg->Append(ThermostatFanModeCmd_Get);
						msg->Append(GetDriver()->GetTransmitOptions());
						GetDriver()->SendMsg(msg, _queue);
						return true;
					}
					else
					{
						Log::Write(LogLevel_Info, GetNodeId(), "ThermostatFanModeCmd_Get Not Supported on this node");
					}
				}
				return false;
			}

//-----------------------------------------------------------------------------
// <ThermostatFanMode::HandleMsg>
// Handle a message from the Z-Wave network
//-----------------------------------------------------------------------------
			bool ThermostatFanMode::HandleMsg(uint8 const* _data, uint32 const _length, uint32 const _instance	// = 1
					)
			{
				if (ThermostatFanModeCmd_Report == (ThermostatFanModeCmd) _data[0])
				{
					bool validMode = false;
					uint8 mode = (int32) _data[1];

					for (vector<Internal::VC::ValueList::Item>::iterator it = m_supportedModes.begin(); it != m_supportedModes.end(); ++it)
					{
						Internal::VC::ValueList::Item const& item = *it;
						if (item.m_value == mode)
						{
							validMode = true;
							break;
						}
					}
					if (validMode)
					{
						// We have received the thermostat mode from the Z-Wave device
						if (Internal::VC::ValueList* valueList = static_cast<Internal::VC::ValueList*>(GetValue(_instance, ValueID_Index_ThermostatFanMode::FanMode)))
						{
							valueList->OnValueRefreshed((int32) _data[1]);
							if (valueList->GetItem())
								Log::Write(LogLevel_Info, GetNodeId(), "Received thermostat fan mode: %s", valueList->GetItem()->m_label.c_str());
							else
								Log::Write(LogLevel_Info, GetNodeId(), "Received thermostat fan mode: %d", _data[1]);
							valueList->Release();
						}
						else
						{
							Log::Write(LogLevel_Info, GetNodeId(), "Received thermostat fan mode: index %d", mode);
						}
					}
					else
					{
						Log::Write(LogLevel_Info, GetNodeId(), "Received unknown thermostat fan mode: %d", mode);
					}
					return true;
				}

				if (ThermostatFanModeCmd_SupportedReport == (ThermostatFanModeCmd) _data[0])
				{
					// We have received the supported thermostat fan modes from the Z-Wave device
					Log::Write(LogLevel_Info, GetNodeId(), "Received supported thermostat fan modes");

					m_supportedModes.clear();
					for (uint32 i = 1; i < _length - 1; ++i)
					{
						for (int32 bit = 0; bit < 8; ++bit)
						{
							if ((_data[i] & (1 << bit)) != 0)
							{
								Internal::VC::ValueList::Item item;
								item.m_value = (int32) ((i - 1) << 3) + bit;

								/* Minus 1 here as the Unknown Entry is our addition */
								if ((size_t) item.m_value >= (sizeof(c_modeName) / sizeof(*c_modeName) - 1))
								{
									Log::Write(LogLevel_Info, GetNodeId(), "Received unknown fan mode: 0x%x", item.m_value);
								}
								else
								{
									item.m_label = c_modeName[item.m_value];
									m_supportedModes.push_back(item);

									Log::Write(LogLevel_Info, GetNodeId(), "    Added fan mode: %s", c_modeName[item.m_value].c_str());
								}
							}
						}
					}

					ClearStaticRequest(StaticRequest_Values);
					CreateVars(_instance);
					return true;
				}

				return false;
			}

//-----------------------------------------------------------------------------
// <ThermostatFanMode::SetValue>
// Set the device's thermostat fan mode
//-----------------------------------------------------------------------------
			bool ThermostatFanMode::SetValue(Internal::VC::Value const& _value)
			{
				if (ValueID::ValueType_List == _value.GetID().GetType())
				{
					Internal::VC::ValueList const* value = static_cast<Internal::VC::ValueList const*>(&_value);
					if (value->GetItem() == NULL)
						return false;

					uint8 state = (uint8) value->GetItem()->m_value;

					Msg* msg = new Msg("ThermostatFanModeCmd_Set", GetNodeId(), REQUEST, FUNC_ID_ZW_SEND_DATA, true);
					msg->SetInstance(this, _value.GetID().GetInstance());
					msg->Append(GetNodeId());
					msg->Append(3);
					msg->Append(GetCommandClassId());
					msg->Append(ThermostatFanModeCmd_Set);
					msg->Append(state);
					msg->Append(GetDriver()->GetTransmitOptions());
					GetDriver()->SendMsg(msg, Driver::MsgQueue_Send);
					return true;
				}

				return false;
			}

//-----------------------------------------------------------------------------
// <ThermostatFanMode::CreateVars>
// Create the values managed by this command class
//-----------------------------------------------------------------------------
			void ThermostatFanMode::CreateVars(uint8 const _instance)
			{
				if (m_supportedModes.empty())
				{
					return;
				}

				if (Node* node = GetNodeUnsafe())
				{
					node->CreateValueList(ValueID::ValueGenre_User, GetCommandClassId(), _instance, ValueID_Index_ThermostatFanMode::FanMode, "Fan Mode", "", false, false, 1, m_supportedModes, m_supportedModes[0].m_value, 0);
				}
			}
		} // namespace CC
	} // namespace Internal
} // namespace OpenZWave