* stabsread.c (get_substring): Declare second arg as int.
[deliverable/binutils-gdb.git] / gdb / maint.c
CommitLineData
0239d9b3 1/* Support for GDB maintenance commands.
43ab4ba5 2 Copyright 1992, 1993, 1994 Free Software Foundation, Inc.
0239d9b3
FF
3 Written by Fred Fish at Cygnus Support.
4
5This file is part of GDB.
6
7This program is free software; you can redistribute it and/or modify
8it under the terms of the GNU General Public License as published by
9the Free Software Foundation; either version 2 of the License, or
10(at your option) any later version.
11
12This program is distributed in the hope that it will be useful,
13but WITHOUT ANY WARRANTY; without even the implied warranty of
14MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15GNU General Public License for more details.
16
17You should have received a copy of the GNU General Public License
18along with this program; if not, write to the Free Software
6c9638b4 19Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
0239d9b3
FF
20
21
22#include "defs.h"
23
2dd30c72 24#if MAINTENANCE_CMDS /* Entire rest of file goes away if not including maint cmds */
0239d9b3
FF
25
26#include <signal.h>
27#include "command.h"
28#include "gdbcmd.h"
29#include "symtab.h"
30#include "gdbtypes.h"
311592ff 31#include "demangle.h"
b1eaba9a 32#include "gdbcore.h"
100f92e2
JK
33#include "expression.h" /* For language.h */
34#include "language.h"
b52cac6b
FF
35#include "symfile.h"
36#include "objfiles.h"
0239d9b3 37
1a494973
C
38#ifdef HAVE_UNISTD_H
39#include <unistd.h>
40#endif
41
43ab4ba5 42static void maintenance_command PARAMS ((char *, int));
0239d9b3 43
43ab4ba5 44static void maintenance_dump_me PARAMS ((char *, int));
0239d9b3 45
43ab4ba5
SS
46static void maintenance_demangle PARAMS ((char *, int));
47
48static void maintenance_time_display PARAMS ((char *, int));
49
50static void maintenance_space_display PARAMS ((char *, int));
311592ff 51
b607efe7
FF
52static void maintenance_info_command PARAMS ((char *, int));
53
54static void print_section_table PARAMS ((bfd *, asection *, PTR));
55
56static void maintenance_info_sections PARAMS ((char *, int));
57
58static void maintenance_print_command PARAMS ((char *, int));
59
4887063b
SG
60/* Set this to the maximum number of seconds to wait instead of waiting forever
61 in target_wait(). If this timer times out, then it generates an error and
62 the command is aborted. This replaces most of the need for timeouts in the
63 GDB test suite, and makes it possible to distinguish between a hung target
64 and one with slow communications. */
65
66int watchdog = 0;
67
0239d9b3
FF
68/*
69
70LOCAL FUNCTION
71
72 maintenance_command -- access the maintenance subcommands
73
74SYNOPSIS
75
76 void maintenance_command (char *args, int from_tty)
77
78DESCRIPTION
79
80*/
81
82static void
83maintenance_command (args, from_tty)
84 char *args;
85 int from_tty;
86{
199b2450
TL
87 printf_unfiltered ("\"maintenance\" must be followed by the name of a maintenance command.\n");
88 help_list (maintenancelist, "maintenance ", -1, gdb_stdout);
0239d9b3
FF
89}
90
91
92/* ARGSUSED */
93static void
94maintenance_dump_me (args, from_tty)
95 char *args;
96 int from_tty;
97{
98 if (query ("Should GDB dump core? "))
99 {
100 signal (SIGQUIT, SIG_DFL);
101 kill (getpid (), SIGQUIT);
102 }
103}
104
311592ff
FF
105/* Someday we should allow demangling for things other than just
106 explicit strings. For example, we might want to be able to
107 specify the address of a string in either GDB's process space
108 or the debuggee's process space, and have gdb fetch and demangle
109 that string. If we have a char* pointer "ptr" that points to
110 a string, we might want to be able to given just the name and
111 have GDB demangle and print what it points to, etc. (FIXME) */
112
113static void
114maintenance_demangle (args, from_tty)
115 char *args;
116 int from_tty;
117{
118 char *demangled;
119
120 if (args == NULL || *args == '\0')
121 {
199b2450 122 printf_unfiltered ("\"maintenance demangle\" takes an argument to demangle.\n");
311592ff
FF
123 }
124 else
125 {
126 demangled = cplus_demangle (args, DMGL_ANSI | DMGL_PARAMS);
127 if (demangled != NULL)
128 {
199b2450 129 printf_unfiltered ("%s\n", demangled);
311592ff
FF
130 free (demangled);
131 }
132 else
133 {
199b2450 134 printf_unfiltered ("Can't demangle \"%s\"\n", args);
311592ff
FF
135 }
136 }
137}
138
43ab4ba5
SS
139static void
140maintenance_time_display (args, from_tty)
141 char *args;
142 int from_tty;
143{
144 extern int display_time;
145
146 if (args == NULL || *args == '\0')
147 printf_unfiltered ("\"maintenance time\" takes a numeric argument.\n");
148 else
149 display_time = strtol (args, NULL, 10);
150}
151
152static void
153maintenance_space_display (args, from_tty)
154 char *args;
155 int from_tty;
156{
157 extern int display_space;
158
159 if (args == NULL || *args == '\0')
160 printf_unfiltered ("\"maintenance space\" takes a numeric argument.\n");
161 else
162 display_space = strtol (args, NULL, 10);
163}
164
0239d9b3
FF
165/* The "maintenance info" command is defined as a prefix, with allow_unknown 0.
166 Therefore, its own definition is called only for "maintenance info" with
167 no args. */
168
169/* ARGSUSED */
170static void
171maintenance_info_command (arg, from_tty)
172 char *arg;
173 int from_tty;
174{
199b2450
TL
175 printf_unfiltered ("\"maintenance info\" must be followed by the name of an info command.\n");
176 help_list (maintenanceinfolist, "maintenance info ", -1, gdb_stdout);
0239d9b3
FF
177}
178
b1eaba9a
SG
179static void
180print_section_table (abfd, asect, ignore)
181 bfd *abfd;
182 asection *asect;
183 PTR ignore;
184{
185 flagword flags;
186
187 flags = bfd_get_section_flags (abfd, asect);
188
833e0d94 189 /* FIXME-32x64: Need print_address_numeric with field width. */
b1eaba9a 190 printf_filtered (" %s",
5573d7d4
JK
191 local_hex_string_custom
192 ((unsigned long) bfd_section_vma (abfd, asect), "08l"));
b1eaba9a 193 printf_filtered ("->%s",
5573d7d4
JK
194 local_hex_string_custom
195 ((unsigned long) (bfd_section_vma (abfd, asect)
196 + bfd_section_size (abfd, asect)),
197 "08l"));
198 printf_filtered (" at %s",
199 local_hex_string_custom
200 ((unsigned long) asect->filepos, "08l"));
b1eaba9a
SG
201 printf_filtered (": %s", bfd_section_name (abfd, asect));
202
203 if (flags & SEC_ALLOC)
204 printf_filtered (" ALLOC");
205 if (flags & SEC_LOAD)
206 printf_filtered (" LOAD");
207 if (flags & SEC_RELOC)
208 printf_filtered (" RELOC");
209 if (flags & SEC_READONLY)
210 printf_filtered (" READONLY");
211 if (flags & SEC_CODE)
212 printf_filtered (" CODE");
213 if (flags & SEC_DATA)
214 printf_filtered (" DATA");
215 if (flags & SEC_ROM)
216 printf_filtered (" ROM");
217 if (flags & SEC_CONSTRUCTOR)
218 printf_filtered (" CONSTRUCTOR");
219 if (flags & SEC_HAS_CONTENTS)
220 printf_filtered (" HAS_CONTENTS");
221 if (flags & SEC_NEVER_LOAD)
222 printf_filtered (" NEVER_LOAD");
0286d386
ILT
223 if (flags & SEC_COFF_SHARED_LIBRARY)
224 printf_filtered (" COFF_SHARED_LIBRARY");
b1eaba9a
SG
225 if (flags & SEC_IS_COMMON)
226 printf_filtered (" IS_COMMON");
227
228 printf_filtered ("\n");
229}
230
231/* ARGSUSED */
232static void
233maintenance_info_sections (arg, from_tty)
234 char *arg;
235 int from_tty;
236{
237 if (exec_bfd)
238 {
239 printf_filtered ("Exec file:\n");
240 printf_filtered (" `%s', ", bfd_get_filename(exec_bfd));
241 wrap_here (" ");
242 printf_filtered ("file type %s.\n", bfd_get_target(exec_bfd));
243 bfd_map_over_sections(exec_bfd, print_section_table, 0);
244 }
245
246 if (core_bfd)
247 {
248 printf_filtered ("Core file:\n");
249 printf_filtered (" `%s', ", bfd_get_filename(core_bfd));
250 wrap_here (" ");
251 printf_filtered ("file type %s.\n", bfd_get_target(core_bfd));
252 bfd_map_over_sections(core_bfd, print_section_table, 0);
253 }
254}
255
2dd30c72
FF
256/* ARGSUSED */
257void
258maintenance_print_statistics (args, from_tty)
259 char *args;
260 int from_tty;
261{
262 print_objfile_statistics ();
2ad5709f 263 print_symbol_bcache_statistics ();
2dd30c72
FF
264}
265
311592ff
FF
266/* The "maintenance print" command is defined as a prefix, with allow_unknown
267 0. Therefore, its own definition is called only for "maintenance print"
268 with no args. */
269
270/* ARGSUSED */
271static void
272maintenance_print_command (arg, from_tty)
273 char *arg;
274 int from_tty;
275{
199b2450
TL
276 printf_unfiltered ("\"maintenance print\" must be followed by the name of a print command.\n");
277 help_list (maintenanceprintlist, "maintenance print ", -1, gdb_stdout);
311592ff
FF
278}
279
976bb0be 280#endif /* MAINTENANCE_CMDS */
0239d9b3
FF
281
282void
283_initialize_maint_cmds ()
284{
976bb0be 285#if MAINTENANCE_CMDS /* Entire file goes away if not including maint cmds */
0239d9b3
FF
286 add_prefix_cmd ("maintenance", class_maintenance, maintenance_command,
287 "Commands for use by GDB maintainers.\n\
288Includes commands to dump specific internal GDB structures in\n\
311592ff
FF
289a human readable form, to cause GDB to deliberately dump core,\n\
290to test internal functions such as the C++ demangler, etc.",
2e9309df 291 &maintenancelist, "maintenance ", 0,
0239d9b3
FF
292 &cmdlist);
293
327f7197 294 add_com_alias ("mt", "maintenance", class_maintenance, 1);
311592ff 295
327f7197
JG
296 add_prefix_cmd ("info", class_maintenance, maintenance_info_command,
297 "Commands for showing internal info about the program being debugged.",
2e9309df 298 &maintenanceinfolist, "maintenance info ", 0,
0239d9b3
FF
299 &maintenancelist);
300
b1eaba9a
SG
301 add_cmd ("sections", class_maintenance, maintenance_info_sections,
302 "List the BFD sections of the exec and core files.",
303 &maintenanceinfolist);
304
311592ff
FF
305 add_prefix_cmd ("print", class_maintenance, maintenance_print_command,
306 "Maintenance command for printing GDB internal state.",
307 &maintenanceprintlist, "maintenance print ", 0,
308 &maintenancelist);
309
0239d9b3
FF
310 add_cmd ("dump-me", class_maintenance, maintenance_dump_me,
311 "Get fatal error; make debugger dump its core.\n\
312GDB sets it's handling of SIGQUIT back to SIG_DFL and then sends\n\
313itself a SIGQUIT signal.",
314 &maintenancelist);
315
311592ff
FF
316 add_cmd ("demangle", class_maintenance, maintenance_demangle,
317 "Demangle a C++ mangled name.\n\
318Call internal GDB demangler routine to demangle a C++ link name\n\
319and prints the result.",
320 &maintenancelist);
321
43ab4ba5
SS
322 add_cmd ("time", class_maintenance, maintenance_time_display,
323 "Set the display of time usage.\n\
324If nonzero, will cause the execution time for each command to be\n\
325displayed, following the command's output.",
326 &maintenancelist);
327
328 add_cmd ("space", class_maintenance, maintenance_space_display,
329 "Set the display of space usage.\n\
330If nonzero, will cause the execution space for each command to be\n\
331displayed, following the command's output.",
332 &maintenancelist);
333
311592ff 334 add_cmd ("type", class_maintenance, maintenance_print_type,
0239d9b3
FF
335 "Print a type chain for a given symbol.\n\
336For each node in a type chain, print the raw data for each member of\n\
337the type structure, and the interpretation of the data.",
311592ff 338 &maintenanceprintlist);
0239d9b3 339
311592ff 340 add_cmd ("symbols", class_maintenance, maintenance_print_symbols,
0239d9b3
FF
341 "Print dump of current symbol definitions.\n\
342Entries in the full symbol table are dumped to file OUTFILE.\n\
343If a SOURCE file is specified, dump only that file's symbols.",
311592ff 344 &maintenanceprintlist);
0239d9b3 345
311592ff 346 add_cmd ("msymbols", class_maintenance, maintenance_print_msymbols,
0239d9b3
FF
347 "Print dump of current minimal symbol definitions.\n\
348Entries in the minimal symbol table are dumped to file OUTFILE.\n\
349If a SOURCE file is specified, dump only that file's minimal symbols.",
311592ff 350 &maintenanceprintlist);
0239d9b3 351
311592ff 352 add_cmd ("psymbols", class_maintenance, maintenance_print_psymbols,
0239d9b3
FF
353 "Print dump of current partial symbol definitions.\n\
354Entries in the partial symbol table are dumped to file OUTFILE.\n\
355If a SOURCE file is specified, dump only that file's partial symbols.",
311592ff 356 &maintenanceprintlist);
0239d9b3 357
311592ff 358 add_cmd ("objfiles", class_maintenance, maintenance_print_objfiles,
0239d9b3 359 "Print dump of current object file definitions.",
311592ff 360 &maintenanceprintlist);
71c33ef7 361
2dd30c72
FF
362 add_cmd ("statistics", class_maintenance, maintenance_print_statistics,
363 "Print statistics about internal gdb state.",
364 &maintenanceprintlist);
365
71c33ef7
PS
366 add_cmd ("check-symtabs", class_maintenance, maintenance_check_symtabs,
367 "Check consistency of psymtabs and symtabs.",
368 &maintenancelist);
4887063b
SG
369
370 add_show_from_set (
371 add_set_cmd ("watchdog", class_maintenance, var_zinteger, (char *)&watchdog,
372 "Set watchdog timer.\n\
373When non-zero, this timeout is used instead of waiting forever for a target to\n\
374finish a low-level step or continue operation. If the specified amount of time\n\
375passes without a response from the target, an error occurs.", &setlist),
376 &showlist);
0239d9b3 377#endif /* MAINTENANCE_CMDS */
976bb0be 378}
This page took 0.21652 seconds and 4 git commands to generate.