xref: /illumos-gate/usr/src/lib/libcurses/screen/winwchnstr.c (revision 86d949f9497332fe19be6b5d711d265eb957439f)
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 /*LINTLIBRARY*/
32 
33 #include	<sys/types.h>
34 #include	"curses_inc.h"
35 
36 /*
37  * Read in ncols worth of data from window win and assign the
38  * chars to string. NULL terminate string upon completion.
39  * Return the number of chtypes copied.
40  */
41 
42 int
43 winwchnstr(WINDOW *win, chtype *string, int ncols)
44 {
45 	chtype	*ptr = &(win->_y[win->_cury][win->_curx]);
46 	int	counter = 0;
47 	int	maxcols = win->_maxx - win->_curx;
48 	int	scrw, s, wc;
49 	char	*mp, mbbuf[CSMAX+1];
50 	wchar_t	wch;
51 	chtype	rawc;
52 	chtype	attr;
53 
54 	if (ncols < 0)
55 		ncols = MAXINT;
56 
57 	while (ISCBIT(*ptr)) {
58 		ptr--;
59 		maxcols++;
60 	}
61 
62 	while ((counter < ncols) && maxcols > 0) {
63 		attr = *ptr & A_WATTRIBUTES;
64 		rawc = *ptr & A_WCHARTEXT;
65 		(void) mbeucw((int)RBYTE(rawc));
66 		scrw = mbscrw((int)RBYTE(rawc));
67 		for (mp = mbbuf, s = 0; s < scrw; s++, maxcols--, ptr++) {
68 			if ((wc = (int)RBYTE(rawc)) == MBIT)
69 				continue;
70 			/* LINTED */
71 			*mp++ = (char) wc;
72 			if ((wc = (int)(LBYTE(rawc) | MBIT)) == MBIT)
73 				continue;
74 			/* LINTED */
75 			*mp++ = (char) wc;
76 		}
77 		*mp = '\0';
78 		if (_curs_mbtowc(&wch, mbbuf, CSMAX) <= 0)
79 			break;
80 		*string++ = wch | attr;
81 		counter++;
82 	}
83 	if (counter < ncols)
84 		*string = (chtype) 0;
85 	return (counter);
86 }
87