blob: a5023deedcd34f6ce708959ab93e8721fc5b6b69 [file] [log] [blame]
#include <windows.h>
#include <malloc.h>
#include <errno.h>
#include <msvcrt.h>
char * __cdecl _cgets (char *);
errno_t __cdecl _cgets_s (char *, size_t, size_t *);
static errno_t __cdecl _int_cgets_s (char *, size_t, size_t *);
static errno_t __cdecl _stub (char *, size_t, size_t *);
errno_t __cdecl (*__MINGW_IMP_SYMBOL(_cgets_s))(char *, size_t, size_t *) =
_stub;
static errno_t __cdecl
_stub (char *s, size_t l, size_t *r_len)
{
errno_t __cdecl (*f)(char *, size_t, size_t *) = __MINGW_IMP_SYMBOL(_cgets_s);
if (f == _stub)
{
f = (errno_t __cdecl (*)(char *, size_t, size_t *))
GetProcAddress (__mingw_get_msvcrt_handle (), "_cgets_s");
if (!f)
f = _int_cgets_s;
__MINGW_IMP_SYMBOL(_cgets_s) = f;
}
return (*f)(s, l, r_len);
}
errno_t __cdecl
_cgets_s (char *s, size_t l, size_t *r_len)
{
return _stub (s, l, r_len);
}
static errno_t __cdecl
_int_cgets_s (char *s, size_t l, size_t *r_len)
{
char *h, *p;
if (s && l)
s[0] = 0;
if (!s || !l || !r_len)
{
_cgets (NULL);
return EINVAL;
}
p = (char *) alloca (l + 2);
p[0] = l;
h = _cgets (s);
if (!h)
return EINVAL;
*r_len = (size_t) p[1];
memcpy (s, &p[2], *r_len);
return 0;
}