#include <stdio.h>
#include "t2s-file.h"
#include "gcin.h"

static int N;
static FILE *fp;

static int k_lookup(char *s, char out[])
{
  unsigned int key;
  bzero(&key, sizeof(key));

  u8cpy((char *)&key, s);

  int bot=0, top=N-1;
  while (bot <= top) {
    int mid = (bot + top)/2;
    T2S t;
    fseek(fp, mid*sizeof(T2S), SEEK_SET);
    fread(&t, sizeof(T2S), 1, fp);

    if (key > t.a)
      bot=mid+1;
    else
    if (key < t.a)
      top=mid-1;
    else
      return u8cpy(out, (char *)&t.b);
  }

  return u8cpy(out, s);
}

#include <sys/stat.h>

static int translate(char *fname, char *str, int strN, char **out)
{
  char fullname[128];

  get_sys_table_file_name(fname, fullname);

  if ((fp=fopen(fullname, "r"))==NULL)
    p_err("cannot open %s", fname);

  struct stat st;

  stat(fullname, &st);
  N = st.st_size / sizeof(T2S);

  char *p=str;
  char *endp = str + strN;
  int opN=0;
  char *op = NULL;

  while (p < endp) {
    op = realloc(op, opN+5);
    opN += k_lookup(p, &op[opN]);
    p+=utf8_sz(p);
  }

  fclose(fp);
  *out = op;
  op[opN]=0;
  return opN;
}

int trad2sim(char *str, int strN, char **out)
{
  translate("t2s.dat", str, strN, out);
}


int sim2trad(char *str, int strN, char **out)
{
  translate("s2t.dat", str, strN, out);
}
