usr/src/lib/libcurses/screen/winwchnstr.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  * Read in ncols worth of data from window win and assign the
  40  * chars to string. NULL terminate string upon completion.
  41  * Return the number of chtypes copied.
  42  */
  43
  44 int
  45 winwchnstr(WINDOW *win, chtype *string, int ncols)
  46 {
  47         chtype  *ptr = &(win->_y[win->_cury][win->_curx]);
  48         int     counter = 0;
  49         int     maxcols = win->_maxx - win->_curx;
  50         int     scrw, s, wc;
  51         char    *mp, mbbuf[CSMAX+1];
  52         wchar_t wch;
  53         chtype  rawc;
  54         chtype  attr;
  55
  56         if (ncols < 0)
  57                 ncols = MAXINT;
  58
  59         while (ISCBIT(*ptr)) {
  60                 ptr--;
  61                 maxcols++;
  62         }
  63
  64         while ((counter < ncols) && maxcols > 0) {
  65                 attr = *ptr & A_WATTRIBUTES;
  66                 rawc = *ptr & A_WCHARTEXT;
  67                 (void) mbeucw((int)RBYTE(rawc));
  68                 scrw = mbscrw((int)RBYTE(rawc));
  69                 for (mp = mbbuf, s = 0; s < scrw; s++, maxcols--, ptr++) {
  70                         if ((wc = (int)RBYTE(rawc)) == MBIT)
  71                                 continue;
  72                         /* LINTED */
  73                         *mp++ = (char) wc;
  74                         if ((wc = (int)(LBYTE(rawc) | MBIT)) == MBIT)
  75                                 continue;
  76                         /* LINTED */
  77                         *mp++ = (char) wc;
  78                 }
  79                 *mp = '\0';
  80                 if (_curs_mbtowc(&wch, mbbuf, CSMAX) <= 0)
  81                         break;
  82                 *string++ = wch | attr;
  83                 counter++;
  84         }
  85         if (counter < ncols)
  86                 *string = (chtype) 0;
  87         return (counter);
  88 }