1 /**************************************************************************** 2 * Copyright (c) 1998-2011,2016 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 * * 33 * Rewritten 2001-2004 to support wide-characters by * 34 * Sven Verdoolaege * 35 * Thomas Dickey * 36 ****************************************************************************/ 37 38 /* 39 ** lib_addstr.c 40 * 41 ** The routines waddnstr(), waddchnstr(). 42 ** 43 */ 44 45 #include <curses.priv.h> 46 47 MODULE_ID("$Id: lib_addstr.c,v 1.53 2016/01/16 21:00:53 tom Exp $") 48 49 NCURSES_EXPORT(int) 50 waddnstr(WINDOW *win, const char *astr, int n) 51 { 52 const char *str = astr; 53 int code = ERR; 54 55 T((T_CALLED("waddnstr(%p,%s,%d)"), (void *) win, _nc_visbufn(astr, n), n)); 56 57 if (win && (str != 0)) { 58 TR(TRACE_VIRTPUT | TRACE_ATTRS, 59 ("... current %s", _traceattr(WINDOW_ATTRS(win)))); 60 code = OK; 61 if (n < 0) 62 n = (int) strlen(astr); 63 64 TR(TRACE_VIRTPUT, ("str is not null, length = %d", n)); 65 while ((n-- > 0) && (*str != '\0')) { 66 NCURSES_CH_T ch; 67 TR(TRACE_VIRTPUT, ("*str = %#o", UChar(*str))); 68 SetChar(ch, UChar(*str++), A_NORMAL); 69 if (_nc_waddch_nosync(win, ch) == ERR) { 70 code = ERR; 71 break; 72 } 73 } 74 _nc_synchook(win); 75 } 76 TR(TRACE_VIRTPUT, ("waddnstr returns %d", code)); 77 returnCode(code); 78 } 79 80 NCURSES_EXPORT(int) 81 waddchnstr(WINDOW *win, const chtype *astr, int n) 82 { 83 NCURSES_SIZE_T y, x; 84 int code = OK; 85 int i; 86 struct ldat *line; 87 88 T((T_CALLED("waddchnstr(%p,%p,%d)"), (void *) win, (const void *) astr, n)); 89 90 if (!win) 91 returnCode(ERR); 92 93 y = win->_cury; 94 x = win->_curx; 95 if (n < 0) { 96 const chtype *str; 97 n = 0; 98 for (str = (const chtype *) astr; *str != 0; str++) 99 n++; 100 } 101 if (n > win->_maxx - x + 1) 102 n = win->_maxx - x + 1; 103 if (n == 0) 104 returnCode(code); 105 106 line = &(win->_line[y]); 107 for (i = 0; i < n && ChCharOf(astr[i]) != '\0'; ++i) { 108 SetChar2(line->text[i + x], astr[i]); 109 } 110 CHANGED_RANGE(line, x, (NCURSES_SIZE_T) (x + n - 1)); 111 112 _nc_synchook(win); 113 returnCode(code); 114 } 115 116 #if USE_WIDEC_SUPPORT 117 118 NCURSES_EXPORT(int) 119 _nc_wchstrlen(const cchar_t *s) 120 { 121 int result = 0; 122 if (s != 0) { 123 while (CharOf(s[result]) != L'\0') { 124 result++; 125 } 126 } 127 return result; 128 } 129 130 NCURSES_EXPORT(int) 131 wadd_wchnstr(WINDOW *win, const cchar_t *astr, int n) 132 { 133 static const NCURSES_CH_T blank = NewChar(BLANK_TEXT); 134 NCURSES_SIZE_T y; 135 NCURSES_SIZE_T x; 136 int code = OK; 137 struct ldat *line; 138 int i, j, start, len, end; 139 140 T((T_CALLED("wadd_wchnstr(%p,%s,%d)"), 141 (void *) win, 142 _nc_viscbuf(astr, n), 143 n)); 144 145 if (!win) 146 returnCode(ERR); 147 148 y = win->_cury; 149 x = win->_curx; 150 if (n < 0) { 151 n = _nc_wchstrlen(astr); 152 } 153 if (n > win->_maxx - x + 1) 154 n = win->_maxx - x + 1; 155 if (n == 0) 156 returnCode(code); 157 158 line = &(win->_line[y]); 159 start = x; 160 end = x + n - 1; 161 162 /* 163 * Reset orphaned cells of multi-column characters that extend up to the 164 * new string's location to blanks. 165 */ 166 if (x > 0 && isWidecExt(line->text[x])) { 167 for (i = 0; i <= x; ++i) { 168 if (!isWidecExt(line->text[x - i])) { 169 /* must be isWidecBase() */ 170 start -= i; 171 while (i > 0) { 172 line->text[x - i--] = _nc_render(win, blank); 173 } 174 break; 175 } 176 } 177 } 178 179 /* 180 * Copy the new string to the window. 181 */ 182 for (i = 0; i < n && CharOf(astr[i]) != L'\0' && x <= win->_maxx; ++i) { 183 if (isWidecExt(astr[i])) 184 continue; 185 186 len = wcwidth(CharOf(astr[i])); 187 188 if (x + len - 1 <= win->_maxx) { 189 line->text[x] = _nc_render(win, astr[i]); 190 if (len > 1) { 191 for (j = 0; j < len; ++j) { 192 if (j != 0) { 193 line->text[x + j] = line->text[x]; 194 } 195 SetWidecExt(line->text[x + j], j); 196 } 197 } else { 198 len = 1; 199 } 200 x = (NCURSES_SIZE_T) (x + len); 201 end += len - 1; 202 } else { 203 break; 204 } 205 } 206 207 /* 208 * Set orphaned cells of multi-column characters which lie after the new 209 * string to blanks. 210 */ 211 while (x <= win->_maxx && isWidecExt(line->text[x])) { 212 line->text[x] = _nc_render(win, blank); 213 ++end; 214 ++x; 215 } 216 CHANGED_RANGE(line, start, end); 217 218 _nc_synchook(win); 219 returnCode(code); 220 } 221 222 NCURSES_EXPORT(int) 223 waddnwstr(WINDOW *win, const wchar_t *str, int n) 224 { 225 int code = ERR; 226 227 T((T_CALLED("waddnwstr(%p,%s,%d)"), (void *) win, _nc_viswbufn(str, n), n)); 228 229 if (win && (str != 0)) { 230 TR(TRACE_VIRTPUT | TRACE_ATTRS, 231 ("... current %s", _traceattr(WINDOW_ATTRS(win)))); 232 code = OK; 233 if (n < 0) 234 n = (int) wcslen(str); 235 236 TR(TRACE_VIRTPUT, ("str is not null, length = %d", n)); 237 while ((n-- > 0) && (*str != L('\0'))) { 238 NCURSES_CH_T ch; 239 TR(TRACE_VIRTPUT, ("*str[0] = %#lx", (unsigned long) *str)); 240 SetChar(ch, *str++, A_NORMAL); 241 if (wadd_wch(win, &ch) == ERR) { 242 code = ERR; 243 break; 244 } 245 } 246 _nc_synchook(win); 247 } 248 TR(TRACE_VIRTPUT, ("waddnwstr returns %d", code)); 249 returnCode(code); 250 } 251 252 #endif 253