1 /**************************************************************************** 2 * Copyright 2019,2020 Thomas E. Dickey * 3 * Copyright 1998-2016,2017 Free Software Foundation, Inc. * 4 * * 5 * Permission is hereby granted, free of charge, to any person obtaining a * 6 * copy of this software and associated documentation files (the * 7 * "Software"), to deal in the Software without restriction, including * 8 * without limitation the rights to use, copy, modify, merge, publish, * 9 * distribute, distribute with modifications, sublicense, and/or sell * 10 * copies of the Software, and to permit persons to whom the Software is * 11 * furnished to do so, subject to the following conditions: * 12 * * 13 * The above copyright notice and this permission notice shall be included * 14 * in all copies or substantial portions of the Software. * 15 * * 16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * 17 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * 18 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * 19 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, * 20 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR * 21 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR * 22 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. * 23 * * 24 * Except as contained in this notice, the name(s) of the above copyright * 25 * holders shall not be used in advertising or otherwise to promote the * 26 * sale, use or other dealings in this Software without prior written * 27 * authorization. * 28 ****************************************************************************/ 29 30 /**************************************************************************** 31 * Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995 * 32 * and: Eric S. Raymond <esr@snark.thyrsus.com> * 33 * * 34 * Rewritten 2001-2004 to support wide-characters by * 35 * Sven Verdoolaege * 36 * Thomas Dickey * 37 ****************************************************************************/ 38 39 /* 40 ** lib_addstr.c 41 * 42 ** The routines waddnstr(), waddchnstr(). 43 ** 44 */ 45 46 #include <curses.priv.h> 47 48 MODULE_ID("$Id: lib_addstr.c,v 1.56 2020/02/02 23:34:34 tom Exp $") 49 50 NCURSES_EXPORT(int) 51 waddnstr(WINDOW *win, const char *astr, int n) 52 { 53 const char *str = astr; 54 int code = ERR; 55 56 T((T_CALLED("waddnstr(%p,%s,%d)"), (void *) win, _nc_visbufn(astr, n), n)); 57 58 if (win && (str != 0)) { 59 TR(TRACE_VIRTPUT | TRACE_ATTRS, 60 ("... current %s", _traceattr(WINDOW_ATTRS(win)))); 61 code = OK; 62 if (n < 0) 63 n = (int) strlen(astr); 64 65 TR(TRACE_VIRTPUT, ("str is not null, length = %d", n)); 66 while ((n-- > 0) && (*str != '\0')) { 67 NCURSES_CH_T ch; 68 TR(TRACE_VIRTPUT, ("*str = %#o", UChar(*str))); 69 SetChar(ch, UChar(*str++), A_NORMAL); 70 if (_nc_waddch_nosync(win, ch) == ERR) { 71 code = ERR; 72 break; 73 } 74 } 75 _nc_synchook(win); 76 } 77 TR(TRACE_VIRTPUT, ("waddnstr returns %d", code)); 78 returnCode(code); 79 } 80 81 NCURSES_EXPORT(int) 82 waddchnstr(WINDOW *win, const chtype *astr, int n) 83 { 84 NCURSES_SIZE_T y, x; 85 int code = OK; 86 int i; 87 struct ldat *line; 88 89 T((T_CALLED("waddchnstr(%p,%p,%d)"), (void *) win, (const void *) astr, n)); 90 91 if (!win || !astr) 92 returnCode(ERR); 93 94 y = win->_cury; 95 x = win->_curx; 96 if (n < 0) { 97 const chtype *str; 98 n = 0; 99 for (str = (const chtype *) astr; *str != 0; str++) 100 n++; 101 } 102 if (n > win->_maxx - x + 1) 103 n = win->_maxx - x + 1; 104 if (n == 0) 105 returnCode(code); 106 107 line = &(win->_line[y]); 108 for (i = 0; i < n && ChCharOf(astr[i]) != '\0'; ++i) { 109 SetChar2(line->text[i + x], astr[i]); 110 } 111 CHANGED_RANGE(line, x, (NCURSES_SIZE_T) (x + n - 1)); 112 113 _nc_synchook(win); 114 returnCode(code); 115 } 116 117 #if USE_WIDEC_SUPPORT 118 119 NCURSES_EXPORT(int) 120 _nc_wchstrlen(const cchar_t *s) 121 { 122 int result = 0; 123 if (s != 0) { 124 while (CharOf(s[result]) != L'\0') { 125 result++; 126 } 127 } 128 return result; 129 } 130 131 NCURSES_EXPORT(int) 132 wadd_wchnstr(WINDOW *win, const cchar_t *astr, int n) 133 { 134 static const NCURSES_CH_T blank = NewChar(BLANK_TEXT); 135 NCURSES_SIZE_T y; 136 NCURSES_SIZE_T x; 137 int code = OK; 138 struct ldat *line; 139 int i, j, start, len, end; 140 141 T((T_CALLED("wadd_wchnstr(%p,%s,%d)"), 142 (void *) win, 143 _nc_viscbuf(astr, n), 144 n)); 145 146 if (!win) 147 returnCode(ERR); 148 149 y = win->_cury; 150 x = win->_curx; 151 if (n < 0) { 152 n = _nc_wchstrlen(astr); 153 } 154 if (n > win->_maxx - x + 1) 155 n = win->_maxx - x + 1; 156 if (n == 0) 157 returnCode(code); 158 159 line = &(win->_line[y]); 160 start = x; 161 end = x + n - 1; 162 163 /* 164 * Reset orphaned cells of multi-column characters that extend up to the 165 * new string's location to blanks. 166 */ 167 if (x > 0 && isWidecExt(line->text[x])) { 168 for (i = 0; i <= x; ++i) { 169 if (!isWidecExt(line->text[x - i])) { 170 /* must be isWidecBase() */ 171 start -= i; 172 while (i > 0) { 173 line->text[x - i--] = _nc_render(win, blank); 174 } 175 break; 176 } 177 } 178 } 179 180 /* 181 * Copy the new string to the window. 182 */ 183 for (i = 0; i < n && CharOf(astr[i]) != L'\0' && x <= win->_maxx; ++i) { 184 if (isWidecExt(astr[i])) 185 continue; 186 187 len = _nc_wacs_width(CharOf(astr[i])); 188 189 if (x + len - 1 <= win->_maxx) { 190 line->text[x] = _nc_render(win, astr[i]); 191 if (len > 1) { 192 for (j = 0; j < len; ++j) { 193 if (j != 0) { 194 line->text[x + j] = line->text[x]; 195 } 196 SetWidecExt(line->text[x + j], j); 197 } 198 } else { 199 len = 1; 200 } 201 x = (NCURSES_SIZE_T) (x + len); 202 end += len - 1; 203 } else { 204 break; 205 } 206 } 207 208 /* 209 * Set orphaned cells of multi-column characters which lie after the new 210 * string to blanks. 211 */ 212 while (x <= win->_maxx && isWidecExt(line->text[x])) { 213 line->text[x] = _nc_render(win, blank); 214 ++end; 215 ++x; 216 } 217 CHANGED_RANGE(line, start, end); 218 219 _nc_synchook(win); 220 returnCode(code); 221 } 222 223 NCURSES_EXPORT(int) 224 waddnwstr(WINDOW *win, const wchar_t *str, int n) 225 { 226 int code = ERR; 227 228 T((T_CALLED("waddnwstr(%p,%s,%d)"), (void *) win, _nc_viswbufn(str, n), n)); 229 230 if (win && (str != 0)) { 231 TR(TRACE_VIRTPUT | TRACE_ATTRS, 232 ("... current %s", _traceattr(WINDOW_ATTRS(win)))); 233 code = OK; 234 if (n < 0) 235 n = (int) wcslen(str); 236 237 TR(TRACE_VIRTPUT, ("str is not null, length = %d", n)); 238 while ((n-- > 0) && (*str != L('\0'))) { 239 NCURSES_CH_T ch; 240 TR(TRACE_VIRTPUT, ("*str[0] = %#lx", (unsigned long) *str)); 241 SetChar(ch, *str++, A_NORMAL); 242 if (wadd_wch(win, &ch) == ERR) { 243 code = ERR; 244 break; 245 } 246 } 247 _nc_synchook(win); 248 } 249 TR(TRACE_VIRTPUT, ("waddnwstr returns %d", code)); 250 returnCode(code); 251 } 252 253 #endif 254