#include "tfile_io.h"
 
#ifdef _WIN32
 
#include <windows.h>
#include <assert.h>
 
LPSTR AtlW2AHelper(LPSTR lpa, LPCWSTR lpw, int nChars, UINT acp) {
  assert(lpw != NULL);
  assert(lpa != NULL);
  /*
   verify that no illegal character present
   since lpa was allocated based on the size of lpw
don t worry about the number of chars
*/
  lpa[0] = '\0';
  WideCharToMultiByte(acp, 0, lpw, -1, lpa, nChars, NULL, NULL);
  return lpa;
}
 
char *convertWCHAR2CHAR(const wchar_t *fname) {
  int size      = 0;
  LPCWSTR lpw   = fname;
  char *name    = NULL;
  char *outName = 0;
  if (lpw) {
    LPSTR pStr = 0;
    size       = (lstrlenW(lpw) + 1) * 2;
    pStr       = (LPSTR)malloc(size * sizeof(char));
    name       = AtlW2AHelper(pStr, lpw, size, 0);
  }
  return name;
}
 
#else
#include <stdlib.h>
char *convertWCHAR2CHAR(const wchar_t *wc) {
  int count          = 0;
  const wchar_t *ptr = wc;
  char *c            = 0;
  char *buff;
  while ((*ptr) != '\0') {
    ++count;
    ++ptr;
  }
  c    = (char *)malloc((count + 1) * sizeof(char));
  buff = c;
  ptr  = wc;
  while ((*ptr) != '\0') {
    *c = *ptr;
    ++c;
    ++ptr;
  }
  *c = 0;
  return buff;
}
#endif
/*-----------------------------------*/
#if defined(MACOSX) || defined(LINUX)
 
FILE *_wfopen(const wchar_t *fname, const wchar_t *mode) {
  char *cfname = convertWCHAR2CHAR(fname);
  char *cmode  = convertWCHAR2CHAR(mode);
 
  FILE *f = fopen(cfname, cmode);
  free(cfname);
  free(cmode);
  return f;
}
 
/*-----------------------------------*/
 
int _wstat(const wchar_t *fname, struct stat *buf) {
  char *cfname = convertWCHAR2CHAR(fname);
  int rc       = stat(cfname, buf);
 
  free(cfname);
  return rc;
}
 
/*-----------------------------------*/
 
int _wremove(const wchar_t *fname) {
  char *cfname = convertWCHAR2CHAR(fname);
  int rc       = remove(cfname);
 
  free(cfname);
  return rc;
}
 
#endif