#include "casmfileinfo.h"

namespace
{

//==============================================================================

#include <stdlib.h>
#include <stdio.h>
#include <string.h>

/*---------------------------------------------------------------------------*/

#define SKIP_BLANKS(s)                                                  \
	{                                                                   \
		while (*s && (*s == ' ' || *s == '\t') && *s != 10 && *s != 13) \
			s++;                                                        \
	}

#define GET_WORD(s, p)                                                \
	{                                                                 \
		while (*s && *s != ' ' && *s != '\t' && *s != 10 && *s != 13) \
			*(p++) = *(s++);                                          \
		*p = '\0';                                                    \
	}

#define SKIP_WORD(s)                                                  \
	{                                                                 \
		while (*s && *s != ' ' && *s != '\t' && *s != 10 && *s != 13) \
			s++;                                                      \
	}

/*------------------------------------------------------------------------*/

#ifdef WIN32
#include <stdlib.h>
#define TOONZMAXPATHLEN _MAX_PATH
#else
#include <sys/param.h>
#define TOONZMAXPATHLEN MAXPATHLEN
#endif

/*------------------------------------------------------------------------*/

int get_frame_number(char *s)
{
	int j, i = 0;
	while (s[i] && (s[i] < '0' || s[i] > '9'))
		i++;
	if (!s[i])
		return 0;
	j = i;
	while (s[i] && (s[i] >= '0' && s[i] <= '9'))
		i++;
	s[i] = '\0';

	return (atoi(s + j));
}

//==============================================================================

int compute_casm_range(const char *filename, int &start, int &end, bool &interlaced)
{
	FILE *fp;
	bool first_flag = true;
	int cnt, frame = 1;
	char buffer[TOONZMAXPATHLEN], *s;

	start = 0;
	end = 0;
	interlaced = false;

	if (filename)
		fp = fopen(filename, "r");
	else
		fp = fdopen(0, "r");

	if (!fp)
		return 0;

	cnt = 0;

	while (fgets(buffer, TOONZMAXPATHLEN, fp)) {
		s = buffer;
		SKIP_BLANKS(s)
		if (strncmp(s, "FRAME", 5) == 0) {
			frame = get_frame_number(s);
			if (first_flag) {
				start = frame;
				first_flag = false;
			}
			cnt++;
		} else if (strncmp(s, "FIELD", 5) == 0)
			interlaced = true;
	}

	if (!first_flag)
		end = frame;
	else {
		start = 0;
		end = 0;
	}

	if (fp != stdin)
		fclose(fp);

	if (interlaced) {
		start = ((start) + 1) / 2;
		end = ((end) + 1) / 2;
	}

	return cnt;
}
}

//==============================================================================

CasmFileInfo::CasmFileInfo(const TFilePath &fp)
	: m_fp(fp)
{
}

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

void CasmFileInfo::getFrameRange(int &startFrame, int &endFrame, bool &interlaced)
{
	int rc = compute_casm_range(
		toString(m_fp.getWideString()).c_str(),
		startFrame, endFrame, interlaced);
}