1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate  * CDDL HEADER START
3*0Sstevel@tonic-gate  *
4*0Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*0Sstevel@tonic-gate  * with the License.
8*0Sstevel@tonic-gate  *
9*0Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate  * and limitations under the License.
13*0Sstevel@tonic-gate  *
14*0Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate  *
20*0Sstevel@tonic-gate  * CDDL HEADER END
21*0Sstevel@tonic-gate  */
22*0Sstevel@tonic-gate /*  Copyright (c) 1988 AT&T */
23*0Sstevel@tonic-gate /*    All Rights Reserved   */
24*0Sstevel@tonic-gate 
25*0Sstevel@tonic-gate 
26*0Sstevel@tonic-gate /*
27*0Sstevel@tonic-gate  *      Copyright (c) 1997, by Sun Microsystems, Inc.
28*0Sstevel@tonic-gate  *      All rights reserved.
29*0Sstevel@tonic-gate  */
30*0Sstevel@tonic-gate 
31*0Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
32*0Sstevel@tonic-gate 
33*0Sstevel@tonic-gate /*LINTLIBRARY*/
34*0Sstevel@tonic-gate 
35*0Sstevel@tonic-gate #include	<sys/types.h>
36*0Sstevel@tonic-gate #include	"curses_inc.h"
37*0Sstevel@tonic-gate 
38*0Sstevel@tonic-gate /*
39*0Sstevel@tonic-gate  *	Move(cury, curx) of win to(y, x).
40*0Sstevel@tonic-gate  *	It is guaranteed that the cursor is left at the start
41*0Sstevel@tonic-gate  *	of a whole character nearest to(y, x).
42*0Sstevel@tonic-gate  */
43*0Sstevel@tonic-gate 
44*0Sstevel@tonic-gate int
45*0Sstevel@tonic-gate wmbmove(WINDOW *win, int y, int x)
46*0Sstevel@tonic-gate {
47*0Sstevel@tonic-gate 	chtype	*wcp, *wp, *ep;
48*0Sstevel@tonic-gate 
49*0Sstevel@tonic-gate 	if (y < 0 || x < 0 || y >= win->_maxy || x >= win->_maxx)
50*0Sstevel@tonic-gate 		return (ERR);
51*0Sstevel@tonic-gate 
52*0Sstevel@tonic-gate 	if (_scrmax > 1) {
53*0Sstevel@tonic-gate 		wcp = win->_y[y];
54*0Sstevel@tonic-gate 		wp = wcp + x;
55*0Sstevel@tonic-gate 		ep = wcp + win->_maxx;
56*0Sstevel@tonic-gate 
57*0Sstevel@tonic-gate 		/* make wp points to the start of a character */
58*0Sstevel@tonic-gate 		if (ISCBIT(*wp)) {
59*0Sstevel@tonic-gate 			for (; wp >= wcp; --wp)
60*0Sstevel@tonic-gate 				if (!ISCBIT(*wp))
61*0Sstevel@tonic-gate 					break;
62*0Sstevel@tonic-gate 			if (wp < wcp) {
63*0Sstevel@tonic-gate 				wp = wcp+x+1;
64*0Sstevel@tonic-gate 				for (; wp < ep; ++wp)
65*0Sstevel@tonic-gate 					if (!ISCBIT(*wp))
66*0Sstevel@tonic-gate 						break;
67*0Sstevel@tonic-gate 			}
68*0Sstevel@tonic-gate 		}
69*0Sstevel@tonic-gate 
70*0Sstevel@tonic-gate 		/* make sure that the character is whole */
71*0Sstevel@tonic-gate 		if (wp + _curs_scrwidth[TYPE(*wp)] > ep)
72*0Sstevel@tonic-gate 			return (ERR);
73*0Sstevel@tonic-gate 
74*0Sstevel@tonic-gate 		/* the new x position */
75*0Sstevel@tonic-gate 		/*LINTED*/
76*0Sstevel@tonic-gate 		x = (int)(wp - wcp);
77*0Sstevel@tonic-gate 	}
78*0Sstevel@tonic-gate 
79*0Sstevel@tonic-gate 	if (y != win->_cury || x != win->_curx) {
80*0Sstevel@tonic-gate 		win->_nbyte = -1;
81*0Sstevel@tonic-gate 		/*LINTED*/
82*0Sstevel@tonic-gate 		win->_cury = (short)y;
83*0Sstevel@tonic-gate 		/*LINTED*/
84*0Sstevel@tonic-gate 		win->_curx = (short)x;
85*0Sstevel@tonic-gate 	}
86*0Sstevel@tonic-gate 
87*0Sstevel@tonic-gate 	return (win->_immed ? wrefresh(win) : OK);
88*0Sstevel@tonic-gate }
89