Initial commit

external/tellstick-core/ProtocolIkea.cpp

@@ -0,0 +1,151 @@
+//
+// Copyright (C) 2012 Telldus Technologies AB. All rights reserved.
+//
+// Copyright: See COPYING file that comes with this distribution
+//
+//
+#include "service/ProtocolIkea.h"
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <string>
+#include "common/Strings.h"
+#ifdef _WINDOWS
+#define strtok_r(s, d, p) strtok_s(s, d, p)
+#endif
+
+int ProtocolIkea::methods() const {
+	if (TelldusCore::comparei(model(), L"selflearning-switch")) {
+		return TELLSTICK_TURNON | TELLSTICK_TURNOFF;
+	}
+	return TELLSTICK_TURNON | TELLSTICK_TURNOFF | TELLSTICK_DIM;
+}
+
+std::string ProtocolIkea::getStringForMethod(int method, unsigned char level, Controller *) {
+	const char B1[] = {84, 84, 0};
+	const char B0[] = {170, 0};
+
+	int intSystem = this->getIntParameter(L"system", 1, 16)-1;
+	int intFadeStyle = TelldusCore::comparei(this->getStringParameter(L"fade", L"true"), L"true");
+	std::wstring wstrUnits = this->getStringParameter(L"units", L"");
+
+	if (method == TELLSTICK_TURNON) {
+		level = 255;
+	} else if (method == TELLSTICK_TURNOFF) {
+		level = 0;
+	} else if (method == TELLSTICK_DIM) {
+	} else {
+		return "";
+	}
+
+	if (wstrUnits == L"") {
+		return "";
+	}
+
+	std::string strUnits(TelldusCore::wideToString(wstrUnits));
+	int intUnits = 0;  // Start without any units
+
+	char *tempUnits = new char[strUnits.size()+1];
+#ifdef _WINDOWS
+	strcpy_s(tempUnits, strUnits.size()+1, strUnits.c_str());
+#else
+	snprintf(tempUnits, strUnits.size()+1, "%s", strUnits.c_str());
+#endif
+
+	char *saveptr;
+	char *strToken = strtok_r(tempUnits, ",", &saveptr);
+	do {
+		int intUnit = atoi(strToken);
+		if (intUnit == 10) {
+			intUnit = 0;
+		}
+		intUnits = intUnits | ( 1<<(9-intUnit) );
+	} while ( (strToken = strtok_r(NULL, ",", &saveptr)) != NULL );
+
+	delete[] tempUnits;
+
+	std::string strReturn;
+	strReturn.append(1, 'S');
+	strReturn.append(1, 84);
+	strReturn.append(1, 84);
+	strReturn.append(1, 84);
+	strReturn.append(1, 84);
+	strReturn.append(1, 84);
+	strReturn.append(1, 84);
+	strReturn.append(1, 170);
+
+	std::string strChannels = "";
+	int intCode = (intSystem << 10) | intUnits;
+	int checksum1 = 0;
+	int checksum2 = 0;
+	for (int i = 13; i >= 0; --i) {
+		if ((intCode >> i) & 1) {
+			strChannels.append(B1);
+			if (i % 2 == 0)
+				checksum2++;
+			else
+				checksum1++;
+		} else {
+			strChannels.append(B0);
+		}
+	}
+	strReturn.append(strChannels);  // System + Units
+
+	strReturn.append(checksum1 %2 == 0 ? B1 : B0);  // 1st checksum
+	strReturn.append(checksum2 %2 == 0 ? B1 : B0);  // 2nd checksum
+
+	int intLevel = 0;
+	if (level <= 12) {
+		intLevel = 10;  // Level 10 is actually off
+	} else if (level <= 37) {
+		intLevel = 1;
+	} else if (level <= 62) {
+		intLevel = 2;
+	} else if (level <= 87) {
+		intLevel = 3;
+	} else if (level <= 112) {
+		intLevel = 4;
+	} else if (level <= 137) {
+		intLevel = 5;
+	} else if (level <= 162) {
+		intLevel = 6;
+	} else if (level <= 187) {
+		intLevel = 7;
+	} else if (level <= 212) {
+		intLevel = 8;
+	} else if (level <= 237) {
+		intLevel = 9;
+	} else {
+		intLevel = 0;  // Level 0 is actually full on
+	}
+
+	int intFade = 0;
+	if (intFadeStyle == 1) {
+		intFade = 11 << 4;  // Smooth
+	} else {
+		intFade = 1 << 4;  // Instant
+	}
+
+	intCode = intLevel | intFade;  // Concat level and fade
+
+	checksum1 = 0;
+	checksum2 = 0;
+	for (int i = 0; i < 6; ++i) {
+		if ((intCode >> i) & 1) {
+			strReturn.append(B1);
+			if (i % 2 == 0)
+				checksum1++;
+			else
+				checksum2++;
+		} else {
+			strReturn.append(B0);
+		}
+	}
+
+	strReturn.append(checksum1 %2 == 0 ? B1 : B0);  // 1st checksum
+	strReturn.append(checksum2 %2 == 0 ? B1 : B0);  // 2nd checksum
+
+	strReturn.append("+");
+
+	return strReturn;
+}