xref: /titanic_50/usr/src/lib/libcurses/screen/mbinch.c (revision 34f9b3eef6fdadbda0a846aa4d68691ac40eace5)
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  *	Get the(y, x) character of a window and
40  *	return it in a 0-terminated string.
41  */
42 char
43 *wmbinch(WINDOW *win, int y, int x)
44 {
45 	short		savx, savy;
46 	int		k;
47 	chtype		*wp, *ep, wc;
48 	static char	rs[CSMAX + 1];
49 
50 	k = 0;
51 	savx = win->_curx;
52 	savy = win->_cury;
53 
54 	if (wmbmove(win, y, x) == ERR)
55 		goto done;
56 	wp = win->_y[win->_cury] + win->_curx;
57 	wc = RBYTE(*wp);
58 	ep = wp + _curs_scrwidth[TYPE(wc & 0377)];
59 
60 	for (; wp < ep; ++wp) {
61 		if ((wc = RBYTE(*wp)) == MBIT)
62 			break;
63 		/*LINTED*/
64 		rs[k++] = (char)wc;
65 		if ((wc = LBYTE(*wp)|MBIT) == MBIT)
66 			break;
67 		/*LINTED*/
68 		rs[k++] = (char)wc;
69 	}
70 done :
71 	win->_curx = savx;
72 	win->_cury = savy;
73 	rs[k] = '\0';
74 	return (rs);
75 }
76