81 lines
1.5 KiB
C
81 lines
1.5 KiB
C
#include <reent.h>
|
|
#include <newlib.h>
|
|
#include <wchar.h>
|
|
#include <stdlib.h>
|
|
#include <stdio.h>
|
|
#include <errno.h>
|
|
#include <string.h>
|
|
#include "local.h"
|
|
|
|
size_t
|
|
_DEFUN (_mbrtowc_r, (ptr, pwc, s, n, ps),
|
|
struct _reent *ptr _AND
|
|
wchar_t *pwc _AND
|
|
const char *s _AND
|
|
size_t n _AND
|
|
mbstate_t *ps)
|
|
{
|
|
int retval = 0;
|
|
|
|
#ifdef _MB_CAPABLE
|
|
if (ps == NULL)
|
|
{
|
|
_REENT_CHECK_MISC(ptr);
|
|
ps = &(_REENT_MBRTOWC_STATE(ptr));
|
|
}
|
|
#endif
|
|
|
|
if (s == NULL)
|
|
retval = __mbtowc (ptr, NULL, "", 1, __locale_charset (), ps);
|
|
else
|
|
retval = __mbtowc (ptr, pwc, s, n, __locale_charset (), ps);
|
|
|
|
if (retval == -1)
|
|
{
|
|
ps->__count = 0;
|
|
ptr->_errno = EILSEQ;
|
|
return (size_t)(-1);
|
|
}
|
|
else
|
|
return (size_t)retval;
|
|
}
|
|
|
|
#ifndef _REENT_ONLY
|
|
size_t
|
|
_DEFUN (mbrtowc, (pwc, s, n, ps),
|
|
wchar_t *pwc _AND
|
|
const char *s _AND
|
|
size_t n _AND
|
|
mbstate_t *ps)
|
|
{
|
|
#if defined(PREFER_SIZE_OVER_SPEED) || defined(__OPTIMIZE_SIZE__)
|
|
return _mbrtowc_r (_REENT, pwc, s, n, ps);
|
|
#else
|
|
int retval = 0;
|
|
struct _reent *reent = _REENT;
|
|
|
|
#ifdef _MB_CAPABLE
|
|
if (ps == NULL)
|
|
{
|
|
_REENT_CHECK_MISC(reent);
|
|
ps = &(_REENT_MBRTOWC_STATE(reent));
|
|
}
|
|
#endif
|
|
|
|
if (s == NULL)
|
|
retval = __mbtowc (reent, NULL, "", 1, __locale_charset (), ps);
|
|
else
|
|
retval = __mbtowc (reent, pwc, s, n, __locale_charset (), ps);
|
|
|
|
if (retval == -1)
|
|
{
|
|
ps->__count = 0;
|
|
reent->_errno = EILSEQ;
|
|
return (size_t)(-1);
|
|
}
|
|
else
|
|
return (size_t)retval;
|
|
#endif /* not PREFER_SIZE_OVER_SPEED */
|
|
}
|
|
#endif /* !_REENT_ONLY */
|