mingw-w64-crt/secapi/_gmtime64_s.c

#include <windows.h>
#include <malloc.h>
#include <time.h>
#include <errno.h>
#include <msvcrt.h>

/* struct tm * __cdecl _gmtime64 (const __time64_t *); */
errno_t __cdecl _gmtime64_s (struct tm *, const __time64_t *);
static errno_t __cdecl _int_gmtime64_s (struct tm *, const __time64_t *);
static errno_t __cdecl _stub (struct tm *, const __time64_t *);

errno_t __cdecl (*__MINGW_IMP_SYMBOL(_gmtime64_s))(struct tm *, const __time64_t *) = 
 _stub;

static errno_t __cdecl
_stub (struct tm *ptm, const __time64_t *pt)
{
  errno_t __cdecl (*f)(struct tm *, const __time64_t *) = __MINGW_IMP_SYMBOL(_gmtime64_s);

  if (f == _stub)
    {
	f = (errno_t __cdecl (*)(struct tm *, const __time64_t *))
	    GetProcAddress (__mingw_get_msvcrt_handle (), "_gmtime64_s");
	if (!f)
	  f = _int_gmtime64_s;
	__MINGW_IMP_SYMBOL(_gmtime64_s) = f;
    }
  return (*f)(ptm, pt);
}

errno_t __cdecl
_gmtime64_s (struct tm *ptm, const __time64_t *pt)
{
  return _stub (ptm, pt);
}

static errno_t __cdecl
_int_gmtime64_s (struct tm *ptm, const __time64_t *pt)
{
  struct tm *ltm;

  if (ptm)
    memset (ptm, 0xff, sizeof (*ptm));
  if (!ptm || !pt)
     {
        errno = EINVAL;
	return EINVAL;
     }
  if ((ltm = _gmtime64 (pt)) == NULL)
    return errno;
  *ptm = *ltm;
  return 0;
}