1 /* Support for GDB maintenance commands.
2 Copyright 1992, 1993, 1994 Free Software Foundation, Inc.
3 Written by Fred Fish at Cygnus Support.
5 This file is part of GDB.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
24 #if MAINTENANCE_CMDS /* Entire rest of file goes away if not including maint cmds */
33 #include "expression.h" /* For language.h */
40 static void maintenance_command
PARAMS ((char *, int));
42 static void maintenance_dump_me
PARAMS ((char *, int));
44 static void maintenance_demangle
PARAMS ((char *, int));
46 static void maintenance_time_display
PARAMS ((char *, int));
48 static void maintenance_space_display
PARAMS ((char *, int));
50 /* Set this to the maximum number of seconds to wait instead of waiting forever
51 in target_wait(). If this timer times out, then it generates an error and
52 the command is aborted. This replaces most of the need for timeouts in the
53 GDB test suite, and makes it possible to distinguish between a hung target
54 and one with slow communications. */
62 maintenance_command -- access the maintenance subcommands
66 void maintenance_command (char *args, int from_tty)
73 maintenance_command (args
, from_tty
)
77 printf_unfiltered ("\"maintenance\" must be followed by the name of a maintenance command.\n");
78 help_list (maintenancelist
, "maintenance ", -1, gdb_stdout
);
84 maintenance_dump_me (args
, from_tty
)
88 if (query ("Should GDB dump core? "))
90 signal (SIGQUIT
, SIG_DFL
);
91 kill (getpid (), SIGQUIT
);
95 /* Someday we should allow demangling for things other than just
96 explicit strings. For example, we might want to be able to
97 specify the address of a string in either GDB's process space
98 or the debuggee's process space, and have gdb fetch and demangle
99 that string. If we have a char* pointer "ptr" that points to
100 a string, we might want to be able to given just the name and
101 have GDB demangle and print what it points to, etc. (FIXME) */
104 maintenance_demangle (args
, from_tty
)
110 if (args
== NULL
|| *args
== '\0')
112 printf_unfiltered ("\"maintenance demangle\" takes an argument to demangle.\n");
116 demangled
= cplus_demangle (args
, DMGL_ANSI
| DMGL_PARAMS
);
117 if (demangled
!= NULL
)
119 printf_unfiltered ("%s\n", demangled
);
124 printf_unfiltered ("Can't demangle \"%s\"\n", args
);
130 maintenance_time_display (args
, from_tty
)
134 extern int display_time
;
136 if (args
== NULL
|| *args
== '\0')
137 printf_unfiltered ("\"maintenance time\" takes a numeric argument.\n");
139 display_time
= strtol (args
, NULL
, 10);
143 maintenance_space_display (args
, from_tty
)
147 extern int display_space
;
149 if (args
== NULL
|| *args
== '\0')
150 printf_unfiltered ("\"maintenance space\" takes a numeric argument.\n");
152 display_space
= strtol (args
, NULL
, 10);
155 /* The "maintenance info" command is defined as a prefix, with allow_unknown 0.
156 Therefore, its own definition is called only for "maintenance info" with
161 maintenance_info_command (arg
, from_tty
)
165 printf_unfiltered ("\"maintenance info\" must be followed by the name of an info command.\n");
166 help_list (maintenanceinfolist
, "maintenance info ", -1, gdb_stdout
);
170 print_section_table (abfd
, asect
, ignore
)
177 flags
= bfd_get_section_flags (abfd
, asect
);
179 /* FIXME-32x64: Need print_address_numeric with field width. */
180 printf_filtered (" %s",
181 local_hex_string_custom
182 ((unsigned long) bfd_section_vma (abfd
, asect
), "08l"));
183 printf_filtered ("->%s",
184 local_hex_string_custom
185 ((unsigned long) (bfd_section_vma (abfd
, asect
)
186 + bfd_section_size (abfd
, asect
)),
188 printf_filtered (" at %s",
189 local_hex_string_custom
190 ((unsigned long) asect
->filepos
, "08l"));
191 printf_filtered (": %s", bfd_section_name (abfd
, asect
));
193 if (flags
& SEC_ALLOC
)
194 printf_filtered (" ALLOC");
195 if (flags
& SEC_LOAD
)
196 printf_filtered (" LOAD");
197 if (flags
& SEC_RELOC
)
198 printf_filtered (" RELOC");
199 if (flags
& SEC_READONLY
)
200 printf_filtered (" READONLY");
201 if (flags
& SEC_CODE
)
202 printf_filtered (" CODE");
203 if (flags
& SEC_DATA
)
204 printf_filtered (" DATA");
206 printf_filtered (" ROM");
207 if (flags
& SEC_CONSTRUCTOR
)
208 printf_filtered (" CONSTRUCTOR");
209 if (flags
& SEC_HAS_CONTENTS
)
210 printf_filtered (" HAS_CONTENTS");
211 if (flags
& SEC_NEVER_LOAD
)
212 printf_filtered (" NEVER_LOAD");
213 if (flags
& SEC_COFF_SHARED_LIBRARY
)
214 printf_filtered (" COFF_SHARED_LIBRARY");
215 if (flags
& SEC_IS_COMMON
)
216 printf_filtered (" IS_COMMON");
218 printf_filtered ("\n");
223 maintenance_info_sections (arg
, from_tty
)
229 printf_filtered ("Exec file:\n");
230 printf_filtered (" `%s', ", bfd_get_filename(exec_bfd
));
232 printf_filtered ("file type %s.\n", bfd_get_target(exec_bfd
));
233 bfd_map_over_sections(exec_bfd
, print_section_table
, 0);
238 printf_filtered ("Core file:\n");
239 printf_filtered (" `%s', ", bfd_get_filename(core_bfd
));
241 printf_filtered ("file type %s.\n", bfd_get_target(core_bfd
));
242 bfd_map_over_sections(core_bfd
, print_section_table
, 0);
248 maintenance_print_statistics (args
, from_tty
)
252 print_objfile_statistics ();
255 /* The "maintenance print" command is defined as a prefix, with allow_unknown
256 0. Therefore, its own definition is called only for "maintenance print"
261 maintenance_print_command (arg
, from_tty
)
265 printf_unfiltered ("\"maintenance print\" must be followed by the name of a print command.\n");
266 help_list (maintenanceprintlist
, "maintenance print ", -1, gdb_stdout
);
269 #endif /* MAINTENANCE_CMDS */
272 _initialize_maint_cmds ()
274 #if MAINTENANCE_CMDS /* Entire file goes away if not including maint cmds */
275 add_prefix_cmd ("maintenance", class_maintenance
, maintenance_command
,
276 "Commands for use by GDB maintainers.\n\
277 Includes commands to dump specific internal GDB structures in\n\
278 a human readable form, to cause GDB to deliberately dump core,\n\
279 to test internal functions such as the C++ demangler, etc.",
280 &maintenancelist
, "maintenance ", 0,
283 add_com_alias ("mt", "maintenance", class_maintenance
, 1);
285 add_prefix_cmd ("info", class_maintenance
, maintenance_info_command
,
286 "Commands for showing internal info about the program being debugged.",
287 &maintenanceinfolist
, "maintenance info ", 0,
290 add_cmd ("sections", class_maintenance
, maintenance_info_sections
,
291 "List the BFD sections of the exec and core files.",
292 &maintenanceinfolist
);
294 add_prefix_cmd ("print", class_maintenance
, maintenance_print_command
,
295 "Maintenance command for printing GDB internal state.",
296 &maintenanceprintlist
, "maintenance print ", 0,
299 add_cmd ("dump-me", class_maintenance
, maintenance_dump_me
,
300 "Get fatal error; make debugger dump its core.\n\
301 GDB sets it's handling of SIGQUIT back to SIG_DFL and then sends\n\
302 itself a SIGQUIT signal.",
305 add_cmd ("demangle", class_maintenance
, maintenance_demangle
,
306 "Demangle a C++ mangled name.\n\
307 Call internal GDB demangler routine to demangle a C++ link name\n\
308 and prints the result.",
311 add_cmd ("time", class_maintenance
, maintenance_time_display
,
312 "Set the display of time usage.\n\
313 If nonzero, will cause the execution time for each command to be\n\
314 displayed, following the command's output.",
317 add_cmd ("space", class_maintenance
, maintenance_space_display
,
318 "Set the display of space usage.\n\
319 If nonzero, will cause the execution space for each command to be\n\
320 displayed, following the command's output.",
323 add_cmd ("type", class_maintenance
, maintenance_print_type
,
324 "Print a type chain for a given symbol.\n\
325 For each node in a type chain, print the raw data for each member of\n\
326 the type structure, and the interpretation of the data.",
327 &maintenanceprintlist
);
329 add_cmd ("symbols", class_maintenance
, maintenance_print_symbols
,
330 "Print dump of current symbol definitions.\n\
331 Entries in the full symbol table are dumped to file OUTFILE.\n\
332 If a SOURCE file is specified, dump only that file's symbols.",
333 &maintenanceprintlist
);
335 add_cmd ("msymbols", class_maintenance
, maintenance_print_msymbols
,
336 "Print dump of current minimal symbol definitions.\n\
337 Entries in the minimal symbol table are dumped to file OUTFILE.\n\
338 If a SOURCE file is specified, dump only that file's minimal symbols.",
339 &maintenanceprintlist
);
341 add_cmd ("psymbols", class_maintenance
, maintenance_print_psymbols
,
342 "Print dump of current partial symbol definitions.\n\
343 Entries in the partial symbol table are dumped to file OUTFILE.\n\
344 If a SOURCE file is specified, dump only that file's partial symbols.",
345 &maintenanceprintlist
);
347 add_cmd ("objfiles", class_maintenance
, maintenance_print_objfiles
,
348 "Print dump of current object file definitions.",
349 &maintenanceprintlist
);
351 add_cmd ("statistics", class_maintenance
, maintenance_print_statistics
,
352 "Print statistics about internal gdb state.",
353 &maintenanceprintlist
);
355 add_cmd ("check-symtabs", class_maintenance
, maintenance_check_symtabs
,
356 "Check consistency of psymtabs and symtabs.",
360 add_set_cmd ("watchdog", class_maintenance
, var_zinteger
, (char *)&watchdog
,
361 "Set watchdog timer.\n\
362 When non-zero, this timeout is used instead of waiting forever for a target to\n\
363 finish a low-level step or continue operation. If the specified amount of time\n\
364 passes without a response from the target, an error occurs.", &setlist
),
366 #endif /* MAINTENANCE_CMDS */