usr/src/lib/libcurses/screen/winwstr.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 int
  39 winwstr(WINDOW *win, wchar_t *wstr)
  40 {
  41         int     counter = 0;
  42         int     cy = win->_cury;
  43         chtype  *ptr = &(win->_y[cy][win->_curx]),
  44                 *pmax = &(win->_y[cy][win->_maxx]);
  45         chtype  *p1st = &(win->_y[cy][0]);
  46         wchar_t wc;
  47         int     sw, s;
  48         char    *cp, cbuf[CSMAX+1];
  49
  50         while (ISCBIT(*ptr) && (p1st < ptr))
  51                 ptr--;
  52
  53         while (ptr < pmax) {
  54                 wc = RBYTE(*ptr);
  55                 sw = mbscrw((int)wc);
  56                 (void) mbeucw((int)wc);
  57
  58                 cp = cbuf;
  59                 for (s = 0; s < sw; s++, ptr++) {
  60                         if ((wc = RBYTE(*ptr)) == MBIT)
  61                                 continue;
  62                         /* LINTED */
  63                         *cp++ = (char) wc;
  64                         if ((wc = LBYTE(*ptr) | MBIT) == MBIT)
  65                                 continue;
  66                         /* LINTED */
  67                         *cp++ = (char) wc;
  68                 }
  69                 *cp = '\0';
  70
  71                 if (_curs_mbtowc(&wc, cbuf, CSMAX) <= 0)
  72                         break;
  73
  74                 *wstr++ = wc;
  75         }
  76
  77         *wstr = (wchar_t)0;
  78
  79         return (counter);
  80 }