ncurses 5.6 - patch 20081011
[ncurses.git] / ncurses / widechar / lib_ins_wch.c
index 0821ee590bf810fa2997eccabcd141d015d41da8..c3d0420e53b898312ca6f46e5bf10537cfc44925 100644 (file)
@@ -1,5 +1,5 @@
 /****************************************************************************
- * Copyright (c) 2002 Free Software Foundation, Inc.                        *
+ * Copyright (c) 2002-2003,2005 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            *
 
 #include <curses.priv.h>
 
-MODULE_ID("$Id: lib_ins_wch.c,v 1.1 2002/03/10 22:25:06 tom Exp $")
+MODULE_ID("$Id: lib_ins_wch.c,v 1.8 2005/12/03 20:24:19 tom Exp $")
 
-NCURSES_EXPORT(int)
-wins_wch(WINDOW *win, const cchar_t * wch)
+/*
+ * Insert the given character, updating the current location to simplify
+ * inserting a string.
+ */
+static int
+_nc_insert_wch(WINDOW *win, const cchar_t *wch)
 {
-    int code = ERR;
+    int cells = wcwidth(CharOf(CHDEREF(wch)));
+    int cell;
 
-    T((T_CALLED("wins_wch(%p, %s)"), win, _tracecchar_t(wch)));
+    if (cells <= 0)
+       cells = 1;
 
-    if (win) {
+    if (win->_curx <= win->_maxx) {
        struct ldat *line = &(win->_line[win->_cury]);
        NCURSES_CH_T *end = &(line->text[win->_curx]);
        NCURSES_CH_T *temp1 = &(line->text[win->_maxx]);
-       NCURSES_CH_T *temp2 = temp1 - 1;
+       NCURSES_CH_T *temp2 = temp1 - cells;
 
        CHANGED_TO_EOL(line, win->_curx, win->_maxx);
        while (temp1 > end)
            *temp1-- = *temp2--;
 
        *temp1 = _nc_render(win, *wch);
+       for (cell = 1; cell < cells; ++cell) {
+           SetWidecExt(temp1[cell], cell);
+       }
+
+       win->_curx++;
+    }
+    return OK;
+}
+
+NCURSES_EXPORT(int)
+wins_wch(WINDOW *win, const cchar_t *wch)
+{
+    NCURSES_SIZE_T oy;
+    NCURSES_SIZE_T ox;
+    int code = ERR;
+
+    T((T_CALLED("wins_wch(%p, %s)"), win, _tracecchar_t(wch)));
+
+    if (win != 0) {
+       oy = win->_cury;
+       ox = win->_curx;
+
+       code = _nc_insert_wch(win, wch);
+
+       win->_curx = ox;
+       win->_cury = oy;
+       _nc_synchook(win);
+    }
+    returnCode(code);
+}
+
+NCURSES_EXPORT(int)
+wins_nwstr(WINDOW *win, const wchar_t *wstr, int n)
+{
+    int code = ERR;
+    NCURSES_SIZE_T oy;
+    NCURSES_SIZE_T ox;
+    const wchar_t *cp;
+
+    T((T_CALLED("wins_nwstr(%p,%s,%d)"), win, _nc_viswbufn(wstr, n), n));
+
+    if (win != 0
+       && wstr != 0) {
+       if (n < 1)
+           n = wcslen(wstr);
        code = OK;
+       if (n > 0) {
+           oy = win->_cury;
+           ox = win->_curx;
+           for (cp = wstr; *cp && ((cp - wstr) < n); cp++) {
+               int len = wcwidth(*cp);
+
+               if (len != 1 || !is8bits(*cp)) {
+                   cchar_t tmp_cchar;
+                   wchar_t tmp_wchar = *cp;
+                   memset(&tmp_cchar, 0, sizeof(tmp_cchar));
+                   (void) setcchar(&tmp_cchar,
+                                   &tmp_wchar,
+                                   WA_NORMAL,
+                                   0,
+                                   (void *) 0);
+                   code = _nc_insert_wch(win, &tmp_cchar);
+               } else {
+                   /* tabs, other ASCII stuff */
+                   code = _nc_insert_ch(win, (chtype) (*cp));
+               }
+               if (code != OK)
+                   break;
+           }
+
+           win->_curx = ox;
+           win->_cury = oy;
+           _nc_synchook(win);
+       }
     }
     returnCode(code);
 }