X-Git-Url: http://drtracing.org/?a=blobdiff_plain;f=sim%2Fcommon%2Fsim-profile.c;h=98ee804b0494292439053189e1edee99edd5db49;hb=3061113bf336048d538241282c39baf684de31bf;hp=ff882dfb3ca1b478a747758a7dbd905392581d8e;hpb=3910fb4a5148aeba066d32985be4c72c23635c7e;p=deliverable%2Fbinutils-gdb.git diff --git a/sim/common/sim-profile.c b/sim/common/sim-profile.c index ff882dfb3c..98ee804b04 100644 --- a/sim/common/sim-profile.c +++ b/sim/common/sim-profile.c @@ -1,22 +1,21 @@ /* Default profiling support. - Copyright (C) 1996, 1997, 1998 Free Software Foundation, Inc. + Copyright (C) 1996-2020 Free Software Foundation, Inc. Contributed by Cygnus Support. This file is part of GDB, the GNU debugger. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by -the Free Software Foundation; either version 2, or (at your option) -any later version. +the Free Software Foundation; either version 3 of the License, or +(at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. -You should have received a copy of the GNU General Public License along -with this program; if not, write to the Free Software Foundation, Inc., -59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ +You should have received a copy of the GNU General Public License +along with this program. If not, see . */ #include "sim-main.h" #include "sim-io.h" @@ -34,130 +33,284 @@ with this program; if not, write to the Free Software Foundation, Inc., #include #endif #endif +#include + +#if !WITH_PROFILE_PC_P +static unsigned int _profile_stub; +# define PROFILE_PC_FREQ(p) _profile_stub +# define PROFILE_PC_NR_BUCKETS(p) _profile_stub +# define PROFILE_PC_SHIFT(p) _profile_stub +# define PROFILE_PC_START(p) _profile_stub +# define PROFILE_PC_END(p) _profile_stub +# define PROFILE_INSN_COUNT(p) &_profile_stub +#endif #define COMMAS(n) sim_add_commas (comma_buf, sizeof (comma_buf), (n)) +static MODULE_INIT_FN profile_init; static MODULE_UNINSTALL_FN profile_uninstall; -#if WITH_PROFILE_INSN_P || WITH_PROFILE_MEMORY_P || WITH_PROFILE_CORE_P || WITH_PROFILE_PC_P -static void print_bar (SIM_DESC, unsigned int, unsigned int, unsigned int); -#endif - static DECLARE_OPTION_HANDLER (profile_option_handler); -#define OPTION_PROFILE_INSN (OPTION_START + 0) -#define OPTION_PROFILE_MEMORY (OPTION_START + 1) -#define OPTION_PROFILE_MODEL (OPTION_START + 2) -#define OPTION_PROFILE_FILE (OPTION_START + 3) -#define OPTION_PROFILE_RANGE (OPTION_START + 4) -#define OPTION_PROFILE_CORE (OPTION_START + 5) -#define OPTION_PROFILE_PC (OPTION_START + 6) -#define OPTION_PROFILE_PC_RANGE (OPTION_START + 7) -#define OPTION_PROFILE_PC_GRANULARITY (OPTION_START + 8) +enum { + OPTION_PROFILE_INSN = OPTION_START, + OPTION_PROFILE_MEMORY, + OPTION_PROFILE_MODEL, + OPTION_PROFILE_FILE, + OPTION_PROFILE_CORE, + OPTION_PROFILE_CPU_FREQUENCY, + OPTION_PROFILE_PC, + OPTION_PROFILE_PC_RANGE, + OPTION_PROFILE_PC_GRANULARITY, + OPTION_PROFILE_RANGE, + OPTION_PROFILE_FUNCTION +}; static const OPTION profile_options[] = { - { {"profile", no_argument, NULL, 'p'}, - 'p', NULL, "Perform profiling", - profile_option_handler }, - { {"profile-insn", no_argument, NULL, OPTION_PROFILE_INSN}, - '\0', NULL, "Perform instruction profiling", - profile_option_handler }, - { {"profile-memory", no_argument, NULL, OPTION_PROFILE_MEMORY}, - '\0', NULL, "Perform memory profiling", - profile_option_handler }, - { {"profile-core", no_argument, NULL, OPTION_PROFILE_CORE}, - '\0', NULL, "Perform CORE profiling", - profile_option_handler }, - { {"profile-model", no_argument, NULL, OPTION_PROFILE_MODEL}, - '\0', NULL, "Perform model profiling", - profile_option_handler }, + { {"profile", optional_argument, NULL, 'p'}, + 'p', "on|off", "Perform profiling", + profile_option_handler, NULL }, + { {"profile-insn", optional_argument, NULL, OPTION_PROFILE_INSN}, + '\0', "on|off", "Perform instruction profiling", + profile_option_handler, NULL }, + { {"profile-memory", optional_argument, NULL, OPTION_PROFILE_MEMORY}, + '\0', "on|off", "Perform memory profiling", + profile_option_handler, NULL }, + { {"profile-core", optional_argument, NULL, OPTION_PROFILE_CORE}, + '\0', "on|off", "Perform CORE profiling", + profile_option_handler, NULL }, + { {"profile-model", optional_argument, NULL, OPTION_PROFILE_MODEL}, + '\0', "on|off", "Perform model profiling", + profile_option_handler, NULL }, + { {"profile-cpu-frequency", required_argument, NULL, + OPTION_PROFILE_CPU_FREQUENCY}, + '\0', "CPU FREQUENCY", "Specify the speed of the simulated cpu clock", + profile_option_handler, NULL }, { {"profile-file", required_argument, NULL, OPTION_PROFILE_FILE}, '\0', "FILE NAME", "Specify profile output file", - profile_option_handler }, + profile_option_handler, NULL }, - { {"profile-pc", no_argument, NULL, OPTION_PROFILE_PC}, - '\0', NULL, "Perform PC profiling", - profile_option_handler }, + { {"profile-pc", optional_argument, NULL, OPTION_PROFILE_PC}, + '\0', "on|off", "Perform PC profiling", + profile_option_handler, NULL }, { {"profile-pc-frequency", required_argument, NULL, 'F'}, 'F', "PC PROFILE FREQUENCY", "Specified PC profiling frequency", - profile_option_handler }, + profile_option_handler, NULL }, { {"profile-pc-size", required_argument, NULL, 'S'}, 'S', "PC PROFILE SIZE", "Specify PC profiling size", - profile_option_handler }, + profile_option_handler, NULL }, { {"profile-pc-granularity", required_argument, NULL, OPTION_PROFILE_PC_GRANULARITY}, '\0', "PC PROFILE GRANULARITY", "Specify PC profiling sample coverage", - profile_option_handler }, + profile_option_handler, NULL }, { {"profile-pc-range", required_argument, NULL, OPTION_PROFILE_PC_RANGE}, '\0', "BASE,BOUND", "Specify PC profiling address range", - profile_option_handler }, + profile_option_handler, NULL }, -#if 0 /*FIXME:wip*/ +#ifdef SIM_HAVE_ADDR_RANGE { {"profile-range", required_argument, NULL, OPTION_PROFILE_RANGE}, - 0, NULL, "Specify range of addresses to profile", - profile_option_handler }, + '\0', "START,END", "Specify range of addresses for instruction and model profiling", + profile_option_handler, NULL }, +#if 0 /*wip*/ + { {"profile-function", required_argument, NULL, OPTION_PROFILE_FUNCTION}, + '\0', "FUNCTION", "Specify function to profile", + profile_option_handler, NULL }, +#endif #endif - { {NULL, no_argument, NULL, 0}, '\0', NULL, NULL, NULL } + { {NULL, no_argument, NULL, 0}, '\0', NULL, NULL, NULL, NULL } }; +/* Set/reset the profile options indicated in MASK. */ + +SIM_RC +set_profile_option_mask (SIM_DESC sd, const char *name, int mask, const char *arg) +{ + int profile_nr; + int cpu_nr; + int profile_val = 1; + + if (arg != NULL) + { + if (strcmp (arg, "yes") == 0 + || strcmp (arg, "on") == 0 + || strcmp (arg, "1") == 0) + profile_val = 1; + else if (strcmp (arg, "no") == 0 + || strcmp (arg, "off") == 0 + || strcmp (arg, "0") == 0) + profile_val = 0; + else + { + sim_io_eprintf (sd, "Argument `%s' for `--profile%s' invalid, one of `on', `off', `yes', `no' expected\n", arg, name); + return SIM_RC_FAIL; + } + } + + /* update applicable profile bits */ + for (profile_nr = 0; profile_nr < MAX_PROFILE_VALUES; ++profile_nr) + { + if ((mask & (1 << profile_nr)) == 0) + continue; + +#if 0 /* see sim-trace.c, set flags in STATE here if/when there are any */ + /* Set non-cpu specific values. */ + switch (profile_nr) + { + case ??? : + break; + } +#endif + + /* Set cpu values. */ + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; cpu_nr++) + { + CPU_PROFILE_FLAGS (STATE_CPU (sd, cpu_nr))[profile_nr] = profile_val; + } + } + + /* Re-compute the cpu profile summary. */ + if (profile_val) + { + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; cpu_nr++) + CPU_PROFILE_DATA (STATE_CPU (sd, cpu_nr))->profile_any_p = 1; + } + else + { + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; cpu_nr++) + { + CPU_PROFILE_DATA (STATE_CPU (sd, cpu_nr))->profile_any_p = 0; + for (profile_nr = 0; profile_nr < MAX_PROFILE_VALUES; ++profile_nr) + { + if (CPU_PROFILE_FLAGS (STATE_CPU (sd, cpu_nr))[profile_nr]) + { + CPU_PROFILE_DATA (STATE_CPU (sd, cpu_nr))->profile_any_p = 1; + break; + } + } + } + } + + return SIM_RC_OK; +} + +/* Set one profile option based on its IDX value. + Not static as cgen-scache.c uses it. */ + +SIM_RC +sim_profile_set_option (SIM_DESC sd, const char *name, int idx, const char *arg) +{ + return set_profile_option_mask (sd, name, 1 << idx, arg); +} + +static SIM_RC +parse_frequency (SIM_DESC sd, const char *arg, unsigned long *freq) +{ + const char *ch; + /* First, parse a decimal number. */ + *freq = 0; + ch = arg; + if (isdigit (*arg)) + { + for (/**/; *ch != '\0'; ++ch) + { + if (! isdigit (*ch)) + break; + *freq = *freq * 10 + (*ch - '0'); + } + + /* Accept KHz, MHz or Hz as a suffix. */ + if (tolower (*ch) == 'm') + { + *freq *= 1000000; + ++ch; + } + else if (tolower (*ch) == 'k') + { + *freq *= 1000; + ++ch; + } + + if (tolower (*ch) == 'h') + { + ++ch; + if (tolower (*ch) == 'z') + ++ch; + } + } + + if (*ch != '\0') + { + sim_io_eprintf (sd, "Invalid argument for --profile-cpu-frequency: %s\n", + arg); + *freq = 0; + return SIM_RC_FAIL; + } + + return SIM_RC_OK; +} + static SIM_RC profile_option_handler (SIM_DESC sd, + sim_cpu *cpu, int opt, char *arg, int is_command) { - int i,n; + int cpu_nr; + + /* FIXME: Need to handle `cpu' arg. */ switch (opt) { case 'p' : if (! WITH_PROFILE) - sim_io_eprintf (sd, "Profiling not compiled in, -p option ignored\n"); + sim_io_eprintf (sd, "Profiling not compiled in, `-p' ignored\n"); else - { - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - for (i = 0; i < MAX_PROFILE_VALUES; ++i) - CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[i] = 1; - } + return set_profile_option_mask (sd, "profile", PROFILE_USEFUL_MASK, + arg); break; case OPTION_PROFILE_INSN : -#if WITH_PROFILE_INSN_P - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_INSN_IDX] = 1; -#else - sim_io_eprintf (sd, "Instruction profiling not compiled in, `--profile-insn' ignored\n"); -#endif + if (WITH_PROFILE_INSN_P) + return sim_profile_set_option (sd, "-insn", PROFILE_INSN_IDX, arg); + else + sim_io_eprintf (sd, "Instruction profiling not compiled in, `--profile-insn' ignored\n"); break; case OPTION_PROFILE_MEMORY : -#if WITH_PROFILE_MEMORY_P - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_MEMORY_IDX] = 1; -#else - sim_io_eprintf (sd, "Memory profiling not compiled in, `--profile-memory' ignored\n"); -#endif + if (WITH_PROFILE_MEMORY_P) + return sim_profile_set_option (sd, "-memory", PROFILE_MEMORY_IDX, arg); + else + sim_io_eprintf (sd, "Memory profiling not compiled in, `--profile-memory' ignored\n"); break; case OPTION_PROFILE_CORE : -#if WITH_PROFILE_CORE_P - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_CORE_IDX] = 1; -#else - sim_io_eprintf (sd, "CORE profiling not compiled in, `--profile-core' ignored\n"); -#endif + if (WITH_PROFILE_CORE_P) + return sim_profile_set_option (sd, "-core", PROFILE_CORE_IDX, arg); + else + sim_io_eprintf (sd, "CORE profiling not compiled in, `--profile-core' ignored\n"); break; case OPTION_PROFILE_MODEL : -#if WITH_PROFILE_MODEL_P - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_MODEL_IDX] = 1; -#else - sim_io_eprintf (sd, "Model profiling not compiled in, `--profile-model' ignored\n"); -#endif + if (WITH_PROFILE_MODEL_P) + return sim_profile_set_option (sd, "-model", PROFILE_MODEL_IDX, arg); + else + sim_io_eprintf (sd, "Model profiling not compiled in, `--profile-model' ignored\n"); break; + case OPTION_PROFILE_CPU_FREQUENCY : + { + unsigned long val; + SIM_RC rc = parse_frequency (sd, arg, &val); + if (rc == SIM_RC_OK) + { + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) + PROFILE_CPU_FREQ (CPU_PROFILE_DATA (STATE_CPU (sd,cpu_nr))) = val; + } + return rc; + } + case OPTION_PROFILE_FILE : /* FIXME: Might want this to apply to pc profiling only, or have two profile file options. */ @@ -172,17 +325,14 @@ profile_option_handler (SIM_DESC sd, sim_io_eprintf (sd, "Unable to open profile output file `%s'\n", arg); return SIM_RC_FAIL; } - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - PROFILE_FILE (CPU_PROFILE_DATA (STATE_CPU (sd, n))) = f; + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) + PROFILE_FILE (CPU_PROFILE_DATA (STATE_CPU (sd, cpu_nr))) = f; } break; case OPTION_PROFILE_PC: if (WITH_PROFILE_PC_P) - { - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_PC_IDX] = 1; - } + return sim_profile_set_option (sd, "-pc", PROFILE_PC_IDX, arg); else sim_io_eprintf (sd, "PC profiling not compiled in, `--profile-pc' ignored\n"); break; @@ -191,11 +341,11 @@ profile_option_handler (SIM_DESC sd, if (WITH_PROFILE_PC_P) { /* FIXME: Validate arg. */ - i = atoi (arg); - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - PROFILE_PC_FREQ (CPU_PROFILE_DATA (STATE_CPU (sd, n))) = i; - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_PC_IDX] = 1; + int val = atoi (arg); + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) + PROFILE_PC_FREQ (CPU_PROFILE_DATA (STATE_CPU (sd, cpu_nr))) = val; + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) + CPU_PROFILE_FLAGS (STATE_CPU (sd, cpu_nr))[PROFILE_PC_IDX] = 1; } else sim_io_eprintf (sd, "PC profiling not compiled in, `--profile-pc-frequency' ignored\n"); @@ -205,11 +355,11 @@ profile_option_handler (SIM_DESC sd, if (WITH_PROFILE_PC_P) { /* FIXME: Validate arg. */ - i = atoi (arg); - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - PROFILE_PC_NR_BUCKETS (CPU_PROFILE_DATA (STATE_CPU (sd, n))) = i; - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_PC_IDX] = 1; + int val = atoi (arg); + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) + PROFILE_PC_NR_BUCKETS (CPU_PROFILE_DATA (STATE_CPU (sd, cpu_nr))) = val; + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) + CPU_PROFILE_FLAGS (STATE_CPU (sd, cpu_nr))[PROFILE_PC_IDX] = 1; } else sim_io_eprintf (sd, "PC profiling not compiled in, `--profile-pc-size' ignored\n"); @@ -219,14 +369,14 @@ profile_option_handler (SIM_DESC sd, if (WITH_PROFILE_PC_P) { int shift; - i = atoi (arg); + int val = atoi (arg); /* check that the granularity is a power of two */ shift = 0; - while (i > (1 << shift)) + while (val > (1 << shift)) { shift += 1; } - if (i != (1 << shift)) + if (val != (1 << shift)) { sim_io_eprintf (sd, "PC profiling granularity not a power of two\n"); return SIM_RC_FAIL; @@ -236,10 +386,10 @@ profile_option_handler (SIM_DESC sd, sim_io_eprintf (sd, "PC profiling granularity too small"); return SIM_RC_FAIL; } - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - PROFILE_PC_SHIFT (CPU_PROFILE_DATA (STATE_CPU (sd, n))) = shift; - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_PC_IDX] = 1; + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) + PROFILE_PC_SHIFT (CPU_PROFILE_DATA (STATE_CPU (sd, cpu_nr))) = shift; + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) + CPU_PROFILE_FLAGS (STATE_CPU (sd, cpu_nr))[PROFILE_PC_IDX] = 1; } else sim_io_eprintf (sd, "PC profiling not compiled in, `--profile-pc-granularity' ignored\n"); @@ -259,27 +409,83 @@ profile_option_handler (SIM_DESC sd, return SIM_RC_FAIL; } bound = strtoul (chp + 1, NULL, 0); - for (n = 0; n < MAX_NR_PROCESSORS; ++n) + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) { - PROFILE_PC_START (CPU_PROFILE_DATA (STATE_CPU (sd, n))) = base; - PROFILE_PC_END (CPU_PROFILE_DATA (STATE_CPU (sd, n))) = bound; - } - for (n = 0; n < MAX_NR_PROCESSORS; ++n) - CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_PC_IDX] = 1; + PROFILE_PC_START (CPU_PROFILE_DATA (STATE_CPU (sd, cpu_nr))) = base; + PROFILE_PC_END (CPU_PROFILE_DATA (STATE_CPU (sd, cpu_nr))) = bound; + } + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) + CPU_PROFILE_FLAGS (STATE_CPU (sd, cpu_nr))[PROFILE_PC_IDX] = 1; } else sim_io_eprintf (sd, "PC profiling not compiled in, `--profile-pc-range' ignored\n"); + break; - -#if 0 /* FIXME:wip */ +#ifdef SIM_HAVE_ADDR_RANGE case OPTION_PROFILE_RANGE : + if (WITH_PROFILE) + { + char *chp = arg; + unsigned long start,end; + start = strtoul (chp, &chp, 0); + if (*chp != ',') + { + sim_io_eprintf (sd, "--profile-range missing END argument\n"); + return SIM_RC_FAIL; + } + end = strtoul (chp + 1, NULL, 0); + /* FIXME: Argument validation. */ + if (cpu != NULL) + sim_addr_range_add (PROFILE_RANGE (CPU_PROFILE_DATA (cpu)), + start, end); + else + for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr) + sim_addr_range_add (PROFILE_RANGE (CPU_PROFILE_DATA (STATE_CPU (sd, cpu_nr))), + start, end); + } + else + sim_io_eprintf (sd, "Profiling not compiled in, `--profile-range' ignored\n"); break; -#endif + + case OPTION_PROFILE_FUNCTION : + if (WITH_PROFILE) + { + /*wip: need to compute function range given name*/ + } + else + sim_io_eprintf (sd, "Profiling not compiled in, `--profile-function' ignored\n"); + break; +#endif /* SIM_HAVE_ADDR_RANGE */ } return SIM_RC_OK; } +/* Profiling output hooks. */ + +static void +profile_vprintf (SIM_DESC sd, sim_cpu *cpu, const char *fmt, va_list ap) +{ + FILE *fp = PROFILE_FILE (CPU_PROFILE_DATA (cpu)); + + /* If an output file was given, redirect output to that. */ + if (fp != NULL) + vfprintf (fp, fmt, ap); + else + sim_io_evprintf (sd, fmt, ap); +} + +__attribute__ ((format (printf, 3, 4))) +static void +profile_printf (SIM_DESC sd, sim_cpu *cpu, const char *fmt, ...) +{ + va_list ap; + + va_start (ap, fmt); + profile_vprintf (sd, cpu, fmt, ap); + va_end (ap); +} + /* PC profiling support */ #if WITH_PROFILE_PC_P @@ -293,7 +499,7 @@ profile_pc_cleanup (SIM_DESC sd) sim_cpu *cpu = STATE_CPU (sd, n); PROFILE_DATA *data = CPU_PROFILE_DATA (cpu); if (PROFILE_PC_COUNT (data) != NULL) - zfree (PROFILE_PC_COUNT (data)); + free (PROFILE_PC_COUNT (data)); PROFILE_PC_COUNT (data) = NULL; if (PROFILE_PC_EVENT (data) != NULL) sim_events_deschedule (sd, PROFILE_PC_EVENT (data)); @@ -314,21 +520,14 @@ profile_pc_event (SIM_DESC sd, { sim_cpu *cpu = (sim_cpu*) data; PROFILE_DATA *profile = CPU_PROFILE_DATA (cpu); - address_word pc; + address_word pc = sim_pc_get (cpu); unsigned i; - switch (STATE_WATCHPOINTS (sd)->sizeof_pc) - { - case 2: pc = *(unsigned_2*)(STATE_WATCHPOINTS (sd)->pc) ; break; - case 4: pc = *(unsigned_4*)(STATE_WATCHPOINTS (sd)->pc) ; break; - case 8: pc = *(unsigned_8*)(STATE_WATCHPOINTS (sd)->pc) ; break; - default: pc = 0; - } i = (pc - PROFILE_PC_START (profile)) >> PROFILE_PC_SHIFT (profile); if (i < PROFILE_PC_NR_BUCKETS (profile)) PROFILE_PC_COUNT (profile) [i] += 1; /* Overflow? */ else PROFILE_PC_COUNT (profile) [PROFILE_PC_NR_BUCKETS (profile)] += 1; - PROFILE_PC_EVENT (profile) = + PROFILE_PC_EVENT (profile) = sim_events_schedule (sd, PROFILE_PC_FREQ (profile), profile_pc_event, cpu); } @@ -341,13 +540,12 @@ profile_pc_init (SIM_DESC sd) { sim_cpu *cpu = STATE_CPU (sd, n); PROFILE_DATA *data = CPU_PROFILE_DATA (cpu); - if (CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_PC_IDX] - && STATE_WATCHPOINTS (sd)->pc != NULL) + if (CPU_PROFILE_FLAGS (STATE_CPU (sd, n))[PROFILE_PC_IDX]) { int bucket_size; /* fill in the frequency if not specified */ if (PROFILE_PC_FREQ (data) == 0) - PROFILE_PC_FREQ (data) = 256; + PROFILE_PC_FREQ (data) = 257; /* fill in the start/end if not specified */ if (PROFILE_PC_END (data) == 0) { @@ -365,7 +563,7 @@ profile_pc_init (SIM_DESC sd) { /* nr_buckets = (full-address-range / 2) / (bucket_size / 2) */ PROFILE_PC_NR_BUCKETS (data) = - ((1 << (STATE_WATCHPOINTS (sd)->sizeof_pc) * (8 - 1)) + ((1 << sizeof (sim_cia) * (8 - 1)) / (PROFILE_PC_BUCKET_SIZE (data) / 2)); } else @@ -384,7 +582,7 @@ profile_pc_init (SIM_DESC sd) { if (PROFILE_PC_END (data) == 0) /* bucket_size = (full-address-range / 2) / (nr_buckets / 2) */ - bucket_size = ((1 << ((STATE_WATCHPOINTS (sd)->sizeof_pc * 8) - 1)) + bucket_size = ((1 << ((sizeof (sim_cia) * 8) - 1)) / (PROFILE_PC_NR_BUCKETS (data) / 2)); else bucket_size = ((PROFILE_PC_END (data) @@ -392,7 +590,7 @@ profile_pc_init (SIM_DESC sd) + PROFILE_PC_NR_BUCKETS (data) - 1) / PROFILE_PC_NR_BUCKETS (data)); PROFILE_PC_SHIFT (data) = 0; - while (bucket_size < PROFILE_PC_BUCKET_SIZE (data)) + while (bucket_size > PROFILE_PC_BUCKET_SIZE (data)) { PROFILE_PC_SHIFT (data) += 1; } @@ -428,7 +626,7 @@ profile_print_pc (sim_cpu *cpu, int verbose) if (PROFILE_PC_COUNT (profile) == 0) return; - sim_io_printf (sd, "Program Counter Statistics:\n\n"); + profile_printf (sd, cpu, "Program Counter Statistics:\n\n"); /* First pass over data computes various things. */ max_val = 0; @@ -440,45 +638,45 @@ profile_print_pc (sim_cpu *cpu, int verbose) max_val = PROFILE_PC_COUNT (profile) [i]; } - sim_io_printf (sd, " Total samples: %s\n", - COMMAS (total)); - sim_io_printf (sd, " Granularity: %s bytes per bucket\n", - COMMAS (PROFILE_PC_BUCKET_SIZE (profile))); - sim_io_printf (sd, " Size: %s buckets\n", - COMMAS (PROFILE_PC_NR_BUCKETS (profile))); - sim_io_printf (sd, " Frequency: %s cycles per sample\n", - COMMAS (PROFILE_PC_FREQ (profile))); + profile_printf (sd, cpu, " Total samples: %s\n", + COMMAS (total)); + profile_printf (sd, cpu, " Granularity: %s bytes per bucket\n", + COMMAS (PROFILE_PC_BUCKET_SIZE (profile))); + profile_printf (sd, cpu, " Size: %s buckets\n", + COMMAS (PROFILE_PC_NR_BUCKETS (profile))); + profile_printf (sd, cpu, " Frequency: %s cycles per sample\n", + COMMAS (PROFILE_PC_FREQ (profile))); if (PROFILE_PC_END (profile) != 0) - sim_io_printf (sd, " Range: 0x%lx 0x%lx\n", - (long) PROFILE_PC_START (profile), + profile_printf (sd, cpu, " Range: 0x%lx 0x%lx\n", + (long) PROFILE_PC_START (profile), (long) PROFILE_PC_END (profile)); if (verbose && max_val != 0) { /* Now we can print the histogram. */ - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, "\n"); for (i = 0; i <= PROFILE_PC_NR_BUCKETS (profile); ++i) { if (PROFILE_PC_COUNT (profile) [i] != 0) { - sim_io_printf (sd, " "); + profile_printf (sd, cpu, " "); if (i == PROFILE_PC_NR_BUCKETS (profile)) - sim_io_printf (sd, "%10s:", "overflow"); + profile_printf (sd, cpu, "%10s:", "overflow"); else - sim_io_printf (sd, "0x%08lx:", - (long) (PROFILE_PC_START (profile) - + (i * PROFILE_PC_BUCKET_SIZE (profile)))); - sim_io_printf (sd, " %*s", - max_val < 10000 ? 5 : 10, - COMMAS (PROFILE_PC_COUNT (profile) [i])); - sim_io_printf (sd, " %4.1f", - (PROFILE_PC_COUNT (profile) [i] * 100.0) / total); - sim_io_printf (sd, ": "); - print_bar (sd, PROFILE_HISTOGRAM_WIDTH, - PROFILE_PC_COUNT (profile) [i], - max_val); - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, "0x%08lx:", + (long) (PROFILE_PC_START (profile) + + (i * PROFILE_PC_BUCKET_SIZE (profile)))); + profile_printf (sd, cpu, " %*s", + max_val < 10000 ? 5 : 10, + COMMAS (PROFILE_PC_COUNT (profile) [i])); + profile_printf (sd, cpu, " %4.1f", + (PROFILE_PC_COUNT (profile) [i] * 100.0) / total); + profile_printf (sd, cpu, ": "); + sim_profile_print_bar (sd, cpu, PROFILE_HISTOGRAM_WIDTH, + PROFILE_PC_COUNT (profile) [i], + max_val); + profile_printf (sd, cpu, "\n"); } } } @@ -491,7 +689,7 @@ profile_print_pc (sim_cpu *cpu, int verbose) /* FIXME: Is this the best place for this code? */ { FILE *pf = fopen ("gmon.out", "wb"); - + if (pf == NULL) sim_io_eprintf (sd, "Failed to open \"gmon.out\" profile file\n"); else @@ -512,6 +710,12 @@ profile_print_pc (sim_cpu *cpu, int verbose) } /* size of sample buffer (+ header) */ header[2] = PROFILE_PC_NR_BUCKETS (profile) * 2 + sizeof (header); + + /* Header must be written out in target byte order. */ + H2T (header[0]); + H2T (header[1]); + H2T (header[2]); + ok = fwrite (&header, sizeof (header), 1, pf); for (loop = 0; ok && (loop < PROFILE_PC_NR_BUCKETS (profile)); @@ -522,15 +726,16 @@ profile_print_pc (sim_cpu *cpu, int verbose) sample = 0xffff; else sample = PROFILE_PC_COUNT (profile) [loop]; + H2T (sample); ok = fwrite (&sample, sizeof (sample), 1, pf); } if (ok == 0) sim_io_eprintf (sd, "Failed to write to \"gmon.out\" profile file\n"); - fclose(pf); + fclose (pf); } } - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, "\n"); } #endif @@ -539,6 +744,22 @@ profile_print_pc (sim_cpu *cpu, int verbose) #if WITH_PROFILE_INSN_P +static SIM_RC +profile_insn_init (SIM_DESC sd) +{ + int c; + + for (c = 0; c < MAX_NR_PROCESSORS; ++c) + { + sim_cpu *cpu = STATE_CPU (sd, c); + + if (CPU_MAX_INSNS (cpu) > 0) + PROFILE_INSN_COUNT (CPU_PROFILE_DATA (cpu)) = NZALLOC (unsigned int, CPU_MAX_INSNS (cpu)); + } + + return SIM_RC_OK; +} + static void profile_print_insn (sim_cpu *cpu, int verbose) { @@ -547,52 +768,65 @@ profile_print_insn (sim_cpu *cpu, int verbose) PROFILE_DATA *data = CPU_PROFILE_DATA (cpu); char comma_buf[20]; - sim_io_printf (sd, "Instruction Statistics:\n\n"); + /* If MAX_INSNS not set, insn profiling isn't supported. */ + if (CPU_MAX_INSNS (cpu) == 0) + return; + + profile_printf (sd, cpu, "Instruction Statistics"); +#ifdef SIM_HAVE_ADDR_RANGE + if (PROFILE_RANGE (data)->ranges) + profile_printf (sd, cpu, " (for selected address range(s))"); +#endif + profile_printf (sd, cpu, "\n\n"); /* First pass over data computes various things. */ max_val = 0; total = 0; max_name_len = 0; - for (i = 0; i < MAX_INSNS; ++i) + for (i = 0; i < CPU_MAX_INSNS (cpu); ++i) { - if (INSN_NAME (i) == NULL) + const char *name = (*CPU_INSN_NAME (cpu)) (cpu, i); + + if (name == NULL) continue; total += PROFILE_INSN_COUNT (data) [i]; if (PROFILE_INSN_COUNT (data) [i] > max_val) max_val = PROFILE_INSN_COUNT (data) [i]; - n = strlen (INSN_NAME (i)); + n = strlen (name); if (n > max_name_len) max_name_len = n; } /* set the total insn count, in case client is being lazy */ - if (PROFILE_TOTAL_INSN_COUNT (data)) + if (! PROFILE_TOTAL_INSN_COUNT (data)) PROFILE_TOTAL_INSN_COUNT (data) = total; - sim_io_printf (sd, " Total: %s insns\n", COMMAS (total)); + profile_printf (sd, cpu, " Total: %s insns\n", COMMAS (total)); if (verbose && max_val != 0) { /* Now we can print the histogram. */ - sim_io_printf (sd, "\n"); - for (i = 0; i < MAX_INSNS; ++i) + profile_printf (sd, cpu, "\n"); + for (i = 0; i < CPU_MAX_INSNS (cpu); ++i) { - if (INSN_NAME (i) == NULL) + const char *name = (*CPU_INSN_NAME (cpu)) (cpu, i); + + if (name == NULL) continue; if (PROFILE_INSN_COUNT (data) [i] != 0) { - sim_io_printf (sd, " %*s: %*s: ", - max_name_len, INSN_NAME (i), - max_val < 10000 ? 5 : 10, - COMMAS (PROFILE_INSN_COUNT (data) [i])); - print_bar (sd, PROFILE_HISTOGRAM_WIDTH, - PROFILE_INSN_COUNT (data) [i], - max_val); - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, " %*s: %*s: ", + max_name_len, name, + max_val < 10000 ? 5 : 10, + COMMAS (PROFILE_INSN_COUNT (data) [i])); + sim_profile_print_bar (sd, cpu, PROFILE_HISTOGRAM_WIDTH, + PROFILE_INSN_COUNT (data) [i], + max_val); + profile_printf (sd, cpu, "\n"); } } } - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, "\n"); } #endif @@ -610,11 +844,11 @@ profile_print_memory (sim_cpu *cpu, int verbose) PROFILE_DATA *data = CPU_PROFILE_DATA (cpu); char comma_buf[20]; - sim_io_printf (sd, "Memory Access Statistics:\n\n"); + profile_printf (sd, cpu, "Memory Access Statistics\n\n"); /* First pass over data computes various things. */ max_val = total_read = total_write = max_name_len = 0; - for (i = 0; i < MAX_MODES; ++i) + for (i = 0; i < MODE_TARGET_MAX; ++i) { total_read += PROFILE_READ_COUNT (data) [i]; total_write += PROFILE_WRITE_COUNT (data) [i]; @@ -628,45 +862,45 @@ profile_print_memory (sim_cpu *cpu, int verbose) } /* One could use PROFILE_LABEL_WIDTH here. I chose not to. */ - sim_io_printf (sd, " Total read: %s accesses\n", - COMMAS (total_read)); - sim_io_printf (sd, " Total write: %s accesses\n", - COMMAS (total_write)); + profile_printf (sd, cpu, " Total read: %s accesses\n", + COMMAS (total_read)); + profile_printf (sd, cpu, " Total write: %s accesses\n", + COMMAS (total_write)); if (verbose && max_val != 0) { /* FIXME: Need to separate instruction fetches from data fetches as the former swamps the latter. */ /* Now we can print the histogram. */ - sim_io_printf (sd, "\n"); - for (i = 0; i < MAX_MODES; ++i) + profile_printf (sd, cpu, "\n"); + for (i = 0; i < MODE_TARGET_MAX; ++i) { if (PROFILE_READ_COUNT (data) [i] != 0) { - sim_io_printf (sd, " %*s read: %*s: ", - max_name_len, MODE_NAME (i), - max_val < 10000 ? 5 : 10, - COMMAS (PROFILE_READ_COUNT (data) [i])); - print_bar (sd, PROFILE_HISTOGRAM_WIDTH, - PROFILE_READ_COUNT (data) [i], - max_val); - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, " %*s read: %*s: ", + max_name_len, MODE_NAME (i), + max_val < 10000 ? 5 : 10, + COMMAS (PROFILE_READ_COUNT (data) [i])); + sim_profile_print_bar (sd, cpu, PROFILE_HISTOGRAM_WIDTH, + PROFILE_READ_COUNT (data) [i], + max_val); + profile_printf (sd, cpu, "\n"); } if (PROFILE_WRITE_COUNT (data) [i] != 0) { - sim_io_printf (sd, " %*s write: %*s: ", - max_name_len, MODE_NAME (i), - max_val < 10000 ? 5 : 10, - COMMAS (PROFILE_WRITE_COUNT (data) [i])); - print_bar (sd, PROFILE_HISTOGRAM_WIDTH, - PROFILE_WRITE_COUNT (data) [i], - max_val); - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, " %*s write: %*s: ", + max_name_len, MODE_NAME (i), + max_val < 10000 ? 5 : 10, + COMMAS (PROFILE_WRITE_COUNT (data) [i])); + sim_profile_print_bar (sd, cpu, PROFILE_HISTOGRAM_WIDTH, + PROFILE_WRITE_COUNT (data) [i], + max_val); + profile_printf (sd, cpu, "\n"); } } } - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, "\n"); } #endif @@ -683,14 +917,14 @@ profile_print_core (sim_cpu *cpu, int verbose) PROFILE_DATA *data = CPU_PROFILE_DATA (cpu); char comma_buf[20]; - sim_io_printf (sd, "CORE Statistics:\n\n"); + profile_printf (sd, cpu, "CORE Statistics\n\n"); /* First pass over data computes various things. */ { - sim_core_maps map; + unsigned map; total = 0; max_val = 0; - for (map = 0; map < nr_sim_core_maps; map++) + for (map = 0; map < nr_maps; map++) { total += PROFILE_CORE_COUNT (data) [map]; if (PROFILE_CORE_COUNT (data) [map] > max_val) @@ -699,44 +933,31 @@ profile_print_core (sim_cpu *cpu, int verbose) } /* One could use PROFILE_LABEL_WIDTH here. I chose not to. */ - sim_io_printf (sd, " Total: %s accesses\n", - COMMAS (total)); + profile_printf (sd, cpu, " Total: %s accesses\n", + COMMAS (total)); if (verbose && max_val != 0) { - sim_core_maps map; + unsigned map; /* Now we can print the histogram. */ - sim_io_printf (sd, "\n"); - for (map = 0; map < nr_sim_core_maps; map++) + profile_printf (sd, cpu, "\n"); + for (map = 0; map < nr_maps; map++) { if (PROFILE_CORE_COUNT (data) [map] != 0) { - switch (map) - { - case sim_core_read_map: - sim_io_printf (sd, " read:"); - break; - case sim_core_write_map: - sim_io_printf (sd, " write:"); - break; - case sim_core_execute_map: - sim_io_printf (sd, " exec:"); - break; - case nr_sim_core_maps: - ; /* ignore */ - } - sim_io_printf (sd, "%*s: ", - max_val < 10000 ? 5 : 10, - COMMAS (PROFILE_CORE_COUNT (data) [map])); - print_bar (sd, PROFILE_HISTOGRAM_WIDTH, - PROFILE_CORE_COUNT (data) [map], - max_val); - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, "%10s:", map_to_str (map)); + profile_printf (sd, cpu, "%*s: ", + max_val < 10000 ? 5 : 10, + COMMAS (PROFILE_CORE_COUNT (data) [map])); + sim_profile_print_bar (sd, cpu, PROFILE_HISTOGRAM_WIDTH, + PROFILE_CORE_COUNT (data) [map], + max_val); + profile_printf (sd, cpu, "\n"); } } } - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, "\n"); } #endif @@ -748,51 +969,50 @@ profile_print_model (sim_cpu *cpu, int verbose) { SIM_DESC sd = CPU_STATE (cpu); PROFILE_DATA *data = CPU_PROFILE_DATA (cpu); - unsigned long cti_stalls = PROFILE_MODEL_CTI_STALL_COUNT (data); - unsigned long load_stalls = PROFILE_MODEL_LOAD_STALL_COUNT (data); - unsigned long total = PROFILE_MODEL_CYCLE_COUNT (data) - + cti_stalls + load_stalls; + unsigned long cti_stall_cycles = PROFILE_MODEL_CTI_STALL_CYCLES (data); + unsigned long load_stall_cycles = PROFILE_MODEL_LOAD_STALL_CYCLES (data); + unsigned long total_cycles = PROFILE_MODEL_TOTAL_CYCLES (data); char comma_buf[20]; - sim_io_printf (sd, "Model %s Timing Information\n\n", - MODEL_NAME (CPU_MODEL (cpu))); - sim_io_printf (sd, " %-*s %s\n", - PROFILE_LABEL_WIDTH, "Taken branches:", - COMMAS (PROFILE_MODEL_TAKEN_COUNT (data))); - sim_io_printf (sd, " %-*s %s\n", - PROFILE_LABEL_WIDTH, "Untaken branches:", - COMMAS (PROFILE_MODEL_UNTAKEN_COUNT (data))); - sim_io_printf (sd, " %-*s %s\n", - PROFILE_LABEL_WIDTH, "Cycles stalled due to branches:", - COMMAS (cti_stalls)); - sim_io_printf (sd, " %-*s %s\n", - PROFILE_LABEL_WIDTH, "Cycles stalled due to loads:", - COMMAS (load_stalls)); - sim_io_printf (sd, " %-*s %s\n", - PROFILE_LABEL_WIDTH, "Total cycles (*approximate*):", - COMMAS (total)); - sim_io_printf (sd, "\n"); + profile_printf (sd, cpu, "Model %s Timing Information", + MODEL_NAME (CPU_MODEL (cpu))); +#ifdef SIM_HAVE_ADDR_RANGE + if (PROFILE_RANGE (data)->ranges) + profile_printf (sd, cpu, " (for selected address range(s))"); +#endif + profile_printf (sd, cpu, "\n\n"); + profile_printf (sd, cpu, " %-*s %s\n", + PROFILE_LABEL_WIDTH, "Taken branches:", + COMMAS (PROFILE_MODEL_TAKEN_COUNT (data))); + profile_printf (sd, cpu, " %-*s %s\n", + PROFILE_LABEL_WIDTH, "Untaken branches:", + COMMAS (PROFILE_MODEL_UNTAKEN_COUNT (data))); + profile_printf (sd, cpu, " %-*s %s\n", + PROFILE_LABEL_WIDTH, "Cycles stalled due to branches:", + COMMAS (cti_stall_cycles)); + profile_printf (sd, cpu, " %-*s %s\n", + PROFILE_LABEL_WIDTH, "Cycles stalled due to loads:", + COMMAS (load_stall_cycles)); + profile_printf (sd, cpu, " %-*s %s\n", + PROFILE_LABEL_WIDTH, "Total cycles (*approximate*):", + COMMAS (total_cycles)); + profile_printf (sd, cpu, "\n"); } #endif - -#if WITH_PROFILE_INSN_P || WITH_PROFILE_MEMORY_P || WITH_PROFILE_CORE_P || WITH_PROFILE_PC_P - -static void -print_bar (SIM_DESC sd, unsigned int width, - unsigned int val, unsigned int max_val) +void +sim_profile_print_bar (SIM_DESC sd, sim_cpu *cpu, unsigned int width, + unsigned int val, unsigned int max_val) { unsigned int i, count; count = ((double) val / (double) max_val) * (double) width; for (i = 0; i < count; ++i) - sim_io_printf (sd, "*"); + profile_printf (sd, cpu, "*"); } -#endif - /* Print the simulator's execution speed for CPU. */ static void @@ -802,32 +1022,83 @@ profile_print_speed (sim_cpu *cpu) PROFILE_DATA *data = CPU_PROFILE_DATA (cpu); unsigned long milliseconds = sim_events_elapsed_time (sd); unsigned long total = PROFILE_TOTAL_INSN_COUNT (data); + double clock; + double secs; char comma_buf[20]; - sim_io_printf (sd, "Simulator Execution Speed\n\n"); + profile_printf (sd, cpu, "Simulator Execution Speed\n\n"); if (total != 0) - sim_io_printf (sd, " Total instructions: %s\n", COMMAS (total)); + profile_printf (sd, cpu, " Total instructions: %s\n", COMMAS (total)); if (milliseconds < 1000) - sim_io_printf (sd, " Total Execution Time: < 1 second\n\n"); + profile_printf (sd, cpu, " Total execution time: < 1 second\n\n"); else { /* The printing of the time rounded to 2 decimal places makes the speed calculation seem incorrect [even though it is correct]. So round MILLISECONDS first. This can marginally affect the result, but it's better that the user not perceive there's a math error. */ - double secs = (double) milliseconds / 1000; + secs = (double) milliseconds / 1000; secs = ((double) (unsigned long) (secs * 100 + .5)) / 100; - sim_io_printf (sd, " Total Execution Time: %.2f seconds\n", secs); + profile_printf (sd, cpu, " Total execution time : %.2f seconds\n", secs); /* Don't confuse things with data that isn't useful. If we ran for less than 2 seconds, only use the data if we executed more than 100,000 insns. */ if (secs >= 2 || total >= 100000) - sim_io_printf (sd, " Simulator Speed: %s insns/second\n\n", - COMMAS ((unsigned long) ((double) total / secs))); + profile_printf (sd, cpu, " Simulator speed: %s insns/second\n", + COMMAS ((unsigned long) ((double) total / secs))); + } + + /* Print simulated execution time if the cpu frequency has been specified. */ + clock = PROFILE_CPU_FREQ (data); + if (clock != 0) + { + if (clock >= 1000000) + profile_printf (sd, cpu, " Simulated cpu frequency: %.2f MHz\n", + clock / 1000000); + else + profile_printf (sd, cpu, " Simulated cpu frequency: %.2f Hz\n", clock); + +#if WITH_PROFILE_MODEL_P + if (PROFILE_FLAGS (data) [PROFILE_MODEL_IDX]) + { + /* The printing of the time rounded to 2 decimal places makes the + speed calculation seem incorrect [even though it is correct]. + So round SECS first. This can marginally affect the result, + but it's better that the user not perceive there's a math + error. */ + secs = PROFILE_MODEL_TOTAL_CYCLES (data) / clock; + secs = ((double) (unsigned long) (secs * 100 + .5)) / 100; + profile_printf (sd, cpu, " Simulated execution time: %.2f seconds\n", + secs); + } +#endif /* WITH_PROFILE_MODEL_P */ + } +} + +#ifdef SIM_HAVE_ADDR_RANGE +/* Print selected address ranges. */ + +static void +profile_print_addr_ranges (sim_cpu *cpu) +{ + ADDR_SUBRANGE *asr = PROFILE_RANGE (CPU_PROFILE_DATA (cpu))->ranges; + SIM_DESC sd = CPU_STATE (cpu); + + if (asr) + { + profile_printf (sd, cpu, "Selected address ranges\n\n"); + while (asr != NULL) + { + profile_printf (sd, cpu, " 0x%lx - 0x%lx\n", + (long) asr->start, (long) asr->end); + asr = asr->next; + } + profile_printf (sd, cpu, "\n"); } } +#endif /* Top level function to print all summary profile information. It is [currently] intended that all such data is printed by this function. @@ -841,29 +1112,30 @@ profile_print_speed (sim_cpu *cpu) Note that results are indented two spaces to distinguish them from section titles. */ -void -profile_print (SIM_DESC sd, int verbose, - PROFILE_CALLBACK *misc, PROFILE_CPU_CALLBACK *misc_cpu) +static void +profile_info (SIM_DESC sd, int verbose) { int i,c; int print_title_p = 0; /* Only print the title if some data has been collected. */ + /* ??? Why don't we just exit if no data collected? */ /* FIXME: If the number of processors can be selected on the command line, then MAX_NR_PROCESSORS will need to take an argument of `sd'. */ - for (c = 0; c < MAX_NR_PROCESSORS; ++c) + for (c = 0; c < MAX_NR_PROCESSORS && !print_title_p; ++c) { sim_cpu *cpu = STATE_CPU (sd, c); PROFILE_DATA *data = CPU_PROFILE_DATA (cpu); for (i = 0; i < MAX_PROFILE_VALUES; ++i) if (PROFILE_FLAGS (data) [i]) - print_title_p = 1; - /* One could break out early if print_title_p is set. */ + { + profile_printf (sd, cpu, "Summary profiling results:\n\n"); + print_title_p = 1; + break; + } } - if (print_title_p) - sim_io_printf (sd, "Summary profiling results:\n\n"); /* Loop, cpu by cpu, printing results. */ @@ -894,9 +1166,16 @@ profile_print (SIM_DESC sd, int verbose, #endif )) { - sim_io_printf (sd, "CPU %d\n\n", c); + profile_printf (sd, cpu, "CPU %d\n\n", c); } +#ifdef SIM_HAVE_ADDR_RANGE + if (print_title_p + && (PROFILE_INSN_P (cpu) + || PROFILE_MODEL_P (cpu))) + profile_print_addr_ranges (cpu); +#endif + #if WITH_PROFILE_INSN_P if (PROFILE_FLAGS (data) [PROFILE_INSN_IDX]) profile_print_insn (cpu, verbose); @@ -928,8 +1207,8 @@ profile_print (SIM_DESC sd, int verbose, #endif /* Print cpu-specific data before the execution speed. */ - if (misc_cpu != NULL) - (*misc_cpu) (cpu, verbose); + if (PROFILE_INFO_CPU_CALLBACK (data) != NULL) + PROFILE_INFO_CPU_CALLBACK (data) (cpu, verbose); /* Always try to print execution time and speed. */ if (verbose @@ -938,9 +1217,9 @@ profile_print (SIM_DESC sd, int verbose, } /* Finally print non-cpu specific miscellaneous data. */ + if (STATE_PROFILE_INFO_CALLBACK (sd)) + STATE_PROFILE_INFO_CALLBACK (sd) (sd, verbose); - if (misc != NULL) - (*misc) (sd, verbose); } /* Install profiling support in the simulator. */ @@ -951,15 +1230,49 @@ profile_install (SIM_DESC sd) int i; SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); - sim_add_option_table (sd, profile_options); + sim_add_option_table (sd, NULL, profile_options); for (i = 0; i < MAX_NR_PROCESSORS; ++i) memset (CPU_PROFILE_DATA (STATE_CPU (sd, i)), 0, sizeof (* CPU_PROFILE_DATA (STATE_CPU (sd, i)))); +#if WITH_PROFILE_INSN_P + sim_module_add_init_fn (sd, profile_insn_init); +#endif #if WITH_PROFILE_PC_P sim_module_add_uninstall_fn (sd, profile_pc_uninstall); sim_module_add_init_fn (sd, profile_pc_init); #endif + sim_module_add_init_fn (sd, profile_init); sim_module_add_uninstall_fn (sd, profile_uninstall); + sim_module_add_info_fn (sd, profile_info); + return SIM_RC_OK; +} + +static SIM_RC +profile_init (SIM_DESC sd) +{ +#ifdef SIM_HAVE_ADDR_RANGE + /* Check if a range has been specified without specifying what to + collect. */ + { + int i; + + for (i = 0; i < MAX_NR_PROCESSORS; ++i) + { + sim_cpu *cpu = STATE_CPU (sd, i); + + if (ADDR_RANGE_RANGES (PROFILE_RANGE (CPU_PROFILE_DATA (cpu))) + && ! (PROFILE_INSN_P (cpu) + || PROFILE_MODEL_P (cpu))) + { + sim_io_eprintf_cpu (cpu, "Profiling address range specified without --profile-insn or --profile-model.\n"); + sim_io_eprintf_cpu (cpu, "Address range ignored.\n"); + sim_addr_range_delete (PROFILE_RANGE (CPU_PROFILE_DATA (cpu)), + 0, ~ (address_word) 0); + } + } + } +#endif + return SIM_RC_OK; } @@ -970,7 +1283,9 @@ profile_uninstall (SIM_DESC sd) for (i = 0; i < MAX_NR_PROCESSORS; ++i) { - PROFILE_DATA *data = CPU_PROFILE_DATA (STATE_CPU (sd, i)); + sim_cpu *cpu = STATE_CPU (sd, i); + PROFILE_DATA *data = CPU_PROFILE_DATA (cpu); + if (PROFILE_FILE (data) != NULL) { /* If output from different cpus is going to the same file, @@ -982,5 +1297,8 @@ profile_uninstall (SIM_DESC sd) if (i == j) fclose (PROFILE_FILE (data)); } + + if (PROFILE_INSN_COUNT (data) != NULL) + free (PROFILE_INSN_COUNT (data)); } }