xref: /titanic_52/usr/src/lib/libcurses/screen/winchnstr.c (revision fa9e4066f08beec538e775443c5be79dd423fcab)
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 /*
23  * Copyright 1997 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 /*	Copyright (c) 1988 AT&T	*/
28 /*	  All Rights Reserved	*/
29 
30 /*
31  * University Copyright- Copyright (c) 1982, 1986, 1988
32  * The Regents of the University of California
33  * All Rights Reserved
34  *
35  * University Acknowledgment- Portions of this document are derived from
36  * software developed by the University of California, Berkeley, and its
37  * contributors.
38  */
39 
40 #pragma ident	"%Z%%M%	%I%	%E% SMI"
41 
42 /*LINTLIBRARY*/
43 
44 #include	<sys/types.h>
45 #include	"curses_inc.h"
46 
47 /*
48  * Read in ncols worth of data from window win and assign the
49  * chars to string. NULL terminate string upon completion.
50  * Return the number of chtypes copied.
51  */
52 
53 int
54 winchnstr(WINDOW *win, chtype *string, int ncols)
55 {
56 	chtype	*ptr = &(win->_y[win->_cury][win->_curx]);
57 	int	counter = 0;
58 	int	maxcols = win->_maxx - win->_curx;
59 	int	eucw, scrw, s;
60 	chtype	rawc, attr, wc;
61 
62 	if (ncols < 0)
63 		ncols = MAXINT;
64 
65 	while (ISCBIT(*ptr)) {
66 		ptr--;
67 		maxcols++;
68 	}
69 
70 	while ((counter < ncols) && maxcols > 0) {
71 		eucw = mbeucw((int) RBYTE(*ptr));
72 		scrw = mbscrw((int) RBYTE(*ptr));
73 
74 		if (counter + eucw > ncols)
75 			break;
76 		for (s = 0; s < scrw; s++, maxcols--, ptr++) {
77 			attr = _ATTR(*ptr);
78 			rawc = _CHAR(*ptr);
79 			if ((wc = RBYTE(rawc)) == MBIT)
80 				continue;
81 			*string++ = wc | attr;
82 			counter++;
83 			if ((wc = LBYTE(rawc) | MBIT) == MBIT)
84 				continue;
85 			*string++ = wc | attr;
86 			counter++;
87 		}
88 	}
89 	if (counter < ncols)
90 		*string = (chtype) 0;
91 	return (counter);
92 }
93