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