//
// Copyright (C) 2012 Telldus Technologies AB. All rights reserved.
//
// Copyright: See COPYING file that comes with this distribution
//
//
#include "service/ProtocolEverflourish.h"
#include <stdio.h>
#include <sstream>
#include <string>
#include "service/ControllerMessage.h"

int ProtocolEverflourish::methods() const {
	return TELLSTICK_TURNON | TELLSTICK_TURNOFF | TELLSTICK_LEARN;
}

std::string ProtocolEverflourish::getStringForMethod(int method, unsigned char, Controller *) {
	unsigned int deviceCode = this->getIntParameter(L"house", 0, 16383);
	unsigned int intCode = this->getIntParameter(L"unit", 1, 4)-1;
	unsigned char action;

	if (method == TELLSTICK_TURNON) {
		action = 15;
	} else if (method == TELLSTICK_TURNOFF) {
		action = 0;
	} else if (method == TELLSTICK_LEARN) {
		action = 10;
	} else {
		return "";
	}

	const char ssss = 85;
	const char sssl = 84;  // 0
	const char slss = 69;  // 1

	const char bits[2] = {sssl, slss};
	int i, check;

	std::string strCode;

	deviceCode = (deviceCode << 2) | intCode;

	check = calculateChecksum(deviceCode);

	char preamble[] = {'R', 5, 'T', 114, 60, 1, 1, 105, ssss, ssss, 0};
	strCode.append(preamble);

	for(i = 15; i >= 0; i--) {
		strCode.append(1, bits[(deviceCode >> i)&0x01]);
	}
	for(i = 3; i >= 0; i--) {
		strCode.append(1, bits[(check >> i)&0x01]);
	}
	for(i = 3; i >= 0; i--) {
		strCode.append(1, bits[(action >> i)&0x01]);
	}

	strCode.append(1, ssss);
	strCode.append(1, '+');

	return strCode;
}

// The calculation used in this function is provided by Frank Stevenson
unsigned int ProtocolEverflourish::calculateChecksum(unsigned int x) {
	unsigned int bits[16] = {
		0xf, 0xa, 0x7, 0xe,
		0xf, 0xd, 0x9, 0x1,
		0x1, 0x2, 0x4, 0x8,
		0x3, 0x6, 0xc, 0xb
	};
	unsigned int bit = 1;
	unsigned int res = 0x5;
	int i;
	unsigned int lo, hi;

	if ((x & 0x3) == 3) {
		lo = x & 0x00ff;
		hi = x & 0xff00;
		lo += 4;
		if (lo>0x100) {
			lo = 0x12;
		}
		x = lo | hi;
	}

	for(i = 0; i < 16; i++) {
		if (x & bit) {
			res = res ^ bits[i];
		}
		bit = bit << 1;
	}

	return res;
}

std::string ProtocolEverflourish::decodeData(const ControllerMessage &dataMsg) {
	uint64_t allData;
	unsigned int house = 0;
	unsigned int unit = 0;
	unsigned int method = 0;

	allData = dataMsg.getInt64Parameter("data");

	house = allData & 0xFFFC00;
	house >>= 10;

	unit = allData & 0x300;
	unit >>= 8;
	unit++;  // unit from 1 to 4

	method = allData & 0xF;

	if(house > 16383 || unit < 1 || unit > 4) {
		// not everflourish
		return "";
	}

	std::stringstream retString;
	retString << "class:command;protocol:everflourish;model:selflearning;house:" << house << ";unit:" << unit << ";method:";
	if(method == 0) {
		retString << "turnoff;";
	} else if(method == 15) {
		retString << "turnon;";
	} else if(method == 10) {
		retString << "learn;";
	} else {
		// not everflourish
		return "";
	}

	return retString.str();
}