1 /****************************************************************************
2 * Copyright (c) 1998-2014,2016 Free Software Foundation, Inc. *
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: *
12 * The above copyright notice and this permission notice shall be included *
13 * in all copies or substantial portions of the Software. *
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. *
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 *
27 ****************************************************************************/
29 /****************************************************************************
30 * Author: Thomas Dickey 1996-on *
31 * and: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995 *
32 * and: Eric S. Raymond <esr@snark.thyrsus.com> *
33 * and: Juergen Pfeifer *
34 ****************************************************************************/
37 * lib_traceatr.c - Tracing/Debugging routines (attributes)
40 #include <curses.priv.h>
43 #define CUR SP_TERMTYPE
46 MODULE_ID("$Id: lib_traceatr.c,v 1.85 2016/01/16 21:23:43 tom Exp $")
48 #define COLOR_OF(c) ((c < 0) ? "default" : (c > 7 ? color_of(c) : colors[c].name))
50 #define TRACE_BUF_SIZE(num) (_nc_globals.tracebuf_ptr[num].size)
51 #define COLOR_BUF_SIZE(num) (sizeof(my_buffer[num]))
55 static const char l_brace[] = StringOf(L_BRACE);
56 static const char r_brace[] = StringOf(R_BRACE);
60 #define my_buffer _nc_globals.traceatr_color_buf
61 #define my_select _nc_globals.traceatr_color_sel
62 #define my_cached _nc_globals.traceatr_color_last
69 my_select = !my_select;
70 if (c == COLOR_DEFAULT)
71 _nc_STRCPY(my_buffer[my_select], "default",
72 COLOR_BUF_SIZE(my_select));
74 _nc_SPRINTF(my_buffer[my_select],
75 _nc_SLIMIT(COLOR_BUF_SIZE(my_select))
78 return my_buffer[my_select];
83 #endif /* !USE_TERMLIB */
85 NCURSES_EXPORT(char *)
86 _traceattr2(int bufnum, chtype newmode)
88 #define DATA(name) { name, { #name } }
123 #endif /* !USE_TERMLIB */
128 char *result = _nc_trace_buf(bufnum, (size_t) BUFSIZ);
131 unsigned save_nc_tracing = _nc_tracing;
135 _nc_STRCPY(result, l_brace, TRACE_BUF_SIZE(bufnum));
137 for (n = 0; n < SIZEOF(names); n++) {
138 if ((newmode & names[n].val) != 0) {
139 if (result[1] != '\0')
140 (void) _nc_trace_bufcat(bufnum, "|");
141 result = _nc_trace_bufcat(bufnum, names[n].name);
143 if (names[n].val == A_COLOR) {
144 short pairnum = (short) PairNumber(newmode);
146 /* pair_content lives in libncurses */
147 _nc_SPRINTF(temp, _nc_SLIMIT(sizeof(temp))
150 NCURSES_COLOR_T fg, bg;
152 if (pair_content(pairnum, &fg, &bg) == OK) {
153 _nc_SPRINTF(temp, _nc_SLIMIT(sizeof(temp))
159 _nc_SPRINTF(temp, _nc_SLIMIT(sizeof(temp))
163 result = _nc_trace_bufcat(bufnum, temp);
167 if (ChAttrOf(newmode) == A_NORMAL) {
168 if (result != 0 && result[1] != '\0')
169 (void) _nc_trace_bufcat(bufnum, "|");
170 (void) _nc_trace_bufcat(bufnum, "A_NORMAL");
173 _nc_tracing = save_nc_tracing;
174 result = _nc_trace_bufcat(bufnum, r_brace);
179 NCURSES_EXPORT(char *)
180 _traceattr(attr_t newmode)
182 return _traceattr2(0, newmode);
185 /* Trace 'int' return-values */
187 _nc_retrace_int_attr_t(attr_t code)
189 T((T_RETURN("%s"), _traceattr(code)));
193 /* Trace 'attr_t' return-values */
194 NCURSES_EXPORT(attr_t)
195 _nc_retrace_attr_t(attr_t code)
197 T((T_RETURN("%s"), _traceattr(code)));
202 _nc_altcharset_name(attr_t attr, chtype ch)
204 #define DATA(code, name) { code, { #name } }
210 SCREEN *sp = CURRENT_SCREEN;
212 static const ALT_NAMES names[] =
214 DATA('l', ACS_ULCORNER), /* upper left corner */
215 DATA('m', ACS_LLCORNER), /* lower left corner */
216 DATA('k', ACS_URCORNER), /* upper right corner */
217 DATA('j', ACS_LRCORNER), /* lower right corner */
218 DATA('t', ACS_LTEE), /* tee pointing right */
219 DATA('u', ACS_RTEE), /* tee pointing left */
220 DATA('v', ACS_BTEE), /* tee pointing up */
221 DATA('w', ACS_TTEE), /* tee pointing down */
222 DATA('q', ACS_HLINE), /* horizontal line */
223 DATA('x', ACS_VLINE), /* vertical line */
224 DATA('n', ACS_PLUS), /* large plus or crossover */
225 DATA('o', ACS_S1), /* scan line 1 */
226 DATA('s', ACS_S9), /* scan line 9 */
227 DATA('`', ACS_DIAMOND), /* diamond */
228 DATA('a', ACS_CKBOARD), /* checker board (stipple) */
229 DATA('f', ACS_DEGREE), /* degree symbol */
230 DATA('g', ACS_PLMINUS), /* plus/minus */
231 DATA('~', ACS_BULLET), /* bullet */
232 DATA(',', ACS_LARROW), /* arrow pointing left */
233 DATA('+', ACS_RARROW), /* arrow pointing right */
234 DATA('.', ACS_DARROW), /* arrow pointing down */
235 DATA('-', ACS_UARROW), /* arrow pointing up */
236 DATA('h', ACS_BOARD), /* board of squares */
237 DATA('i', ACS_LANTERN), /* lantern symbol */
238 DATA('0', ACS_BLOCK), /* solid square block */
239 DATA('p', ACS_S3), /* scan line 3 */
240 DATA('r', ACS_S7), /* scan line 7 */
241 DATA('y', ACS_LEQUAL), /* less/equal */
242 DATA('z', ACS_GEQUAL), /* greater/equal */
243 DATA('{', ACS_PI), /* Pi */
244 DATA('|', ACS_NEQUAL), /* not equal */
245 DATA('}', ACS_STERLING), /* UK pound sign */
249 const char *result = 0;
254 if (SP_PARM != 0 && (attr & A_ALTCHARSET) && (acs_chars != 0)) {
259 for (cp = acs_chars; cp[0] && cp[1]; cp += 2) {
260 if (ChCharOf(UChar(cp[1])) == ChCharOf(ch)) {
262 /* don't exit from loop - there may be redefinitions */
267 ch = ChCharOf(UChar(*found));
268 for (n = 0; n < SIZEOF(names); ++n) {
269 if (names[n].val == ch) {
270 result = names[n].name;
279 NCURSES_EXPORT(char *)
280 _tracechtype2(int bufnum, chtype ch)
283 char *result = _nc_trace_buf(bufnum, (size_t) BUFSIZ);
286 _nc_STRCPY(result, l_brace, TRACE_BUF_SIZE(bufnum));
287 if ((found = _nc_altcharset_name(ChAttrOf(ch), ch)) != 0) {
288 (void) _nc_trace_bufcat(bufnum, found);
290 (void) _nc_trace_bufcat(bufnum,
291 _nc_tracechar(CURRENT_SCREEN,
292 (int) ChCharOf(ch)));
294 if (ChAttrOf(ch) != A_NORMAL) {
295 (void) _nc_trace_bufcat(bufnum, " | ");
296 (void) _nc_trace_bufcat(bufnum,
297 _traceattr2(bufnum + 20, ChAttrOf(ch)));
300 result = _nc_trace_bufcat(bufnum, r_brace);
305 NCURSES_EXPORT(char *)
306 _tracechtype(chtype ch)
308 return _tracechtype2(0, ch);
311 /* Trace 'chtype' return-values */
312 NCURSES_EXPORT(chtype)
313 _nc_retrace_chtype(chtype code)
315 T((T_RETURN("%s"), _tracechtype(code)));
319 #if USE_WIDEC_SUPPORT
320 NCURSES_EXPORT(char *)
321 _tracecchar_t2(int bufnum, const cchar_t *ch)
323 char *result = _nc_trace_buf(bufnum, (size_t) BUFSIZ);
328 _nc_STRCPY(result, l_brace, TRACE_BUF_SIZE(bufnum));
331 if ((found = _nc_altcharset_name(attr, (chtype) CharOfD(ch))) != 0) {
332 (void) _nc_trace_bufcat(bufnum, found);
333 attr &= ~A_ALTCHARSET;
334 } else if (isWidecExt(CHDEREF(ch))) {
335 (void) _nc_trace_bufcat(bufnum, "{NAC}");
341 (void) _nc_trace_bufcat(bufnum, "{ ");
342 for (PUTC_i = 0; PUTC_i < CCHARW_MAX; ++PUTC_i) {
343 PUTC_ch = ch->chars[PUTC_i];
344 if (PUTC_ch == L'\0') {
346 (void) _nc_trace_bufcat(bufnum, "\\000");
350 PUTC_n = (int) wcrtomb(PUTC_buf, ch->chars[PUTC_i], &PUT_st);
352 if (PUTC_ch != L'\0') {
353 /* it could not be a multibyte sequence */
354 (void) _nc_trace_bufcat(bufnum,
355 _nc_tracechar(CURRENT_SCREEN,
356 UChar(ch->chars[PUTC_i])));
359 } else if (ch->chars[PUTC_i] > 255) {
361 sprintf(temp, "{%d:\\u%x}",
362 wcwidth(ch->chars[PUTC_i]),
364 (void) _nc_trace_bufcat(bufnum, temp);
367 for (n = 0; n < PUTC_n; n++) {
369 (void) _nc_trace_bufcat(bufnum, ", ");
370 (void) _nc_trace_bufcat(bufnum,
371 _nc_tracechar(CURRENT_SCREEN,
372 UChar(PUTC_buf[n])));
375 (void) _nc_trace_bufcat(bufnum, " }");
377 if (attr != A_NORMAL) {
378 (void) _nc_trace_bufcat(bufnum, " | ");
379 (void) _nc_trace_bufcat(bufnum, _traceattr2(bufnum + 20, attr));
383 result = _nc_trace_bufcat(bufnum, r_brace);
388 NCURSES_EXPORT(char *)
389 _tracecchar_t(const cchar_t *ch)
391 return _tracecchar_t2(0, ch);
396 EMPTY_MODULE(_nc_lib_traceatr)