xref: /freebsd/lib/libc/stdio/fgetwc.c (revision 8f030a44b8c665d111ed900df1a8203dde0af1e7)
1e74101e4STim J. Robbins /*-
2e74101e4STim J. Robbins  * Copyright (c) 2002 Tim J. Robbins.
3e74101e4STim J. Robbins  * All rights reserved.
4e74101e4STim J. Robbins  *
5e74101e4STim J. Robbins  * Redistribution and use in source and binary forms, with or without
6e74101e4STim J. Robbins  * modification, are permitted provided that the following conditions
7e74101e4STim J. Robbins  * are met:
8e74101e4STim J. Robbins  * 1. Redistributions of source code must retain the above copyright
9e74101e4STim J. Robbins  *    notice, this list of conditions and the following disclaimer.
10e74101e4STim J. Robbins  * 2. Redistributions in binary form must reproduce the above copyright
11e74101e4STim J. Robbins  *    notice, this list of conditions and the following disclaimer in the
12e74101e4STim J. Robbins  *    documentation and/or other materials provided with the distribution.
13e74101e4STim J. Robbins  *
14e74101e4STim J. Robbins  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15e74101e4STim J. Robbins  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16e74101e4STim J. Robbins  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17e74101e4STim J. Robbins  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18e74101e4STim J. Robbins  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19e74101e4STim J. Robbins  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20e74101e4STim J. Robbins  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21e74101e4STim J. Robbins  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22e74101e4STim J. Robbins  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23e74101e4STim J. Robbins  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24e74101e4STim J. Robbins  * SUCH DAMAGE.
25e74101e4STim J. Robbins  */
26e74101e4STim J. Robbins 
27e74101e4STim J. Robbins #include <sys/cdefs.h>
28e74101e4STim J. Robbins __FBSDID("$FreeBSD$");
29e74101e4STim J. Robbins 
30e74101e4STim J. Robbins #include "namespace.h"
31e74101e4STim J. Robbins #include <errno.h>
32e74101e4STim J. Robbins #include <stdio.h>
3324990dfaSTim J. Robbins #include <stdlib.h>
34e74101e4STim J. Robbins #include <wchar.h>
35e74101e4STim J. Robbins #include "un-namespace.h"
36e74101e4STim J. Robbins #include "libc_private.h"
37e74101e4STim J. Robbins #include "local.h"
38e74101e4STim J. Robbins 
390b7bc802STim J. Robbins static __inline wint_t	__fgetwc_nbf(FILE *);
400b7bc802STim J. Robbins 
418f030a44STim J. Robbins /*
428f030a44STim J. Robbins  * Non-MT-safe version.
438f030a44STim J. Robbins  */
44e74101e4STim J. Robbins wint_t
458f030a44STim J. Robbins __fgetwc(FILE *fp)
46e74101e4STim J. Robbins {
470b7bc802STim J. Robbins 	wint_t wc;
480b7bc802STim J. Robbins 
490b7bc802STim J. Robbins 	if (MB_CUR_MAX == 1) {
500b7bc802STim J. Robbins 		/*
510b7bc802STim J. Robbins 		 * Assume we're using a single-byte locale. A safer test
520b7bc802STim J. Robbins 		 * might be to check _CurrentRuneLocale->encoding.
530b7bc802STim J. Robbins 		 */
540b7bc802STim J. Robbins 		wc = (wint_t)__sgetc(fp);
550b7bc802STim J. Robbins 	} else
560b7bc802STim J. Robbins 		wc = __fgetwc_nbf(fp);
570b7bc802STim J. Robbins 
580b7bc802STim J. Robbins 	return (wc);
590b7bc802STim J. Robbins }
600b7bc802STim J. Robbins 
618f030a44STim J. Robbins /*
628f030a44STim J. Robbins  * MT-safe version.
638f030a44STim J. Robbins  */
648f030a44STim J. Robbins wint_t
658f030a44STim J. Robbins fgetwc(FILE *fp)
668f030a44STim J. Robbins {
678f030a44STim J. Robbins 	wint_t r;
688f030a44STim J. Robbins 
698f030a44STim J. Robbins 	FLOCKFILE(fp);
708f030a44STim J. Robbins 	ORIENT(fp, 1);
718f030a44STim J. Robbins 	r = __fgetwc(fp);
728f030a44STim J. Robbins 	FUNLOCKFILE(fp);
738f030a44STim J. Robbins 
748f030a44STim J. Robbins 	return (r);
758f030a44STim J. Robbins }
768f030a44STim J. Robbins 
770b7bc802STim J. Robbins static __inline wint_t
780b7bc802STim J. Robbins __fgetwc_nbf(FILE *fp)
790b7bc802STim J. Robbins {
8024990dfaSTim J. Robbins 	char buf[MB_LEN_MAX];
8124990dfaSTim J. Robbins 	mbstate_t mbs;
8224990dfaSTim J. Robbins 	size_t n, nconv;
8324990dfaSTim J. Robbins 	int c;
8424990dfaSTim J. Robbins 	wchar_t wc;
85e74101e4STim J. Robbins 
8624990dfaSTim J. Robbins 	n = 0;
8724990dfaSTim J. Robbins 	while (n < MB_CUR_MAX) {
880b7bc802STim J. Robbins 		if ((c = __sgetc(fp)) == EOF) {
8924990dfaSTim J. Robbins 			if (n == 0)
9024990dfaSTim J. Robbins 				return (WEOF);
9124990dfaSTim J. Robbins 			break;
9224990dfaSTim J. Robbins 		}
9324990dfaSTim J. Robbins 		buf[n++] = (char)c;
9424990dfaSTim J. Robbins 		memset(&mbs, 0, sizeof(mbs));
9524990dfaSTim J. Robbins 		nconv = mbrtowc(&wc, buf, n, &mbs);
9624990dfaSTim J. Robbins 		if (nconv == n)
97e74101e4STim J. Robbins 			return (wc);
9824990dfaSTim J. Robbins 		else if (nconv == 0)
9924990dfaSTim J. Robbins 			return (L'\0');
100bddc6280STim J. Robbins 		else if (nconv == (size_t)-1)
10124990dfaSTim J. Robbins 			break;
10224990dfaSTim J. Robbins 	}
10324990dfaSTim J. Robbins 
10424990dfaSTim J. Robbins 	while (n-- != 0)
1058f030a44STim J. Robbins 		__ungetc((unsigned char)buf[n], fp);
10624990dfaSTim J. Robbins 	errno = EILSEQ;
10724990dfaSTim J. Robbins 	return (WEOF);
108e74101e4STim J. Robbins }
109