fgetwc.c revision 103523
1101776Stjr/*- 2101776Stjr * Copyright (c) 2002 Tim J. Robbins. 3101776Stjr * All rights reserved. 4101776Stjr * 5101776Stjr * Redistribution and use in source and binary forms, with or without 6101776Stjr * modification, are permitted provided that the following conditions 7101776Stjr * are met: 8101776Stjr * 1. Redistributions of source code must retain the above copyright 9101776Stjr * notice, this list of conditions and the following disclaimer. 10101776Stjr * 2. Redistributions in binary form must reproduce the above copyright 11101776Stjr * notice, this list of conditions and the following disclaimer in the 12101776Stjr * documentation and/or other materials provided with the distribution. 13101776Stjr * 14101776Stjr * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15101776Stjr * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16101776Stjr * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17101776Stjr * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18101776Stjr * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19101776Stjr * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20101776Stjr * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21101776Stjr * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22101776Stjr * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23101776Stjr * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24101776Stjr * SUCH DAMAGE. 25101776Stjr */ 26101776Stjr 27101776Stjr#include <sys/cdefs.h> 28101776Stjr__FBSDID("$FreeBSD: head/lib/libc/stdio/fgetwc.c 103523 2002-09-18 05:58:11Z tjr $"); 29101776Stjr 30101776Stjr#include "namespace.h" 31101776Stjr#include <errno.h> 32101776Stjr#include <stdio.h> 33103523Stjr#include <stdlib.h> 34101776Stjr#include <wchar.h> 35101776Stjr#include "un-namespace.h" 36101776Stjr#include "libc_private.h" 37101776Stjr#include "local.h" 38101776Stjr 39101776Stjrwint_t 40101776Stjrfgetwc(FILE *fp) 41101776Stjr{ 42103523Stjr char buf[MB_LEN_MAX]; 43103523Stjr mbstate_t mbs; 44103523Stjr size_t n, nconv; 45103523Stjr int c; 46103523Stjr wchar_t wc; 47101776Stjr 48101776Stjr ORIENTLOCK(fp, 1); 49101776Stjr 50103523Stjr n = 0; 51103523Stjr while (n < MB_CUR_MAX) { 52103523Stjr if ((c = fgetc(fp)) == EOF) { 53103523Stjr if (n == 0) 54103523Stjr return (WEOF); 55103523Stjr break; 56103523Stjr } 57103523Stjr buf[n++] = (char)c; 58103523Stjr memset(&mbs, 0, sizeof(mbs)); 59103523Stjr nconv = mbrtowc(&wc, buf, n, &mbs); 60103523Stjr if (nconv == n) 61103523Stjr return (wc); 62103523Stjr else if (nconv == 0) 63103523Stjr return (L'\0'); 64103523Stjr else if (nconv == (size_t)-2 || nconv == (size_t)-1) 65103523Stjr break; 66103523Stjr } 67101776Stjr 68103523Stjr while (n-- != 0) 69103523Stjr ungetc((unsigned char)buf[n], fp); 70103523Stjr errno = EILSEQ; 71103523Stjr return (WEOF); 72101776Stjr} 73