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

Line Branch Exec Source
1
/* $OpenBSD: varargs.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 2001                                           *
33
 ****************************************************************************/
34
35
#include <curses.priv.h>
36
37
#include <ctype.h>
38
39
MODULE_ID("$Id: varargs.c,v 1.1 2010/01/12 23:22:07 nicm Exp $")
40
41
#ifdef TRACE
42
43
#define MAX_PARMS 10
44
45
typedef enum {
46
    atUnknown = 0, atInteger, atFloat, atPoint, atString
47
} ARGTYPE;
48
49
#define VA_INT(type) ival = va_arg(ap, type)
50
#define VA_FLT(type) fval = va_arg(ap, type)
51
#define VA_PTR(type) pval = (char *)va_arg(ap, type)
52
#define VA_STR(type) sval = va_arg(ap, type)
53
54
#define MyBuffer _nc_globals.tracearg_buf
55
#define MyLength _nc_globals.tracearg_used
56
57
/*
58
 * Returns a string that represents the parameter list of a printf-style call.
59
 */
60
NCURSES_EXPORT(char *)
61
_nc_varargs(const char *fmt, va_list ap)
62
{
63
    static char dummy[] = "";
64
65
    char buffer[BUFSIZ];
66
    const char *param;
67
    int n;
68
69
    if (fmt == 0 || *fmt == '\0')
70
	return dummy;
71
    if (MyLength == 0)
72
	MyBuffer = typeMalloc(char, MyLength = BUFSIZ);
73
    if (MyBuffer == 0)
74
	return dummy;
75
    *MyBuffer = '\0';
76
77
    while (*fmt != '\0') {
78
	if (*fmt == '%') {
79
	    char *pval = 0;	/* avoid const-cast */
80
	    const char *sval = "";
81
	    double fval = 0.0;
82
	    int done = FALSE;
83
	    int ival = 0;
84
	    int type = 0;
85
	    ARGTYPE parm[MAX_PARMS];
86
	    int parms = 0;
87
	    ARGTYPE used = atUnknown;
88
89
	    while (*++fmt != '\0' && !done) {
90
91
		if (*fmt == '*') {
92
		    VA_INT(int);
93
		    if (parms < MAX_PARMS)
94
			parm[parms++] = atInteger;
95
		} else if (isalpha(UChar(*fmt))) {
96
		    done = TRUE;
97
		    switch (*fmt) {
98
		    case 'Z':	/* FALLTHRU */
99
		    case 'h':	/* FALLTHRU */
100
		    case 'l':	/* FALLTHRU */
101
			done = FALSE;
102
			type = *fmt;
103
			break;
104
		    case 'i':	/* FALLTHRU */
105
		    case 'd':	/* FALLTHRU */
106
		    case 'u':	/* FALLTHRU */
107
		    case 'x':	/* FALLTHRU */
108
		    case 'X':	/* FALLTHRU */
109
			if (type == 'l')
110
			    VA_INT(long);
111
			else if (type == 'Z')
112
			    VA_INT(size_t);
113
			else
114
			    VA_INT(int);
115
			used = atInteger;
116
			break;
117
		    case 'f':	/* FALLTHRU */
118
		    case 'e':	/* FALLTHRU */
119
		    case 'E':	/* FALLTHRU */
120
		    case 'g':	/* FALLTHRU */
121
		    case 'G':	/* FALLTHRU */
122
			VA_FLT(double);
123
			used = atFloat;
124
			break;
125
		    case 'c':
126
			VA_INT(int);
127
			used = atInteger;
128
			break;
129
		    case 's':
130
			VA_STR(const char *);
131
			used = atString;
132
			break;
133
		    case 'p':
134
			VA_PTR(void *);
135
			used = atPoint;
136
			break;
137
		    case 'n':
138
			VA_PTR(int *);
139
			used = atPoint;
140
			break;
141
		    default:
142
			break;
143
		    }
144
		} else if (*fmt == '%') {
145
		    done = TRUE;
146
		}
147
		if (used != atUnknown && parms < MAX_PARMS) {
148
		    parm[parms++] = used;
149
		    for (n = 0; n < parms; ++n) {
150
			used = parm[n];
151
			param = buffer;
152
			switch (used) {
153
			case atInteger:
154
			    snprintf(buffer, sizeof(buffer), "%d", ival);
155
			    break;
156
			case atFloat:
157
			    snprintf(buffer, sizeof(buffer), "%f", fval);
158
			    break;
159
			case atPoint:
160
			    snprintf(buffer, sizeof(buffer), "%p", pval);
161
			    break;
162
			case atString:
163
			    param = _nc_visbuf2(1, sval);
164
			    break;
165
			case atUnknown:
166
			default:
167
			    strlcpy(buffer, "?", sizeof(buffer));
168
			    break;
169
			}
170
			MyLength += strlen(param) + 2;
171
			MyBuffer = typeRealloc(char, MyLength, MyBuffer);
172
			snprintf(MyBuffer + strlen(MyBuffer), MyLength - strlen(MyBuffer), ", %s", param);
173
		    }
174
		}
175
		used = atUnknown;
176
	    }
177
	} else {
178
	    fmt++;
179
	}
180
    }
181
182
    return (MyBuffer);
183
}
184
#else
185
EMPTY_MODULE(_nc_varargs)
186
#endif