X-Git-Url: http://drtracing.org/?a=blobdiff_plain;f=gprof%2Fgprof.c;h=6415c30d6a1f2ddfcefb76a815db445c422884a3;hb=173373c6f6388171d1d62a217fae90a052395be2;hp=1e3226fb8bdd84a8fe301c580a8cd00a34157c9a;hpb=12516a373c27abe4516c2a3c84cfe9d94f02e18f;p=deliverable%2Fbinutils-gdb.git diff --git a/gprof/gprof.c b/gprof/gprof.c index 1e3226fb8b..6415c30d6a 100644 --- a/gprof/gprof.c +++ b/gprof/gprof.c @@ -1,39 +1,56 @@ /* - * Copyright (c) 1983 Regents of the University of California. - * All rights reserved. + * Copyright (c) 1983, 1993, 1998, 2001, 2002 + * The Regents of the University of California. All rights reserved. * - * Redistribution and use in source and binary forms are permitted - * provided that: (1) source distributions retain this entire copyright - * notice and comment, and (2) distributions including binaries display - * the following acknowledgement: ``This product includes software - * developed by the University of California, Berkeley and its contributors'' - * in the documentation or other materials provided with the distribution - * and in all advertising materials mentioning features or use of this - * software. Neither the name of the University nor the names of its - * contributors may be used to endorse or promote products derived - * from this software without specific prior written permission. - * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR - * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED - * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions + * are met: + * 1. Redistributions of source code must retain the above copyright + * notice, this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright + * notice, this list of conditions and the following disclaimer in the + * documentation and/or other materials provided with the distribution. + * 3. Neither the name of the University nor the names of its contributors + * may be used to endorse or promote products derived from this software + * without specific prior written permission. + * + * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND + * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE + * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL + * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS + * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) + * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT + * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY + * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF + * SUCH DAMAGE. */ -#include "getopt.h" -#include "libiberty.h" + #include "gprof.h" +#include "libiberty.h" +#include "bfdver.h" +#include "search_list.h" +#include "source.h" +#include "symtab.h" #include "basic_blocks.h" #include "call_graph.h" #include "cg_arcs.h" #include "cg_print.h" -#include "core.h" +#include "corefile.h" #include "gmon_io.h" #include "hertz.h" #include "hist.h" -#include "source.h" #include "sym_ids.h" +#include "demangle.h" +#include "getopt.h" -#define VERSION "2.6" +static void usage (FILE *, int) ATTRIBUTE_NORETURN; -const char *whoami; -const char *a_out_name = A_OUTNAME; +const char * whoami; +const char * function_mapping_file; +static const char * external_symbol_table; +const char * a_out_name = A_OUTNAME; long hz = HZ_WRONG; /* @@ -42,40 +59,49 @@ long hz = HZ_WRONG; int debug_level = 0; int output_style = 0; int output_width = 80; -bool bsd_style_output = FALSE; -bool discard_underscores = TRUE; -bool ignore_direct_calls = FALSE; -bool ignore_static_funcs = FALSE; -bool ignore_zeros = TRUE; -bool line_granularity = FALSE; -bool print_descriptions = TRUE; -bool print_path = FALSE; +bfd_boolean bsd_style_output = FALSE; +bfd_boolean demangle = TRUE; +bfd_boolean ignore_direct_calls = FALSE; +bfd_boolean ignore_static_funcs = FALSE; +bfd_boolean ignore_zeros = TRUE; +bfd_boolean line_granularity = FALSE; +bfd_boolean print_descriptions = TRUE; +bfd_boolean print_path = FALSE; +bfd_boolean ignore_non_functions = FALSE; +bfd_boolean inline_file_names = FALSE; File_Format file_format = FF_AUTO; -bool first_output = TRUE; +bfd_boolean first_output = TRUE; char copyright[] = -"@(#) Copyright (c) 1983 Regents of the University of California.\n\ + "@(#) Copyright (c) 1983 Regents of the University of California.\n\ All rights reserved.\n"; static char *gmon_name = GMONNAME; /* profile filename */ -bfd *abfd; - /* * Functions that get excluded by default: */ static char *default_excluded_list[] = { - "_gprof_mcount", "mcount", "_mcount", "__mcleanup", - "", "", + "_gprof_mcount", "mcount", "_mcount", "__mcount", "__mcount_internal", + "__mcleanup", 0 }; +/* Codes used for the long options with no short synonyms. 150 isn't + special; it's just an arbitrary non-ASCII char value. */ + +#define OPTION_DEMANGLE (150) +#define OPTION_NO_DEMANGLE (OPTION_DEMANGLE + 1) +#define OPTION_INLINE_FILE_NAMES (OPTION_DEMANGLE + 2) + static struct option long_options[] = { {"line", no_argument, 0, 'l'}, {"no-static", no_argument, 0, 'a'}, + {"ignore-non-functions", no_argument, 0, 'D'}, + {"external-symbol-table", required_argument, 0, 'S'}, /* output styles: */ @@ -87,14 +113,19 @@ static struct option long_options[] = {"no-graph", optional_argument, 0, 'Q'}, {"exec-counts", optional_argument, 0, 'C'}, {"no-exec-counts", optional_argument, 0, 'Z'}, + {"function-ordering", no_argument, 0, 'r'}, + {"file-ordering", required_argument, 0, 'R'}, {"file-info", no_argument, 0, 'i'}, {"sum", no_argument, 0, 's'}, /* various options to affect output: */ {"all-lines", no_argument, 0, 'x'}, + {"demangle", optional_argument, 0, OPTION_DEMANGLE}, + {"no-demangle", no_argument, 0, OPTION_NO_DEMANGLE}, {"directory-path", required_argument, 0, 'I'}, {"display-unused-functions", no_argument, 0, 'z'}, + {"inline-file-names", no_argument, 0, OPTION_INLINE_FILE_NAMES}, {"min-count", required_argument, 0, 'm'}, {"print-path", no_argument, 0, 'L'}, {"separate-files", no_argument, 0, 'y'}, @@ -126,37 +157,54 @@ static struct option long_options[] = static void -DEFUN (usage, (stream, status), FILE * stream AND int status) +usage (FILE *stream, int status) { - fprintf (stream, "\ -Usage: %s [-[abchilLsTvwxyz]] [-[ACeEfFJnNOpPqQZ][name]] [-I dirs]\n\ + fprintf (stream, _("\ +Usage: %s [-[abcDhilLsTvwxyz]] [-[ACeEfFJnNOpPqSQZ][name]] [-I dirs]\n\ [-d[num]] [-k from/to] [-m min-count] [-t table-length]\n\ [--[no-]annotated-source[=name]] [--[no-]exec-counts[=name]]\n\ [--[no-]flat-profile[=name]] [--[no-]graph[=name]]\n\ [--[no-]time=name] [--all-lines] [--brief] [--debug[=level]]\n\ + [--function-ordering] [--file-ordering] [--inline-file-names]\n\ [--directory-path=dirs] [--display-unused-functions]\n\ [--file-format=name] [--file-info] [--help] [--line] [--min-count=n]\n\ [--no-static] [--print-path] [--separate-files]\n\ [--static-call-graph] [--sum] [--table-length=len] [--traditional]\n\ - [--version] [--width=n]\n\ - [image-file] [profile-file...]\n", + [--version] [--width=n] [--ignore-non-functions]\n\ + [--demangle[=STYLE]] [--no-demangle] [--external-symbol-table=name] [@FILE]\n\ + [image-file] [profile-file...]\n"), whoami); + if (REPORT_BUGS_TO[0] && status == 0) + fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO); done (status); -} /* usage */ +} int -DEFUN (main, (argc, argv), int argc AND char **argv) +main (int argc, char **argv) { char **sp, *str; Sym **cg = 0; int ch, user_specified = 0; +#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES) + setlocale (LC_MESSAGES, ""); +#endif +#if defined (HAVE_SETLOCALE) + setlocale (LC_CTYPE, ""); +#endif +#ifdef ENABLE_NLS + bindtextdomain (PACKAGE, LOCALEDIR); + textdomain (PACKAGE); +#endif + whoami = argv[0]; xmalloc_set_program_name (whoami); + expandargv (&argc, &argv); + while ((ch = getopt_long (argc, argv, - "aA::bBcCd::e:E:f:F:hiI:J::k:lLm:n::N::O:p::P::q::Q::st:Tvw:xyzZ::", + "aA::bBcC::d::De:E:f:F:hiI:J::k:lLm:n:N:O:p::P::q::Q::rR:sS:t:Tvw:xyzZ::", long_options, 0)) != EOF) { @@ -169,7 +217,7 @@ DEFUN (main, (argc, argv), int argc AND char **argv) if (optarg) { sym_id_add (optarg, INCL_ANNO); - } /* if */ + } output_style |= STYLE_ANNOTATED_SOURCE; user_specified |= STYLE_ANNOTATED_SOURCE; break; @@ -187,7 +235,7 @@ DEFUN (main, (argc, argv), int argc AND char **argv) if (optarg) { sym_id_add (optarg, INCL_EXEC); - } /* if */ + } output_style |= STYLE_EXEC_COUNTS; user_specified |= STYLE_EXEC_COUNTS; break; @@ -200,12 +248,15 @@ DEFUN (main, (argc, argv), int argc AND char **argv) else { debug_level = ~0; - } /* if */ + } DBG (ANYDEBUG, printf ("[main] debug-level=0x%x\n", debug_level)); #ifndef DEBUG - printf ("%s: debugging not supported; -d ignored\n", whoami); + printf (_("%s: debugging not supported; -d ignored\n"), whoami); #endif /* DEBUG */ break; + case 'D': + ignore_non_functions = TRUE; + break; case 'E': sym_id_add (optarg, EXCL_TIME); case 'e': @@ -240,7 +291,7 @@ DEFUN (main, (argc, argv), int argc AND char **argv) else { output_style &= ~STYLE_ANNOTATED_SOURCE; - } /* if */ + } user_specified |= STYLE_ANNOTATED_SOURCE; break; case 'k': @@ -253,7 +304,7 @@ DEFUN (main, (argc, argv), int argc AND char **argv) print_path = TRUE; break; case 'm': - bb_min_calls = atoi (optarg); + bb_min_calls = (unsigned long) strtoul (optarg, (char **) NULL, 10); break; case 'n': sym_id_add (optarg, INCL_TIME); @@ -273,20 +324,23 @@ DEFUN (main, (argc, argv), int argc AND char **argv) case 'b': file_format = FF_BSD; break; + case '4': + file_format = FF_BSD44; + break; case 'p': file_format = FF_PROF; break; default: - fprintf (stderr, "%s: unknown file format %s\n", + fprintf (stderr, _("%s: unknown file format %s\n"), optarg, whoami); done (1); - } /* switch */ + } break; case 'p': if (optarg) { sym_id_add (optarg, INCL_FLAT); - } /* if */ + } output_style |= STYLE_FLAT_PROFILE; user_specified |= STYLE_FLAT_PROFILE; break; @@ -299,7 +353,7 @@ DEFUN (main, (argc, argv), int argc AND char **argv) else { output_style &= ~STYLE_FLAT_PROFILE; - } /* if */ + } user_specified |= STYLE_FLAT_PROFILE; break; case 'q': @@ -312,11 +366,20 @@ DEFUN (main, (argc, argv), int argc AND char **argv) else { sym_id_add (optarg, INCL_GRAPH); - } /* if */ - } /* if */ + } + } output_style |= STYLE_CALL_GRAPH; user_specified |= STYLE_CALL_GRAPH; break; + case 'r': + output_style |= STYLE_FUNCTION_ORDER; + user_specified |= STYLE_FUNCTION_ORDER; + break; + case 'R': + output_style |= STYLE_FILE_ORDER; + user_specified |= STYLE_FILE_ORDER; + function_mapping_file = optarg; + break; case 'Q': if (optarg) { @@ -327,38 +390,46 @@ DEFUN (main, (argc, argv), int argc AND char **argv) else { sym_id_add (optarg, EXCL_GRAPH); - } /* if */ + } output_style |= STYLE_CALL_GRAPH; } else { output_style &= ~STYLE_CALL_GRAPH; - } /* if */ + } user_specified |= STYLE_CALL_GRAPH; break; case 's': output_style |= STYLE_SUMMARY_FILE; user_specified |= STYLE_SUMMARY_FILE; break; + case 'S': + external_symbol_table = optarg; + DBG (AOUTDEBUG, printf ("external-symbol-table: %s\n", optarg)); + break; case 't': bb_table_length = atoi (optarg); if (bb_table_length < 0) { bb_table_length = 0; - } /* if */ + } break; case 'T': bsd_style_output = TRUE; break; case 'v': - printf ("%s version %s\n", whoami, VERSION); + /* This output is intended to follow the GNU standards document. */ + printf (_("GNU gprof %s\n"), BFD_VERSION_STRING); + printf (_("Based on BSD gprof, copyright 1983 Regents of the University of California.\n")); + printf (_("\ +This program is free software. This program has absolutely no warranty.\n")); done (0); case 'w': output_width = atoi (optarg); if (output_width < 1) { output_width = 1; - } /* if */ + } break; case 'x': bb_annotate_all_lines = TRUE; @@ -378,210 +449,199 @@ DEFUN (main, (argc, argv), int argc AND char **argv) else { output_style &= ~STYLE_EXEC_COUNTS; - } /* if */ + } user_specified |= STYLE_ANNOTATED_SOURCE; break; + case OPTION_DEMANGLE: + demangle = TRUE; + if (optarg != NULL) + { + enum demangling_styles style; + + style = cplus_demangle_name_to_style (optarg); + if (style == unknown_demangling) + { + fprintf (stderr, + _("%s: unknown demangling style `%s'\n"), + whoami, optarg); + xexit (1); + } + + cplus_demangle_set_style (style); + } + break; + case OPTION_NO_DEMANGLE: + demangle = FALSE; + break; + case OPTION_INLINE_FILE_NAMES: + inline_file_names = TRUE; + break; default: usage (stderr, 1); - } /* switch */ - } /* while */ + } + } + + /* Don't allow both ordering options, they modify the arc data in-place. */ + if ((user_specified & STYLE_FUNCTION_ORDER) + && (user_specified & STYLE_FILE_ORDER)) + { + fprintf (stderr,_("\ +%s: Only one of --function-ordering and --file-ordering may be specified.\n"), + whoami); + done (1); + } + + /* --sum implies --line, otherwise we'd lose basic block counts in + gmon.sum */ + if (output_style & STYLE_SUMMARY_FILE) + line_granularity = 1; /* append value of GPROF_PATH to source search list if set: */ - str = getenv ("GPROF_PATH"); + str = (char *) getenv ("GPROF_PATH"); if (str) - { - search_list_append (&src_search_list, str); - } /* if */ + search_list_append (&src_search_list, str); if (optind < argc) - { - a_out_name = argv[optind++]; - } /* if */ + a_out_name = argv[optind++]; + if (optind < argc) - { - gmon_name = argv[optind++]; - } /* if */ + gmon_name = argv[optind++]; - /* - * Turn off default functions: - */ + /* Turn off default functions. */ for (sp = &default_excluded_list[0]; *sp; sp++) { sym_id_add (*sp, EXCL_TIME); sym_id_add (*sp, EXCL_GRAPH); -#ifdef __osf__ sym_id_add (*sp, EXCL_FLAT); -#endif - } /* for */ - - /* - * For line-by-line profiling, also want to keep those - * functions off the flat profile: - */ - if (line_granularity) - { - for (sp = &default_excluded_list[0]; *sp; sp++) - { - sym_id_add (*sp, EXCL_FLAT); - } /* for */ - } /* if */ + } - /* - * Read symbol table from core file: - */ + /* Read symbol table from core file. */ core_init (a_out_name); - /* - * If we should ignore direct function calls, we need to load - * to core's text-space: - */ + /* If we should ignore direct function calls, we need to load to + core's text-space. */ if (ignore_direct_calls) - { - core_get_text_space (core_bfd); - } /* if */ + core_get_text_space (core_bfd); - /* - * Create symbols from core image: - */ - if (line_granularity) - { - core_create_line_syms (core_bfd); - } + /* Create symbols from core image. */ + if (external_symbol_table) + core_create_syms_from (external_symbol_table); + else if (line_granularity) + core_create_line_syms (); else - { - core_create_function_syms (core_bfd); - } /* if */ + core_create_function_syms (); - /* - * Translate sym specs into syms: - */ + /* Translate sym specs into syms. */ sym_id_parse (); if (file_format == FF_PROF) { -#ifdef PROF_SUPPORT_IMPLEMENTED - /* - * Get information about mon.out file(s): - */ - do - { - mon_out_read (gmon_name); - if (optind < argc) - { - gmon_name = argv[optind]; - } /* if */ - } - while (optind++ < argc); -#else fprintf (stderr, - "%s: sorry, file format `prof' is not yet supported\n", + _("%s: sorry, file format `prof' is not yet supported\n"), whoami); done (1); -#endif } else { - /* - * Get information about gmon.out file(s): - */ + /* Get information about gmon.out file(s). */ do { gmon_out_read (gmon_name); if (optind < argc) - { - gmon_name = argv[optind]; - } /* if */ + gmon_name = argv[optind]; } while (optind++ < argc); - } /* if */ + } - /* - * If user did not specify output style, try to guess something - * reasonable: - */ + /* If user did not specify output style, try to guess something + reasonable. */ if (output_style == 0) { if (gmon_input & (INPUT_HISTOGRAM | INPUT_CALL_GRAPH)) { - output_style = STYLE_FLAT_PROFILE | STYLE_CALL_GRAPH; + if (gmon_input & INPUT_HISTOGRAM) + output_style |= STYLE_FLAT_PROFILE; + if (gmon_input & INPUT_CALL_GRAPH) + output_style |= STYLE_CALL_GRAPH; } else - { - output_style = STYLE_EXEC_COUNTS; - } /* if */ + output_style = STYLE_EXEC_COUNTS; + output_style &= ~user_specified; - } /* if */ + } - /* - * Dump a gmon.sum file if requested (before any other processing!): - */ + /* Dump a gmon.sum file if requested (before any other + processing!) */ if (output_style & STYLE_SUMMARY_FILE) { gmon_out_write (GMONSUM); - } /* if */ + } if (gmon_input & INPUT_HISTOGRAM) { hist_assign_samples (); - } /* if */ + } if (gmon_input & INPUT_CALL_GRAPH) { cg = cg_assemble (); - } /* if */ - - /* do some simple sanity checks: */ + } + /* Do some simple sanity checks. */ if ((output_style & STYLE_FLAT_PROFILE) && !(gmon_input & INPUT_HISTOGRAM)) { - fprintf (stderr, "%s: gmon.out file is missing histogram\n", whoami); + fprintf (stderr, _("%s: gmon.out file is missing histogram\n"), whoami); done (1); - } /* if */ + } if ((output_style & STYLE_CALL_GRAPH) && !(gmon_input & INPUT_CALL_GRAPH)) { fprintf (stderr, - "%s: gmon.out file is missing call-graph data\n", whoami); + _("%s: gmon.out file is missing call-graph data\n"), whoami); done (1); - } /* if */ - - /* output whatever user whishes to see: */ + } + /* Output whatever user whishes to see. */ if (cg && (output_style & STYLE_CALL_GRAPH) && bsd_style_output) { - cg_print (cg); /* print the dynamic profile */ - } /* if */ + /* Print the dynamic profile. */ + cg_print (cg); + } if (output_style & STYLE_FLAT_PROFILE) { - hist_print (); /* print the flat profile */ - } /* if */ + /* Print the flat profile. */ + hist_print (); + } if (cg && (output_style & STYLE_CALL_GRAPH)) { if (!bsd_style_output) { - cg_print (cg); /* print the dynamic profile */ - } /* if */ + /* Print the dynamic profile. */ + cg_print (cg); + } cg_print_index (); - } /* if */ + } if (output_style & STYLE_EXEC_COUNTS) - { - print_exec_counts (); - } /* if */ - + print_exec_counts (); + if (output_style & STYLE_ANNOTATED_SOURCE) - { - print_annotated_source (); - } /* if */ + print_annotated_source (); + + if (output_style & STYLE_FUNCTION_ORDER) + cg_print_function_ordering (); + + if (output_style & STYLE_FILE_ORDER) + cg_print_file_ordering (); + return 0; } void -done (status) - int status; +done (int status) { exit (status); }