56 lines
1.1 KiB
C
56 lines
1.1 KiB
C
#include <windows.h>
|
|
#include <malloc.h>
|
|
#include <errno.h>
|
|
#include <msvcrt.h>
|
|
#include <sec_api/conio_s.h>
|
|
|
|
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;
|
|
}
|