xref: /titanic_51/usr/src/lib/libcurses/screen/winwchnstr.c (revision 1e49577a7fcde812700ded04431b49d67cc57d6d)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  */
22 /*  Copyright (c) 1988 AT&T */
23 /*    All Rights Reserved   */
24 
25 
26 /*
27  *      Copyright (c) 1997, by Sun Microsystems, Inc.
28  *      All rights reserved.
29  */
30 
31 #pragma ident	"%Z%%M%	%I%	%E% SMI"
32 
33 /*LINTLIBRARY*/
34 
35 #include	<sys/types.h>
36 #include	"curses_inc.h"
37 
38 /*
39  * Read in ncols worth of data from window win and assign the
40  * chars to string. NULL terminate string upon completion.
41  * Return the number of chtypes copied.
42  */
43 
44 int
45 winwchnstr(WINDOW *win, chtype *string, int ncols)
46 {
47 	chtype	*ptr = &(win->_y[win->_cury][win->_curx]);
48 	int	counter = 0;
49 	int	maxcols = win->_maxx - win->_curx;
50 	int	scrw, s, wc;
51 	char	*mp, mbbuf[CSMAX+1];
52 	wchar_t	wch;
53 	chtype	rawc;
54 	chtype	attr;
55 
56 	if (ncols < 0)
57 		ncols = MAXINT;
58 
59 	while (ISCBIT(*ptr)) {
60 		ptr--;
61 		maxcols++;
62 	}
63 
64 	while ((counter < ncols) && maxcols > 0) {
65 		attr = *ptr & A_WATTRIBUTES;
66 		rawc = *ptr & A_WCHARTEXT;
67 		(void) mbeucw((int)RBYTE(rawc));
68 		scrw = mbscrw((int)RBYTE(rawc));
69 		for (mp = mbbuf, s = 0; s < scrw; s++, maxcols--, ptr++) {
70 			if ((wc = (int)RBYTE(rawc)) == MBIT)
71 				continue;
72 			/* LINTED */
73 			*mp++ = (char) wc;
74 			if ((wc = (int)(LBYTE(rawc) | MBIT)) == MBIT)
75 				continue;
76 			/* LINTED */
77 			*mp++ = (char) wc;
78 		}
79 		*mp = '\0';
80 		if (_curs_mbtowc(&wch, mbbuf, CSMAX) <= 0)
81 			break;
82 		*string++ = wch | attr;
83 		counter++;
84 	}
85 	if (counter < ncols)
86 		*string = (chtype) 0;
87 	return (counter);
88 }
89