xref: /freebsd/lib/libc/stdio/ungetwc.c (revision 3c87aa1d3dc1d8dad3efad322852a8e1e76dee55)
1e74101e4STim J. Robbins /*-
287275e43STim J. Robbins  * Copyright (c) 2002-2004 Tim J. Robbins.
3e74101e4STim J. Robbins  * All rights reserved.
4e74101e4STim J. Robbins  *
5*3c87aa1dSDavid Chisnall  * Copyright (c) 2011 The FreeBSD Foundation
6*3c87aa1dSDavid Chisnall  * All rights reserved.
7*3c87aa1dSDavid Chisnall  * Portions of this software were developed by David Chisnall
8*3c87aa1dSDavid Chisnall  * under sponsorship from the FreeBSD Foundation.
9*3c87aa1dSDavid Chisnall  *
10e74101e4STim J. Robbins  * Redistribution and use in source and binary forms, with or without
11e74101e4STim J. Robbins  * modification, are permitted provided that the following conditions
12e74101e4STim J. Robbins  * are met:
13e74101e4STim J. Robbins  * 1. Redistributions of source code must retain the above copyright
14e74101e4STim J. Robbins  *    notice, this list of conditions and the following disclaimer.
15e74101e4STim J. Robbins  * 2. Redistributions in binary form must reproduce the above copyright
16e74101e4STim J. Robbins  *    notice, this list of conditions and the following disclaimer in the
17e74101e4STim J. Robbins  *    documentation and/or other materials provided with the distribution.
18e74101e4STim J. Robbins  *
19e74101e4STim J. Robbins  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
20e74101e4STim J. Robbins  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21e74101e4STim J. Robbins  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22e74101e4STim J. Robbins  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
23e74101e4STim J. Robbins  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24e74101e4STim J. Robbins  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25e74101e4STim J. Robbins  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26e74101e4STim J. Robbins  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27e74101e4STim J. Robbins  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28e74101e4STim J. Robbins  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29e74101e4STim J. Robbins  * SUCH DAMAGE.
30e74101e4STim J. Robbins  */
31e74101e4STim J. Robbins 
32e74101e4STim J. Robbins #include <sys/cdefs.h>
33e74101e4STim J. Robbins __FBSDID("$FreeBSD$");
34e74101e4STim J. Robbins 
35e74101e4STim J. Robbins #include "namespace.h"
36e74101e4STim J. Robbins #include <errno.h>
37d8f77b45SStefan Farfeleder #include <limits.h>
38e74101e4STim J. Robbins #include <stdio.h>
3924990dfaSTim J. Robbins #include <stdlib.h>
40e74101e4STim J. Robbins #include <wchar.h>
41e74101e4STim J. Robbins #include "un-namespace.h"
42e74101e4STim J. Robbins #include "libc_private.h"
43e74101e4STim J. Robbins #include "local.h"
44f9ceea9bSTim J. Robbins #include "mblocal.h"
45*3c87aa1dSDavid Chisnall #include "xlocale_private.h"
46e74101e4STim J. Robbins 
475f147b57STim J. Robbins /*
485f147b57STim J. Robbins  * Non-MT-safe version.
495f147b57STim J. Robbins  */
50e74101e4STim J. Robbins wint_t
51*3c87aa1dSDavid Chisnall __ungetwc(wint_t wc, FILE *fp, locale_t locale)
52e74101e4STim J. Robbins {
5324990dfaSTim J. Robbins 	char buf[MB_LEN_MAX];
5424990dfaSTim J. Robbins 	size_t len;
55*3c87aa1dSDavid Chisnall 	struct xlocale_ctype *l = XLOCALE_CTYPE(locale);
56e74101e4STim J. Robbins 
5724990dfaSTim J. Robbins 	if (wc == WEOF)
585f147b57STim J. Robbins 		return (WEOF);
59*3c87aa1dSDavid Chisnall 	if ((len = l->__wcrtomb(buf, wc, &fp->_mbstate)) == (size_t)-1) {
606180233fSTim J. Robbins 		fp->_flags |= __SERR;
615f147b57STim J. Robbins 		return (WEOF);
626180233fSTim J. Robbins 	}
6324990dfaSTim J. Robbins 	while (len-- != 0)
6492603416STim J. Robbins 		if (__ungetc((unsigned char)buf[len], fp) == EOF)
655f147b57STim J. Robbins 			return (WEOF);
6624990dfaSTim J. Robbins 
6724990dfaSTim J. Robbins 	return (wc);
685f147b57STim J. Robbins }
6992603416STim J. Robbins 
705f147b57STim J. Robbins /*
715f147b57STim J. Robbins  * MT-safe version.
725f147b57STim J. Robbins  */
735f147b57STim J. Robbins wint_t
74*3c87aa1dSDavid Chisnall ungetwc_l(wint_t wc, FILE *fp, locale_t locale)
755f147b57STim J. Robbins {
765f147b57STim J. Robbins 	wint_t r;
77*3c87aa1dSDavid Chisnall 	FIX_LOCALE(locale);
785f147b57STim J. Robbins 
795f147b57STim J. Robbins 	FLOCKFILE(fp);
805f147b57STim J. Robbins 	ORIENT(fp, 1);
81*3c87aa1dSDavid Chisnall 	r = __ungetwc(wc, fp, locale);
8292603416STim J. Robbins 	FUNLOCKFILE(fp);
835f147b57STim J. Robbins 
845f147b57STim J. Robbins 	return (r);
85e74101e4STim J. Robbins }
86*3c87aa1dSDavid Chisnall wint_t
87*3c87aa1dSDavid Chisnall ungetwc(wint_t wc, FILE *fp)
88*3c87aa1dSDavid Chisnall {
89*3c87aa1dSDavid Chisnall 	return ungetwc_l(wc, fp, __get_locale());
90*3c87aa1dSDavid Chisnall }
91