xref: /minix3/lib/libc/stdio/fwide.c (revision 2fe8fb192fe7e8720e3e7a77f928da545e872a6a)
1*2fe8fb19SBen Gras /* $NetBSD: fwide.c,v 1.3 2005/06/12 05:21:27 lukem Exp $ */
2*2fe8fb19SBen Gras 
3*2fe8fb19SBen Gras /*-
4*2fe8fb19SBen Gras  * Copyright (c)2001 Citrus Project,
5*2fe8fb19SBen Gras  * All rights reserved.
6*2fe8fb19SBen Gras  *
7*2fe8fb19SBen Gras  * Redistribution and use in source and binary forms, with or without
8*2fe8fb19SBen Gras  * modification, are permitted provided that the following conditions
9*2fe8fb19SBen Gras  * are met:
10*2fe8fb19SBen Gras  * 1. Redistributions of source code must retain the above copyright
11*2fe8fb19SBen Gras  *    notice, this list of conditions and the following disclaimer.
12*2fe8fb19SBen Gras  * 2. Redistributions in binary form must reproduce the above copyright
13*2fe8fb19SBen Gras  *    notice, this list of conditions and the following disclaimer in the
14*2fe8fb19SBen Gras  *    documentation and/or other materials provided with the distribution.
15*2fe8fb19SBen Gras  *
16*2fe8fb19SBen Gras  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17*2fe8fb19SBen Gras  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18*2fe8fb19SBen Gras  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19*2fe8fb19SBen Gras  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20*2fe8fb19SBen Gras  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21*2fe8fb19SBen Gras  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22*2fe8fb19SBen Gras  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23*2fe8fb19SBen Gras  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24*2fe8fb19SBen Gras  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25*2fe8fb19SBen Gras  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26*2fe8fb19SBen Gras  * SUCH DAMAGE.
27*2fe8fb19SBen Gras  *
28*2fe8fb19SBen Gras  * $Citrus$
29*2fe8fb19SBen Gras  */
30*2fe8fb19SBen Gras 
31*2fe8fb19SBen Gras #include <sys/cdefs.h>
32*2fe8fb19SBen Gras #if defined(LIBC_SCCS) && !defined(lint)
33*2fe8fb19SBen Gras __RCSID("$NetBSD: fwide.c,v 1.3 2005/06/12 05:21:27 lukem Exp $");
34*2fe8fb19SBen Gras #endif /* LIBC_SCCS and not lint */
35*2fe8fb19SBen Gras 
36*2fe8fb19SBen Gras #include <assert.h>
37*2fe8fb19SBen Gras #include <stdio.h>
38*2fe8fb19SBen Gras #include <wchar.h>
39*2fe8fb19SBen Gras #include "reentrant.h"
40*2fe8fb19SBen Gras #include "local.h"
41*2fe8fb19SBen Gras 
42*2fe8fb19SBen Gras int
fwide(FILE * fp,int mode)43*2fe8fb19SBen Gras fwide(FILE *fp, int mode)
44*2fe8fb19SBen Gras {
45*2fe8fb19SBen Gras 	struct wchar_io_data *wcio;
46*2fe8fb19SBen Gras 
47*2fe8fb19SBen Gras 	_DIAGASSERT(fp != NULL);
48*2fe8fb19SBen Gras 
49*2fe8fb19SBen Gras 	/*
50*2fe8fb19SBen Gras 	 * this implementation use only -1, 0, 1
51*2fe8fb19SBen Gras 	 * for mode value.
52*2fe8fb19SBen Gras 	 * (we don't need to do this, but
53*2fe8fb19SBen Gras 	 *  this can make things simpler.)
54*2fe8fb19SBen Gras 	 */
55*2fe8fb19SBen Gras 	if (mode > 0)
56*2fe8fb19SBen Gras 		mode = 1;
57*2fe8fb19SBen Gras 	else if (mode < 0)
58*2fe8fb19SBen Gras 		mode = -1;
59*2fe8fb19SBen Gras 
60*2fe8fb19SBen Gras 	FLOCKFILE(fp);
61*2fe8fb19SBen Gras 	wcio = WCIO_GET(fp);
62*2fe8fb19SBen Gras 	if (!wcio)
63*2fe8fb19SBen Gras 		return 0; /* XXX */
64*2fe8fb19SBen Gras 
65*2fe8fb19SBen Gras 	if (wcio->wcio_mode == 0 && mode != 0)
66*2fe8fb19SBen Gras 		wcio->wcio_mode = mode;
67*2fe8fb19SBen Gras 	else
68*2fe8fb19SBen Gras 		mode = wcio->wcio_mode;
69*2fe8fb19SBen Gras 	FUNLOCKFILE(fp);
70*2fe8fb19SBen Gras 
71*2fe8fb19SBen Gras 	return mode;
72*2fe8fb19SBen Gras }
73