1 /* Memory-access and commands for "inferior" (child) process, for GDB.
2 Copyright 1986, 1987, 1988, 1989, 1991, 1992 Free Software Foundation, Inc.
4 This file is part of GDB.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
22 #include <sys/param.h>
35 continue_command
PARAMS ((char *, int));
38 until_next_command
PARAMS ((int));
41 until_command
PARAMS ((char *, int));
44 path_info
PARAMS ((char *, int));
47 path_command
PARAMS ((char *, int));
50 unset_command
PARAMS ((char *, int));
53 float_info
PARAMS ((char *, int));
56 detach_command
PARAMS ((char *, int));
59 nofp_registers_info
PARAMS ((char *, int));
62 all_registers_info
PARAMS ((char *, int));
65 registers_info
PARAMS ((char *, int));
68 do_registers_info
PARAMS ((int, int));
71 unset_environment_command
PARAMS ((char *, int));
74 set_environment_command
PARAMS ((char *, int));
77 environment_info
PARAMS ((char *, int));
80 program_info
PARAMS ((char *, int));
83 finish_command
PARAMS ((char *, int));
86 signal_command
PARAMS ((char *, int));
89 jump_command
PARAMS ((char *, int));
92 step_1
PARAMS ((int, int, char *));
95 nexti_command
PARAMS ((char *, int));
98 stepi_command
PARAMS ((char *, int));
101 next_command
PARAMS ((char *, int));
104 step_command
PARAMS ((char *, int));
107 run_command
PARAMS ((char *, int));
109 #define ERROR_NO_INFERIOR \
110 if (!target_has_execution) error ("The program is not being run.");
112 /* String containing arguments to give to the program, separated by spaces.
113 Empty string (pointer to '\0') means no args. */
115 static char *inferior_args
;
117 /* File name for default use for standard in/out in the inferior. */
119 char *inferior_io_terminal
;
121 /* Pid of our debugged inferior, or 0 if no inferior now.
122 Since various parts of infrun.c test this to see whether there is a program
123 being debugged it should be nonzero (currently 3 is used) for remote
128 /* Last signal that the inferior received (why it stopped). */
132 /* Address at which inferior stopped. */
136 /* Stack frame when program stopped. */
138 FRAME_ADDR stop_frame_address
;
140 /* Chain containing status of breakpoint(s) that we have stopped at. */
144 /* Flag indicating that a command has proceeded the inferior past the
145 current breakpoint. */
147 int breakpoint_proceeded
;
149 /* Nonzero if stopped due to a step command. */
153 /* Nonzero if stopped due to completion of a stack dummy routine. */
155 int stop_stack_dummy
;
157 /* Nonzero if stopped due to a random (unexpected) signal in inferior
160 int stopped_by_random_signal
;
162 /* Range to single step within.
163 If this is nonzero, respond to a single-step signal
164 by continuing to step if the pc is in this range. */
166 CORE_ADDR step_range_start
; /* Inclusive */
167 CORE_ADDR step_range_end
; /* Exclusive */
169 /* Stack frame address as of when stepping command was issued.
170 This is how we know when we step into a subroutine call,
171 and how to set the frame for the breakpoint used to step out. */
173 FRAME_ADDR step_frame_address
;
175 /* 1 means step over all subroutine calls.
176 0 means don't step over calls (used by stepi).
177 -1 means step over calls to undebuggable functions. */
181 /* If stepping, nonzero means step count is > 1
182 so don't print frame next time inferior stops
183 if it stops due to stepping. */
187 /* Environment to use for running inferior,
188 in format described in environ.h. */
190 struct environ
*inferior_environ
;
195 tty_command (file
, from_tty
)
200 error_no_arg ("terminal name for running target process");
202 inferior_io_terminal
= savestring (file
, strlen (file
));
206 run_command (args
, from_tty
)
217 !query ("The program being debugged has been started already.\n\
218 Start it from the beginning? "))
219 error ("Program not restarted.");
223 exec_file
= (char *) get_exec_file (0);
225 /* The exec file is re-read every time we do a generic_mourn_inferior, so
226 we just have to worry about the symbol file. */
232 cmd
= concat ("set args ", args
, NULL
);
233 make_cleanup (free
, cmd
);
234 execute_command (cmd
, from_tty
);
239 puts_filtered("Starting program: ");
241 puts_filtered(exec_file
);
243 puts_filtered(inferior_args
);
248 target_create_inferior (exec_file
, inferior_args
,
249 environ_vector (inferior_environ
));
253 continue_command (proc_count_exp
, from_tty
)
254 char *proc_count_exp
;
259 /* If have argument, set proceed count of breakpoint we stopped at. */
261 if (proc_count_exp
!= NULL
)
263 bpstat bs
= stop_bpstat
;
264 int num
= bpstat_num (&bs
);
265 if (num
== 0 && from_tty
)
268 ("Not stopped at any breakpoint; argument ignored.\n");
272 set_ignore_count (num
,
273 parse_and_eval_address (proc_count_exp
) - 1,
275 /* set_ignore_count prints a message ending with a period.
276 So print two spaces before "Continuing.". */
278 printf_filtered (" ");
279 num
= bpstat_num (&bs
);
284 printf_filtered ("Continuing.\n");
286 clear_proceed_status ();
288 proceed ((CORE_ADDR
) -1, -1, 0);
291 /* Step until outside of current statement. */
295 step_command (count_string
, from_tty
)
299 step_1 (0, 0, count_string
);
302 /* Likewise, but skip over subroutine calls as if single instructions. */
306 next_command (count_string
, from_tty
)
310 step_1 (1, 0, count_string
);
313 /* Likewise, but step only one instruction. */
317 stepi_command (count_string
, from_tty
)
321 step_1 (0, 1, count_string
);
326 nexti_command (count_string
, from_tty
)
330 step_1 (1, 1, count_string
);
334 step_1 (skip_subroutines
, single_inst
, count_string
)
335 int skip_subroutines
;
339 register int count
= 1;
341 struct cleanup
*cleanups
= 0;
344 count
= count_string
? parse_and_eval_address (count_string
) : 1;
346 if (!single_inst
|| skip_subroutines
) /* leave si command alone */
348 enable_longjmp_breakpoint();
349 cleanups
= make_cleanup(disable_longjmp_breakpoint
, 0);
352 for (; count
> 0; count
--)
354 clear_proceed_status ();
356 fr
= get_current_frame ();
357 if (!fr
) /* Avoid coredump here. Why tho? */
358 error ("No current frame");
359 step_frame_address
= FRAME_FP (fr
);
363 find_pc_line_pc_range (stop_pc
, &step_range_start
, &step_range_end
);
364 if (step_range_end
== 0)
367 if (find_pc_partial_function (stop_pc
, &name
, &step_range_start
,
368 &step_range_end
) == 0)
369 error ("Cannot find bounds of current function");
371 target_terminal_ours ();
373 Single stepping until exit from function %s, \n\
374 which has no line number information.\n", name
);
380 /* Say we are stepping, but stop after one insn whatever it does. */
381 step_range_start
= step_range_end
= 1;
382 if (!skip_subroutines
)
384 Don't step over function calls, not even to functions lacking
389 if (skip_subroutines
)
392 step_multi
= (count
> 1);
393 proceed ((CORE_ADDR
) -1, -1, 1);
396 #if defined (SHIFT_INST_REGS)
397 write_register (NNPC_REGNUM
, read_register (NPC_REGNUM
));
398 write_register (NPC_REGNUM
, read_register (PC_REGNUM
));
402 if (!single_inst
|| skip_subroutines
)
403 do_cleanups(cleanups
);
406 /* Continue program at specified address. */
409 jump_command (arg
, from_tty
)
413 register CORE_ADDR addr
;
414 struct symtabs_and_lines sals
;
415 struct symtab_and_line sal
;
422 error_no_arg ("starting address");
424 sals
= decode_line_spec_1 (arg
, 1);
427 error ("Unreasonable jump request");
431 free ((PTR
)sals
.sals
);
433 if (sal
.symtab
== 0 && sal
.pc
== 0)
434 error ("No source file has been specified.");
436 resolve_sal_pc (&sal
); /* May error out */
438 /* See if we are trying to jump to another function. */
439 fn
= get_frame_function (get_current_frame ());
440 sfn
= find_pc_function (sal
.pc
);
441 if (fn
!= NULL
&& sfn
!= fn
)
443 if (!query ("Line %d is not in `%s'. Jump anyway? ", sal
.line
,
444 SYMBOL_SOURCE_NAME (fn
)))
446 error ("Not confirmed.");
451 addr
= ADDR_BITS_SET (sal
.pc
);
454 printf_filtered ("Continuing at %s.\n", local_hex_string(addr
));
456 clear_proceed_status ();
457 proceed (addr
, 0, 0);
460 /* Continue program giving it specified signal. */
463 signal_command (signum_exp
, from_tty
)
469 dont_repeat (); /* Too dangerous. */
473 error_no_arg ("signal number");
475 /* It would be even slicker to make signal names be valid expressions,
476 (the type could be "enum $signal" or some such), then the user could
477 assign them to convenience variables. */
478 signum
= strtosigno (signum_exp
);
481 /* Not found as a name, try it as an expression. */
482 signum
= parse_and_eval_address (signum_exp
);
486 char *signame
= strsigno (signum
);
487 printf_filtered ("Continuing with signal ");
488 if (signame
== NULL
|| signum
== 0)
489 printf_filtered ("%d.\n", signum
);
491 /* Do we need to print the number as well as the name? */
492 printf_filtered ("%s (%d).\n", signame
, signum
);
495 clear_proceed_status ();
496 proceed (stop_pc
, signum
, 0);
499 /* Execute a "stack dummy", a piece of code stored in the stack
500 by the debugger to be executed in the inferior.
502 To call: first, do PUSH_DUMMY_FRAME.
503 Then push the contents of the dummy. It should end with a breakpoint insn.
504 Then call here, passing address at which to start the dummy.
506 The contents of all registers are saved before the dummy frame is popped
507 and copied into the buffer BUFFER.
509 The dummy's frame is automatically popped whenever that break is hit.
510 If that is the first time the program stops, run_stack_dummy
511 returns to its caller with that frame already gone and returns 0.
512 Otherwise, run_stack-dummy returns 1 (the frame will eventually be popped
513 when we do hit that breakpoint). */
515 /* DEBUG HOOK: 4 => return instead of letting the stack dummy run. */
517 static int stack_dummy_testing
= 0;
520 run_stack_dummy (addr
, buffer
)
522 char buffer
[REGISTER_BYTES
];
524 /* Now proceed, having reached the desired place. */
525 clear_proceed_status ();
526 if (stack_dummy_testing
& 4)
531 proceed_to_finish
= 1; /* We want stop_registers, please... */
532 proceed (addr
, 0, 0);
534 if (!stop_stack_dummy
)
537 /* On return, the stack dummy has been popped already. */
539 memcpy (buffer
, stop_registers
, sizeof stop_registers
);
543 /* Proceed until we reach a different source line with pc greater than
544 our current one or exit the function. We skip calls in both cases.
546 Note that eventually this command should probably be changed so
547 that only source lines are printed out when we hit the breakpoint
548 we set. I'm going to postpone this until after a hopeful rewrite
549 of wait_for_inferior and the proceed status code. -- randy */
553 until_next_command (from_tty
)
559 struct symtab_and_line sal
;
561 clear_proceed_status ();
563 frame
= get_current_frame ();
565 /* Step until either exited from this function or greater
566 than the current line (if in symbolic section) or pc (if
570 func
= find_pc_function (pc
);
574 struct minimal_symbol
*msymbol
= lookup_minimal_symbol_by_pc (pc
);
577 error ("Execution is not within a known function.");
579 step_range_start
= SYMBOL_VALUE_ADDRESS (msymbol
);
584 sal
= find_pc_line (pc
, 0);
586 step_range_start
= BLOCK_START (SYMBOL_BLOCK_VALUE (func
));
587 step_range_end
= sal
.end
;
591 step_frame_address
= FRAME_FP (frame
);
593 step_multi
= 0; /* Only one call to proceed */
595 proceed ((CORE_ADDR
) -1, -1, 1);
599 until_command (arg
, from_tty
)
603 if (!target_has_execution
)
604 error ("The program is not running.");
606 until_break_command (arg
, from_tty
);
608 until_next_command (from_tty
);
611 /* "finish": Set a temporary breakpoint at the place
612 the selected frame will return to, then continue. */
615 finish_command (arg
, from_tty
)
619 struct symtab_and_line sal
;
620 register FRAME frame
;
621 struct frame_info
*fi
;
622 register struct symbol
*function
;
623 struct breakpoint
*breakpoint
;
624 struct cleanup
*old_chain
;
627 error ("The \"finish\" command does not take any arguments.");
628 if (!target_has_execution
)
629 error ("The program is not running.");
630 if (selected_frame
== NULL
)
631 error ("No selected frame.");
633 frame
= get_prev_frame (selected_frame
);
635 error ("\"finish\" not meaningful in the outermost frame.");
637 clear_proceed_status ();
639 fi
= get_frame_info (frame
);
640 sal
= find_pc_line (fi
->pc
, 0);
643 breakpoint
= set_momentary_breakpoint (sal
, frame
, bp_finish
);
645 old_chain
= make_cleanup(delete_breakpoint
, breakpoint
);
647 /* Find the function we will return from. */
649 fi
= get_frame_info (selected_frame
);
650 function
= find_pc_function (fi
->pc
);
652 /* Print info on the selected frame, including level number
656 printf_filtered ("Run till exit from ");
657 print_stack_frame (selected_frame
, selected_frame_level
, 0);
660 proceed_to_finish
= 1; /* We want stop_registers, please... */
661 proceed ((CORE_ADDR
) -1, -1, 0);
663 /* Did we stop at our breakpoint? */
664 if (bpstat_find_breakpoint(stop_bpstat
, breakpoint
) != NULL
667 struct type
*value_type
;
671 value_type
= TYPE_TARGET_TYPE (SYMBOL_TYPE (function
));
673 fatal ("internal: finish_command: function has no target type");
675 if (TYPE_CODE (value_type
) == TYPE_CODE_VOID
)
678 funcaddr
= BLOCK_START (SYMBOL_BLOCK_VALUE (function
));
680 val
= value_being_returned (value_type
, stop_registers
,
681 using_struct_return (value_of_variable (function
, NULL
),
684 BLOCK_GCC_COMPILED (SYMBOL_BLOCK_VALUE (function
))));
686 printf_filtered ("Value returned is $%d = ", record_latest_value (val
));
687 value_print (val
, stdout
, 0, Val_no_prettyprint
);
688 printf_filtered ("\n");
690 do_cleanups(old_chain
);
695 program_info (args
, from_tty
)
699 bpstat bs
= stop_bpstat
;
700 int num
= bpstat_num (&bs
);
702 if (!target_has_execution
)
704 printf_filtered ("The program being debugged is not being run.\n");
708 target_files_info ();
709 printf_filtered ("Program stopped at %s.\n", local_hex_string(stop_pc
));
711 printf_filtered ("It stopped after being stepped.\n");
714 /* There may be several breakpoints in the same place, so this
715 isn't as strange as it seems. */
719 printf_filtered ("It stopped at a breakpoint that has since been deleted.\n");
721 printf_filtered ("It stopped at breakpoint %d.\n", num
);
722 num
= bpstat_num (&bs
);
725 else if (stop_signal
)
727 #ifdef PRINT_RANDOM_SIGNAL
728 PRINT_RANDOM_SIGNAL (stop_signal
);
730 char *signame
= strsigno (stop_signal
);
731 printf_filtered ("It stopped with signal ");
733 printf_filtered ("%d", stop_signal
);
735 /* Do we need to print the number as well as the name? */
736 printf_filtered ("%s (%d)", signame
, stop_signal
);
737 printf_filtered (", %s.\n", safe_strsignal (stop_signal
));
742 printf_filtered ("Type \"info stack\" or \"info registers\" for more information.\n");
746 environment_info (var
, from_tty
)
752 register char *val
= get_in_environ (inferior_environ
, var
);
756 puts_filtered (" = ");
758 puts_filtered ("\n");
762 puts_filtered ("Environment variable \"");
764 puts_filtered ("\" not defined.\n");
769 register char **vector
= environ_vector (inferior_environ
);
772 puts_filtered (*vector
++);
773 puts_filtered ("\n");
779 set_environment_command (arg
, from_tty
)
783 register char *p
, *val
, *var
;
787 error_no_arg ("environment variable and value");
789 /* Find seperation between variable name and value */
790 p
= (char *) strchr (arg
, '=');
791 val
= (char *) strchr (arg
, ' ');
793 if (p
!= 0 && val
!= 0)
795 /* We have both a space and an equals. If the space is before the
796 equals, walk forward over the spaces til we see a nonspace
797 (possibly the equals). */
802 /* Now if the = is after the char following the spaces,
803 take the char following the spaces. */
807 else if (val
!= 0 && p
== 0)
811 error_no_arg ("environment variable to set");
813 if (p
== 0 || p
[1] == 0)
817 p
= arg
+ strlen (arg
); /* So that savestring below will work */
821 /* Not setting variable value to null */
823 while (*val
== ' ' || *val
== '\t')
827 while (p
!= arg
&& (p
[-1] == ' ' || p
[-1] == '\t')) p
--;
829 var
= savestring (arg
, p
- arg
);
832 printf_filtered ("Setting environment variable \"%s\" to null value.\n", var
);
833 set_in_environ (inferior_environ
, var
, "");
836 set_in_environ (inferior_environ
, var
, val
);
841 unset_environment_command (var
, from_tty
)
847 /* If there is no argument, delete all environment variables.
848 Ask for confirmation if reading from the terminal. */
849 if (!from_tty
|| query ("Delete all environment variables? "))
851 free_environ (inferior_environ
);
852 inferior_environ
= make_environ ();
856 unset_in_environ (inferior_environ
, var
);
859 /* Handle the execution path (PATH variable) */
861 static const char path_var_name
[] = "PATH";
865 path_info (args
, from_tty
)
869 puts_filtered ("Executable and object file path: ");
870 puts_filtered (get_in_environ (inferior_environ
, path_var_name
));
871 puts_filtered ("\n");
874 /* Add zero or more directories to the front of the execution path. */
877 path_command (dirname
, from_tty
)
884 exec_path
= strsave (get_in_environ (inferior_environ
, path_var_name
));
885 mod_path (dirname
, &exec_path
);
886 set_in_environ (inferior_environ
, path_var_name
, exec_path
);
889 path_info ((char *)NULL
, from_tty
);
892 /* This routine is getting awfully cluttered with #if's. It's probably
893 time to turn this into READ_PC and define it in the tm.h file.
894 Ditto for write_pc. */
899 #ifdef TARGET_READ_PC
900 return TARGET_READ_PC ();
902 return ADDR_BITS_REMOVE ((CORE_ADDR
) read_register (PC_REGNUM
));
910 #ifdef TARGET_WRITE_PC
911 TARGET_WRITE_PC (val
);
913 write_register (PC_REGNUM
, (long) val
);
915 write_register (NPC_REGNUM
, (long) val
+ 4);
917 write_register (NNPC_REGNUM
, (long) val
+ 8);
924 /* Cope with strage ways of getting to the stack and frame pointers */
929 #ifdef TARGET_READ_SP
930 return TARGET_READ_SP ();
932 return read_register (SP_REGNUM
);
940 #ifdef TARGET_WRITE_SP
941 TARGET_WRITE_SP (val
);
943 write_register (SP_REGNUM
, val
);
951 #ifdef TARGET_READ_FP
952 return TARGET_READ_FP ();
954 return read_register (FP_REGNUM
);
962 #ifdef TARGET_WRITE_FP
963 TARGET_WRITE_FP (val
);
965 write_register (FP_REGNUM
, val
);
969 const char * const reg_names
[] = REGISTER_NAMES
;
971 /* Print out the machine register regnum. If regnum is -1,
972 print all registers (fpregs == 1) or all non-float registers
975 For most machines, having all_registers_info() print the
976 register(s) one per line is good enough. If a different format
977 is required, (eg, for MIPS or Pyramid 90x, which both have
978 lots of regs), or there is an existing convention for showing
979 all the registers, define the macro DO_REGISTERS_INFO(regnum, fp)
980 to provide that format. */
982 #if !defined (DO_REGISTERS_INFO)
983 #define DO_REGISTERS_INFO(regnum, fp) do_registers_info(regnum, fp)
985 do_registers_info (regnum
, fpregs
)
991 for (i
= 0; i
< NUM_REGS
; i
++)
993 char raw_buffer
[MAX_REGISTER_RAW_SIZE
];
994 char virtual_buffer
[MAX_REGISTER_VIRTUAL_SIZE
];
996 /* Decide between printing all regs, nonfloat regs, or specific reg. */
998 if (TYPE_CODE (REGISTER_VIRTUAL_TYPE (i
)) == TYPE_CODE_FLT
&& !fpregs
)
1005 fputs_filtered (reg_names
[i
], stdout
);
1006 print_spaces_filtered (15 - strlen (reg_names
[i
]), stdout
);
1008 /* Get the data in raw format, then convert also to virtual format. */
1009 if (read_relative_register_raw_bytes (i
, raw_buffer
))
1011 printf_filtered ("Invalid register contents\n");
1015 REGISTER_CONVERT_TO_VIRTUAL (i
, raw_buffer
, virtual_buffer
);
1017 /* If virtual format is floating, print it that way, and in raw hex. */
1018 if (TYPE_CODE (REGISTER_VIRTUAL_TYPE (i
)) == TYPE_CODE_FLT
1019 && ! INVALID_FLOAT (virtual_buffer
, REGISTER_VIRTUAL_SIZE (i
)))
1023 val_print (REGISTER_VIRTUAL_TYPE (i
), virtual_buffer
, 0,
1024 stdout
, 0, 1, 0, Val_pretty_default
);
1026 printf_filtered ("\t(raw 0x");
1027 for (j
= 0; j
< REGISTER_RAW_SIZE (i
); j
++)
1028 printf_filtered ("%02x", (unsigned char)raw_buffer
[j
]);
1029 printf_filtered (")");
1032 /* FIXME! val_print probably can handle all of these cases now... */
1034 /* Else if virtual format is too long for printf,
1035 print in hex a byte at a time. */
1036 else if (REGISTER_VIRTUAL_SIZE (i
) > sizeof (long))
1039 printf_filtered ("0x");
1040 for (j
= 0; j
< REGISTER_VIRTUAL_SIZE (i
); j
++)
1041 printf_filtered ("%02x", (unsigned char)virtual_buffer
[j
]);
1043 /* Else print as integer in hex and in decimal. */
1046 val_print (REGISTER_VIRTUAL_TYPE (i
), raw_buffer
, 0,
1047 stdout
, 'x', 1, 0, Val_pretty_default
);
1048 printf_filtered ("\t");
1049 val_print (REGISTER_VIRTUAL_TYPE (i
), raw_buffer
, 0,
1050 stdout
, 0, 1, 0, Val_pretty_default
);
1053 /* The SPARC wants to print even-numbered float regs as doubles
1054 in addition to printing them as floats. */
1055 #ifdef PRINT_REGISTER_HOOK
1056 PRINT_REGISTER_HOOK (i
);
1059 printf_filtered ("\n");
1062 #endif /* no DO_REGISTERS_INFO. */
1065 registers_info (addr_exp
, fpregs
)
1072 if (!target_has_registers
)
1073 error ("The program has no registers now.");
1077 DO_REGISTERS_INFO(-1, fpregs
);
1083 if (addr_exp
[0] == '$')
1086 while (*end
!= '\0' && *end
!= ' ' && *end
!= '\t')
1088 for (regnum
= 0; regnum
< NUM_REGS
; regnum
++)
1089 if (!strncmp (addr_exp
, reg_names
[regnum
], end
- addr_exp
)
1090 && strlen (reg_names
[regnum
]) == end
- addr_exp
)
1092 if (*addr_exp
>= '0' && *addr_exp
<= '9')
1093 regnum
= atoi (addr_exp
); /* Take a number */
1094 if (regnum
>= NUM_REGS
) /* Bad name, or bad number */
1095 error ("%.*s: invalid register", end
- addr_exp
, addr_exp
);
1098 DO_REGISTERS_INFO(regnum
, fpregs
);
1101 while (*addr_exp
== ' ' || *addr_exp
== '\t')
1103 } while (*addr_exp
!= '\0');
1107 all_registers_info (addr_exp
, from_tty
)
1111 registers_info (addr_exp
, 1);
1115 nofp_registers_info (addr_exp
, from_tty
)
1119 registers_info (addr_exp
, 0);
1124 * Should save/restore the tty state since it might be that the
1125 * program to be debugged was started on this tty and it wants
1126 * the tty in some state other than what we want. If it's running
1127 * on another terminal or without a terminal, then saving and
1128 * restoring the tty state is a harmless no-op.
1129 * This only needs to be done if we are attaching to a process.
1134 takes a program started up outside of gdb and ``attaches'' to it.
1135 This stops it cold in its tracks and allows us to start debugging it.
1136 and wait for the trace-trap that results from attaching. */
1139 attach_command (args
, from_tty
)
1143 dont_repeat (); /* Not for the faint of heart */
1145 if (target_has_execution
)
1147 if (query ("A program is being debugged already. Kill it? "))
1150 error ("Not killed.");
1153 target_attach (args
, from_tty
);
1155 /* Set up the "saved terminal modes" of the inferior
1156 based on what modes we are starting it with. */
1157 target_terminal_init ();
1159 /* Install inferior's terminal modes. */
1160 target_terminal_inferior ();
1162 /* Set up execution context to know that we should return from
1163 wait_for_inferior as soon as the target reports a stop. */
1164 init_wait_for_inferior ();
1165 clear_proceed_status ();
1166 stop_soon_quietly
= 1;
1168 wait_for_inferior ();
1171 /* Add shared library symbols from the newly attached process, if any. */
1172 SOLIB_ADD ((char *)0, from_tty
, (struct target_ops
*)0);
1180 * takes a program previously attached to and detaches it.
1181 * The program resumes execution and will no longer stop
1182 * on signals, etc. We better not have left any breakpoints
1183 * in the program or it'll die when it hits one. For this
1184 * to work, it may be necessary for the process to have been
1185 * previously attached. It *might* work if the program was
1186 * started via the normal ptrace (PTRACE_TRACEME).
1190 detach_command (args
, from_tty
)
1194 dont_repeat (); /* Not for the faint of heart */
1195 target_detach (args
, from_tty
);
1200 float_info (addr_exp
, from_tty
)
1207 printf_filtered ("No floating point info available for this processor.\n");
1213 unset_command (args
, from_tty
)
1217 printf_filtered ("\"unset\" must be followed by the name of an unset subcommand.\n");
1218 help_list (unsetlist
, "unset ", -1, stdout
);
1222 _initialize_infcmd ()
1224 struct cmd_list_element
*c
;
1226 add_com ("tty", class_run
, tty_command
,
1227 "Set terminal for future runs of program being debugged.");
1230 (add_set_cmd ("args", class_run
, var_string_noescape
, (char *)&inferior_args
,
1232 "Set arguments to give program being debugged when it is started.\n\
1233 Follow this command with any number of args, to be passed to the program.",
1238 ("environment", no_class
, environment_info
,
1239 "The environment to give the program, or one variable's value.\n\
1240 With an argument VAR, prints the value of environment variable VAR to\n\
1241 give the program being debugged. With no arguments, prints the entire\n\
1242 environment to be given to the program.", &showlist
);
1243 c
->completer
= noop_completer
;
1245 add_prefix_cmd ("unset", no_class
, unset_command
,
1246 "Complement to certain \"set\" commands",
1247 &unsetlist
, "unset ", 0, &cmdlist
);
1249 c
= add_cmd ("environment", class_run
, unset_environment_command
,
1250 "Cancel environment variable VAR for the program.\n\
1251 This does not affect the program until the next \"run\" command.",
1253 c
->completer
= noop_completer
;
1255 c
= add_cmd ("environment", class_run
, set_environment_command
,
1256 "Set environment variable value to give the program.\n\
1257 Arguments are VAR VALUE where VAR is variable name and VALUE is value.\n\
1258 VALUES of environment variables are uninterpreted strings.\n\
1259 This does not affect the program until the next \"run\" command.",
1261 c
->completer
= noop_completer
;
1263 add_com ("path", class_files
, path_command
,
1264 "Add directory DIR(s) to beginning of search path for object files.\n\
1265 $cwd in the path means the current working directory.\n\
1266 This path is equivalent to the $PATH shell variable. It is a list of\n\
1267 directories, separated by colons. These directories are searched to find\n\
1268 fully linked executable files and separately compiled object files as needed.");
1270 c
= add_cmd ("paths", no_class
, path_info
,
1271 "Current search path for finding object files.\n\
1272 $cwd in the path means the current working directory.\n\
1273 This path is equivalent to the $PATH shell variable. It is a list of\n\
1274 directories, separated by colons. These directories are searched to find\n\
1275 fully linked executable files and separately compiled object files as needed.", &showlist
);
1276 c
->completer
= noop_completer
;
1278 add_com ("attach", class_run
, attach_command
,
1279 "Attach to a process or file outside of GDB.\n\
1280 This command attaches to another target, of the same type as your last\n\
1281 `target' command (`info files' will show your target stack).\n\
1282 The command may take as argument a process id or a device file.\n\
1283 For a process id, you must have permission to send the process a signal,\n\
1284 and it must have the same effective uid as the debugger.\n\
1285 When using \"attach\", you should use the \"file\" command to specify\n\
1286 the program running in the process, and to load its symbol table.");
1288 add_com ("detach", class_run
, detach_command
,
1289 "Detach a process or file previously attached.\n\
1290 If a process, it is no longer traced, and it continues its execution. If you\n\
1291 were debugging a file, the file is closed and gdb no longer accesses it.");
1293 add_com ("signal", class_run
, signal_command
,
1294 "Continue program giving it signal number SIGNUMBER.");
1296 add_com ("stepi", class_run
, stepi_command
,
1297 "Step one instruction exactly.\n\
1298 Argument N means do this N times (or till program stops for another reason).");
1299 add_com_alias ("si", "stepi", class_alias
, 0);
1301 add_com ("nexti", class_run
, nexti_command
,
1302 "Step one instruction, but proceed through subroutine calls.\n\
1303 Argument N means do this N times (or till program stops for another reason).");
1304 add_com_alias ("ni", "nexti", class_alias
, 0);
1306 add_com ("finish", class_run
, finish_command
,
1307 "Execute until selected stack frame returns.\n\
1308 Upon return, the value returned is printed and put in the value history.");
1310 add_com ("next", class_run
, next_command
,
1311 "Step program, proceeding through subroutine calls.\n\
1312 Like the \"step\" command as long as subroutine calls do not happen;\n\
1313 when they do, the call is treated as one instruction.\n\
1314 Argument N means do this N times (or till program stops for another reason).");
1315 add_com_alias ("n", "next", class_run
, 1);
1317 add_com ("step", class_run
, step_command
,
1318 "Step program until it reaches a different source line.\n\
1319 Argument N means do this N times (or till program stops for another reason).");
1320 add_com_alias ("s", "step", class_run
, 1);
1322 add_com ("until", class_run
, until_command
,
1323 "Execute until the program reaches a source line greater than the current\n\
1324 or a specified line or address or function (same args as break command).\n\
1325 Execution will also stop upon exit from the current stack frame.");
1326 add_com_alias ("u", "until", class_run
, 1);
1328 add_com ("jump", class_run
, jump_command
,
1329 "Continue program being debugged at specified line or address.\n\
1330 Give as argument either LINENUM or *ADDR, where ADDR is an expression\n\
1331 for an address to start at.");
1333 add_com ("continue", class_run
, continue_command
,
1334 "Continue program being debugged, after signal or breakpoint.\n\
1335 If proceeding from breakpoint, a number N may be used as an argument,\n\
1336 which means to set the ignore count of that breakpoint to N - 1 (so that\n\
1337 the breakpoint won't break until the Nth time it is reached).");
1338 add_com_alias ("c", "cont", class_run
, 1);
1339 add_com_alias ("fg", "cont", class_run
, 1);
1341 add_com ("run", class_run
, run_command
,
1342 "Start debugged program. You may specify arguments to give it.\n\
1343 Args may include \"*\", or \"[...]\"; they are expanded using \"sh\".\n\
1344 Input and output redirection with \">\", \"<\", or \">>\" are also allowed.\n\n\
1345 With no arguments, uses arguments last specified (with \"run\" or \"set args\").\n\
1346 To cancel previous arguments and run with no arguments,\n\
1347 use \"set args\" without arguments.");
1348 add_com_alias ("r", "run", class_run
, 1);
1350 add_info ("registers", nofp_registers_info
,
1351 "List of integer registers and their contents, for selected stack frame.\n\
1352 Register name as argument means describe only that register.");
1354 add_info ("all-registers", all_registers_info
,
1355 "List of all registers and their contents, for selected stack frame.\n\
1356 Register name as argument means describe only that register.");
1358 add_info ("program", program_info
,
1359 "Execution status of the program.");
1361 add_info ("float", float_info
,
1362 "Print the status of the floating point unit\n");
1364 inferior_args
= savestring ("", 1); /* Initially no args */
1365 inferior_environ
= make_environ ();
1366 init_environ (inferior_environ
);