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)
214 /* Shouldn't this be target_has_execution? FIXME. */
218 !query ("The program being debugged has been started already.\n\
219 Start it from the beginning? "))
220 error ("Program not restarted.");
224 exec_file = (char *) get_exec_file (0);
226 /* The exec file is re-read every time we do a generic_mourn_inferior, so
227 we just have to worry about the symbol file. */
233 cmd = concat ("set args ", args, NULL);
234 make_cleanup (free, cmd);
235 execute_command (cmd, from_tty);
240 puts_filtered("Starting program: ");
242 puts_filtered(exec_file);
244 puts_filtered(inferior_args);
249 target_create_inferior (exec_file, inferior_args,
250 environ_vector (inferior_environ));
254 continue_command (proc_count_exp, from_tty)
255 char *proc_count_exp;
260 /* If have argument, set proceed count of breakpoint we stopped at. */
262 if (proc_count_exp != NULL)
264 bpstat bs = stop_bpstat;
265 int num = bpstat_num (&bs);
266 if (num == 0 && from_tty)
269 ("Not stopped at any breakpoint; argument ignored.\n");
273 set_ignore_count (num,
274 parse_and_eval_address (proc_count_exp) - 1,
276 /* set_ignore_count prints a message ending with a period.
277 So print two spaces before "Continuing.". */
279 printf_filtered (" ");
280 num = bpstat_num (&bs);
285 printf_filtered ("Continuing.\n");
287 clear_proceed_status ();
289 proceed ((CORE_ADDR) -1, -1, 0);
292 /* Step until outside of current statement. */
296 step_command (count_string, from_tty)
300 step_1 (0, 0, count_string);
303 /* Likewise, but skip over subroutine calls as if single instructions. */
307 next_command (count_string, from_tty)
311 step_1 (1, 0, count_string);
314 /* Likewise, but step only one instruction. */
318 stepi_command (count_string, from_tty)
322 step_1 (0, 1, count_string);
327 nexti_command (count_string, from_tty)
331 step_1 (1, 1, count_string);
335 step_1 (skip_subroutines, single_inst, count_string)
336 int skip_subroutines;
340 register int count = 1;
342 struct cleanup *cleanups = 0;
345 count = count_string ? parse_and_eval_address (count_string) : 1;
347 if (!single_inst || skip_subroutines) /* leave si command alone */
349 enable_longjmp_breakpoint();
350 cleanups = make_cleanup(disable_longjmp_breakpoint, 0);
353 for (; count > 0; count--)
355 clear_proceed_status ();
357 fr = get_current_frame ();
358 if (!fr) /* Avoid coredump here. Why tho? */
359 error ("No current frame");
360 step_frame_address = FRAME_FP (fr);
364 find_pc_line_pc_range (stop_pc, &step_range_start, &step_range_end);
365 if (step_range_end == 0)
368 if (find_pc_partial_function (stop_pc, &name, &step_range_start,
369 &step_range_end) == 0)
370 error ("Cannot find bounds of current function");
372 target_terminal_ours ();
374 Single stepping until exit from function %s, \n\
375 which has no line number information.\n", name);
381 /* Say we are stepping, but stop after one insn whatever it does. */
382 step_range_start = step_range_end = 1;
383 if (!skip_subroutines)
385 Don't step over function calls, not even to functions lacking
390 if (skip_subroutines)
393 step_multi = (count > 1);
394 proceed ((CORE_ADDR) -1, -1, 1);
397 #if defined (SHIFT_INST_REGS)
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 /* Call breakpoint_auto_delete on the current contents of the bpstat
500 pointed to by arg (which is really a bpstat *). */
502 breakpoint_auto_delete_contents (arg)
505 breakpoint_auto_delete (*(bpstat *)arg);
508 /* Execute a "stack dummy", a piece of code stored in the stack
509 by the debugger to be executed in the inferior.
511 To call: first, do PUSH_DUMMY_FRAME.
512 Then push the contents of the dummy. It should end with a breakpoint insn.
513 Then call here, passing address at which to start the dummy.
515 The contents of all registers are saved before the dummy frame is popped
516 and copied into the buffer BUFFER.
518 The dummy's frame is automatically popped whenever that break is hit.
519 If that is the first time the program stops, run_stack_dummy
520 returns to its caller with that frame already gone and returns 0.
521 Otherwise, run_stack-dummy returns 1 (the frame will eventually be popped
522 when we do hit that breakpoint). */
524 /* DEBUG HOOK: 4 => return instead of letting the stack dummy run. */
526 static int stack_dummy_testing = 0;
529 run_stack_dummy (addr, buffer)
531 char buffer[REGISTER_BYTES];
533 struct cleanup *old_cleanups = make_cleanup (null_cleanup, 0);
535 /* Now proceed, having reached the desired place. */
536 clear_proceed_status ();
537 if (stack_dummy_testing & 4)
542 #ifdef CALL_DUMMY_BREAKPOINT_OFFSET
544 struct breakpoint *bpt;
545 struct symtab_and_line sal;
547 sal.pc = addr - CALL_DUMMY_START_OFFSET + CALL_DUMMY_BREAKPOINT_OFFSET;
551 /* If defined, CALL_DUMMY_BREAKPOINT_OFFSET is where we need to put
552 a breakpoint instruction. If not, the call dummy already has the
553 breakpoint instruction in it.
555 addr is the address of the call dummy plus the CALL_DUMMY_START_OFFSET,
556 so we need to subtract the CALL_DUMMY_START_OFFSET. */
557 bpt = set_momentary_breakpoint (sal,
560 bpt->disposition = delete;
562 /* If all error()s out of proceed ended up calling normal_stop (and
563 perhaps they should; it already does in the special case of error
564 out of resume()), then we wouldn't need this. */
565 make_cleanup (breakpoint_auto_delete_contents, &stop_bpstat);
567 #endif /* CALL_DUMMY_BREAKPOINT_OFFSET. */
569 proceed_to_finish = 1; /* We want stop_registers, please... */
570 proceed (addr, 0, 0);
572 discard_cleanups (old_cleanups);
574 if (!stop_stack_dummy)
577 /* On return, the stack dummy has been popped already. */
579 memcpy (buffer, stop_registers, sizeof stop_registers);
583 /* Proceed until we reach a different source line with pc greater than
584 our current one or exit the function. We skip calls in both cases.
586 Note that eventually this command should probably be changed so
587 that only source lines are printed out when we hit the breakpoint
588 we set. I'm going to postpone this until after a hopeful rewrite
589 of wait_for_inferior and the proceed status code. -- randy */
593 until_next_command (from_tty)
599 struct symtab_and_line sal;
601 clear_proceed_status ();
603 frame = get_current_frame ();
605 /* Step until either exited from this function or greater
606 than the current line (if in symbolic section) or pc (if
610 func = find_pc_function (pc);
614 struct minimal_symbol *msymbol = lookup_minimal_symbol_by_pc (pc);
617 error ("Execution is not within a known function.");
619 step_range_start = SYMBOL_VALUE_ADDRESS (msymbol);
624 sal = find_pc_line (pc, 0);
626 step_range_start = BLOCK_START (SYMBOL_BLOCK_VALUE (func));
627 step_range_end = sal.end;
631 step_frame_address = FRAME_FP (frame);
633 step_multi = 0; /* Only one call to proceed */
635 proceed ((CORE_ADDR) -1, -1, 1);
639 until_command (arg, from_tty)
643 if (!target_has_execution)
644 error ("The program is not running.");
646 until_break_command (arg, from_tty);
648 until_next_command (from_tty);
651 /* "finish": Set a temporary breakpoint at the place
652 the selected frame will return to, then continue. */
655 finish_command (arg, from_tty)
659 struct symtab_and_line sal;
660 register FRAME frame;
661 struct frame_info *fi;
662 register struct symbol *function;
663 struct breakpoint *breakpoint;
664 struct cleanup *old_chain;
667 error ("The \"finish\" command does not take any arguments.");
668 if (!target_has_execution)
669 error ("The program is not running.");
670 if (selected_frame == NULL)
671 error ("No selected frame.");
673 frame = get_prev_frame (selected_frame);
675 error ("\"finish\" not meaningful in the outermost frame.");
677 clear_proceed_status ();
679 fi = get_frame_info (frame);
680 sal = find_pc_line (fi->pc, 0);
683 breakpoint = set_momentary_breakpoint (sal, frame, bp_finish);
685 old_chain = make_cleanup(delete_breakpoint, breakpoint);
687 /* Find the function we will return from. */
689 fi = get_frame_info (selected_frame);
690 function = find_pc_function (fi->pc);
692 /* Print info on the selected frame, including level number
696 printf_filtered ("Run till exit from ");
697 print_stack_frame (selected_frame, selected_frame_level, 0);
700 proceed_to_finish = 1; /* We want stop_registers, please... */
701 proceed ((CORE_ADDR) -1, -1, 0);
703 /* Did we stop at our breakpoint? */
704 if (bpstat_find_breakpoint(stop_bpstat, breakpoint) != NULL
707 struct type *value_type;
711 value_type = TYPE_TARGET_TYPE (SYMBOL_TYPE (function));
713 fatal ("internal: finish_command: function has no target type");
715 if (TYPE_CODE (value_type) == TYPE_CODE_VOID)
718 funcaddr = BLOCK_START (SYMBOL_BLOCK_VALUE (function));
720 val = value_being_returned (value_type, stop_registers,
721 using_struct_return (value_of_variable (function, NULL),
724 BLOCK_GCC_COMPILED (SYMBOL_BLOCK_VALUE (function))));
726 printf_filtered ("Value returned is $%d = ", record_latest_value (val));
727 value_print (val, stdout, 0, Val_no_prettyprint);
728 printf_filtered ("\n");
730 do_cleanups(old_chain);
735 program_info (args, from_tty)
739 bpstat bs = stop_bpstat;
740 int num = bpstat_num (&bs);
742 if (!target_has_execution)
744 printf_filtered ("The program being debugged is not being run.\n");
748 target_files_info ();
749 printf_filtered ("Program stopped at %s.\n", local_hex_string(stop_pc));
751 printf_filtered ("It stopped after being stepped.\n");
754 /* There may be several breakpoints in the same place, so this
755 isn't as strange as it seems. */
759 printf_filtered ("It stopped at a breakpoint that has since been deleted.\n");
761 printf_filtered ("It stopped at breakpoint %d.\n", num);
762 num = bpstat_num (&bs);
765 else if (stop_signal)
767 #ifdef PRINT_RANDOM_SIGNAL
768 PRINT_RANDOM_SIGNAL (stop_signal);
770 char *signame = strsigno (stop_signal);
771 printf_filtered ("It stopped with signal ");
773 printf_filtered ("%d", stop_signal);
775 /* Do we need to print the number as well as the name? */
776 printf_filtered ("%s (%d)", signame, stop_signal);
777 printf_filtered (", %s.\n", safe_strsignal (stop_signal));
782 printf_filtered ("Type \"info stack\" or \"info registers\" for more information.\n");
786 environment_info (var, from_tty)
792 register char *val = get_in_environ (inferior_environ, var);
796 puts_filtered (" = ");
798 puts_filtered ("\n");
802 puts_filtered ("Environment variable \"");
804 puts_filtered ("\" not defined.\n");
809 register char **vector = environ_vector (inferior_environ);
812 puts_filtered (*vector++);
813 puts_filtered ("\n");
819 set_environment_command (arg, from_tty)
823 register char *p, *val, *var;
827 error_no_arg ("environment variable and value");
829 /* Find seperation between variable name and value */
830 p = (char *) strchr (arg, '=');
831 val = (char *) strchr (arg, ' ');
833 if (p != 0 && val != 0)
835 /* We have both a space and an equals. If the space is before the
836 equals, walk forward over the spaces til we see a nonspace
837 (possibly the equals). */
842 /* Now if the = is after the char following the spaces,
843 take the char following the spaces. */
847 else if (val != 0 && p == 0)
851 error_no_arg ("environment variable to set");
853 if (p == 0 || p[1] == 0)
857 p = arg + strlen (arg); /* So that savestring below will work */
861 /* Not setting variable value to null */
863 while (*val == ' ' || *val == '\t')
867 while (p != arg && (p[-1] == ' ' || p[-1] == '\t')) p--;
869 var = savestring (arg, p - arg);
872 printf_filtered ("Setting environment variable \"%s\" to null value.\n", var);
873 set_in_environ (inferior_environ, var, "");
876 set_in_environ (inferior_environ, var, val);
881 unset_environment_command (var, from_tty)
887 /* If there is no argument, delete all environment variables.
888 Ask for confirmation if reading from the terminal. */
889 if (!from_tty || query ("Delete all environment variables? "))
891 free_environ (inferior_environ);
892 inferior_environ = make_environ ();
896 unset_in_environ (inferior_environ, var);
899 /* Handle the execution path (PATH variable) */
901 static const char path_var_name[] = "PATH";
905 path_info (args, from_tty)
909 puts_filtered ("Executable and object file path: ");
910 puts_filtered (get_in_environ (inferior_environ, path_var_name));
911 puts_filtered ("\n");
914 /* Add zero or more directories to the front of the execution path. */
917 path_command (dirname, from_tty)
924 exec_path = strsave (get_in_environ (inferior_environ, path_var_name));
925 mod_path (dirname, &exec_path);
926 set_in_environ (inferior_environ, path_var_name, exec_path);
929 path_info ((char *)NULL, from_tty);
932 /* This routine is getting awfully cluttered with #if's. It's probably
933 time to turn this into READ_PC and define it in the tm.h file.
934 Ditto for write_pc. */
939 #ifdef TARGET_READ_PC
940 return TARGET_READ_PC ();
942 return ADDR_BITS_REMOVE ((CORE_ADDR) read_register (PC_REGNUM));
950 #ifdef TARGET_WRITE_PC
951 TARGET_WRITE_PC (val);
953 write_register (PC_REGNUM, (long) val);
955 write_register (NPC_REGNUM, (long) val + 4);
957 write_register (NNPC_REGNUM, (long) val + 8);
963 /* Cope with strage ways of getting to the stack and frame pointers */
968 #ifdef TARGET_READ_SP
969 return TARGET_READ_SP ();
971 return read_register (SP_REGNUM);
979 #ifdef TARGET_WRITE_SP
980 TARGET_WRITE_SP (val);
982 write_register (SP_REGNUM, val);
990 #ifdef TARGET_READ_FP
991 return TARGET_READ_FP ();
993 return read_register (FP_REGNUM);
1001 #ifdef TARGET_WRITE_FP
1002 TARGET_WRITE_FP (val);
1004 write_register (FP_REGNUM, val);
1008 const char * const reg_names[] = REGISTER_NAMES;
1010 /* Print out the machine register regnum. If regnum is -1,
1011 print all registers (fpregs == 1) or all non-float registers
1014 For most machines, having all_registers_info() print the
1015 register(s) one per line is good enough. If a different format
1016 is required, (eg, for MIPS or Pyramid 90x, which both have
1017 lots of regs), or there is an existing convention for showing
1018 all the registers, define the macro DO_REGISTERS_INFO(regnum, fp)
1019 to provide that format. */
1021 #if !defined (DO_REGISTERS_INFO)
1022 #define DO_REGISTERS_INFO(regnum, fp) do_registers_info(regnum, fp)
1024 do_registers_info (regnum, fpregs)
1030 for (i = 0; i < NUM_REGS; i++)
1032 char raw_buffer[MAX_REGISTER_RAW_SIZE];
1033 char virtual_buffer[MAX_REGISTER_VIRTUAL_SIZE];
1035 /* Decide between printing all regs, nonfloat regs, or specific reg. */
1037 if (TYPE_CODE (REGISTER_VIRTUAL_TYPE (i)) == TYPE_CODE_FLT && !fpregs)
1044 fputs_filtered (reg_names[i], stdout);
1045 print_spaces_filtered (15 - strlen (reg_names[i]), stdout);
1047 /* Get the data in raw format, then convert also to virtual format. */
1048 if (read_relative_register_raw_bytes (i, raw_buffer))
1050 printf_filtered ("Invalid register contents\n");
1054 REGISTER_CONVERT_TO_VIRTUAL (i, raw_buffer, virtual_buffer);
1056 /* If virtual format is floating, print it that way, and in raw hex. */
1057 if (TYPE_CODE (REGISTER_VIRTUAL_TYPE (i)) == TYPE_CODE_FLT
1058 && ! INVALID_FLOAT (virtual_buffer, REGISTER_VIRTUAL_SIZE (i)))
1062 val_print (REGISTER_VIRTUAL_TYPE (i), virtual_buffer, 0,
1063 stdout, 0, 1, 0, Val_pretty_default);
1065 printf_filtered ("\t(raw 0x");
1066 for (j = 0; j < REGISTER_RAW_SIZE (i); j++)
1067 printf_filtered ("%02x", (unsigned char)raw_buffer[j]);
1068 printf_filtered (")");
1071 /* FIXME! val_print probably can handle all of these cases now... */
1073 /* Else if virtual format is too long for printf,
1074 print in hex a byte at a time. */
1075 else if (REGISTER_VIRTUAL_SIZE (i) > sizeof (long))
1078 printf_filtered ("0x");
1079 for (j = 0; j < REGISTER_VIRTUAL_SIZE (i); j++)
1080 printf_filtered ("%02x", (unsigned char)virtual_buffer[j]);
1082 /* Else print as integer in hex and in decimal. */
1085 val_print (REGISTER_VIRTUAL_TYPE (i), raw_buffer, 0,
1086 stdout, 'x', 1, 0, Val_pretty_default);
1087 printf_filtered ("\t");
1088 val_print (REGISTER_VIRTUAL_TYPE (i), raw_buffer, 0,
1089 stdout, 0, 1, 0, Val_pretty_default);
1092 /* The SPARC wants to print even-numbered float regs as doubles
1093 in addition to printing them as floats. */
1094 #ifdef PRINT_REGISTER_HOOK
1095 PRINT_REGISTER_HOOK (i);
1098 printf_filtered ("\n");
1101 #endif /* no DO_REGISTERS_INFO. */
1104 registers_info (addr_exp, fpregs)
1111 if (!target_has_registers)
1112 error ("The program has no registers now.");
1116 DO_REGISTERS_INFO(-1, fpregs);
1122 if (addr_exp[0] == '$')
1125 while (*end != '\0' && *end != ' ' && *end != '\t')
1127 for (regnum = 0; regnum < NUM_REGS; regnum++)
1128 if (!strncmp (addr_exp, reg_names[regnum], end - addr_exp)
1129 && strlen (reg_names[regnum]) == end - addr_exp)
1131 if (*addr_exp >= '0' && *addr_exp <= '9')
1132 regnum = atoi (addr_exp); /* Take a number */
1133 if (regnum >= NUM_REGS) /* Bad name, or bad number */
1134 error ("%.*s: invalid register", end - addr_exp, addr_exp);
1137 DO_REGISTERS_INFO(regnum, fpregs);
1140 while (*addr_exp == ' ' || *addr_exp == '\t')
1142 } while (*addr_exp != '\0');
1146 all_registers_info (addr_exp, from_tty)
1150 registers_info (addr_exp, 1);
1154 nofp_registers_info (addr_exp, from_tty)
1158 registers_info (addr_exp, 0);
1163 * Should save/restore the tty state since it might be that the
1164 * program to be debugged was started on this tty and it wants
1165 * the tty in some state other than what we want. If it's running
1166 * on another terminal or without a terminal, then saving and
1167 * restoring the tty state is a harmless no-op.
1168 * This only needs to be done if we are attaching to a process.
1173 takes a program started up outside of gdb and ``attaches'' to it.
1174 This stops it cold in its tracks and allows us to start debugging it.
1175 and wait for the trace-trap that results from attaching. */
1178 attach_command (args, from_tty)
1182 dont_repeat (); /* Not for the faint of heart */
1184 if (target_has_execution)
1186 if (query ("A program is being debugged already. Kill it? "))
1189 error ("Not killed.");
1192 target_attach (args, from_tty);
1194 /* Set up the "saved terminal modes" of the inferior
1195 based on what modes we are starting it with. */
1196 target_terminal_init ();
1198 /* Install inferior's terminal modes. */
1199 target_terminal_inferior ();
1201 /* Set up execution context to know that we should return from
1202 wait_for_inferior as soon as the target reports a stop. */
1203 init_wait_for_inferior ();
1204 clear_proceed_status ();
1205 stop_soon_quietly = 1;
1207 wait_for_inferior ();
1210 /* Add shared library symbols from the newly attached process, if any. */
1211 SOLIB_ADD ((char *)0, from_tty, (struct target_ops *)0);
1219 * takes a program previously attached to and detaches it.
1220 * The program resumes execution and will no longer stop
1221 * on signals, etc. We better not have left any breakpoints
1222 * in the program or it'll die when it hits one. For this
1223 * to work, it may be necessary for the process to have been
1224 * previously attached. It *might* work if the program was
1225 * started via the normal ptrace (PTRACE_TRACEME).
1229 detach_command (args, from_tty)
1233 dont_repeat (); /* Not for the faint of heart */
1234 target_detach (args, from_tty);
1239 float_info (addr_exp, from_tty)
1246 printf_filtered ("No floating point info available for this processor.\n");
1252 unset_command (args, from_tty)
1256 printf_filtered ("\"unset\" must be followed by the name of an unset subcommand.\n");
1257 help_list (unsetlist, "unset ", -1, stdout);
1261 _initialize_infcmd ()
1263 struct cmd_list_element *c;
1265 add_com ("tty", class_run, tty_command,
1266 "Set terminal for future runs of program being debugged.");
1269 (add_set_cmd ("args", class_run, var_string_noescape, (char *)&inferior_args,
1271 "Set arguments to give program being debugged when it is started.\n\
1272 Follow this command with any number of args, to be passed to the program.",
1277 ("environment", no_class, environment_info,
1278 "The environment to give the program, or one variable's value.\n\
1279 With an argument VAR, prints the value of environment variable VAR to\n\
1280 give the program being debugged. With no arguments, prints the entire\n\
1281 environment to be given to the program.", &showlist);
1282 c->completer = noop_completer;
1284 add_prefix_cmd ("unset", no_class, unset_command,
1285 "Complement to certain \"set\" commands",
1286 &unsetlist, "unset ", 0, &cmdlist);
1288 c = add_cmd ("environment", class_run, unset_environment_command,
1289 "Cancel environment variable VAR for the program.\n\
1290 This does not affect the program until the next \"run\" command.",
1292 c->completer = noop_completer;
1294 c = add_cmd ("environment", class_run, set_environment_command,
1295 "Set environment variable value to give the program.\n\
1296 Arguments are VAR VALUE where VAR is variable name and VALUE is value.\n\
1297 VALUES of environment variables are uninterpreted strings.\n\
1298 This does not affect the program until the next \"run\" command.",
1300 c->completer = noop_completer;
1302 add_com ("path", class_files, path_command,
1303 "Add directory DIR(s) to beginning of search path for object files.\n\
1304 $cwd in the path means the current working directory.\n\
1305 This path is equivalent to the $PATH shell variable. It is a list of\n\
1306 directories, separated by colons. These directories are searched to find\n\
1307 fully linked executable files and separately compiled object files as needed.");
1309 c = add_cmd ("paths", no_class, path_info,
1310 "Current search path for finding object files.\n\
1311 $cwd in the path means the current working directory.\n\
1312 This path is equivalent to the $PATH shell variable. It is a list of\n\
1313 directories, separated by colons. These directories are searched to find\n\
1314 fully linked executable files and separately compiled object files as needed.", &showlist);
1315 c->completer = noop_completer;
1317 add_com ("attach", class_run, attach_command,
1318 "Attach to a process or file outside of GDB.\n\
1319 This command attaches to another target, of the same type as your last\n\
1320 `target' command (`info files' will show your target stack).\n\
1321 The command may take as argument a process id or a device file.\n\
1322 For a process id, you must have permission to send the process a signal,\n\
1323 and it must have the same effective uid as the debugger.\n\
1324 When using \"attach\", you should use the \"file\" command to specify\n\
1325 the program running in the process, and to load its symbol table.");
1327 add_com ("detach", class_run, detach_command,
1328 "Detach a process or file previously attached.\n\
1329 If a process, it is no longer traced, and it continues its execution. If you\n\
1330 were debugging a file, the file is closed and gdb no longer accesses it.");
1332 add_com ("signal", class_run, signal_command,
1333 "Continue program giving it signal number SIGNUMBER.");
1335 add_com ("stepi", class_run, stepi_command,
1336 "Step one instruction exactly.\n\
1337 Argument N means do this N times (or till program stops for another reason).");
1338 add_com_alias ("si", "stepi", class_alias, 0);
1340 add_com ("nexti", class_run, nexti_command,
1341 "Step one instruction, but proceed through subroutine calls.\n\
1342 Argument N means do this N times (or till program stops for another reason).");
1343 add_com_alias ("ni", "nexti", class_alias, 0);
1345 add_com ("finish", class_run, finish_command,
1346 "Execute until selected stack frame returns.\n\
1347 Upon return, the value returned is printed and put in the value history.");
1349 add_com ("next", class_run, next_command,
1350 "Step program, proceeding through subroutine calls.\n\
1351 Like the \"step\" command as long as subroutine calls do not happen;\n\
1352 when they do, the call is treated as one instruction.\n\
1353 Argument N means do this N times (or till program stops for another reason).");
1354 add_com_alias ("n", "next", class_run, 1);
1356 add_com ("step", class_run, step_command,
1357 "Step program until it reaches a different source line.\n\
1358 Argument N means do this N times (or till program stops for another reason).");
1359 add_com_alias ("s", "step", class_run, 1);
1361 add_com ("until", class_run, until_command,
1362 "Execute until the program reaches a source line greater than the current\n\
1363 or a specified line or address or function (same args as break command).\n\
1364 Execution will also stop upon exit from the current stack frame.");
1365 add_com_alias ("u", "until", class_run, 1);
1367 add_com ("jump", class_run, jump_command,
1368 "Continue program being debugged at specified line or address.\n\
1369 Give as argument either LINENUM or *ADDR, where ADDR is an expression\n\
1370 for an address to start at.");
1372 add_com ("continue", class_run, continue_command,
1373 "Continue program being debugged, after signal or breakpoint.\n\
1374 If proceeding from breakpoint, a number N may be used as an argument,\n\
1375 which means to set the ignore count of that breakpoint to N - 1 (so that\n\
1376 the breakpoint won't break until the Nth time it is reached).");
1377 add_com_alias ("c", "cont", class_run, 1);
1378 add_com_alias ("fg", "cont", class_run, 1);
1380 add_com ("run", class_run, run_command,
1381 "Start debugged program. You may specify arguments to give it.\n\
1382 Args may include \"*\", or \"[...]\"; they are expanded using \"sh\".\n\
1383 Input and output redirection with \">\", \"<\", or \">>\" are also allowed.\n\n\
1384 With no arguments, uses arguments last specified (with \"run\" or \"set args\").\n\
1385 To cancel previous arguments and run with no arguments,\n\
1386 use \"set args\" without arguments.");
1387 add_com_alias ("r", "run", class_run, 1);
1389 add_info ("registers", nofp_registers_info,
1390 "List of integer registers and their contents, for selected stack frame.\n\
1391 Register name as argument means describe only that register.");
1393 add_info ("all-registers", all_registers_info,
1394 "List of all registers and their contents, for selected stack frame.\n\
1395 Register name as argument means describe only that register.");
1397 add_info ("program", program_info,
1398 "Execution status of the program.");
1400 add_info ("float", float_info,
1401 "Print the status of the floating point unit\n");
1403 inferior_args = savestring ("", 1); /* Initially no args */
1404 inferior_environ = make_environ ();
1405 init_environ (inferior_environ);