#include "tdoublekeyframe.h"
#include "tstream.h"
#include "tconvert.h"
#include "tunit.h"

TDoubleKeyframe::TDoubleKeyframe(double frame, double value)
	: m_type(Linear), m_frame(frame), m_value(value), m_step(1), m_isKeyframe(false), m_speedIn(), m_speedOut(), m_linkedHandles(true), m_expressionText(""), m_fileParams(), m_similarShapeOffset(0), m_unitName("")
{
}

TDoubleKeyframe::~TDoubleKeyframe()
{
}

void TDoubleKeyframe::saveData(TOStream &os) const
{
	static std::map<TDoubleKeyframe::Type, string> typeCodes;
	if (typeCodes.empty()) {
		typeCodes[None] = "n";
		typeCodes[Constant] = "C";
		typeCodes[Linear] = "L";
		typeCodes[Exponential] = "Exp";
		typeCodes[SpeedInOut] = "S";
		typeCodes[EaseInOut] = "E";
		typeCodes[EaseInOutPercentage] = "Ep";
		typeCodes[Expression] = "Ex";
		typeCodes[File] = "F";
		typeCodes[SimilarShape] = "SimShape";
	};
	map<string, string> attr;
	if (!m_linkedHandles)
		attr["lnk"] = "no";
	if (m_step > 1)
		attr["step"] = toString(m_step);
	os.openChild(typeCodes[m_type], attr);
	switch (m_prevType) {
	case Linear:
		os.child("prev") << m_value;
		break;
	case SpeedInOut:
		os.child("prev") << m_value << m_speedIn.x << m_speedIn.y;
		break;
	case EaseInOut:
	case EaseInOutPercentage:
		os.child("prev") << m_value << m_speedIn.x;
		break;
	}
	string unitName = m_unitName != "" ? m_unitName : "default";
	switch (m_type) {
	case Constant:
	case Exponential:
	case Linear:
		os << m_frame << m_value;
		break;
	case SpeedInOut:
		os << m_frame << m_value
		   << m_speedOut.x << m_speedOut.y;
		break;
	case EaseInOut:
	case EaseInOutPercentage:
		os << m_frame << m_value
		   << m_speedOut.x;
		break;
	case Expression:
		os << m_frame << m_expressionText << unitName;
		break;
	case SimilarShape:
		os << m_frame << m_value << m_expressionText << m_similarShapeOffset;
		break;
	case File:
		os << m_frame << m_fileParams.m_path << m_fileParams.m_fieldIndex << unitName;
		break;
	}
	os.closeChild();
}

void TDoubleKeyframe::loadData(TIStream &is)
{
	static std::map<string, TDoubleKeyframe::Type> typeCodes;
	if (typeCodes.empty()) {
		typeCodes["n"] = None;
		typeCodes["C"] = Constant;
		typeCodes["L"] = Linear;
		typeCodes["Exp"] = Exponential;
		typeCodes["S"] = SpeedInOut;
		typeCodes["E"] = EaseInOut;
		typeCodes["Ep"] = EaseInOutPercentage;
		typeCodes["Ex"] = Expression;
		typeCodes["F"] = File;
		typeCodes["SimShape"] = SimilarShape;
	};

	string tagName;
	if (!is.matchTag(tagName))
		return;
	std::map<string, TDoubleKeyframe::Type>::iterator it =
		typeCodes.find(tagName);
	if (it == typeCodes.end()) {
		throw TException(tagName + " : unexpected tag");
	}
	m_type = it->second;
	is.getTagParam("step", m_step);
	string lnkValue;
	if (is.getTagParam("lnk", lnkValue) && lnkValue == "no")
		m_linkedHandles = false;
	if (is.matchTag(tagName)) {
		if (tagName != "prev")
			throw TException(tagName + " : unexpected tag");

		is >> m_value;
		if (!is.eos()) {
			is >> m_speedIn.x;
			if (!is.eos())
				is >> m_speedIn.y;
		}
		if (!is.matchEndTag())
			throw TException(tagName + " : missing endtag");
	}
	double dummy0, dummy1;
	switch (m_type) {
	case Constant:
	case Linear:
	case Exponential:
		is >> m_frame >> m_value;
		break;
	case SpeedInOut:
		is >> m_frame >> m_value >> m_speedOut.x >> m_speedOut.y;
		if (!is.eos())
			is >> dummy0 >> dummy1; // old and wrong format. used only during the 6.0 release
		break;
	case EaseInOut:
	case EaseInOutPercentage:
		is >> m_frame >> m_value >> m_speedOut.x;
		if (!is.eos())
			is >> dummy0; // old and wrong format. used only during the 6.0 release
		break;
	case Expression:
		is >> m_frame >> m_expressionText >> m_unitName;
		break;
	case SimilarShape:
		is >> m_frame >> m_value >> m_expressionText >> m_similarShapeOffset;
		break;
	case File:
		is >> m_frame >> m_fileParams.m_path >> m_fileParams.m_fieldIndex >> m_unitName;
		break;
	}
	if (!is.matchEndTag())
		throw TException(tagName + " : missing endtag");
	if (m_unitName == "default")
		m_unitName = "";
	m_isKeyframe = true;
}