usr/src/lib/libcurses/screen/mbmove.c

   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
  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 }