blob: 12adb5ddc727ada6d302dc36b52c96f844976a09 [file] [log] [blame]
#include <windows.h>
#include <malloc.h>
#include <time.h>
#include <errno.h>
#include <msvcrt.h>
errno_t __cdecl _wasctime_s (wchar_t *, size_t, const struct tm *);
/* wchar_t * __cdecl _wasctime (const struct tm *); */
static errno_t __cdecl _int_wasctime_s (wchar_t *, size_t, const struct tm *);
static errno_t __cdecl _stub (wchar_t *, size_t, const struct tm *);
errno_t __cdecl (*__MINGW_IMP_SYMBOL(_wasctime_s))(wchar_t *, size_t, const struct tm *) =
_stub;
static errno_t __cdecl
_stub (wchar_t *d, size_t dn, const struct tm *pt)
{
errno_t __cdecl (*f)(wchar_t *, size_t, const struct tm *) = __MINGW_IMP_SYMBOL(_wasctime_s);
if (f == _stub)
{
f = (errno_t __cdecl (*)(wchar_t *, size_t, const struct tm *))
GetProcAddress (__mingw_get_msvcrt_handle (), "_wasctime_s");
if (!f)
f = _int_wasctime_s;
__MINGW_IMP_SYMBOL(_wasctime_s) = f;
}
return (*f)(d, dn, pt);
}
errno_t __cdecl
_wasctime_s (wchar_t *d, size_t dn, const struct tm *pt)
{
return _stub (d, dn, pt);
}
static errno_t __cdecl
_int_wasctime_s (wchar_t *d, size_t dn, const struct tm *pt)
{
wchar_t *tmp;
size_t i;
if (d && dn)
d[0] = 0;
if (!d || dn < 26 || !pt || (tmp = _wasctime (pt)) == NULL)
{
errno = EINVAL;
return EINVAL;
}
for (i = 0; tmp[i] != 0; i++)
d[i] = tmp[i];
d[i] = 0;
return 0;
}