#include "casmfileinfo.h"

namespace {

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

#include <stdlib.h></stdlib.h>

#include <stdio.h></stdio.h>

#include <string.h></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></stdlib.h>

#define TOONZMAXPATHLEN _MAX_PATH

#else

#include <sys param.h=""></sys>

#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);

}