xref: /onnv-gate/usr/src/lib/libbc/libc/gen/common/wcstombs.c (revision 0:68f95e015346)
1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate  * CDDL HEADER START
3*0Sstevel@tonic-gate  *
4*0Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*0Sstevel@tonic-gate  * with the License.
8*0Sstevel@tonic-gate  *
9*0Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate  * and limitations under the License.
13*0Sstevel@tonic-gate  *
14*0Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate  *
20*0Sstevel@tonic-gate  * CDDL HEADER END
21*0Sstevel@tonic-gate  */
22*0Sstevel@tonic-gate /*
23*0Sstevel@tonic-gate  * Copyright 1991 Sun Microsystems, Inc.  All rights reserved.
24*0Sstevel@tonic-gate  * Use is subject to license terms.
25*0Sstevel@tonic-gate  */
26*0Sstevel@tonic-gate 
27*0Sstevel@tonic-gate /*
28*0Sstevel@tonic-gate  * wcstombs
29*0Sstevel@tonic-gate  */
30*0Sstevel@tonic-gate 
31*0Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
32*0Sstevel@tonic-gate 
33*0Sstevel@tonic-gate #if !defined(lint) && defined(SCCSIDS)
34*0Sstevel@tonic-gate static  char *sccsid = "%Z%%M% %I%     %E% SMI";
35*0Sstevel@tonic-gate #endif
36*0Sstevel@tonic-gate 
37*0Sstevel@tonic-gate #include <sys/types.h>
38*0Sstevel@tonic-gate #include "codeset.h"
39*0Sstevel@tonic-gate #include "mbextern.h"
40*0Sstevel@tonic-gate 
41*0Sstevel@tonic-gate size_t
wcstombs(s,pwcs,n)42*0Sstevel@tonic-gate wcstombs(s, pwcs, n)
43*0Sstevel@tonic-gate 	char *s;
44*0Sstevel@tonic-gate 	wchar_t * pwcs;
45*0Sstevel@tonic-gate 	size_t n;
46*0Sstevel@tonic-gate {
47*0Sstevel@tonic-gate 	char *handle;		/* handle */
48*0Sstevel@tonic-gate 	int (*p)();
49*0Sstevel@tonic-gate 	int num = 0;
50*0Sstevel@tonic-gate 	int ret;
51*0Sstevel@tonic-gate 
52*0Sstevel@tonic-gate 	switch (_code_set_info.code_id) {
53*0Sstevel@tonic-gate 	case CODESET_NONE:
54*0Sstevel@tonic-gate 		/*
55*0Sstevel@tonic-gate 		 * default code set
56*0Sstevel@tonic-gate 		 */
57*0Sstevel@tonic-gate 		 while (*pwcs && (num < n)) {
58*0Sstevel@tonic-gate 			*s++ = *pwcs++ & 0x00ff;
59*0Sstevel@tonic-gate 			num++;
60*0Sstevel@tonic-gate 		 }
61*0Sstevel@tonic-gate 		 if (num < n)
62*0Sstevel@tonic-gate 			*s = 0;
63*0Sstevel@tonic-gate 		 return (num);
64*0Sstevel@tonic-gate 		 break;
65*0Sstevel@tonic-gate 	case CODESET_EUC:
66*0Sstevel@tonic-gate 		/*
67*0Sstevel@tonic-gate 		 * EUC code set
68*0Sstevel@tonic-gate 		 */
69*0Sstevel@tonic-gate 		 return(_wcstombs_euc(s, pwcs, n));
70*0Sstevel@tonic-gate 		 break;
71*0Sstevel@tonic-gate 
72*0Sstevel@tonic-gate 	case CODESET_XCCS:
73*0Sstevel@tonic-gate 		/*
74*0Sstevel@tonic-gate 		 * XCCS code set
75*0Sstevel@tonic-gate 		 */
76*0Sstevel@tonic-gate 		return(_wcstombs_xccs(s, pwcs, n));
77*0Sstevel@tonic-gate 		break;
78*0Sstevel@tonic-gate 
79*0Sstevel@tonic-gate 	case CODESET_ISO2022:
80*0Sstevel@tonic-gate 		/*
81*0Sstevel@tonic-gate 		 * ISO family
82*0Sstevel@tonic-gate 		 */
83*0Sstevel@tonic-gate 		return(_wcstombs_iso(s, pwcs, n));
84*0Sstevel@tonic-gate 		break;
85*0Sstevel@tonic-gate 
86*0Sstevel@tonic-gate 	default:
87*0Sstevel@tonic-gate 		/*
88*0Sstevel@tonic-gate 		 * User defined code set
89*0Sstevel@tonic-gate 		 */
90*0Sstevel@tonic-gate 		 handle = _ml_open_library();
91*0Sstevel@tonic-gate 		 if (handle == (char *)NULL)
92*0Sstevel@tonic-gate 			return(ERROR_NO_LIB);	/* No user library */
93*0Sstevel@tonic-gate 		 p = (int (*)()) dlsym(handle, "_wcstombs");
94*0Sstevel@tonic-gate 		 if (p == (int (*)()) NULL)
95*0Sstevel@tonic-gate 			return(ERROR_NO_SYM);
96*0Sstevel@tonic-gate 		 ret = (*p)(s, pwcs, n);
97*0Sstevel@tonic-gate 		 return (ret);
98*0Sstevel@tonic-gate 		 break;
99*0Sstevel@tonic-gate 	}
100*0Sstevel@tonic-gate 	/* NOTREACHED */
101*0Sstevel@tonic-gate }
102