2 * Copyright (c) 1991, 1992 Paul Kranenburg <pk@cs.few.eur.nl>
3 * Copyright (c) 1993 Branko Lankester <branko@hacktic.nl>
4 * Copyright (c) 1993, 1994, 1995, 1996 Rick Sladkey <jrs@world.std.com>
5 * Copyright (c) 1996-1999 Wichert Akkerman <wichert@cistron.nl>
6 * Copyright (c) 1999-2018 The strace developers.
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. The name of the author may not be used to endorse or promote products
18 * derived from this software without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
25 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
26 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
27 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
28 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
29 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
37 xlookup(const struct xlat *xlat, const uint64_t val)
39 for (; xlat->str != NULL; xlat++)
46 xlat_bsearch_compare(const void *a, const void *b)
48 const uint64_t val1 = *(const uint64_t *) a;
49 const uint64_t val2 = ((const struct xlat *) b)->val;
50 return (val1 > val2) ? 1 : (val1 < val2) ? -1 : 0;
54 xlat_search(const struct xlat *xlat, const size_t nmemb, const uint64_t val)
56 const struct xlat *e =
57 bsearch((const void *) &val,
58 xlat, nmemb, sizeof(*xlat), xlat_bsearch_compare);
60 return e ? e->str : NULL;
64 * Print entry in struct xlat table, if there.
66 * @param val Value to search a literal representation for.
67 * @param dflt String (abbreviated in comment syntax) which should be emitted
68 * if no appropriate xlat value has been found.
69 * @param xlat (And the following arguments) Pointers to arrays of xlat values.
70 * The last argument should be NULL.
71 * @return 1 if appropriate xlat value has been found, 0 otherwise.
74 printxvals(const uint64_t val, const char *dflt, const struct xlat *xlat, ...)
79 for (; xlat; xlat = va_arg(args, const struct xlat *)) {
80 const char *str = xlookup(xlat, val);
88 /* No hits -- print raw # instead. */
89 tprintf("%#" PRIx64, val);
90 tprints_comment(dflt);
98 sprintxval(char *const buf, const size_t size, const struct xlat *const x,
99 const unsigned int val, const char *const dflt)
101 const char *const str = xlookup(x, val);
104 return xsnprintf(buf, size, "%s", str);
106 return xsnprintf(buf, size, "%#x /* %s */", val, dflt);
108 return xsnprintf(buf, size, "%#x", val);
112 * Print entry in sorted struct xlat table, if it is there.
114 * @param xlat Pointer to an array of xlat values (not terminated with
116 * @param xlat_size Number of xlat elements present in array (usually ARRAY_SIZE
117 * if array is declared in the unit's scope and not
118 * terminated with XLAT_END).
119 * @param val Value to search literal representation for.
120 * @param dflt String (abbreviated in comment syntax) which should be
121 * emitted if no appropriate xlat value has been found.
122 * @return 1 if appropriate xlat value has been found, 0
126 printxval_searchn(const struct xlat *xlat, size_t xlat_size, uint64_t val,
129 const char *s = xlat_search(xlat, xlat_size, val);
136 tprintf("%#" PRIx64, val);
137 tprints_comment(dflt);
143 * Interpret `xlat' as an array of flags
144 * print the entries whose bits are on in `flags'
147 addflags(const struct xlat *xlat, uint64_t flags)
149 for (; xlat->str; xlat++) {
150 if (xlat->val && (flags & xlat->val) == xlat->val) {
151 tprintf("|%s", xlat->str);
156 tprintf("|%#" PRIx64, flags);
161 * Interpret `xlat' as an array of flags.
162 * Print to static string the entries whose bits are on in `flags'
163 * Return static string. If 0 is provided as flags, and there is no flag that
164 * has the value of 0 (it should be the first in xlat table), return NULL.
167 sprintflags(const char *prefix, const struct xlat *xlat, uint64_t flags)
169 static char outstr[1024];
173 outptr = stpcpy(outstr, prefix);
175 if (flags == 0 && xlat->val == 0 && xlat->str) {
176 strcpy(outptr, xlat->str);
180 for (; xlat->str; xlat++) {
181 if (xlat->val && (flags & xlat->val) == xlat->val) {
184 outptr = stpcpy(outptr, xlat->str);
195 outptr = xappendstr(outstr, outptr, "%#" PRIx64, flags);
205 printflags_ex(uint64_t flags, const char *dflt, const struct xlat *xlat, ...)
210 va_start(args, xlat);
211 for (; xlat; xlat = va_arg(args, const struct xlat *)) {
212 for (; (flags || !n) && xlat->str; ++xlat) {
213 if ((flags == xlat->val) ||
214 (xlat->val && (flags & xlat->val) == xlat->val)) {
215 tprintf("%s%s", (n++ ? "|" : ""), xlat->str);
226 tprintf("|%#" PRIx64, flags);
231 tprintf("%#" PRIx64, flags);
232 tprints_comment(dflt);