ncurses 5.9 - patch 20140201
[ncurses.git] / ncurses / base / lib_instr.c
index b3e1d030a4b64eb11f4e4ce63799c71789a4b029..f708ecc51e4acebc22475eafa53f745fdcf3de9c 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
- * Copyright (c) 1998 Free Software Foundation, Inc.                        *
+ * Copyright (c) 1998-2013,2014 Free Software Foundation, Inc.              *
  *                                                                          *
  * Permission is hereby granted, free of charge, to any person obtaining a  *
  * copy of this software and associated documentation files (the            *
@@ -29,9 +29,9 @@
 /****************************************************************************
  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
+ *     and: Thomas E. Dickey                        1996-on                 *
  ****************************************************************************/
 
-
 /*
 **     lib_instr.c
 **
 
 #include <curses.priv.h>
 
-MODULE_ID("$Id: lib_instr.c,v 1.8 1998/02/11 12:13:54 tom Exp $")
+MODULE_ID("$Id: lib_instr.c,v 1.21 2014/02/01 22:09:27 tom Exp $")
 
-int winnstr(WINDOW *win, char *str, int n)
+NCURSES_EXPORT(int)
+winnstr(WINDOW *win, char *str, int n)
 {
-       int     i=0, row, col;
+    int i = 0, row, col;
+
+    T((T_CALLED("winnstr(%p,%p,%d)"), (void *) win, str, n));
 
-       T((T_CALLED("winnstr(%p,%p,%d)"), win, str, n));
+    if (!str)
+       returnCode(0);
 
-       if (!str)
-         returnCode(0);
-       
-       if (win) {
-         getyx(win, row, col);
+    if (win) {
+       getyx(win, row, col);
 
-         if (n < 0)
+       if (n < 0)
            n = win->_maxx - win->_curx + 1;
 
-         for (; i < n;) {
-           str[i++] = TextOf(win->_line[row].text[col]);
+       for (; i < n;) {
+#if USE_WIDEC_SUPPORT
+           cchar_t *cell = &(win->_line[row].text[col]);
+           wchar_t *wch;
+           attr_t attrs;
+           NCURSES_PAIRS_T pair;
+           int n2;
+           bool done = FALSE;
+           mbstate_t state;
+           size_t i3, n3;
+           char *tmp;
+
+           if (!isWidecExt(*cell)) {
+               n2 = getcchar(cell, 0, 0, 0, 0);
+               if (n2 > 0
+                   && (wch = typeCalloc(wchar_t, (unsigned) n2 + 1)) != 0) {
+                   if (getcchar(cell, wch, &attrs, &pair, 0) == OK) {
+
+                       init_mb(state);
+                       n3 = wcstombs(0, wch, (size_t) 0);
+                       if (!isEILSEQ(n3) && (n3 != 0)) {
+                           size_t need = n3 + 10 + (size_t) i;
+                           int have = (int) n3 + i;
+
+                           /* check for loop-done as well as overflow */
+                           if (have > n || (int) need <= 0) {
+                               done = TRUE;
+                           } else if ((tmp = typeCalloc(char, need)) == 0) {
+                               done = TRUE;
+                           } else {
+                               init_mb(state);
+                               wcstombs(tmp, wch, n3);
+                               for (i3 = 0; i3 < n3; ++i3)
+                                   str[i++] = tmp[i3];
+                               free(tmp);
+                           }
+                       }
+                   }
+                   free(wch);
+                   if (done)
+                       break;
+               }
+           }
+#else
+           str[i++] = (char) CharOf(win->_line[row].text[col]);
+#endif
            if (++col > win->_maxx) {
-             col = 0;
-             if (++row > win->_maxy)
                break;
            }
-         }
        }
-       str[i] = '\0';  /* SVr4 does not seem to count the null */
-       returnCode(i);
+    }
+    str[i] = '\0';             /* SVr4 does not seem to count the null */
+    T(("winnstr returns %s", _nc_visbuf(str)));
+    returnCode(i);
 }
-