xref: /titanic_52/usr/src/lib/libbc/libc/gen/common/mbtowc.c (revision 7c478bd95313f5f23a4c958a745db2134aa03244)
1*7c478bd9Sstevel@tonic-gate /*
2*7c478bd9Sstevel@tonic-gate  * CDDL HEADER START
3*7c478bd9Sstevel@tonic-gate  *
4*7c478bd9Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*7c478bd9Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*7c478bd9Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*7c478bd9Sstevel@tonic-gate  * with the License.
8*7c478bd9Sstevel@tonic-gate  *
9*7c478bd9Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*7c478bd9Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*7c478bd9Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*7c478bd9Sstevel@tonic-gate  * and limitations under the License.
13*7c478bd9Sstevel@tonic-gate  *
14*7c478bd9Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*7c478bd9Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*7c478bd9Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*7c478bd9Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*7c478bd9Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*7c478bd9Sstevel@tonic-gate  *
20*7c478bd9Sstevel@tonic-gate  * CDDL HEADER END
21*7c478bd9Sstevel@tonic-gate  */
22*7c478bd9Sstevel@tonic-gate /*
23*7c478bd9Sstevel@tonic-gate  * Copyright 1997 Sun Microsystems, Inc.  All rights reserved.
24*7c478bd9Sstevel@tonic-gate  * Use is subject to license terms.
25*7c478bd9Sstevel@tonic-gate  */
26*7c478bd9Sstevel@tonic-gate 
27*7c478bd9Sstevel@tonic-gate /*
28*7c478bd9Sstevel@tonic-gate  * mbtowc
29*7c478bd9Sstevel@tonic-gate  */
30*7c478bd9Sstevel@tonic-gate 
31*7c478bd9Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
32*7c478bd9Sstevel@tonic-gate 
33*7c478bd9Sstevel@tonic-gate #if !defined(lint) && defined(SCCSIDS)
34*7c478bd9Sstevel@tonic-gate static  char *sccsid = "%Z%%M% %I%     %E% SMI";
35*7c478bd9Sstevel@tonic-gate #endif
36*7c478bd9Sstevel@tonic-gate 
37*7c478bd9Sstevel@tonic-gate #include <stdlib.h>
38*7c478bd9Sstevel@tonic-gate #include "codeset.h"
39*7c478bd9Sstevel@tonic-gate #include "mbextern.h"
40*7c478bd9Sstevel@tonic-gate 
41*7c478bd9Sstevel@tonic-gate #undef	mblen
42*7c478bd9Sstevel@tonic-gate 
43*7c478bd9Sstevel@tonic-gate int
44*7c478bd9Sstevel@tonic-gate mbtowc(pwc, s, n)
45*7c478bd9Sstevel@tonic-gate 	wchar_t * pwc;
46*7c478bd9Sstevel@tonic-gate 	char *s;
47*7c478bd9Sstevel@tonic-gate 	size_t n;
48*7c478bd9Sstevel@tonic-gate {
49*7c478bd9Sstevel@tonic-gate 	char *handle;		/* handle */
50*7c478bd9Sstevel@tonic-gate 	int (*p)();
51*7c478bd9Sstevel@tonic-gate 	int ret;
52*7c478bd9Sstevel@tonic-gate 
53*7c478bd9Sstevel@tonic-gate 	switch (_code_set_info.code_id) {
54*7c478bd9Sstevel@tonic-gate 	case CODESET_NONE:
55*7c478bd9Sstevel@tonic-gate #ifdef DEBUG
56*7c478bd9Sstevel@tonic-gate 	printf ("DEFAULT: mbtowc invoked\n");
57*7c478bd9Sstevel@tonic-gate #endif
58*7c478bd9Sstevel@tonic-gate 		/*
59*7c478bd9Sstevel@tonic-gate 		 * This is a default code set
60*7c478bd9Sstevel@tonic-gate 		 */
61*7c478bd9Sstevel@tonic-gate 		 if (s == NULL)
62*7c478bd9Sstevel@tonic-gate 			return (1);
63*7c478bd9Sstevel@tonic-gate 		 else {
64*7c478bd9Sstevel@tonic-gate 			if (pwc != NULL)
65*7c478bd9Sstevel@tonic-gate 				*pwc = (unsigned char)*s;
66*7c478bd9Sstevel@tonic-gate 			return (1);
67*7c478bd9Sstevel@tonic-gate 		 }
68*7c478bd9Sstevel@tonic-gate 		 break;
69*7c478bd9Sstevel@tonic-gate 	case CODESET_EUC:
70*7c478bd9Sstevel@tonic-gate #ifdef DEBUG
71*7c478bd9Sstevel@tonic-gate 	printf ("EUC: mbtowc invoked\n");
72*7c478bd9Sstevel@tonic-gate #endif
73*7c478bd9Sstevel@tonic-gate 		/*
74*7c478bd9Sstevel@tonic-gate 		 * EUC code set
75*7c478bd9Sstevel@tonic-gate 		 */
76*7c478bd9Sstevel@tonic-gate 		 return(_mbtowc_euc(pwc, s, n));
77*7c478bd9Sstevel@tonic-gate 		 break;
78*7c478bd9Sstevel@tonic-gate 
79*7c478bd9Sstevel@tonic-gate 	case CODESET_XCCS:
80*7c478bd9Sstevel@tonic-gate #ifdef DEBUG
81*7c478bd9Sstevel@tonic-gate 	printf ("XCCS: mbtowc invoked\n");
82*7c478bd9Sstevel@tonic-gate #endif
83*7c478bd9Sstevel@tonic-gate 		/*
84*7c478bd9Sstevel@tonic-gate 		 * XCCS code set
85*7c478bd9Sstevel@tonic-gate 		 */
86*7c478bd9Sstevel@tonic-gate 		return(_mbtowc_xccs(pwc, s, n));
87*7c478bd9Sstevel@tonic-gate 		break;
88*7c478bd9Sstevel@tonic-gate 
89*7c478bd9Sstevel@tonic-gate 	case CODESET_ISO2022:
90*7c478bd9Sstevel@tonic-gate #ifdef DEBUG
91*7c478bd9Sstevel@tonic-gate 	printf ("ISO2022: mbtowc invoked\n");
92*7c478bd9Sstevel@tonic-gate #endif
93*7c478bd9Sstevel@tonic-gate 		/*
94*7c478bd9Sstevel@tonic-gate 		 * ISO family
95*7c478bd9Sstevel@tonic-gate 		 */
96*7c478bd9Sstevel@tonic-gate 		return(_mbtowc_iso(pwc, s, n));
97*7c478bd9Sstevel@tonic-gate 		break;
98*7c478bd9Sstevel@tonic-gate 
99*7c478bd9Sstevel@tonic-gate 	default:
100*7c478bd9Sstevel@tonic-gate 		/*
101*7c478bd9Sstevel@tonic-gate 		 * User defined code set
102*7c478bd9Sstevel@tonic-gate 		 */
103*7c478bd9Sstevel@tonic-gate 		 handle = _ml_open_library();
104*7c478bd9Sstevel@tonic-gate 		 if (handle == (char *)NULL)
105*7c478bd9Sstevel@tonic-gate 			return(ERROR_NO_LIB);	/* No user library */
106*7c478bd9Sstevel@tonic-gate 		 p = (int (*)()) dlsym(handle, "_mbtowc");
107*7c478bd9Sstevel@tonic-gate 		 if (p == (int (*)()) NULL)
108*7c478bd9Sstevel@tonic-gate 			return(ERROR_NO_SYM);
109*7c478bd9Sstevel@tonic-gate 		 ret = (*p)(pwc, s, n);
110*7c478bd9Sstevel@tonic-gate 		 return (ret);
111*7c478bd9Sstevel@tonic-gate 		 break;
112*7c478bd9Sstevel@tonic-gate 	}
113*7c478bd9Sstevel@tonic-gate 	/* NOTREACHED */
114*7c478bd9Sstevel@tonic-gate }
115*7c478bd9Sstevel@tonic-gate 
116*7c478bd9Sstevel@tonic-gate int mblen(s, n)
117*7c478bd9Sstevel@tonic-gate register char *s; int n;
118*7c478bd9Sstevel@tonic-gate {
119*7c478bd9Sstevel@tonic-gate 	int val;
120*7c478bd9Sstevel@tonic-gate 
121*7c478bd9Sstevel@tonic-gate 	if (_code_set_info.code_id != CODESET_ISO2022)
122*7c478bd9Sstevel@tonic-gate 		return (mbtowc((wchar_t *)0, s, n));
123*7c478bd9Sstevel@tonic-gate 	else {
124*7c478bd9Sstevel@tonic-gate 		/*
125*7c478bd9Sstevel@tonic-gate 		 * ISO's mbtowc() changes 'states'.
126*7c478bd9Sstevel@tonic-gate 		 */
127*7c478bd9Sstevel@tonic-gate 		_savestates();
128*7c478bd9Sstevel@tonic-gate 		val = mbtowc((wchar_t *)0, s, n);
129*7c478bd9Sstevel@tonic-gate 		_restorestates();
130*7c478bd9Sstevel@tonic-gate 		return (val);
131*7c478bd9Sstevel@tonic-gate 	}
132*7c478bd9Sstevel@tonic-gate }
133