xref: /onnv-gate/usr/src/lib/libcurses/screen/wctomb.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 /*  Copyright (c) 1988 AT&T */
23*0Sstevel@tonic-gate /*    All Rights Reserved   */
24*0Sstevel@tonic-gate 
25*0Sstevel@tonic-gate 
26*0Sstevel@tonic-gate /*
27*0Sstevel@tonic-gate  *      Copyright (c) 1997, by Sun Microsystems, Inc.
28*0Sstevel@tonic-gate  *      All rights reserved.
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 /*LINTLIBRARY*/
34*0Sstevel@tonic-gate 
35*0Sstevel@tonic-gate #include <sys/types.h>
36*0Sstevel@tonic-gate #include <widec.h>
37*0Sstevel@tonic-gate #include <ctype.h>
38*0Sstevel@tonic-gate #include "curses_wchar.h"
39*0Sstevel@tonic-gate 
40*0Sstevel@tonic-gate int
_curs_wctomb(char * s,wchar_t wchar)41*0Sstevel@tonic-gate _curs_wctomb(char *s, wchar_t wchar)
42*0Sstevel@tonic-gate {
43*0Sstevel@tonic-gate 	char *olds = s;
44*0Sstevel@tonic-gate 	int size, index;
45*0Sstevel@tonic-gate 	unsigned char d;
46*0Sstevel@tonic-gate 	if (!s)
47*0Sstevel@tonic-gate 		return (0);
48*0Sstevel@tonic-gate 	if (wchar <= 0177 || (wchar <= 0377 && (iscntrl((int)wchar) != 0)))  {
49*0Sstevel@tonic-gate 		/* LINTED */
50*0Sstevel@tonic-gate 		*s++ = (char)wchar;
51*0Sstevel@tonic-gate 		return (1);
52*0Sstevel@tonic-gate 	}
53*0Sstevel@tonic-gate 	switch (wchar & EUCMASK) {
54*0Sstevel@tonic-gate 
55*0Sstevel@tonic-gate 		case P11:
56*0Sstevel@tonic-gate 			size = eucw1;
57*0Sstevel@tonic-gate 			break;
58*0Sstevel@tonic-gate 
59*0Sstevel@tonic-gate 		case P01:
60*0Sstevel@tonic-gate 			/* LINTED */
61*0Sstevel@tonic-gate 			*s++ = (char)SS2;
62*0Sstevel@tonic-gate 			size = eucw2;
63*0Sstevel@tonic-gate 			break;
64*0Sstevel@tonic-gate 
65*0Sstevel@tonic-gate 		case P10:
66*0Sstevel@tonic-gate 			/* LINTED */
67*0Sstevel@tonic-gate 			*s++ = (char)SS3;
68*0Sstevel@tonic-gate 			size = eucw3;
69*0Sstevel@tonic-gate 			break;
70*0Sstevel@tonic-gate 
71*0Sstevel@tonic-gate 		default:
72*0Sstevel@tonic-gate 			return (-1);
73*0Sstevel@tonic-gate 	}
74*0Sstevel@tonic-gate 	if ((index = size) <= 0)
75*0Sstevel@tonic-gate 		return (-1);
76*0Sstevel@tonic-gate 	while (index--) {
77*0Sstevel@tonic-gate 		/* LINTED */
78*0Sstevel@tonic-gate 		d = wchar | 0200;
79*0Sstevel@tonic-gate 		wchar >>= 7;
80*0Sstevel@tonic-gate 		if (iscntrl(d))
81*0Sstevel@tonic-gate 			return (-1);
82*0Sstevel@tonic-gate 		s[index] = d;
83*0Sstevel@tonic-gate 	}
84*0Sstevel@tonic-gate 	/* LINTED */
85*0Sstevel@tonic-gate 	return ((int)(s - olds) + size);
86*0Sstevel@tonic-gate }
87