GCC Code Coverage Report
Directory: ./ Exec Total Coverage
File: lib/libcurses/trace/visbuf.c Lines: 0 48 0.0 %
Date: 2017-11-13 Branches: 0 32 0.0 %

Line Branch Exec Source
1
/* $OpenBSD: visbuf.c,v 1.1 2010/01/12 23:22:07 nicm Exp $ */
2
3
/****************************************************************************
4
 * Copyright (c) 2001-2007,2008 Free Software Foundation, Inc.              *
5
 *                                                                          *
6
 * Permission is hereby granted, free of charge, to any person obtaining a  *
7
 * copy of this software and associated documentation files (the            *
8
 * "Software"), to deal in the Software without restriction, including      *
9
 * without limitation the rights to use, copy, modify, merge, publish,      *
10
 * distribute, distribute with modifications, sublicense, and/or sell       *
11
 * copies of the Software, and to permit persons to whom the Software is    *
12
 * furnished to do so, subject to the following conditions:                 *
13
 *                                                                          *
14
 * The above copyright notice and this permission notice shall be included  *
15
 * in all copies or substantial portions of the Software.                   *
16
 *                                                                          *
17
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
18
 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
19
 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
20
 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
21
 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
22
 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
23
 * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
24
 *                                                                          *
25
 * Except as contained in this notice, the name(s) of the above copyright   *
26
 * holders shall not be used in advertising or otherwise to promote the     *
27
 * sale, use or other dealings in this Software without prior written       *
28
 * authorization.                                                           *
29
 ****************************************************************************/
30
31
/****************************************************************************
32
 *  Author: Thomas E. Dickey                        1996-on                 *
33
 *     and: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
34
 *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
35
 ****************************************************************************/
36
37
/*
38
 *	visbuf.c - Tracing/Debugging support routines
39
 */
40
41
#define NEED_NCURSES_CH_T
42
#include <curses.priv.h>
43
44
#include <tic.h>
45
#include <ctype.h>
46
47
MODULE_ID("$Id: visbuf.c,v 1.1 2010/01/12 23:22:07 nicm Exp $")
48
49
#define NormalLen(len) (size_t) (((size_t)(len) + 1) * 4)
50
#define WideLen(len)   (size_t) (((size_t)(len) + 1) * 4 * MB_CUR_MAX)
51
52
#ifdef TRACE
53
static const char d_quote[] = StringOf(D_QUOTE);
54
static const char l_brace[] = StringOf(L_BRACE);
55
static const char r_brace[] = StringOf(R_BRACE);
56
#endif
57
58
static char *
59
_nc_vischar(char *tp, size_t tl, unsigned c)
60
{
61
    if (c == '"' || c == '\\') {
62
	*tp++ = '\\';
63
	*tp++ = (char) c;
64
    } else if (is7bits(c) && (isgraph(c) || c == ' ')) {
65
	*tp++ = (char) c;
66
    } else if (c == '\n') {
67
	*tp++ = '\\';
68
	*tp++ = 'n';
69
    } else if (c == '\r') {
70
	*tp++ = '\\';
71
	*tp++ = 'r';
72
    } else if (c == '\b') {
73
	*tp++ = '\\';
74
	*tp++ = 'b';
75
    } else if (c == '\033') {
76
	*tp++ = '\\';
77
	*tp++ = 'e';
78
    } else if (UChar(c) == 0x7f) {
79
	*tp++ = '\\';
80
	*tp++ = '^';
81
	*tp++ = '?';
82
    } else if (is7bits(c) && iscntrl(UChar(c))) {
83
	*tp++ = '\\';
84
	*tp++ = '^';
85
	*tp++ = (char) ('@' + c);
86
    } else {
87
	snprintf(tp, tl, "\\%03lo", (unsigned long) ChCharOf(c));
88
	tp += strlen(tp);
89
    }
90
    *tp = 0;
91
    return tp;
92
}
93
94
static const char *
95
_nc_visbuf2n(int bufnum, const char *buf, int len)
96
{
97
    const char *vbuf;
98
    char *tp;
99
    int c;
100
101
    if (buf == 0)
102
	return ("(null)");
103
    if (buf == CANCELLED_STRING)
104
	return ("(cancelled)");
105
106
    if (len < 0)
107
	len = (int) strlen(buf);
108
109
#ifdef TRACE
110
    vbuf = tp = _nc_trace_buf(bufnum, NormalLen(len));
111
#else
112
    {
113
	static char *mybuf[4];
114
	mybuf[bufnum] = typeRealloc(char, NormalLen(len), mybuf[bufnum]);
115
	vbuf = tp = mybuf[bufnum];
116
    }
117
#endif
118
    if (tp != 0) {
119
	*tp++ = D_QUOTE;
120
	while ((--len >= 0) && (c = *buf++) != '\0') {
121
	    tp = _nc_vischar(tp, NormalLen(len) - (tp - vbuf), UChar(c));
122
	}
123
	*tp++ = D_QUOTE;
124
	*tp++ = '\0';
125
    } else {
126
	vbuf = ("(_nc_visbuf2n failed)");
127
    }
128
    return (vbuf);
129
}
130
131
NCURSES_EXPORT(const char *)
132
_nc_visbuf2(int bufnum, const char *buf)
133
{
134
    return _nc_visbuf2n(bufnum, buf, -1);
135
}
136
137
NCURSES_EXPORT(const char *)
138
_nc_visbuf(const char *buf)
139
{
140
    return _nc_visbuf2(0, buf);
141
}
142
143
NCURSES_EXPORT(const char *)
144
_nc_visbufn(const char *buf, int len)
145
{
146
    return _nc_visbuf2n(0, buf, len);
147
}
148
149
#ifdef TRACE
150
#if USE_WIDEC_SUPPORT
151
152
#if defined(USE_TERMLIB)
153
#define _nc_wchstrlen _my_wchstrlen
154
static int
155
_nc_wchstrlen(const cchar_t *s)
156
{
157
    int result = 0;
158
    while (CharOf(s[result]) != L'\0') {
159
	result++;
160
    }
161
    return result;
162
}
163
#endif
164
165
static const char *
166
_nc_viswbuf2n(int bufnum, const wchar_t *buf, int len)
167
{
168
    const char *vbuf;
169
    char *tp;
170
    wchar_t c;
171
172
    if (buf == 0)
173
	return ("(null)");
174
175
    if (len < 0)
176
	len = (int) wcslen(buf);
177
178
#ifdef TRACE
179
    vbuf = tp = _nc_trace_buf(bufnum, WideLen(len));
180
#else
181
    {
182
	static char *mybuf[2];
183
	mybuf[bufnum] = typeRealloc(char, WideLen(len), mybuf[bufnum]);
184
	vbuf = tp = mybuf[bufnum];
185
    }
186
#endif
187
    if (tp != 0) {
188
	*tp++ = D_QUOTE;
189
	while ((--len >= 0) && (c = *buf++) != '\0') {
190
	    char temp[CCHARW_MAX + 80];
191
	    int j = wctomb(temp, c), k;
192
	    if (j <= 0) {
193
		snprintf(temp, sizeof temp, "\\u%08X", (unsigned) c);
194
		j = (int) strlen(temp);
195
	    }
196
	    for (k = 0; k < j; ++k) {
197
		tp = _nc_vischar(tp, WideLen(len) - (tp - vbuf), UChar(temp[k]));
198
	    }
199
	}
200
	*tp++ = D_QUOTE;
201
	*tp++ = '\0';
202
    } else {
203
	vbuf = ("(_nc_viswbuf2n failed)");
204
    }
205
    return (vbuf);
206
}
207
208
NCURSES_EXPORT(const char *)
209
_nc_viswbuf2(int bufnum, const wchar_t *buf)
210
{
211
    return _nc_viswbuf2n(bufnum, buf, -1);
212
}
213
214
NCURSES_EXPORT(const char *)
215
_nc_viswbuf(const wchar_t *buf)
216
{
217
    return _nc_viswbuf2(0, buf);
218
}
219
220
NCURSES_EXPORT(const char *)
221
_nc_viswbufn(const wchar_t *buf, int len)
222
{
223
    return _nc_viswbuf2n(0, buf, len);
224
}
225
226
/* this special case is used for wget_wstr() */
227
NCURSES_EXPORT(const char *)
228
_nc_viswibuf(const wint_t *buf)
229
{
230
    static wchar_t *mybuf;
231
    static unsigned mylen;
232
    unsigned n;
233
234
    for (n = 0; buf[n] != 0; ++n) ;
235
    if (mylen < ++n) {
236
	mylen = n + 80;
237
	if (mybuf != 0)
238
	    mybuf = typeRealloc(wchar_t, mylen, mybuf);
239
	else
240
	    mybuf = typeMalloc(wchar_t, mylen);
241
    }
242
    for (n = 0; buf[n] != 0; ++n)
243
	mybuf[n] = (wchar_t) buf[n];
244
245
    return _nc_viswbuf2(0, mybuf);
246
}
247
#endif /* USE_WIDEC_SUPPORT */
248
249
/* use these functions for displaying parts of a line within a window */
250
NCURSES_EXPORT(const char *)
251
_nc_viscbuf2(int bufnum, const NCURSES_CH_T * buf, int len)
252
{
253
    char *result = _nc_trace_buf(bufnum, BUFSIZ);
254
    int first;
255
    const char *found;
256
257
    if (result != 0) {
258
#if USE_WIDEC_SUPPORT
259
	if (len < 0)
260
	    len = _nc_wchstrlen(buf);
261
#endif /* USE_WIDEC_SUPPORT */
262
263
	/*
264
	 * Display one or more strings followed by attributes.
265
	 */
266
	first = 0;
267
	while (first < len) {
268
	    attr_t attr = AttrOf(buf[first]);
269
	    int last = len - 1;
270
	    int j;
271
272
	    for (j = first + 1; j < len; ++j) {
273
		if (!SameAttrOf(buf[j], buf[first])) {
274
		    last = j - 1;
275
		    break;
276
		}
277
	    }
278
279
	    result = _nc_trace_bufcat(bufnum, l_brace);
280
	    result = _nc_trace_bufcat(bufnum, d_quote);
281
	    for (j = first; j <= last; ++j) {
282
		found = _nc_altcharset_name(attr, (chtype) CharOf(buf[j]));
283
		if (found != 0) {
284
		    result = _nc_trace_bufcat(bufnum, found);
285
		    attr &= ~A_ALTCHARSET;
286
		} else
287
#if USE_WIDEC_SUPPORT
288
		if (!isWidecExt(buf[j])) {
289
		    PUTC_DATA;
290
291
		    PUTC_INIT;
292
		    for (PUTC_i = 0; PUTC_i < CCHARW_MAX; ++PUTC_i) {
293
			int k;
294
295
			PUTC_ch = buf[j].chars[PUTC_i];
296
			if (PUTC_ch == L'\0')
297
			    break;
298
			PUTC_n = (int) wcrtomb(PUTC_buf, buf[j].chars[PUTC_i], &PUT_st);
299
			if (PUTC_n <= 0)
300
			    break;
301
			for (k = 0; k < PUTC_n; k++) {
302
			    char temp[80];
303
			    _nc_vischar(temp, sizeof(temp), UChar(PUTC_buf[k]));
304
			    result = _nc_trace_bufcat(bufnum, temp);
305
			}
306
		    }
307
		}
308
#else
309
		{
310
		    char temp[80];
311
		    _nc_vischar(temp, sizeof(temp), UChar(buf[j]));
312
		    result = _nc_trace_bufcat(bufnum, temp);
313
		}
314
#endif /* USE_WIDEC_SUPPORT */
315
	    }
316
	    result = _nc_trace_bufcat(bufnum, d_quote);
317
	    if (attr != A_NORMAL) {
318
		result = _nc_trace_bufcat(bufnum, " | ");
319
		result = _nc_trace_bufcat(bufnum, _traceattr2(bufnum + 20, attr));
320
	    }
321
	    result = _nc_trace_bufcat(bufnum, r_brace);
322
	    first = last + 1;
323
	}
324
    }
325
    return result;
326
}
327
328
NCURSES_EXPORT(const char *)
329
_nc_viscbuf(const NCURSES_CH_T * buf, int len)
330
{
331
    return _nc_viscbuf2(0, buf, len);
332
}
333
#endif /* TRACE */