#include "tfile_io.h"

#ifdef WIN32

#include <windows.h></windows.h>

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