// #include "StdAfx.h"
#include "DeviceNexa.h"
#include <string>
#include <algorithm>
#include <bitset>
#include <iostream>
#include <fstream>

using namespace std;

/*
* Constructor
*/
DeviceNexa::DeviceNexa(int intNewHouse, int intNewCode, int intDeviceIndex):Device(intDeviceIndex){
	intHouse = intNewHouse;
	intCode = intNewCode;
}

/*
* Destructor
*/
DeviceNexa::~DeviceNexa(void)
{
	intHouse = -1;
	intCode = -1;
}

/*
* Turn on this device
*/
void DeviceNexa::turnOn(void){

	try{
		//char* model = getModel(intDeviceId);
		string strCode = getStringCode(intCode);
		string strHouse = getStringCode(intHouse);
		strCode.append(strHouse);
		
		strCode.insert(0, "S");
		strCode.append("$k$k$kk$$kk$$kk$$k+");	//the "turn on"-code, keeps it like this, doesn't have to be regenerated each time
		
		char* strMessage = const_cast<char*>(strCode.c_str());

		Device::send(strMessage);
	}
	catch(...){
		throw;
	}
}

/*
* Turn off this device
*/
void DeviceNexa::turnOff(void){
	
	try{
		string strCode = getStringCode(intCode);
		string strHouse = getStringCode(intHouse);

		strCode.append(strHouse);
		strCode.insert(0, "S");
		strCode.append("$k$k$kk$$kk$$k$k$k+");	//the "turn off"-code, keeps it like this, doesn't have to be regenerated each time
		
		char* strMessage = const_cast<char*>(strCode.c_str());
		
		Device::send(strMessage);
	}
	catch(...){
		throw;
	}
}

/*
* Send a bell
*/
void DeviceNexa::bell(void){
	
	try{
		string strCode = getStringCode(intCode);

		strCode.append("$kk$$kk$$kk$$k$k"); //the unit-code is always 7, doesn't have to be regenerated each time
		strCode.insert(0, "S");
		strCode.append("$kk$$kk$$kk$$kk$$k+");	//the "bell"-code, keeps it like this, doesn't have to be regenerated each time
		
		char* strMessage = const_cast<char*>(strCode.c_str());
		
		Device::send(strMessage);
	}
	catch(...){
		throw;
	}
}

/*
*	Convert an integer to byte string where 0 is represented by $k and 1 by k$, reversed and padded with 0's as needed
*/
string DeviceNexa::getStringCode(int intToConvert){
	
	string strReturn = "";

	try{
		bitset<4> bs ((long)intToConvert);
		
		strReturn = bs.to_string();
		reverse(strReturn.begin(), strReturn.end());

		int intPos = (int)strReturn.find("0");
		while (intPos < string::npos){
			strReturn.replace(intPos, 1, "$k");
			intPos = (int)strReturn.find("0", intPos + 1);
		}

		intPos = (int)strReturn.find("1");
		while (intPos < string::npos){
			strReturn.replace(intPos, 1, "k$");
			intPos = (int)strReturn.find("1", intPos + 1);
		}
	
		intPos = 0;
		while (intPos < (int)strReturn.length()){
			strReturn.insert(intPos, "$k");
			intPos = intPos + 4;
		}
	}
	catch(...){
		throw;
	}
	return strReturn;

}

/*
* Has the device got the method?
*/
bool DeviceNexa::hasMethod(int methodname, char* strModel){

	if( strcmp(strModel, TELLSTICK_DEVICE_YCR3500) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_YCR300D) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_WSR1000) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_CMR1000) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_CMR300) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_PA33300) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_EL2000) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_EL2005) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_EL2006) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_SYCR3500) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_SYCR300) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_HDR105) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_EL2004) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_EL2016) == 0 ||
		strcmp(strModel, TELLSTICK_DEVICE_EL2010) == 0
 		)
	{
		if(methodname == TELLSTICK_TURNON || methodname == TELLSTICK_TURNOFF){
			return true;
		}
	} else if ( strcmp(strModel, TELLSTICK_DEVICE_ML7100) == 0 ) {
		if(methodname == TELLSTICK_BELL) {
			return true;
		}
	}
	return false;
}