#include <sys/cdefs.h>
__FBSDID("$FreeBSD: src/lib/libc/stdio/fgetws.c,v 1.8 2009/11/25 04:45:45 wollman Exp $");
#include "xlocale_private.h"
#include "namespace.h"
#include <errno.h>
#include <stdio.h>
#include <string.h>
#include <wchar.h>
#include "un-namespace.h"
#include "libc_private.h"
#include "local.h"
#include "mblocal.h"
wchar_t *
fgetws_l(wchar_t * __restrict ws, int n, FILE * __restrict fp, locale_t loc)
{
wchar_t *wsp;
size_t nconv;
const char *src;
unsigned char *nl;
struct __xlocale_st_runelocale *rl;
size_t (*__mbsnrtowcs)(wchar_t * __restrict, const char ** __restrict, size_t, size_t, __darwin_mbstate_t * __restrict, locale_t);
NORMALIZE_LOCALE(loc);
rl = loc->__lc_ctype;
__mbsnrtowcs = rl->__mbsnrtowcs;
FLOCKFILE(fp);
ORIENT(fp, 1);
if (n <= 0) {
errno = EINVAL;
goto error;
}
if (fp->_r <= 0 && __srefill(fp))
goto error;
wsp = ws;
do {
src = (const char *)fp->_p;
nl = memchr(fp->_p, '\n', fp->_r);
nconv = __mbsnrtowcs(wsp, &src,
nl != NULL ? (nl - fp->_p + 1) : fp->_r,
n - 1, &fp->_mbstate, loc);
if (nconv == (size_t)-1)
goto error;
if (src == NULL) {
nconv++;
src = memchr(fp->_p, '\0', fp->_r);
src++;
}
fp->_r -= (unsigned char *)src - fp->_p;
fp->_p = (unsigned char *)src;
n -= nconv;
wsp += nconv;
} while (wsp[-1] != L'\n' && n > 1 && (fp->_r > 0 ||
__srefill(fp) == 0));
if (wsp == ws)
goto error;
if (!rl->__mbsinit(&fp->_mbstate, loc))
goto error;
*wsp = L'\0';
FUNLOCKFILE(fp);
return (ws);
error:
FUNLOCKFILE(fp);
return (NULL);
}
wchar_t *
fgetws(wchar_t * __restrict ws, int n, FILE * __restrict fp)
{
return fgetws_l(ws, n, fp, __current_locale());
}