/* Support for GDB maintenance commands.
- Copyright 1992, 1993, 1994 Free Software Foundation, Inc.
+ Copyright 1992, 1993, 1994, 1995, 1996, 1997, 1999, 2000, 2001
+ Free Software Foundation, Inc.
Written by Fred Fish at Cygnus Support.
This file is part of GDB.
#include "objfiles.h"
#include "value.h"
-extern void _initialize_maint_cmds PARAMS ((void));
+extern void _initialize_maint_cmds (void);
-static void maintenance_command PARAMS ((char *, int));
+static void maintenance_command (char *, int);
-static void maintenance_dump_me PARAMS ((char *, int));
+static void maintenance_dump_me (char *, int);
-static void maintenance_internal_error PARAMS ((char *args, int from_tty));
+static void maintenance_internal_error (char *args, int from_tty);
-static void maintenance_demangle PARAMS ((char *, int));
+static void maintenance_demangle (char *, int);
-static void maintenance_time_display PARAMS ((char *, int));
+static void maintenance_time_display (char *, int);
-static void maintenance_space_display PARAMS ((char *, int));
+static void maintenance_space_display (char *, int);
-static void maintenance_info_command PARAMS ((char *, int));
+static void maintenance_info_command (char *, int);
-static void print_section_table PARAMS ((bfd *, asection *, PTR));
+static void print_section_table (bfd *, asection *, PTR);
-static void maintenance_info_sections PARAMS ((char *, int));
+static void maintenance_info_sections (char *, int);
-static void maintenance_print_command PARAMS ((char *, int));
+static void maintenance_print_command (char *, int);
+
+static void maintenance_do_deprecate (char *, int);
/* Set this to the maximum number of seconds to wait instead of waiting forever
in target_wait(). If this timer times out, then it generates an error and
*/
static void
-maintenance_command (args, from_tty)
- char *args;
- int from_tty;
+maintenance_command (char *args, int from_tty)
{
printf_unfiltered ("\"maintenance\" must be followed by the name of a maintenance command.\n");
help_list (maintenancelist, "maintenance ", -1, gdb_stdout);
#ifndef _WIN32
/* ARGSUSED */
static void
-maintenance_dump_me (args, from_tty)
- char *args;
- int from_tty;
+maintenance_dump_me (char *args, int from_tty)
{
if (query ("Should GDB dump core? "))
{
static void
maintenance_internal_error (char *args, int from_tty)
{
- internal_error ("internal maintenance");
+ internal_error (__FILE__, __LINE__,
+ "internal maintenance");
}
-/* Someday we should allow demangling for things other than just
- explicit strings. For example, we might want to be able to
- specify the address of a string in either GDB's process space
- or the debuggee's process space, and have gdb fetch and demangle
- that string. If we have a char* pointer "ptr" that points to
- a string, we might want to be able to given just the name and
- have GDB demangle and print what it points to, etc. (FIXME) */
+/* Someday we should allow demangling for things other than just
+ explicit strings. For example, we might want to be able to specify
+ the address of a string in either GDB's process space or the
+ debuggee's process space, and have gdb fetch and demangle that
+ string. If we have a char* pointer "ptr" that points to a string,
+ we might want to be able to given just the name and have GDB
+ demangle and print what it points to, etc. (FIXME) */
static void
-maintenance_demangle (args, from_tty)
- char *args;
- int from_tty;
+maintenance_demangle (char *args, int from_tty)
{
char *demangled;
if (demangled != NULL)
{
printf_unfiltered ("%s\n", demangled);
- free (demangled);
+ xfree (demangled);
}
else
{
}
static void
-maintenance_time_display (args, from_tty)
- char *args;
- int from_tty;
+maintenance_time_display (char *args, int from_tty)
{
extern int display_time;
}
static void
-maintenance_space_display (args, from_tty)
- char *args;
- int from_tty;
+maintenance_space_display (char *args, int from_tty)
{
extern int display_space;
display_space = strtol (args, NULL, 10);
}
-/* The "maintenance info" command is defined as a prefix, with allow_unknown 0.
- Therefore, its own definition is called only for "maintenance info" with
- no args. */
+/* The "maintenance info" command is defined as a prefix, with
+ allow_unknown 0. Therefore, its own definition is called only for
+ "maintenance info" with no args. */
/* ARGSUSED */
static void
-maintenance_info_command (arg, from_tty)
- char *arg;
- int from_tty;
+maintenance_info_command (char *arg, int from_tty)
{
printf_unfiltered ("\"maintenance info\" must be followed by the name of an info command.\n");
help_list (maintenanceinfolist, "maintenance info ", -1, gdb_stdout);
}
static void
-print_section_table (abfd, asect, ignore)
- bfd *abfd;
- asection *asect;
- PTR ignore;
+print_section_table (bfd *abfd, asection *asect, PTR ignore)
{
flagword flags;
/* ARGSUSED */
static void
-maintenance_info_sections (arg, from_tty)
- char *arg;
- int from_tty;
+maintenance_info_sections (char *arg, int from_tty)
{
if (exec_bfd)
{
/* ARGSUSED */
void
-maintenance_print_statistics (args, from_tty)
- char *args;
- int from_tty;
+maintenance_print_statistics (char *args, int from_tty)
{
print_objfile_statistics ();
print_symbol_bcache_statistics ();
}
-/* The "maintenance print" command is defined as a prefix, with allow_unknown
- 0. Therefore, its own definition is called only for "maintenance print"
- with no args. */
+void
+maintenance_print_architecture (char *args, int from_tty)
+{
+ if (args == NULL)
+ gdbarch_dump (current_gdbarch, gdb_stdout);
+ else
+ {
+ struct ui_file *file = gdb_fopen (args, "w");
+ if (file == NULL)
+ perror_with_name ("maintenance print architecture");
+ gdbarch_dump (current_gdbarch, file);
+ ui_file_delete (file);
+ }
+}
+
+/* The "maintenance print" command is defined as a prefix, with
+ allow_unknown 0. Therefore, its own definition is called only for
+ "maintenance print" with no args. */
/* ARGSUSED */
static void
-maintenance_print_command (arg, from_tty)
- char *arg;
- int from_tty;
+maintenance_print_command (char *arg, int from_tty)
{
printf_unfiltered ("\"maintenance print\" must be followed by the name of a print command.\n");
help_list (maintenanceprintlist, "maintenance print ", -1, gdb_stdout);
*/
static void
-maintenance_translate_address (arg, from_tty)
- char *arg;
- int from_tty;
+maintenance_translate_address (char *arg, int from_tty)
{
CORE_ADDR address;
asection *sect;
}
-/* When a comamnd is deprecated the user will be warned the first time
- the command is used. If possible, a replacement will be offered. */
+/* When a command is deprecated the user will be warned the first time
+ the command is used. If possible, a replacement will be
+ offered. */
static void
maintenance_deprecate (char *args, int from_tty)
the command you want to deprecate, and optionally the replacement command \n\
enclosed in quotes.\n");
}
-
+
maintenance_do_deprecate (args, 1);
}
printf_unfiltered ("\"maintenance undeprecate\" takes an argument, \n\
the command you want to undeprecate.\n");
}
-
+
maintenance_do_deprecate (args, 0);
-
+
}
-/*
- You really shouldn't be using this. It is just for the testsuite.
- Rather, you should use deprecate_cmd() when the command is created
- in _initialize_blah().
-
- This function deprecates a command and optionally assigns it a
- replacement.
-*/
-
-static void maintenance_do_deprecate(char *text, int deprecate){
-
- struct cmd_list_element *alias=NULL;
- struct cmd_list_element *prefix_cmd=NULL;
- struct cmd_list_element *cmd=NULL;
-
- char *start_ptr=NULL;
- char *end_ptr=NULL;
- int len;
- char *replacement=NULL;
+/* You really shouldn't be using this. It is just for the testsuite.
+ Rather, you should use deprecate_cmd() when the command is created
+ in _initialize_blah().
+ This function deprecates a command and optionally assigns it a
+ replacement. */
+
+static void
+maintenance_do_deprecate (char *text, int deprecate)
+{
+
+ struct cmd_list_element *alias = NULL;
+ struct cmd_list_element *prefix_cmd = NULL;
+ struct cmd_list_element *cmd = NULL;
+
+ char *start_ptr = NULL;
+ char *end_ptr = NULL;
+ int len;
+ char *replacement = NULL;
- if (!lookup_cmd_composition (text, &alias, &prefix_cmd, &cmd)){
- printf_filtered ("Can't find command '%s' to deprecate.\n", text);
+ if (text == NULL)
return;
- }
-
+
+ if (!lookup_cmd_composition (text, &alias, &prefix_cmd, &cmd))
+ {
+ printf_filtered ("Can't find command '%s' to deprecate.\n", text);
+ return;
+ }
+
if (deprecate)
{
/* look for a replacement command */
- if (start_ptr = strchr (text, '\"'))
- {
- start_ptr++;
- if(end_ptr = strrchr (start_ptr, '\"'))
- {
- len = end_ptr-start_ptr;
- start_ptr[len]='\0';
- replacement = xstrdup (start_ptr);
- }
- }
+ start_ptr = strchr (text, '\"');
+ if (start_ptr != NULL)
+ {
+ start_ptr++;
+ end_ptr = strrchr (start_ptr, '\"');
+ if (end_ptr != NULL)
+ {
+ len = end_ptr - start_ptr;
+ start_ptr[len] = '\0';
+ replacement = xstrdup (start_ptr);
+ }
+ }
}
-
+
if (!start_ptr || !end_ptr)
replacement = NULL;
-
-
+
+
/* If they used an alias, we only want to deprecate the alias.
-
+
Note the MALLOCED_REPLACEMENT test. If the command's replacement
string was allocated at compile time we don't want to free the
- memory.
- */
+ memory. */
if (alias)
{
-
+
if (alias->flags & MALLOCED_REPLACEMENT)
- free (alias->replacement);
-
+ xfree (alias->replacement);
+
if (deprecate)
- alias->flags |= (DEPRECATED_WARN_USER | CMD_DEPRECATED);
+ alias->flags |= (DEPRECATED_WARN_USER | CMD_DEPRECATED);
else
- alias->flags &= ~(DEPRECATED_WARN_USER | CMD_DEPRECATED);
- alias->replacement=replacement;
+ alias->flags &= ~(DEPRECATED_WARN_USER | CMD_DEPRECATED);
+ alias->replacement = replacement;
alias->flags |= MALLOCED_REPLACEMENT;
return;
}
else if (cmd)
{
if (cmd->flags & MALLOCED_REPLACEMENT)
- free (cmd->replacement);
+ xfree (cmd->replacement);
if (deprecate)
- cmd->flags |= (DEPRECATED_WARN_USER | CMD_DEPRECATED);
+ cmd->flags |= (DEPRECATED_WARN_USER | CMD_DEPRECATED);
else
- cmd->flags &= ~(DEPRECATED_WARN_USER | CMD_DEPRECATED);
- cmd->replacement=replacement;
+ cmd->flags &= ~(DEPRECATED_WARN_USER | CMD_DEPRECATED);
+ cmd->replacement = replacement;
cmd->flags |= MALLOCED_REPLACEMENT;
return;
}
void
-_initialize_maint_cmds ()
+_initialize_maint_cmds (void)
{
add_prefix_cmd ("maintenance", class_maintenance, maintenance_command,
"Commands for use by GDB maintainers.\n\
"Commands for showing internal info about the program being debugged.",
&maintenanceinfolist, "maintenance info ", 0,
&maintenancelist);
+ add_alias_cmd ("i", "info", class_maintenance, 1, &maintenancelist);
add_cmd ("sections", class_maintenance, maintenance_info_sections,
"List the BFD sections of the exec and core files.",
"Print statistics about internal gdb state.",
&maintenanceprintlist);
+ add_cmd ("architecture", class_maintenance, maintenance_print_architecture,
+ "Print the internal architecture configuration.\
+Takes an optional file parameter.",
+ &maintenanceprintlist);
+
add_cmd ("check-symtabs", class_maintenance, maintenance_check_symtabs,
"Check consistency of psymtabs and symtabs.",
&maintenancelist);
&maintenancelist);
add_cmd ("deprecate", class_maintenance, maintenance_deprecate,
- "Deprecate a command. Note that this is just in here so the \n\
+ "Deprecate a command. Note that this is just in here so the \n\
testsuite can check the comamnd deprecator. You probably shouldn't use this,\n\
rather you should use the C function deprecate_cmd(). If you decide you \n\
want to use it: maintenance deprecate 'commandname' \"replacement\". The \n\
replacement is optional.", &maintenancelist);
add_cmd ("undeprecate", class_maintenance, maintenance_undeprecate,
- "Undeprecate a command. Note that this is just in here so the \n\
+ "Undeprecate a command. Note that this is just in here so the \n\
testsuite can check the comamnd deprecator. You probably shouldn't use this,\n\
-If you decide you want to use it: maintenance undeprecate 'commandname'",
- &maintenancelist);
+If you decide you want to use it: maintenance undeprecate 'commandname'",
+ &maintenancelist);
add_show_from_set (
add_set_cmd ("watchdog", class_maintenance, var_zinteger, (char *) &watchdog,