#include "tdoubleparamfile.h"

#include "tfilepath_io.h"

#include "tconvert.h"

namespace

{

//---------------------------------------------------------

bool parseDouble(double &value, char *&s)

{

	if (!(*s == '-' || *s == '.' || '0' <= *s && *s <= '9'))

		return false;

	char *t = s;

	if (*s == '-')

		s++;

	while ('0' <= *s && *s <= '9')

		s++;

	if (*s == '.') {

		s++;

		while ('0' <= *s && *s <= '9')

			s++;

		if (*s == 'e' || *s == 'E') {

			s++;

			if (*s == '+' || *s == '-')

				s++;

			while ('0' <= *s && *s <= '9')

				s++;

		}

	}

	string w(t, s - t);

	value = toDouble(w);

	return true;

}

//---------------------------------------------------------

int split(std::vector<double> &values, char *s)</double>

{

	int count = 0;

	for (;;) {

		while (*s == ' ' || *s == '\t')

			s++;

		if (*s == '\0')

			break;

		double value = 0;

		bool found = parseDouble(value, s);

		if (found) {

			count++;

			values.push_back(value);

			while (*s == ' ' || *s == '\t')

				s++;

		}

		if (*s == ',' || *s == ';') {

			if (!found) {

				count++;

				values.push_back(0);

			}

			s++;

		} else {

			if (!found)

				break;

		}

	}

	return count;

}

//---------------------------------------------------------

} // namespace

//---------------------------------------------------------

TDoubleParamFileData::TDoubleParamFileData()

	: m_params(), m_dirtyFlag(false)

{

}

//---------------------------------------------------------

TDoubleParamFileData::~TDoubleParamFileData()

{

}

//---------------------------------------------------------

void TDoubleParamFileData::setParams(const TDoubleKeyframe::FileParams ¶ms)

{

	m_params = params;

	invalidate();

}

//---------------------------------------------------------

void TDoubleParamFileData::invalidate()

{

	m_dirtyFlag = true;

	m_values.clear();

}

//---------------------------------------------------------

double TDoubleParamFileData::getValue(double frame, double defaultValue)

{

	if (frame < 0)

		return defaultValue;

	int intFrame = (int)frame;

	if (m_dirtyFlag)

		read();

	if (intFrame >= (int)m_values.size())

		return defaultValue;

	else

		return m_values[intFrame];

}

//---------------------------------------------------------

void TDoubleParamFileData::read()

{

	m_dirtyFlag = false;

	m_values.clear();

	int k = m_params.m_fieldIndex;

	if (k < 0)

		return;

	TFilePath fp = m_params.m_path;

	Tifstream is(fp);

	char buffer[2048];

	memset(buffer, 0, sizeof buffer);

	while (is) {

		is.getline(buffer, sizeof(buffer) - 1);

		std::vector<double> fields;</double>

		QString line(buffer);

		if (line.size() == 0 || line.startsWith("#"))

			continue;

		split(fields, buffer);

		double value = 0;

		if (k < (int)fields.size())

			value = fields[k];

		m_values.push_back(value);

	}

}

//---------------------------------------------------------