1 /* Dump a gcov file, for debugging use.
2 Copyright (C) 2002-2022 Free Software Foundation, Inc.
3 Contributed by Nathan Sidwell <nathan@codesourcery.com>
4
5 Gcov is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3, or (at your option)
8 any later version.
9
10 Gcov is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with Gcov; see the file COPYING3. If not see
17 <http://www.gnu.org/licenses/>. */
18
19 #include "config.h"
20 #include "system.h"
21 #include "coretypes.h"
22 #include "tm.h"
23 #include "version.h"
24 #include "intl.h"
25 #include "diagnostic.h"
26 #include <getopt.h>
27 #define IN_GCOV (-1)
28 #include "gcov-io.h"
29 #include "gcov-io.cc"
30
31 static void dump_gcov_file (const char *);
32 static void print_prefix (const char *, unsigned, gcov_position_t);
33 static void print_usage (void);
34 static void print_version (void);
35 static void tag_function (const char *, unsigned, int, unsigned);
36 static void tag_blocks (const char *, unsigned, int, unsigned);
37 static void tag_arcs (const char *, unsigned, int, unsigned);
38 static void tag_lines (const char *, unsigned, int, unsigned);
39 static void tag_counters (const char *, unsigned, int, unsigned);
40 static void tag_summary (const char *, unsigned, int, unsigned);
41 extern int main (int, char **);
42
43 typedef struct tag_format
44 {
45 unsigned tag;
46 char const *name;
47 void (*proc) (const char *, unsigned, int, unsigned);
48 } tag_format_t;
49
50 static int flag_dump_contents = 0;
51 static int flag_dump_positions = 0;
52 static int flag_dump_raw = 0;
53
54 static const struct option options[] =
55 {
56 { "help", no_argument, NULL, 'h' },
57 { "version", no_argument, NULL, 'v' },
58 { "long", no_argument, NULL, 'l' },
59 { "positions", no_argument, NULL, 'o' },
60 { 0, 0, 0, 0 }
61 };
62
63 #define VALUE_PADDING_PREFIX " "
64 #define VALUE_PREFIX "%2d: "
65
66 static const tag_format_t tag_table[] =
67 {
68 {0, "NOP", NULL},
69 {0, "UNKNOWN", NULL},
70 {0, "COUNTERS", tag_counters},
71 {GCOV_TAG_FUNCTION, "FUNCTION", tag_function},
72 {GCOV_TAG_BLOCKS, "BLOCKS", tag_blocks},
73 {GCOV_TAG_ARCS, "ARCS", tag_arcs},
74 {GCOV_TAG_LINES, "LINES", tag_lines},
75 {GCOV_TAG_OBJECT_SUMMARY, "OBJECT_SUMMARY", tag_summary},
76 {0, NULL, NULL}
77 };
78
79 int
main(int argc ATTRIBUTE_UNUSED,char ** argv)80 main (int argc ATTRIBUTE_UNUSED, char **argv)
81 {
82 int opt;
83 const char *p;
84
85 p = argv[0] + strlen (argv[0]);
86 while (p != argv[0] && !IS_DIR_SEPARATOR (p[-1]))
87 --p;
88 progname = p;
89
90 xmalloc_set_program_name (progname);
91
92 /* Unlock the stdio streams. */
93 unlock_std_streams ();
94
95 gcc_init_libintl ();
96
97 diagnostic_initialize (global_dc, 0);
98
99 while ((opt = getopt_long (argc, argv, "hlprvw", options, NULL)) != -1)
100 {
101 switch (opt)
102 {
103 case 'h':
104 print_usage ();
105 break;
106 case 'v':
107 print_version ();
108 break;
109 case 'l':
110 flag_dump_contents = 1;
111 break;
112 case 'p':
113 flag_dump_positions = 1;
114 break;
115 case 'r':
116 flag_dump_raw = 1;
117 break;
118 default:
119 fprintf (stderr, "unknown flag `%c'\n", opt);
120 }
121 }
122
123 while (argv[optind])
124 dump_gcov_file (argv[optind++]);
125 return 0;
126 }
127
128 static void
print_usage(void)129 print_usage (void)
130 {
131 printf ("Usage: gcov-dump [OPTION] ... gcovfiles\n");
132 printf ("Print coverage file contents\n");
133 printf (" -h, --help Print this help\n");
134 printf (" -l, --long Dump record contents too\n");
135 printf (" -p, --positions Dump record positions\n");
136 printf (" -r, --raw Print content records in raw format\n");
137 printf (" -v, --version Print version number\n");
138 printf ("\nFor bug reporting instructions, please see:\n%s.\n",
139 bug_report_url);
140 }
141
142 static void
print_version(void)143 print_version (void)
144 {
145 printf ("gcov-dump %s%s\n", pkgversion_string, version_string);
146 printf ("Copyright (C) 2022 Free Software Foundation, Inc.\n");
147 printf ("This is free software; see the source for copying conditions. There is NO\n\
148 warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\n\n");
149 }
150
151 static void
print_prefix(const char * filename,unsigned depth,gcov_position_t position)152 print_prefix (const char *filename, unsigned depth, gcov_position_t position)
153 {
154 static const char prefix[] = " ";
155
156 printf ("%s:", filename);
157 if (flag_dump_positions)
158 printf ("%5lu:", (unsigned long) position);
159 printf ("%.*s", (int) 2 * depth, prefix);
160 }
161
162 static void
dump_gcov_file(const char * filename)163 dump_gcov_file (const char *filename)
164 {
165 unsigned tags[4];
166 unsigned depth = 0;
167 bool is_data_type;
168
169 if (!gcov_open (filename, 1))
170 {
171 fprintf (stderr, "%s:cannot open\n", filename);
172 return;
173 }
174
175 /* magic */
176 {
177 unsigned magic = gcov_read_unsigned ();
178 unsigned version;
179 int endianness = 0;
180 char m[4], v[4];
181
182 if ((endianness = gcov_magic (magic, GCOV_DATA_MAGIC)))
183 is_data_type = true;
184 else if ((endianness = gcov_magic (magic, GCOV_NOTE_MAGIC)))
185 is_data_type = false;
186 else
187 {
188 printf ("%s:not a gcov file\n", filename);
189 gcov_close ();
190 return;
191 }
192 version = gcov_read_unsigned ();
193 GCOV_UNSIGNED2STRING (v, version);
194 GCOV_UNSIGNED2STRING (m, magic);
195
196 printf ("%s:%s:magic `%.4s':version `%.4s'%s\n", filename,
197 is_data_type ? "data" : "note",
198 m, v, endianness < 0 ? " (swapped endianness)" : "");
199 if (version != GCOV_VERSION)
200 {
201 char e[4];
202
203 GCOV_UNSIGNED2STRING (e, GCOV_VERSION);
204 printf ("%s:warning:current version is `%.4s'\n", filename, e);
205 }
206 }
207
208 /* stamp */
209 unsigned stamp = gcov_read_unsigned ();
210 printf ("%s:stamp %lu\n", filename, (unsigned long)stamp);
211
212 /* Checksum */
213 unsigned checksum = gcov_read_unsigned ();
214 printf ("%s:checksum %lu\n", filename, (unsigned long)checksum);
215
216 if (!is_data_type)
217 {
218 printf ("%s:cwd: %s\n", filename, gcov_read_string ());
219
220 /* Support for unexecuted basic blocks. */
221 unsigned support_unexecuted_blocks = gcov_read_unsigned ();
222 if (!support_unexecuted_blocks)
223 printf ("%s: has_unexecuted_block is not supported\n", filename);
224 }
225
226 while (1)
227 {
228 gcov_position_t base, position = gcov_position ();
229 int read_length;
230 unsigned tag, length;
231 tag_format_t const *format;
232 unsigned tag_depth;
233 int error;
234 unsigned mask;
235
236 tag = gcov_read_unsigned ();
237 if (!tag)
238 break;
239 read_length = (int)gcov_read_unsigned ();
240 length = read_length > 0 ? read_length : 0;
241 base = gcov_position ();
242 mask = GCOV_TAG_MASK (tag) >> 1;
243 for (tag_depth = 4; mask; mask >>= 8)
244 {
245 if ((mask & 0xff) != 0xff)
246 {
247 printf ("%s:tag `%08x' is invalid\n", filename, tag);
248 break;
249 }
250 tag_depth--;
251 }
252 for (format = tag_table; format->name; format++)
253 if (format->tag == tag)
254 goto found;
255 format = &tag_table[GCOV_TAG_IS_COUNTER (tag) ? 2 : 1];
256 found:;
257 if (tag)
258 {
259 if (depth && depth < tag_depth)
260 {
261 if (!GCOV_TAG_IS_SUBTAG (tags[depth - 1], tag))
262 printf ("%s:tag `%08x' is incorrectly nested\n",
263 filename, tag);
264 }
265 depth = tag_depth;
266 tags[depth - 1] = tag;
267 }
268
269 print_prefix (filename, tag_depth, position);
270 printf ("%08x:%4u:%s", tag, abs (read_length), format->name);
271 if (format->proc)
272 (*format->proc) (filename, tag, read_length, depth);
273
274 printf ("\n");
275 if (flag_dump_contents && format->proc)
276 {
277 unsigned long actual_length = gcov_position () - base;
278
279 if (actual_length > length)
280 printf ("%s:record size mismatch %lu bytes overread\n",
281 filename, actual_length - length);
282 else if (length > actual_length)
283 printf ("%s:record size mismatch %lu bytes unread\n",
284 filename, length - actual_length);
285 }
286 gcov_sync (base, length);
287 if ((error = gcov_is_error ()))
288 {
289 printf (error < 0 ? "%s:counter overflow at %lu\n" :
290 "%s:read error at %lu\n", filename,
291 (long unsigned) gcov_position ());
292 break;
293 }
294 }
295 gcov_close ();
296 }
297
298 static void
tag_function(const char * filename ATTRIBUTE_UNUSED,unsigned tag ATTRIBUTE_UNUSED,int length,unsigned depth ATTRIBUTE_UNUSED)299 tag_function (const char *filename ATTRIBUTE_UNUSED,
300 unsigned tag ATTRIBUTE_UNUSED, int length,
301 unsigned depth ATTRIBUTE_UNUSED)
302 {
303 gcov_position_t pos = gcov_position ();
304
305 if (!length)
306 printf (" placeholder");
307 else
308 {
309 printf (" ident=%u", gcov_read_unsigned ());
310 printf (", lineno_checksum=0x%08x", gcov_read_unsigned ());
311 printf (", cfg_checksum=0x%08x", gcov_read_unsigned ());
312
313 if (gcov_position () - pos < (gcov_position_t) length)
314 {
315 const char *name;
316
317 name = gcov_read_string ();
318 printf (", `%s'", name ? name : "NULL");
319 unsigned artificial = gcov_read_unsigned ();
320 name = gcov_read_string ();
321 printf (" %s", name ? name : "NULL");
322 unsigned line_start = gcov_read_unsigned ();
323 unsigned column_start = gcov_read_unsigned ();
324 unsigned line_end = gcov_read_unsigned ();
325 unsigned column_end = gcov_read_unsigned ();
326 printf (":%u:%u-%u:%u", line_start, column_start,
327 line_end, column_end);
328 if (artificial)
329 printf (", artificial");
330 }
331 }
332 }
333
334 static void
tag_blocks(const char * filename ATTRIBUTE_UNUSED,unsigned tag ATTRIBUTE_UNUSED,int length ATTRIBUTE_UNUSED,unsigned depth ATTRIBUTE_UNUSED)335 tag_blocks (const char *filename ATTRIBUTE_UNUSED,
336 unsigned tag ATTRIBUTE_UNUSED, int length ATTRIBUTE_UNUSED,
337 unsigned depth ATTRIBUTE_UNUSED)
338 {
339 printf (" %u blocks", gcov_read_unsigned ());
340 }
341
342 static void
tag_arcs(const char * filename ATTRIBUTE_UNUSED,unsigned tag ATTRIBUTE_UNUSED,int length ATTRIBUTE_UNUSED,unsigned depth)343 tag_arcs (const char *filename ATTRIBUTE_UNUSED,
344 unsigned tag ATTRIBUTE_UNUSED, int length ATTRIBUTE_UNUSED,
345 unsigned depth)
346 {
347 unsigned n_arcs = GCOV_TAG_ARCS_NUM (length);
348
349 printf (" %u arcs", n_arcs);
350 if (flag_dump_contents)
351 {
352 unsigned ix;
353 unsigned blockno = gcov_read_unsigned ();
354
355 for (ix = 0; ix != n_arcs; ix++)
356 {
357 unsigned dst, flags;
358
359 if (!(ix & 3))
360 {
361 printf ("\n");
362 print_prefix (filename, depth, gcov_position ());
363 printf (VALUE_PADDING_PREFIX "block %u:", blockno);
364 }
365 dst = gcov_read_unsigned ();
366 flags = gcov_read_unsigned ();
367 printf (" %u:%04x", dst, flags);
368 if (flags)
369 {
370 char c = '(';
371
372 if (flags & GCOV_ARC_ON_TREE)
373 printf ("%ctree", c), c = ',';
374 if (flags & GCOV_ARC_FAKE)
375 printf ("%cfake", c), c = ',';
376 if (flags & GCOV_ARC_FALLTHROUGH)
377 printf ("%cfall", c), c = ',';
378 printf (")");
379 }
380 }
381 }
382 }
383
384 static void
tag_lines(const char * filename ATTRIBUTE_UNUSED,unsigned tag ATTRIBUTE_UNUSED,int length ATTRIBUTE_UNUSED,unsigned depth)385 tag_lines (const char *filename ATTRIBUTE_UNUSED,
386 unsigned tag ATTRIBUTE_UNUSED, int length ATTRIBUTE_UNUSED,
387 unsigned depth)
388 {
389 if (flag_dump_contents)
390 {
391 unsigned blockno = gcov_read_unsigned ();
392 char const *sep = NULL;
393
394 while (1)
395 {
396 gcov_position_t position = gcov_position ();
397 const char *source = NULL;
398 unsigned lineno = gcov_read_unsigned ();
399
400 if (!lineno)
401 {
402 source = gcov_read_string ();
403 if (!source)
404 break;
405 sep = NULL;
406 }
407
408 if (!sep)
409 {
410 printf ("\n");
411 print_prefix (filename, depth, position);
412 printf (VALUE_PADDING_PREFIX "block %u:", blockno);
413 sep = "";
414 }
415 if (lineno)
416 {
417 printf ("%s%u", sep, lineno);
418 sep = ", ";
419 }
420 else
421 {
422 printf ("%s`%s'", sep, source);
423 sep = ":";
424 }
425 }
426 }
427 }
428
429 static void
tag_counters(const char * filename ATTRIBUTE_UNUSED,unsigned tag ATTRIBUTE_UNUSED,int length ATTRIBUTE_UNUSED,unsigned depth)430 tag_counters (const char *filename ATTRIBUTE_UNUSED,
431 unsigned tag ATTRIBUTE_UNUSED, int length ATTRIBUTE_UNUSED,
432 unsigned depth)
433 {
434 #define DEF_GCOV_COUNTER(COUNTER, NAME, MERGE_FN) NAME,
435 static const char *const counter_names[] = {
436 #include "gcov-counter.def"
437 };
438 #undef DEF_GCOV_COUNTER
439 int n_counts = GCOV_TAG_COUNTER_NUM (length);
440 bool has_zeros = n_counts < 0;
441 n_counts = abs (n_counts);
442
443 printf (" %s %u counts%s",
444 counter_names[GCOV_COUNTER_FOR_TAG (tag)], n_counts,
445 has_zeros ? " (all zero)" : "");
446 if (flag_dump_contents)
447 {
448 for (int ix = 0; ix != n_counts; ix++)
449 {
450 gcov_type count;
451
452 if (flag_dump_raw)
453 {
454 if (ix == 0)
455 printf (": ");
456 }
457 else if (!(ix & 7))
458 {
459 printf ("\n");
460 print_prefix (filename, depth, gcov_position ());
461 printf (VALUE_PADDING_PREFIX VALUE_PREFIX, ix);
462 }
463
464 count = has_zeros ? 0 : gcov_read_counter ();
465 printf ("%" PRId64 " ", count);
466 }
467 }
468 }
469
470 static void
tag_summary(const char * filename ATTRIBUTE_UNUSED,unsigned tag ATTRIBUTE_UNUSED,int length ATTRIBUTE_UNUSED,unsigned depth ATTRIBUTE_UNUSED)471 tag_summary (const char *filename ATTRIBUTE_UNUSED,
472 unsigned tag ATTRIBUTE_UNUSED, int length ATTRIBUTE_UNUSED,
473 unsigned depth ATTRIBUTE_UNUSED)
474 {
475 gcov_summary summary;
476 gcov_read_summary (&summary);
477 printf (" runs=%d, sum_max=%" PRId64,
478 summary.runs, summary.sum_max);
479 }
480