xref: /titanic_44/usr/src/lib/libcurses/screen/mbmove.c (revision 7c478bd95313f5f23a4c958a745db2134aa03244)
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  *	Move(cury, curx) of win to(y, x).
40  *	It is guaranteed that the cursor is left at the start
41  *	of a whole character nearest to(y, x).
42  */
43 
44 int
wmbmove(WINDOW * win,int y,int x)45 wmbmove(WINDOW *win, int y, int x)
46 {
47 	chtype	*wcp, *wp, *ep;
48 
49 	if (y < 0 || x < 0 || y >= win->_maxy || x >= win->_maxx)
50 		return (ERR);
51 
52 	if (_scrmax > 1) {
53 		wcp = win->_y[y];
54 		wp = wcp + x;
55 		ep = wcp + win->_maxx;
56 
57 		/* make wp points to the start of a character */
58 		if (ISCBIT(*wp)) {
59 			for (; wp >= wcp; --wp)
60 				if (!ISCBIT(*wp))
61 					break;
62 			if (wp < wcp) {
63 				wp = wcp+x+1;
64 				for (; wp < ep; ++wp)
65 					if (!ISCBIT(*wp))
66 						break;
67 			}
68 		}
69 
70 		/* make sure that the character is whole */
71 		if (wp + _curs_scrwidth[TYPE(*wp)] > ep)
72 			return (ERR);
73 
74 		/* the new x position */
75 		/*LINTED*/
76 		x = (int)(wp - wcp);
77 	}
78 
79 	if (y != win->_cury || x != win->_curx) {
80 		win->_nbyte = -1;
81 		/*LINTED*/
82 		win->_cury = (short)y;
83 		/*LINTED*/
84 		win->_curx = (short)x;
85 	}
86 
87 	return (win->_immed ? wrefresh(win) : OK);
88 }
89