release/src/router/libncurses/ncurses/base/lib_instr.c

   1 /****************************************************************************
   2  * Copyright (c) 1998-2007,2009 Free Software Foundation, Inc.              *
   3  *                                                                          *
   4  * Permission is hereby granted, free of charge, to any person obtaining a  *
   5  * copy of this software and associated documentation files (the            *
   6  * "Software"), to deal in the Software without restriction, including      *
   7  * without limitation the rights to use, copy, modify, merge, publish,      *
   8  * distribute, distribute with modifications, sublicense, and/or sell       *
   9  * copies of the Software, and to permit persons to whom the Software is    *
  10  * furnished to do so, subject to the following conditions:                 *
  11  *                                                                          *
  12  * The above copyright notice and this permission notice shall be included  *
  13  * in all copies or substantial portions of the Software.                   *
  14  *                                                                          *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
  16  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
  17  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
  18  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
  19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
  20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
  21  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
  22  *                                                                          *
  23  * Except as contained in this notice, the name(s) of the above copyright   *
  24  * holders shall not be used in advertising or otherwise to promote the     *
  25  * sale, use or other dealings in this Software without prior written       *
  26  * authorization.                                                           *
  27  ****************************************************************************/
  28
  29 /****************************************************************************
  30  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
  31  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
  32  *     and: Thomas E. Dickey                        1996-on                 *
  33  ****************************************************************************/
  34
  35 /*
  36 **      lib_instr.c
  37 **
  38 **      The routine winnstr().
  39 **
  40 */
  41
  42 #include <curses.priv.h>
  43
  44 MODULE_ID("$Id: lib_instr.c,v 1.17 2009/10/24 22:55:45 tom Exp $")
  45
  46 NCURSES_EXPORT(int)
  47 winnstr(WINDOW *win, char *str, int n)
  48 {
  49     int i = 0, row, col;
  50
  51     T((T_CALLED("winnstr(%p,%p,%d)"), (void *) win, str, n));
  52
  53     if (!str)
  54         returnCode(0);
  55
  56     if (win) {
  57         getyx(win, row, col);
  58
  59         if (n < 0)
  60             n = win->_maxx - win->_curx + 1;
  61
  62         for (; i < n;) {
  63 #if USE_WIDEC_SUPPORT
  64             cchar_t *cell = &(win->_line[row].text[col]);
  65             wchar_t *wch;
  66             attr_t attrs;
  67             short pair;
  68             int n2;
  69             bool done = FALSE;
  70             mbstate_t state;
  71             size_t i3, n3;
  72             char *tmp;
  73
  74             if (!isWidecExt(*cell)) {
  75                 n2 = getcchar(cell, 0, 0, 0, 0);
  76                 if (n2 > 0
  77                     && (wch = typeCalloc(wchar_t, (unsigned) n2 + 1)) != 0) {
  78                     if (getcchar(cell, wch, &attrs, &pair, 0) == OK) {
  79
  80                         init_mb(state);
  81                         n3 = wcstombs(0, wch, 0);
  82                         if (!isEILSEQ(n3) && (n3 != 0)) {
  83                             if (((int) n3 + i) > n) {
  84                                 done = TRUE;
  85                             } else if ((tmp = typeCalloc(char, n3 + 10)) == 0) {
  86                                 done = TRUE;
  87                             } else {
  88                                 init_mb(state);
  89                                 wcstombs(tmp, wch, n3);
  90                                 for (i3 = 0; i3 < n3; ++i3)
  91                                     str[i++] = tmp[i3];
  92                                 free(tmp);
  93                             }
  94                         }
  95                     }
  96                     free(wch);
  97                     if (done)
  98                         break;
  99                 }
 100             }
 101 #else
 102             str[i++] = (char) CharOf(win->_line[row].text[col]);
 103 #endif
 104             if (++col > win->_maxx) {
 105                 break;
 106             }
 107         }
 108     }
 109     str[i] = '\0';              /* SVr4 does not seem to count the null */
 110     T(("winnstr returns %s", _nc_visbuf(str)));
 111     returnCode(i);
 112 }