From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 13622 invoked by alias); 4 Mar 2013 17:08:18 -0000 Received: (qmail 13201 invoked by uid 22791); 4 Mar 2013 17:07:50 -0000 X-SWARE-Spam-Status: No, hits=-7.9 required=5.0 tests=AWL,BAYES_00,KHOP_RCVD_UNTRUST,KHOP_SPAMHAUS_DROP,KHOP_THREADED,RCVD_IN_DNSWL_HI,RCVD_IN_HOSTKARMA_W,RP_MATCHES_RCVD,TW_EG X-Spam-Check-By: sourceware.org Received: from mga01.intel.com (HELO mga01.intel.com) (192.55.52.88) by sourceware.org (qpsmtpd/0.43rc1) with ESMTP; Mon, 04 Mar 2013 17:07:10 +0000 Received: from fmsmga002.fm.intel.com ([10.253.24.26]) by fmsmga101.fm.intel.com with ESMTP; 04 Mar 2013 09:06:25 -0800 X-ExtLoop1: 1 Received: from swsutil001.isw.intel.com ([10.237.237.11]) by fmsmga002.fm.intel.com with ESMTP; 04 Mar 2013 09:06:23 -0800 Received: from ulslx001.iul.intel.com (ulslx001.iul.intel.com [172.28.207.63]) by swsutil001.isw.intel.com (8.13.6/8.13.6/MailSET/Hub) with ESMTP id r24H6F7K004118; Mon, 4 Mar 2013 17:06:16 GMT Received: from ulslx001.iul.intel.com (localhost [127.0.0.1]) by ulslx001.iul.intel.com with ESMTP id r24H6EY9020131; Mon, 4 Mar 2013 18:06:14 +0100 Received: (from mmetzger@localhost) by ulslx001.iul.intel.com with id r24H6EO0020127; Mon, 4 Mar 2013 18:06:14 +0100 From: Markus Metzger To: jan.kratochvil@redhat.com Cc: gdb-patches@sourceware.org, markus.t.metzger@gmail.com, Eli Zaretskii Subject: [patch v9 18/23] record: add "record function-call-history" command Date: Mon, 04 Mar 2013 17:09:00 -0000 Message-Id: <1362416770-19750-19-git-send-email-markus.t.metzger@intel.com> In-Reply-To: <1362416770-19750-1-git-send-email-markus.t.metzger@intel.com> References: <1362416770-19750-1-git-send-email-markus.t.metzger@intel.com> X-IsSubscribed: yes Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org X-SW-Source: 2013-03/txt/msg00112.txt.bz2 Add command to print the function names from recorded instructions. The command supports iterating over the execution log similar to the "list" command. This command provides a quick high-level overview over the recorded execution log at function granularity without having to reverse-step. CC: Eli Zaretskii 2013-03-04 Markus Metzger * target.c (target_call_history, target_call_history_from, target_call_history_range): New. * target.h (target_ops) : New fields. (target_call_history, target_call_history_from, target_call_history_range): New declaration. * record.c (get_call_history_modifiers, cmd_record_call_history, record_call_history_size): New. (_initialize_record): Add the "record function-call-history" command. Add "set/show record function-call-history-size" commands. * record.h (record_print_flag): New. --- gdb/record.c | 146 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ gdb/record.h | 10 ++++ gdb/target.c | 51 ++++++++++++++++++++ gdb/target.h | 19 ++++++++ 4 files changed, 226 insertions(+), 0 deletions(-) diff --git a/gdb/record.c b/gdb/record.c index 4c5f3f0..8bbd057 100644 --- a/gdb/record.c +++ b/gdb/record.c @@ -35,6 +35,9 @@ unsigned int record_debug = 0; /* The number of instructions to print in "record instruction-history". */ static unsigned int record_insn_history_size = 10; +/* The number of functions to print in "record function-call-history". */ +static unsigned int record_call_history_size = 10; + struct cmd_list_element *record_cmdlist = NULL; struct cmd_list_element *set_record_cmdlist = NULL; struct cmd_list_element *show_record_cmdlist = NULL; @@ -463,6 +466,123 @@ cmd_record_insn_history (char *arg, int from_tty) } } +/* Read function-call-history modifiers from an argument string. */ + +static int +get_call_history_modifiers (char **arg) +{ + int modifiers; + char *args; + + modifiers = 0; + args = *arg; + + if (args == NULL) + return modifiers; + + while (*args == '/') + { + ++args; + + if (*args == '\0') + error (_("Missing modifier.")); + + for (; *args; ++args) + { + if (isspace (*args)) + break; + + if (*args == '/') + continue; + + switch (*args) + { + case 'l': + modifiers |= record_print_src_line; + break; + case 'i': + modifiers |= record_print_insn_range; + break; + default: + error (_("Invalid modifier: %c."), *args); + } + } + + args = skip_spaces (args); + } + + /* Update the argument string. */ + *arg = args; + + return modifiers; +} + +/* The "record function-call-history" command. */ + +static void +cmd_record_call_history (char *arg, int from_tty) +{ + int flags, size; + + require_record_target (); + + flags = get_call_history_modifiers (&arg); + size = (int) record_call_history_size; + if (size < 0) + size = INT_MAX; + + if (arg == NULL || *arg == 0 || strcmp (arg, "+") == 0) + target_call_history (size, flags); + else if (strcmp (arg, "-") == 0) + target_call_history (- size, flags); + else + { + ULONGEST begin, end; + + begin = get_insn_number (&arg); + + if (*arg == ',') + { + arg = skip_spaces (++arg); + + if (*arg == '+') + { + arg += 1; + size = get_context_size (&arg); + + no_chunk (arg); + + target_call_history_from (begin, size, flags); + } + else if (*arg == '-') + { + arg += 1; + size = get_context_size (&arg); + + no_chunk (arg); + + target_call_history_from (begin, -size, flags); + } + else + { + end = get_insn_number (&arg); + + no_chunk (arg); + + target_call_history_range (begin, end, flags); + } + } + else + { + no_chunk (arg); + + target_call_history_from (begin, size, flags); + } + + dont_repeat (); + } +} + /* Provide a prototype to silence -Wmissing-prototypes. */ extern initialize_file_ftype _initialize_record; @@ -486,6 +606,13 @@ Show number of instructions to print in \"record instruction-history\"."), NULL, NULL, NULL, &set_record_cmdlist, &show_record_cmdlist); + add_setshow_uinteger_cmd ("function-call-history-size", no_class, + &record_call_history_size, _("\ +Set number of function to print in \"record function-call-history\"."), _("\ +Show number of functions to print in \"record function-call-history\"."), + NULL, NULL, NULL, &set_record_cmdlist, + &show_record_cmdlist); + c = add_prefix_cmd ("record", class_obscure, cmd_record_start, _("Start recording."), &record_cmdlist, "record ", 0, &cmdlist); @@ -546,4 +673,23 @@ from the first argument.\n\ The number of instructions to disassemble can be defined with \"set record \ instruction-history-size\"."), &record_cmdlist); + + add_cmd ("function-call-history", class_obscure, cmd_record_call_history, _("\ +Prints the execution history at function granularity.\n\ +It prints one line for each sequence of instructions that belong to the same \ +function.\n\ +Without modifiers, it prints the function name.\n\ +With a /l modifier, the source file and line number range is included.\n\ +With a /i modifier, the instruction number range is included.\n\ +With no argument, prints ten more lines after the previous ten-line print.\n\ +\"record function-call-history -\" prints ten lines before a previous ten-line \ +print.\n\ +One argument specifies a function number as shown by 'info record', and \ +ten lines are printed after that function.\n\ +Two arguments with comma between specify a range of functions to print.\n\ +If the second argument is preceded by '+' or '-', it specifies the distance \ +from the first argument.\n\ +The number of functions to print can be defined with \"set record \ +function-call-history-size\"."), + &record_cmdlist); } diff --git a/gdb/record.h b/gdb/record.h index 04d6b4a..86e6bc6 100644 --- a/gdb/record.h +++ b/gdb/record.h @@ -32,6 +32,16 @@ extern struct cmd_list_element *set_record_cmdlist; extern struct cmd_list_element *show_record_cmdlist; extern struct cmd_list_element *info_record_cmdlist; +/* A list of flags specifying what record target methods should print. */ +enum record_print_flag +{ + /* Print the source file and line (if applicable). */ + record_print_src_line = (1 << 0), + + /* Print the instruction number range (if applicable). */ + record_print_insn_range = (1 << 1), +}; + /* Wrapper for target_read_memory that prints a debug message if reading memory fails. */ extern int record_read_memory (struct gdbarch *gdbarch, diff --git a/gdb/target.c b/gdb/target.c index e9d70b7..a788a67 100644 --- a/gdb/target.c +++ b/gdb/target.c @@ -4411,6 +4411,57 @@ target_insn_history_range (ULONGEST begin, ULONGEST end, int flags) tcomplain (); } +/* See target.h. */ + +void +target_call_history (int size, int flags) +{ + struct target_ops *t; + + for (t = current_target.beneath; t != NULL; t = t->beneath) + if (t->to_call_history != NULL) + { + t->to_call_history (size, flags); + return; + } + + tcomplain (); +} + +/* See target.h. */ + +void +target_call_history_from (ULONGEST begin, int size, int flags) +{ + struct target_ops *t; + + for (t = current_target.beneath; t != NULL; t = t->beneath) + if (t->to_call_history_from != NULL) + { + t->to_call_history_from (begin, size, flags); + return; + } + + tcomplain (); +} + +/* See target.h. */ + +void +target_call_history_range (ULONGEST begin, ULONGEST end, int flags) +{ + struct target_ops *t; + + for (t = current_target.beneath; t != NULL; t = t->beneath) + if (t->to_call_history_range != NULL) + { + t->to_call_history_range (begin, end, flags); + return; + } + + tcomplain (); +} + static void debug_to_prepare_to_store (struct regcache *regcache) { diff --git a/gdb/target.h b/gdb/target.h index 4ecb6e2..a3fd892 100644 --- a/gdb/target.h +++ b/gdb/target.h @@ -908,6 +908,16 @@ struct target_ops /* Disassemble a section of the recorded execution trace. */ void (*to_insn_history_range) (ULONGEST begin, ULONGEST end, int flags); + /* Print a function trace of the recorded execution trace. */ + void (*to_call_history) (int size, int flags); + + /* Print a function trace of the recorded execution trace starting + at instruction FROM. */ + void (*to_call_history_from) (ULONGEST begin, int size, int flags); + + /* Print a function trace of an execution trace section. */ + void (*to_call_history_range) (ULONGEST begin, ULONGEST end, int flags); + int to_magic; /* Need sub-structure for target machine related rather than comm related? */ @@ -2003,4 +2013,13 @@ extern void target_insn_history_from (ULONGEST from, int size, int flags); /* See to_insn_history_range. */ extern void target_insn_history_range (ULONGEST begin, ULONGEST end, int flags); +/* See to_call_history. */ +extern void target_call_history (int size, int flags); + +/* See to_call_history_from. */ +extern void target_call_history_from (ULONGEST begin, int size, int flags); + +/* See to_call_history_range. */ +extern void target_call_history_range (ULONGEST begin, ULONGEST end, int flags); + #endif /* !defined (TARGET_H) */ -- 1.7.1