2 * Copyright (c) 1983 Regents of the University of California.
5 * Redistribution and use in source and binary forms are permitted
6 * provided that: (1) source distributions retain this entire copyright
7 * notice and comment, and (2) distributions including binaries display
8 * the following acknowledgement: ``This product includes software
9 * developed by the University of California, Berkeley and its contributors''
10 * in the documentation or other materials provided with the distribution
11 * and in all advertising materials mentioning features or use of this
12 * software. Neither the name of the University nor the names of its
13 * contributors may be used to endorse or promote products derived
14 * from this software without specific prior written permission.
15 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
17 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
20 #include "libiberty.h"
22 #include "basic_blocks.h"
23 #include "call_graph.h"
34 const char *function_mapping_file
;
35 const char *a_out_name
= A_OUTNAME
;
39 * Default options values:
43 int output_width
= 80;
44 bool bsd_style_output
= FALSE
;
46 bool discard_underscores
= TRUE
;
47 bool ignore_direct_calls
= FALSE
;
48 bool ignore_static_funcs
= FALSE
;
49 bool ignore_zeros
= TRUE
;
50 bool line_granularity
= FALSE
;
51 bool print_descriptions
= TRUE
;
52 bool print_path
= FALSE
;
53 bool ignore_non_functions
= FALSE
;
54 File_Format file_format
= FF_AUTO
;
56 bool first_output
= TRUE
;
59 "@(#) Copyright (c) 1983 Regents of the University of California.\n\
60 All rights reserved.\n";
62 static char *gmon_name
= GMONNAME
; /* profile filename */
67 * Functions that get excluded by default:
69 static char *default_excluded_list
[] =
71 "_gprof_mcount", "mcount", "_mcount", "__mcount", "__mcount_internal",
73 "<locore>", "<hicore>",
77 /* Codes used for the long options with no short synonyms. 150 isn't
78 special; it's just an arbitrary non-ASCII char value. */
80 #define OPTION_DEMANGLE (150)
81 #define OPTION_NO_DEMANGLE (OPTION_DEMANGLE + 1)
83 static struct option long_options
[] =
85 {"line", no_argument
, 0, 'l'},
86 {"no-static", no_argument
, 0, 'a'},
87 {"ignore-non-functions", no_argument
, 0, 'D'},
91 {"annotated-source", optional_argument
, 0, 'A'},
92 {"no-annotated-source", optional_argument
, 0, 'J'},
93 {"flat-profile", optional_argument
, 0, 'p'},
94 {"no-flat-profile", optional_argument
, 0, 'P'},
95 {"graph", optional_argument
, 0, 'q'},
96 {"no-graph", optional_argument
, 0, 'Q'},
97 {"exec-counts", optional_argument
, 0, 'C'},
98 {"no-exec-counts", optional_argument
, 0, 'Z'},
99 {"function-ordering", no_argument
, 0, 'r'},
100 {"file-ordering", required_argument
, 0, 'R'},
101 {"file-info", no_argument
, 0, 'i'},
102 {"sum", no_argument
, 0, 's'},
104 /* various options to affect output: */
106 {"all-lines", no_argument
, 0, 'x'},
107 {"demangle", no_argument
, 0, OPTION_DEMANGLE
},
108 {"no-demangle", no_argument
, 0, OPTION_NO_DEMANGLE
},
109 {"directory-path", required_argument
, 0, 'I'},
110 {"display-unused-functions", no_argument
, 0, 'z'},
111 {"min-count", required_argument
, 0, 'm'},
112 {"print-path", no_argument
, 0, 'L'},
113 {"separate-files", no_argument
, 0, 'y'},
114 {"static-call-graph", no_argument
, 0, 'c'},
115 {"table-length", required_argument
, 0, 't'},
116 {"time", required_argument
, 0, 'n'},
117 {"no-time", required_argument
, 0, 'N'},
118 {"width", required_argument
, 0, 'w'},
120 * These are for backwards-compatibility only. Their functionality
121 * is provided by the output style options already:
123 {"", required_argument
, 0, 'e'},
124 {"", required_argument
, 0, 'E'},
125 {"", required_argument
, 0, 'f'},
126 {"", required_argument
, 0, 'F'},
127 {"", required_argument
, 0, 'k'},
131 {"brief", no_argument
, 0, 'b'},
132 {"debug", optional_argument
, 0, 'd'},
133 {"help", no_argument
, 0, 'h'},
134 {"file-format", required_argument
, 0, 'O'},
135 {"traditional", no_argument
, 0, 'T'},
136 {"version", no_argument
, 0, 'v'},
137 {0, no_argument
, 0, 0}
142 DEFUN (usage
, (stream
, status
), FILE * stream AND
int status
)
145 Usage: %s [-[abcDhilLsTvwxyz]] [-[ACeEfFJnNOpPqQZ][name]] [-I dirs]\n\
146 [-d[num]] [-k from/to] [-m min-count] [-t table-length]\n\
147 [--[no-]annotated-source[=name]] [--[no-]exec-counts[=name]]\n\
148 [--[no-]flat-profile[=name]] [--[no-]graph[=name]]\n\
149 [--[no-]time=name] [--all-lines] [--brief] [--debug[=level]]\n\
150 [--function-ordering] [--file-ordering]\n\
151 [--directory-path=dirs] [--display-unused-functions]\n\
152 [--file-format=name] [--file-info] [--help] [--line] [--min-count=n]\n\
153 [--no-static] [--print-path] [--separate-files]\n\
154 [--static-call-graph] [--sum] [--table-length=len] [--traditional]\n\
155 [--version] [--width=n] [--ignore-non-functions]\n\
156 [--demangle] [--no-demangle]\n\
157 [image-file] [profile-file...]\n",
160 fprintf (stream
, "Report bugs to bug-gnu-utils@gnu.org\n");
166 DEFUN (main
, (argc
, argv
), int argc AND
char **argv
)
170 int ch
, user_specified
= 0;
173 xmalloc_set_program_name (whoami
);
175 while ((ch
= getopt_long (argc
, argv
,
176 "aA::bBcCdD::e:E:f:F:hiI:J::k:lLm:n::N::O:p::P::q::Q::st:Tvw:xyzZ::",
183 ignore_static_funcs
= TRUE
;
188 sym_id_add (optarg
, INCL_ANNO
);
190 output_style
|= STYLE_ANNOTATED_SOURCE
;
191 user_specified
|= STYLE_ANNOTATED_SOURCE
;
194 print_descriptions
= FALSE
;
197 output_style
|= STYLE_CALL_GRAPH
;
198 user_specified
|= STYLE_CALL_GRAPH
;
201 ignore_direct_calls
= TRUE
;
206 sym_id_add (optarg
, INCL_EXEC
);
208 output_style
|= STYLE_EXEC_COUNTS
;
209 user_specified
|= STYLE_EXEC_COUNTS
;
214 debug_level
|= atoi (optarg
);
215 debug_level
|= ANYDEBUG
;
221 DBG (ANYDEBUG
, printf ("[main] debug-level=0x%x\n", debug_level
));
223 printf ("%s: debugging not supported; -d ignored\n", whoami
);
227 ignore_non_functions
= TRUE
;
230 sym_id_add (optarg
, EXCL_TIME
);
232 sym_id_add (optarg
, EXCL_GRAPH
);
235 sym_id_add (optarg
, INCL_TIME
);
237 sym_id_add (optarg
, INCL_GRAPH
);
240 sym_id_add (optarg
, EXCL_FLAT
);
243 sym_id_add (optarg
, INCL_FLAT
);
248 output_style
|= STYLE_GMON_INFO
;
249 user_specified
|= STYLE_GMON_INFO
;
252 search_list_append (&src_search_list
, optarg
);
257 sym_id_add (optarg
, EXCL_ANNO
);
258 output_style
|= STYLE_ANNOTATED_SOURCE
;
262 output_style
&= ~STYLE_ANNOTATED_SOURCE
;
264 user_specified
|= STYLE_ANNOTATED_SOURCE
;
267 sym_id_add (optarg
, EXCL_ARCS
);
270 line_granularity
= TRUE
;
276 bb_min_calls
= atoi (optarg
);
279 sym_id_add (optarg
, INCL_TIME
);
282 sym_id_add (optarg
, EXCL_TIME
);
288 file_format
= FF_AUTO
;
291 file_format
= FF_MAGIC
;
294 file_format
= FF_BSD
;
297 file_format
= FF_PROF
;
300 fprintf (stderr
, "%s: unknown file format %s\n",
308 sym_id_add (optarg
, INCL_FLAT
);
310 output_style
|= STYLE_FLAT_PROFILE
;
311 user_specified
|= STYLE_FLAT_PROFILE
;
316 sym_id_add (optarg
, EXCL_FLAT
);
317 output_style
|= STYLE_FLAT_PROFILE
;
321 output_style
&= ~STYLE_FLAT_PROFILE
;
323 user_specified
|= STYLE_FLAT_PROFILE
;
328 if (strchr (optarg
, '/'))
330 sym_id_add (optarg
, INCL_ARCS
);
334 sym_id_add (optarg
, INCL_GRAPH
);
337 output_style
|= STYLE_CALL_GRAPH
;
338 user_specified
|= STYLE_CALL_GRAPH
;
341 output_style
|= STYLE_FUNCTION_ORDER
;
342 user_specified
|= STYLE_FUNCTION_ORDER
;
345 output_style
|= STYLE_FILE_ORDER
;
346 user_specified
|= STYLE_FILE_ORDER
;
347 function_mapping_file
= optarg
;
352 if (strchr (optarg
, '/'))
354 sym_id_add (optarg
, EXCL_ARCS
);
358 sym_id_add (optarg
, EXCL_GRAPH
);
360 output_style
|= STYLE_CALL_GRAPH
;
364 output_style
&= ~STYLE_CALL_GRAPH
;
366 user_specified
|= STYLE_CALL_GRAPH
;
369 output_style
|= STYLE_SUMMARY_FILE
;
370 user_specified
|= STYLE_SUMMARY_FILE
;
373 bb_table_length
= atoi (optarg
);
374 if (bb_table_length
< 0)
380 bsd_style_output
= TRUE
;
383 /* This output is intended to follow the GNU standards document. */
384 printf ("GNU gprof %s\n", VERSION
);
385 printf ("Based on BSD gprof, copyright 1983 Regents of the University of California.\n");
387 This program is free software. This program has absolutely no warranty.\n");
390 output_width
= atoi (optarg
);
391 if (output_width
< 1)
397 bb_annotate_all_lines
= TRUE
;
400 create_annotation_files
= TRUE
;
403 ignore_zeros
= FALSE
;
408 sym_id_add (optarg
, EXCL_EXEC
);
409 output_style
|= STYLE_EXEC_COUNTS
;
413 output_style
&= ~STYLE_EXEC_COUNTS
;
415 user_specified
|= STYLE_ANNOTATED_SOURCE
;
417 case OPTION_DEMANGLE
:
420 case OPTION_NO_DEMANGLE
:
428 /* Don't allow both ordering options, they modify the arc data in-place. */
429 if ((user_specified
& STYLE_FUNCTION_ORDER
)
430 && (user_specified
& STYLE_FILE_ORDER
))
433 %s: Only one of --function-ordering and --file-ordering may be specified.\n",
438 /* --sum implies --line, otherwise we'd lose b-b counts in gmon.sum */
439 if (output_style
& STYLE_SUMMARY_FILE
)
441 line_granularity
= 1;
444 /* append value of GPROF_PATH to source search list if set: */
445 str
= (char *) getenv ("GPROF_PATH");
448 search_list_append (&src_search_list
, str
);
453 a_out_name
= argv
[optind
++];
457 gmon_name
= argv
[optind
++];
461 * Turn off default functions:
463 for (sp
= &default_excluded_list
[0]; *sp
; sp
++)
465 sym_id_add (*sp
, EXCL_TIME
);
466 sym_id_add (*sp
, EXCL_GRAPH
);
468 sym_id_add (*sp
, EXCL_FLAT
);
473 * For line-by-line profiling, also want to keep those
474 * functions off the flat profile:
476 if (line_granularity
)
478 for (sp
= &default_excluded_list
[0]; *sp
; sp
++)
480 sym_id_add (*sp
, EXCL_FLAT
);
485 * Read symbol table from core file:
487 core_init (a_out_name
);
490 * If we should ignore direct function calls, we need to load
491 * to core's text-space:
493 if (ignore_direct_calls
)
495 core_get_text_space (core_bfd
);
499 * Create symbols from core image:
501 if (line_granularity
)
503 core_create_line_syms (core_bfd
);
507 core_create_function_syms (core_bfd
);
511 * Translate sym specs into syms:
515 if (file_format
== FF_PROF
)
517 #ifdef PROF_SUPPORT_IMPLEMENTED
519 * Get information about mon.out file(s):
523 mon_out_read (gmon_name
);
526 gmon_name
= argv
[optind
];
529 while (optind
++ < argc
);
532 "%s: sorry, file format `prof' is not yet supported\n",
540 * Get information about gmon.out file(s):
544 gmon_out_read (gmon_name
);
547 gmon_name
= argv
[optind
];
550 while (optind
++ < argc
);
554 * If user did not specify output style, try to guess something
557 if (output_style
== 0)
559 if (gmon_input
& (INPUT_HISTOGRAM
| INPUT_CALL_GRAPH
))
561 output_style
= STYLE_FLAT_PROFILE
| STYLE_CALL_GRAPH
;
565 output_style
= STYLE_EXEC_COUNTS
;
567 output_style
&= ~user_specified
;
571 * Dump a gmon.sum file if requested (before any other processing!):
573 if (output_style
& STYLE_SUMMARY_FILE
)
575 gmon_out_write (GMONSUM
);
578 if (gmon_input
& INPUT_HISTOGRAM
)
580 hist_assign_samples ();
583 if (gmon_input
& INPUT_CALL_GRAPH
)
588 /* do some simple sanity checks: */
590 if ((output_style
& STYLE_FLAT_PROFILE
)
591 && !(gmon_input
& INPUT_HISTOGRAM
))
593 fprintf (stderr
, "%s: gmon.out file is missing histogram\n", whoami
);
597 if ((output_style
& STYLE_CALL_GRAPH
) && !(gmon_input
& INPUT_CALL_GRAPH
))
600 "%s: gmon.out file is missing call-graph data\n", whoami
);
604 /* output whatever user whishes to see: */
606 if (cg
&& (output_style
& STYLE_CALL_GRAPH
) && bsd_style_output
)
608 cg_print (cg
); /* print the dynamic profile */
611 if (output_style
& STYLE_FLAT_PROFILE
)
613 hist_print (); /* print the flat profile */
616 if (cg
&& (output_style
& STYLE_CALL_GRAPH
))
618 if (!bsd_style_output
)
620 cg_print (cg
); /* print the dynamic profile */
625 if (output_style
& STYLE_EXEC_COUNTS
)
627 print_exec_counts ();
630 if (output_style
& STYLE_ANNOTATED_SOURCE
)
632 print_annotated_source ();
634 if (output_style
& STYLE_FUNCTION_ORDER
)
636 cg_print_function_ordering ();
638 if (output_style
& STYLE_FILE_ORDER
)
640 cg_print_file_ordering ();
This page took 0.042141 seconds and 4 git commands to generate.