1 /* Target-struct-independent code to start (run) and stop an inferior process.
2 Copyright 1986, 1987, 1988, 1989, 1991, 1992, 1993
3 Free Software Foundation, Inc.
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., 675 Mass Ave, Cambridge, MA 02139, USA. */
21 /* Notes on the algorithm used in wait_for_inferior to determine if we
22 just did a subroutine call when stepping. We have the following
23 information at that point:
25 Current and previous (just before this step) pc.
26 Current and previous sp.
27 Current and previous start of current function.
29 If the starts of the functions don't match, then
31 a) We did a subroutine call.
33 In this case, the pc will be at the beginning of a function.
35 b) We did a subroutine return.
41 If we did a longjump, we were doing "nexti", since a next would
42 have attempted to skip over the assembly language routine in which
43 the longjmp is coded and would have simply been the equivalent of a
44 continue. I consider this ok behaivior. We'd like one of two
45 things to happen if we are doing a nexti through the longjmp()
46 routine: 1) It behaves as a stepi, or 2) It acts like a continue as
47 above. Given that this is a special case, and that anybody who
48 thinks that the concept of sub calls is meaningful in the context
49 of a longjmp, I'll take either one. Let's see what happens.
51 Acts like a subroutine return. I can handle that with no problem
54 -->So: If the current and previous beginnings of the current
55 function don't match, *and* the pc is at the start of a function,
56 we've done a subroutine call. If the pc is not at the start of a
57 function, we *didn't* do a subroutine call.
59 -->If the beginnings of the current and previous function do match,
62 a) We just did a recursive call.
64 In this case, we would be at the very beginning of a
65 function and 1) it will have a prologue (don't jump to
66 before prologue, or 2) (we assume here that it doesn't have
67 a prologue) there will have been a change in the stack
68 pointer over the last instruction. (Ie. it's got to put
69 the saved pc somewhere. The stack is the usual place. In
70 a recursive call a register is only an option if there's a
71 prologue to do something with it. This is even true on
72 register window machines; the prologue sets up the new
73 window. It might not be true on a register window machine
74 where the call instruction moved the register window
75 itself. Hmmm. One would hope that the stack pointer would
76 also change. If it doesn't, somebody send me a note, and
77 I'll work out a more general theory.
78 bug-gdb@prep.ai.mit.edu). This is true (albeit slipperly
79 so) on all machines I'm aware of:
81 m68k: Call changes stack pointer. Regular jumps don't.
83 sparc: Recursive calls must have frames and therefor,
86 vax: All calls have frames and hence change the
89 b) We did a return from a recursive call. I don't see that we
90 have either the ability or the need to distinguish this
91 from an ordinary jump. The stack frame will be printed
92 when and if the frame pointer changes; if we are in a
93 function without a frame pointer, it's the users own
96 c) We did a jump within a function. We assume that this is
97 true if we didn't do a recursive call.
99 d) We are in no-man's land ("I see no symbols here"). We
100 don't worry about this; it will make calls look like simple
101 jumps (and the stack frames will be printed when the frame
102 pointer moves), which is a reasonably non-violent response.
110 #include "inferior.h"
111 #include "breakpoint.h"
119 /* unistd.h is needed to #define X_OK */
123 #include <sys/file.h>
126 /* Prototypes for local functions */
129 signals_info
PARAMS ((char *, int));
132 handle_command
PARAMS ((char *, int));
135 sig_print_info
PARAMS ((int));
138 sig_print_header
PARAMS ((void));
141 resume_cleanups
PARAMS ((int));
144 hook_stop_stub
PARAMS ((char *));
146 /* GET_LONGJMP_TARGET returns the PC at which longjmp() will resume the
147 program. It needs to examine the jmp_buf argument and extract the PC
148 from it. The return value is non-zero on success, zero otherwise. */
149 #ifndef GET_LONGJMP_TARGET
150 #define GET_LONGJMP_TARGET(PC_ADDR) 0
154 /* Some machines have trampoline code that sits between function callers
155 and the actual functions themselves. If this machine doesn't have
156 such things, disable their processing. */
157 #ifndef SKIP_TRAMPOLINE_CODE
158 #define SKIP_TRAMPOLINE_CODE(pc) 0
161 /* For SVR4 shared libraries, each call goes through a small piece of
162 trampoline code in the ".init" section. IN_SOLIB_TRAMPOLINE evaluates
163 to nonzero if we are current stopped in one of these. */
164 #ifndef IN_SOLIB_TRAMPOLINE
165 #define IN_SOLIB_TRAMPOLINE(pc,name) 0
168 /* On some systems, the PC may be left pointing at an instruction that won't
169 actually be executed. This is usually indicated by a bit in the PSW. If
170 we find ourselves in such a state, then we step the target beyond the
171 nullified instruction before returning control to the user so as to avoid
174 #ifndef INSTRUCTION_NULLIFIED
175 #define INSTRUCTION_NULLIFIED 0
178 /* Tables of how to react to signals; the user sets them. */
180 static unsigned char *signal_stop
;
181 static unsigned char *signal_print
;
182 static unsigned char *signal_program
;
184 #define SET_SIGS(nsigs,sigs,flags) \
186 int signum = (nsigs); \
187 while (signum-- > 0) \
188 if ((sigs)[signum]) \
189 (flags)[signum] = 1; \
192 #define UNSET_SIGS(nsigs,sigs,flags) \
194 int signum = (nsigs); \
195 while (signum-- > 0) \
196 if ((sigs)[signum]) \
197 (flags)[signum] = 0; \
201 /* Command list pointer for the "stop" placeholder. */
203 static struct cmd_list_element
*stop_command
;
205 /* Nonzero if breakpoints are now inserted in the inferior. */
207 static int breakpoints_inserted
;
209 /* Function inferior was in as of last step command. */
211 static struct symbol
*step_start_function
;
213 /* Nonzero if we are expecting a trace trap and should proceed from it. */
215 static int trap_expected
;
217 /* Nonzero if the next time we try to continue the inferior, it will
218 step one instruction and generate a spurious trace trap.
219 This is used to compensate for a bug in HP-UX. */
221 static int trap_expected_after_continue
;
223 /* Nonzero means expecting a trace trap
224 and should stop the inferior and return silently when it happens. */
228 /* Nonzero means expecting a trap and caller will handle it themselves.
229 It is used after attach, due to attaching to a process;
230 when running in the shell before the child program has been exec'd;
231 and when running some kinds of remote stuff (FIXME?). */
233 int stop_soon_quietly
;
235 /* Nonzero if proceed is being used for a "finish" command or a similar
236 situation when stop_registers should be saved. */
238 int proceed_to_finish
;
240 /* Save register contents here when about to pop a stack dummy frame,
241 if-and-only-if proceed_to_finish is set.
242 Thus this contains the return value from the called function (assuming
243 values are returned in a register). */
245 char stop_registers
[REGISTER_BYTES
];
247 /* Nonzero if program stopped due to error trying to insert breakpoints. */
249 static int breakpoints_failed
;
251 /* Nonzero after stop if current stack frame should be printed. */
253 static int stop_print_frame
;
255 #ifdef NO_SINGLE_STEP
256 extern int one_stepped
; /* From machine dependent code */
257 extern void single_step (); /* Same. */
258 #endif /* NO_SINGLE_STEP */
261 /* Things to clean up if we QUIT out of resume (). */
264 resume_cleanups (arg
)
270 /* Resume the inferior, but allow a QUIT. This is useful if the user
271 wants to interrupt some lengthy single-stepping operation
272 (for child processes, the SIGINT goes to the inferior, and so
273 we get a SIGINT random_signal, but for remote debugging and perhaps
274 other targets, that's not true).
276 STEP nonzero if we should step (zero to continue instead).
277 SIG is the signal to give the inferior (zero for none). */
283 struct cleanup
*old_cleanups
= make_cleanup (resume_cleanups
, 0);
286 #ifdef CANNOT_STEP_BREAKPOINT
287 /* Most targets can step a breakpoint instruction, thus executing it
288 normally. But if this one cannot, just continue and we will hit
290 if (step
&& breakpoints_inserted
&& breakpoint_here_p (read_pc ()))
294 #ifdef NO_SINGLE_STEP
296 single_step(sig
); /* Do it the hard way, w/temp breakpoints */
297 step
= 0; /* ...and don't ask hardware to do it. */
301 /* Handle any optimized stores to the inferior NOW... */
302 #ifdef DO_DEFERRED_STORES
306 /* Install inferior's terminal modes. */
307 target_terminal_inferior ();
309 target_resume (-1, step
, sig
);
310 discard_cleanups (old_cleanups
);
314 /* Clear out all variables saying what to do when inferior is continued.
315 First do this, then set the ones you want, then call `proceed'. */
318 clear_proceed_status ()
321 step_range_start
= 0;
323 step_frame_address
= 0;
324 step_over_calls
= -1;
326 stop_soon_quietly
= 0;
327 proceed_to_finish
= 0;
328 breakpoint_proceeded
= 1; /* We're about to proceed... */
330 /* Discard any remaining commands or status from previous stop. */
331 bpstat_clear (&stop_bpstat
);
334 /* Basic routine for continuing the program in various fashions.
336 ADDR is the address to resume at, or -1 for resume where stopped.
337 SIGGNAL is the signal to give it, or 0 for none,
338 or -1 for act according to how it stopped.
339 STEP is nonzero if should trap after one instruction.
340 -1 means return after that and print nothing.
341 You should probably set various step_... variables
342 before calling here, if you are stepping.
344 You should call clear_proceed_status before calling proceed. */
347 proceed (addr
, siggnal
, step
)
355 step_start_function
= find_pc_function (read_pc ());
359 if (addr
== (CORE_ADDR
)-1)
361 /* If there is a breakpoint at the address we will resume at,
362 step one instruction before inserting breakpoints
363 so that we do not stop right away. */
365 if (breakpoint_here_p (read_pc ()))
371 if (trap_expected_after_continue
)
373 /* If (step == 0), a trap will be automatically generated after
374 the first instruction is executed. Force step one
375 instruction to clear this condition. This should not occur
376 if step is nonzero, but it is harmless in that case. */
378 trap_expected_after_continue
= 0;
382 /* We will get a trace trap after one instruction.
383 Continue it automatically and insert breakpoints then. */
387 int temp
= insert_breakpoints ();
390 print_sys_errmsg ("ptrace", temp
);
391 error ("Cannot insert breakpoints.\n\
392 The same program may be running in another process.");
394 breakpoints_inserted
= 1;
398 stop_signal
= siggnal
;
399 /* If this signal should not be seen by program,
400 give it zero. Used for debugging signals. */
401 else if (stop_signal
< NSIG
&& !signal_program
[stop_signal
])
404 /* Resume inferior. */
405 resume (oneproc
|| step
|| bpstat_should_step (), stop_signal
);
407 /* Wait for it to stop (if not standalone)
408 and in any case decode why it stopped, and act accordingly. */
410 wait_for_inferior ();
414 /* Record the pc and sp of the program the last time it stopped.
415 These are just used internally by wait_for_inferior, but need
416 to be preserved over calls to it and cleared when the inferior
418 static CORE_ADDR prev_pc
;
419 static CORE_ADDR prev_sp
;
420 static CORE_ADDR prev_func_start
;
421 static char *prev_func_name
;
424 /* Start remote-debugging of a machine over a serial link. */
429 init_wait_for_inferior ();
430 clear_proceed_status ();
431 stop_soon_quietly
= 1;
433 wait_for_inferior ();
437 /* Initialize static vars when a new inferior begins. */
440 init_wait_for_inferior ()
442 /* These are meaningless until the first time through wait_for_inferior. */
446 prev_func_name
= NULL
;
448 trap_expected_after_continue
= 0;
449 breakpoints_inserted
= 0;
450 breakpoint_init_inferior ();
451 stop_signal
= 0; /* Don't confuse first call to proceed(). */
455 delete_breakpoint_current_contents (arg
)
458 struct breakpoint
**breakpointp
= (struct breakpoint
**)arg
;
459 if (*breakpointp
!= NULL
)
460 delete_breakpoint (*breakpointp
);
463 /* Wait for control to return from inferior to debugger.
464 If inferior gets a signal, we may decide to start it up again
465 instead of returning. That is why there is a loop in this function.
466 When this function actually returns it means the inferior
467 should be left stopped and GDB should read more commands. */
472 struct cleanup
*old_cleanups
;
476 CORE_ADDR stop_sp
= 0;
477 CORE_ADDR stop_func_start
;
478 CORE_ADDR stop_func_end
;
479 char *stop_func_name
;
480 CORE_ADDR prologue_pc
= 0, tmp
;
481 struct symtab_and_line sal
;
482 int remove_breakpoints_on_following_step
= 0;
484 int handling_longjmp
= 0; /* FIXME */
485 struct breakpoint
*step_resume_breakpoint
= NULL
;
488 old_cleanups
= make_cleanup (delete_breakpoint_current_contents
,
489 &step_resume_breakpoint
);
490 sal
= find_pc_line(prev_pc
, 0);
491 current_line
= sal
.line
;
493 /* Are we stepping? */
494 #define CURRENTLY_STEPPING() ((step_resume_breakpoint == NULL \
495 && !handling_longjmp \
498 || bpstat_should_step ())
502 /* Clean up saved state that will become invalid. */
503 flush_cached_frames ();
504 registers_changed ();
506 pid
= target_wait (-1, &w
);
508 #ifdef SIGTRAP_STOP_AFTER_LOAD
510 /* Somebody called load(2), and it gave us a "trap signal after load".
511 Ignore it gracefully. */
513 SIGTRAP_STOP_AFTER_LOAD (w
);
516 /* See if the process still exists; clean up if it doesn't. */
519 target_terminal_ours (); /* Must do this before mourn anyway */
521 printf_filtered ("\nProgram exited with code 0%o.\n",
522 (unsigned int)WEXITSTATUS (w
));
525 printf_filtered ("\nProgram exited normally.\n");
527 target_mourn_inferior ();
528 #ifdef NO_SINGLE_STEP
531 stop_print_frame
= 0;
534 else if (!WIFSTOPPED (w
))
538 stop_print_frame
= 0;
539 stop_signal
= WTERMSIG (w
);
540 target_terminal_ours (); /* Must do this before mourn anyway */
541 target_kill (); /* kill mourns as well */
542 #ifdef PRINT_RANDOM_SIGNAL
543 printf_filtered ("\nProgram terminated: ");
544 PRINT_RANDOM_SIGNAL (stop_signal
);
546 printf_filtered ("\nProgram terminated with signal ");
547 signame
= strsigno (stop_signal
);
549 printf_filtered ("%d", stop_signal
);
551 /* Do we need to print the number in addition to the name? */
552 printf_filtered ("%s (%d)", signame
, stop_signal
);
553 printf_filtered (", %s\n", safe_strsignal (stop_signal
));
555 printf_filtered ("The program no longer exists.\n");
557 #ifdef NO_SINGLE_STEP
563 stop_signal
= WSTOPSIG (w
);
565 if (pid
!= inferior_pid
)
567 int save_pid
= inferior_pid
;
569 inferior_pid
= pid
; /* Setup for target memory/regs */
570 registers_changed ();
571 stop_pc
= read_pc ();
572 inferior_pid
= save_pid
;
573 registers_changed ();
576 stop_pc
= read_pc ();
578 if (stop_signal
== SIGTRAP
579 && breakpoint_here_p (stop_pc
- DECR_PC_AFTER_BREAK
))
580 if (!breakpoint_thread_match (stop_pc
- DECR_PC_AFTER_BREAK
, pid
))
582 /* Saw a breakpoint, but it was hit by the wrong thread. Just continue. */
583 if (breakpoints_inserted
)
585 remove_breakpoints ();
586 target_resume (pid
, 1, 0); /* Single step */
587 target_wait (pid
, NULL
);
588 insert_breakpoints ();
590 target_resume (-1, 0, 0);
594 if (pid
!= inferior_pid
)
597 if (pid
!= inferior_pid
)
601 if (!in_thread_list (pid
))
603 fprintf (stderr
, "[New %s]\n", target_pid_to_str (pid
));
606 target_resume (-1, 0, 0);
611 if (stop_signal
>= NSIG
|| signal_print
[stop_signal
])
616 target_terminal_ours_for_output ();
617 printf_filtered ("\nProgram received signal ");
618 signame
= strsigno (stop_signal
);
620 printf_filtered ("%d", stop_signal
);
622 printf_filtered ("%s (%d)", signame
, stop_signal
);
623 printf_filtered (", %s\n", safe_strsignal (stop_signal
));
628 if (stop_signal
== SIGTRAP
629 || stop_signal
>= NSIG
630 || signal_stop
[stop_signal
])
634 printf_filtered ("[Switching to %s]\n", target_pid_to_str (pid
));
636 flush_cached_frames ();
637 registers_changed ();
639 if (step_resume_breakpoint
)
641 delete_breakpoint (step_resume_breakpoint
);
642 step_resume_breakpoint
= NULL
;
646 prev_func_name
= NULL
;
647 step_range_start
= 0;
649 step_frame_address
= 0;
650 handling_longjmp
= 0;
656 target_terminal_inferior ();
658 /* Clear the signal if it should not be passed. */
659 if (signal_program
[stop_signal
] == 0)
662 target_resume (-1, 0, stop_signal
);
670 #ifdef NO_SINGLE_STEP
672 single_step (0); /* This actually cleans up the ss */
673 #endif /* NO_SINGLE_STEP */
675 /* If PC is pointing at a nullified instruction, then step beyond it so that
676 the user won't be confused when GDB appears to be ready to execute it. */
678 if (INSTRUCTION_NULLIFIED
)
684 set_current_frame ( create_new_frame (read_fp (), stop_pc
));
686 stop_frame_address
= FRAME_FP (get_current_frame ());
687 stop_sp
= read_sp ();
691 /* Don't care about return value; stop_func_start and stop_func_name
692 will both be 0 if it doesn't work. */
693 find_pc_partial_function (stop_pc
, &stop_func_name
, &stop_func_start
,
695 stop_func_start
+= FUNCTION_START_OFFSET
;
697 bpstat_clear (&stop_bpstat
);
699 stop_stack_dummy
= 0;
700 stop_print_frame
= 1;
702 stopped_by_random_signal
= 0;
703 breakpoints_failed
= 0;
705 /* Look at the cause of the stop, and decide what to do.
706 The alternatives are:
707 1) break; to really stop and return to the debugger,
708 2) drop through to start up again
709 (set another_trap to 1 to single step once)
710 3) set random_signal to 1, and the decision between 1 and 2
711 will be made according to the signal handling tables. */
713 /* First, distinguish signals caused by the debugger from signals
714 that have to do with the program's own actions.
715 Note that breakpoint insns may cause SIGTRAP or SIGILL
716 or SIGEMT, depending on the operating system version.
717 Here we detect when a SIGILL or SIGEMT is really a breakpoint
718 and change it to SIGTRAP. */
720 if (stop_signal
== SIGTRAP
721 || (breakpoints_inserted
&&
722 (stop_signal
== SIGILL
724 || stop_signal
== SIGEMT
727 || stop_soon_quietly
)
729 if (stop_signal
== SIGTRAP
&& stop_after_trap
)
731 stop_print_frame
= 0;
734 if (stop_soon_quietly
)
737 /* Don't even think about breakpoints
738 if just proceeded over a breakpoint.
740 However, if we are trying to proceed over a breakpoint
741 and end up in sigtramp, then step_resume_breakpoint
742 will be set and we should check whether we've hit the
744 if (stop_signal
== SIGTRAP
&& trap_expected
745 && step_resume_breakpoint
== NULL
)
746 bpstat_clear (&stop_bpstat
);
749 /* See if there is a breakpoint at the current PC. */
750 stop_bpstat
= bpstat_stop_status
751 (&stop_pc
, stop_frame_address
,
752 #if DECR_PC_AFTER_BREAK
753 /* Notice the case of stepping through a jump
754 that lands just after a breakpoint.
755 Don't confuse that with hitting the breakpoint.
756 What we check for is that 1) stepping is going on
757 and 2) the pc before the last insn does not match
758 the address of the breakpoint before the current pc. */
759 (prev_pc
!= stop_pc
- DECR_PC_AFTER_BREAK
760 && CURRENTLY_STEPPING ())
761 #else /* DECR_PC_AFTER_BREAK zero */
763 #endif /* DECR_PC_AFTER_BREAK zero */
765 /* Following in case break condition called a
767 stop_print_frame
= 1;
770 if (stop_signal
== SIGTRAP
)
772 = !(bpstat_explains_signal (stop_bpstat
)
774 #ifndef CALL_DUMMY_BREAKPOINT_OFFSET
775 || PC_IN_CALL_DUMMY (stop_pc
, stop_sp
, stop_frame_address
)
776 #endif /* No CALL_DUMMY_BREAKPOINT_OFFSET. */
777 || (step_range_end
&& step_resume_breakpoint
== NULL
));
781 = !(bpstat_explains_signal (stop_bpstat
)
782 /* End of a stack dummy. Some systems (e.g. Sony
783 news) give another signal besides SIGTRAP,
784 so check here as well as above. */
785 #ifndef CALL_DUMMY_BREAKPOINT_OFFSET
786 || PC_IN_CALL_DUMMY (stop_pc
, stop_sp
, stop_frame_address
)
787 #endif /* No CALL_DUMMY_BREAKPOINT_OFFSET. */
790 stop_signal
= SIGTRAP
;
796 /* For the program's own signals, act according to
797 the signal handling tables. */
801 /* Signal not for debugging purposes. */
804 stopped_by_random_signal
= 1;
806 if (stop_signal
>= NSIG
807 || signal_print
[stop_signal
])
811 target_terminal_ours_for_output ();
812 #ifdef PRINT_RANDOM_SIGNAL
813 PRINT_RANDOM_SIGNAL (stop_signal
);
815 printf_filtered ("\nProgram received signal ");
816 signame
= strsigno (stop_signal
);
818 printf_filtered ("%d", stop_signal
);
820 /* Do we need to print the number as well as the name? */
821 printf_filtered ("%s (%d)", signame
, stop_signal
);
822 printf_filtered (", %s\n", safe_strsignal (stop_signal
));
823 #endif /* PRINT_RANDOM_SIGNAL */
826 if (stop_signal
>= NSIG
827 || signal_stop
[stop_signal
])
829 /* If not going to stop, give terminal back
830 if we took it away. */
832 target_terminal_inferior ();
834 /* Clear the signal if it should not be passed. */
835 if (signal_program
[stop_signal
] == 0)
838 /* I'm not sure whether this needs to be check_sigtramp2 or
839 whether it could/should be keep_going. */
840 goto check_sigtramp2
;
843 /* Handle cases caused by hitting a breakpoint. */
845 CORE_ADDR jmp_buf_pc
;
846 struct bpstat_what what
;
848 what
= bpstat_what (stop_bpstat
);
852 stop_stack_dummy
= 1;
854 trap_expected_after_continue
= 1;
858 switch (what
.main_action
)
860 case BPSTAT_WHAT_SET_LONGJMP_RESUME
:
861 /* If we hit the breakpoint at longjmp, disable it for the
862 duration of this command. Then, install a temporary
863 breakpoint at the target of the jmp_buf. */
864 disable_longjmp_breakpoint();
865 remove_breakpoints ();
866 breakpoints_inserted
= 0;
867 if (!GET_LONGJMP_TARGET(&jmp_buf_pc
)) goto keep_going
;
869 /* Need to blow away step-resume breakpoint, as it
870 interferes with us */
871 if (step_resume_breakpoint
!= NULL
)
873 delete_breakpoint (step_resume_breakpoint
);
874 step_resume_breakpoint
= NULL
;
875 what
.step_resume
= 0;
879 /* FIXME - Need to implement nested temporary breakpoints */
880 if (step_over_calls
> 0)
881 set_longjmp_resume_breakpoint(jmp_buf_pc
,
882 get_current_frame());
885 set_longjmp_resume_breakpoint(jmp_buf_pc
, NULL
);
886 handling_longjmp
= 1; /* FIXME */
889 case BPSTAT_WHAT_CLEAR_LONGJMP_RESUME
:
890 case BPSTAT_WHAT_CLEAR_LONGJMP_RESUME_SINGLE
:
891 remove_breakpoints ();
892 breakpoints_inserted
= 0;
894 /* FIXME - Need to implement nested temporary breakpoints */
896 && (stop_frame_address
897 INNER_THAN step_frame_address
))
903 disable_longjmp_breakpoint();
904 handling_longjmp
= 0; /* FIXME */
905 if (what
.main_action
== BPSTAT_WHAT_CLEAR_LONGJMP_RESUME
)
907 /* else fallthrough */
909 case BPSTAT_WHAT_SINGLE
:
910 if (breakpoints_inserted
)
911 remove_breakpoints ();
912 breakpoints_inserted
= 0;
914 /* Still need to check other stuff, at least the case
915 where we are stepping and step out of the right range. */
918 case BPSTAT_WHAT_STOP_NOISY
:
919 stop_print_frame
= 1;
920 /* We are about to nuke the step_resume_breakpoint via the
921 cleanup chain, so no need to worry about it here. */
924 case BPSTAT_WHAT_STOP_SILENT
:
925 stop_print_frame
= 0;
926 /* We are about to nuke the step_resume_breakpoint via the
927 cleanup chain, so no need to worry about it here. */
930 case BPSTAT_WHAT_KEEP_CHECKING
:
934 if (what
.step_resume
)
936 delete_breakpoint (step_resume_breakpoint
);
937 step_resume_breakpoint
= NULL
;
939 /* If were waiting for a trap, hitting the step_resume_break
940 doesn't count as getting it. */
946 /* We come here if we hit a breakpoint but should not
947 stop for it. Possibly we also were stepping
948 and should stop for that. So fall through and
949 test for stepping. But, if not stepping,
952 #ifndef CALL_DUMMY_BREAKPOINT_OFFSET
953 /* This is the old way of detecting the end of the stack dummy.
954 An architecture which defines CALL_DUMMY_BREAKPOINT_OFFSET gets
955 handled above. As soon as we can test it on all of them, all
956 architectures should define it. */
958 /* If this is the breakpoint at the end of a stack dummy,
959 just stop silently, unless the user was doing an si/ni, in which
960 case she'd better know what she's doing. */
962 if (PC_IN_CALL_DUMMY (stop_pc
, stop_sp
, stop_frame_address
)
965 stop_print_frame
= 0;
966 stop_stack_dummy
= 1;
968 trap_expected_after_continue
= 1;
972 #endif /* No CALL_DUMMY_BREAKPOINT_OFFSET. */
974 if (step_resume_breakpoint
)
975 /* Having a step-resume breakpoint overrides anything
976 else having to do with stepping commands until
977 that breakpoint is reached. */
978 /* I suspect this could/should be keep_going, because if the
979 check_sigtramp2 check succeeds, then it will put in another
980 step_resume_breakpoint, and we aren't (yet) prepared to nest
982 goto check_sigtramp2
;
984 if (step_range_end
== 0)
985 /* Likewise if we aren't even stepping. */
986 /* I'm not sure whether this needs to be check_sigtramp2 or
987 whether it could/should be keep_going. */
988 goto check_sigtramp2
;
990 /* If stepping through a line, keep going if still within it. */
991 if (stop_pc
>= step_range_start
992 && stop_pc
< step_range_end
993 /* The step range might include the start of the
994 function, so if we are at the start of the
995 step range and either the stack or frame pointers
996 just changed, we've stepped outside */
997 && !(stop_pc
== step_range_start
998 && stop_frame_address
999 && (stop_sp INNER_THAN prev_sp
1000 || stop_frame_address
!= step_frame_address
)))
1002 /* We might be doing a BPSTAT_WHAT_SINGLE and getting a signal.
1003 So definately need to check for sigtramp here. */
1004 goto check_sigtramp2
;
1007 /* We stepped out of the stepping range. See if that was due
1008 to a subroutine call that we should proceed to the end of. */
1010 /* Did we just take a signal? */
1011 if (IN_SIGTRAMP (stop_pc
, stop_func_name
)
1012 && !IN_SIGTRAMP (prev_pc
, prev_func_name
))
1014 /* This code is needed at least in the following case:
1015 The user types "next" and then a signal arrives (before
1016 the "next" is done). */
1017 /* We've just taken a signal; go until we are back to
1018 the point where we took it and one more. */
1020 struct symtab_and_line sr_sal
;
1022 sr_sal
.pc
= prev_pc
;
1023 sr_sal
.symtab
= NULL
;
1025 step_resume_breakpoint
=
1026 set_momentary_breakpoint (sr_sal
, get_current_frame (),
1028 if (breakpoints_inserted
)
1029 insert_breakpoints ();
1032 /* If this is stepi or nexti, make sure that the stepping range
1033 gets us past that instruction. */
1034 if (step_range_end
== 1)
1035 /* FIXME: Does this run afoul of the code below which, if
1036 we step into the middle of a line, resets the stepping
1038 step_range_end
= (step_range_start
= prev_pc
) + 1;
1040 remove_breakpoints_on_following_step
= 1;
1044 if (stop_func_start
)
1046 /* Do this after the IN_SIGTRAMP check; it might give
1048 prologue_pc
= stop_func_start
;
1049 SKIP_PROLOGUE (prologue_pc
);
1052 /* ==> See comments at top of file on this algorithm. <==*/
1054 if ((stop_pc
< stop_func_start
1055 || stop_pc
>= stop_func_end
1056 || stop_pc
== stop_func_start
1057 || IN_SOLIB_TRAMPOLINE (stop_pc
, stop_func_name
))
1058 && (stop_func_start
!= prev_func_start
1059 || prologue_pc
!= stop_func_start
1060 || stop_sp
!= prev_sp
))
1062 /* It's a subroutine call. */
1064 if (step_over_calls
== 0)
1066 /* I presume that step_over_calls is only 0 when we're
1067 supposed to be stepping at the assembly language level
1068 ("stepi"). Just stop. */
1073 if (step_over_calls
> 0)
1074 /* We're doing a "next". */
1075 goto step_over_function
;
1077 /* If we are in a function call trampoline (a stub between
1078 the calling routine and the real function), locate the real
1079 function. That's what tells us (a) whether we want to step
1080 into it at all, and (b) what prologue we want to run to
1081 the end of, if we do step into it. */
1082 tmp
= SKIP_TRAMPOLINE_CODE (stop_pc
);
1084 stop_func_start
= tmp
;
1086 /* If we have line number information for the function we
1087 are thinking of stepping into, step into it.
1089 If there are several symtabs at that PC (e.g. with include
1090 files), just want to know whether *any* of them have line
1091 numbers. find_pc_line handles this. */
1093 struct symtab_and_line tmp_sal
;
1095 tmp_sal
= find_pc_line (stop_func_start
, 0);
1096 if (tmp_sal
.line
!= 0)
1097 goto step_into_function
;
1101 /* A subroutine call has happened. */
1103 /* Set a special breakpoint after the return */
1104 struct symtab_and_line sr_sal
;
1107 (SAVED_PC_AFTER_CALL (get_current_frame ()));
1108 sr_sal
.symtab
= NULL
;
1110 step_resume_breakpoint
=
1111 set_momentary_breakpoint (sr_sal
, get_current_frame (),
1113 if (breakpoints_inserted
)
1114 insert_breakpoints ();
1119 /* Subroutine call with source code we should not step over.
1120 Do step to the first line of code in it. */
1121 SKIP_PROLOGUE (stop_func_start
);
1122 sal
= find_pc_line (stop_func_start
, 0);
1123 /* Use the step_resume_break to step until
1124 the end of the prologue, even if that involves jumps
1125 (as it seems to on the vax under 4.2). */
1126 /* If the prologue ends in the middle of a source line,
1127 continue to the end of that source line.
1128 Otherwise, just go to end of prologue. */
1129 #ifdef PROLOGUE_FIRSTLINE_OVERLAP
1130 /* no, don't either. It skips any code that's
1131 legitimately on the first line. */
1133 if (sal
.end
&& sal
.pc
!= stop_func_start
)
1134 stop_func_start
= sal
.end
;
1137 if (stop_func_start
== stop_pc
)
1139 /* We are already there: stop now. */
1144 /* Put the step-breakpoint there and go until there. */
1146 struct symtab_and_line sr_sal
;
1148 sr_sal
.pc
= stop_func_start
;
1149 sr_sal
.symtab
= NULL
;
1151 /* Do not specify what the fp should be when we stop
1152 since on some machines the prologue
1153 is where the new fp value is established. */
1154 step_resume_breakpoint
=
1155 set_momentary_breakpoint (sr_sal
, NULL
, bp_step_resume
);
1156 if (breakpoints_inserted
)
1157 insert_breakpoints ();
1159 /* And make sure stepping stops right away then. */
1160 step_range_end
= step_range_start
;
1165 /* We've wandered out of the step range (but haven't done a
1166 subroutine call or return). (Is that true? I think we get
1167 here if we did a return and maybe a longjmp). */
1169 sal
= find_pc_line(stop_pc
, 0);
1171 if (step_range_end
== 1)
1173 /* It is stepi or nexti. We always want to stop stepping after
1181 /* We have no line number information. That means to stop
1182 stepping (does this always happen right after one instruction,
1183 when we do "s" in a function with no line numbers,
1184 or can this happen as a result of a return or longjmp?). */
1189 if (stop_pc
== sal
.pc
&& current_line
!= sal
.line
)
1191 /* We are at the start of a different line. So stop. Note that
1192 we don't stop if we step into the middle of a different line.
1193 That is said to make things like for (;;) statements work
1199 /* We aren't done stepping.
1201 Optimize by setting the stepping range to the line.
1202 (We might not be in the original line, but if we entered a
1203 new line in mid-statement, we continue stepping. This makes
1204 things like for(;;) statements work better.) */
1205 step_range_start
= sal
.pc
;
1206 step_range_end
= sal
.end
;
1211 && IN_SIGTRAMP (stop_pc
, stop_func_name
)
1212 && !IN_SIGTRAMP (prev_pc
, prev_func_name
))
1214 /* What has happened here is that we have just stepped the inferior
1215 with a signal (because it is a signal which shouldn't make
1216 us stop), thus stepping into sigtramp.
1218 So we need to set a step_resume_break_address breakpoint
1219 and continue until we hit it, and then step. FIXME: This should
1220 be more enduring than a step_resume breakpoint; we should know
1221 that we will later need to keep going rather than re-hitting
1222 the breakpoint here (see testsuite/gdb.t06/signals.exp where
1223 it says "exceedingly difficult"). */
1224 struct symtab_and_line sr_sal
;
1226 sr_sal
.pc
= prev_pc
;
1227 sr_sal
.symtab
= NULL
;
1229 step_resume_breakpoint
=
1230 set_momentary_breakpoint (sr_sal
, get_current_frame (),
1232 if (breakpoints_inserted
)
1233 insert_breakpoints ();
1235 remove_breakpoints_on_following_step
= 1;
1240 /* Come to this label when you need to resume the inferior.
1241 It's really much cleaner to do a goto than a maze of if-else
1244 /* Save the pc before execution, to compare with pc after stop. */
1245 prev_pc
= read_pc (); /* Might have been DECR_AFTER_BREAK */
1246 prev_func_start
= stop_func_start
; /* Ok, since if DECR_PC_AFTER
1247 BREAK is defined, the
1248 original pc would not have
1249 been at the start of a
1251 prev_func_name
= stop_func_name
;
1254 /* If we did not do break;, it means we should keep
1255 running the inferior and not return to debugger. */
1257 if (trap_expected
&& stop_signal
!= SIGTRAP
)
1259 /* We took a signal (which we are supposed to pass through to
1260 the inferior, else we'd have done a break above) and we
1261 haven't yet gotten our trap. Simply continue. */
1262 resume (CURRENTLY_STEPPING (), stop_signal
);
1266 /* Either the trap was not expected, but we are continuing
1267 anyway (the user asked that this signal be passed to the
1270 The signal was SIGTRAP, e.g. it was our signal, but we
1271 decided we should resume from it.
1273 We're going to run this baby now!
1275 Insert breakpoints now, unless we are trying
1276 to one-proceed past a breakpoint. */
1277 /* If we've just finished a special step resume and we don't
1278 want to hit a breakpoint, pull em out. */
1279 if (step_resume_breakpoint
== NULL
&&
1280 remove_breakpoints_on_following_step
)
1282 remove_breakpoints_on_following_step
= 0;
1283 remove_breakpoints ();
1284 breakpoints_inserted
= 0;
1286 else if (!breakpoints_inserted
&&
1287 (step_resume_breakpoint
!= NULL
|| !another_trap
))
1289 breakpoints_failed
= insert_breakpoints ();
1290 if (breakpoints_failed
)
1292 breakpoints_inserted
= 1;
1295 trap_expected
= another_trap
;
1297 if (stop_signal
== SIGTRAP
)
1300 #ifdef SHIFT_INST_REGS
1301 /* I'm not sure when this following segment applies. I do know, now,
1302 that we shouldn't rewrite the regs when we were stopped by a
1303 random signal from the inferior process. */
1304 /* FIXME: Shouldn't this be based on the valid bit of the SXIP?
1305 (this is only used on the 88k). */
1307 if (!bpstat_explains_signal (stop_bpstat
)
1308 && (stop_signal
!= SIGCLD
)
1309 && !stopped_by_random_signal
)
1311 #endif /* SHIFT_INST_REGS */
1313 resume (CURRENTLY_STEPPING (), stop_signal
);
1318 if (target_has_execution
)
1320 /* Assuming the inferior still exists, set these up for next
1321 time, just like we did above if we didn't break out of the
1323 prev_pc
= read_pc ();
1324 prev_func_start
= stop_func_start
;
1325 prev_func_name
= stop_func_name
;
1328 do_cleanups (old_cleanups
);
1331 /* Here to return control to GDB when the inferior stops for real.
1332 Print appropriate messages, remove breakpoints, give terminal our modes.
1334 STOP_PRINT_FRAME nonzero means print the executing frame
1335 (pc, function, args, file, line number and line text).
1336 BREAKPOINTS_FAILED nonzero means stop was due to error
1337 attempting to insert breakpoints. */
1342 /* Make sure that the current_frame's pc is correct. This
1343 is a correction for setting up the frame info before doing
1344 DECR_PC_AFTER_BREAK */
1345 if (target_has_execution
&& get_current_frame())
1346 (get_current_frame ())->pc
= read_pc ();
1348 if (breakpoints_failed
)
1350 target_terminal_ours_for_output ();
1351 print_sys_errmsg ("ptrace", breakpoints_failed
);
1352 printf_filtered ("Stopped; cannot insert breakpoints.\n\
1353 The same program may be running in another process.\n");
1356 if (target_has_execution
&& breakpoints_inserted
)
1357 if (remove_breakpoints ())
1359 target_terminal_ours_for_output ();
1360 printf_filtered ("Cannot remove breakpoints because program is no longer writable.\n\
1361 It might be running in another process.\n\
1362 Further execution is probably impossible.\n");
1365 breakpoints_inserted
= 0;
1367 /* Delete the breakpoint we stopped at, if it wants to be deleted.
1368 Delete any breakpoint that is to be deleted at the next stop. */
1370 breakpoint_auto_delete (stop_bpstat
);
1372 /* If an auto-display called a function and that got a signal,
1373 delete that auto-display to avoid an infinite recursion. */
1375 if (stopped_by_random_signal
)
1376 disable_current_display ();
1378 if (step_multi
&& stop_step
)
1381 target_terminal_ours ();
1383 /* Look up the hook_stop and run it if it exists. */
1385 if (stop_command
->hook
)
1387 catch_errors (hook_stop_stub
, (char *)stop_command
->hook
,
1388 "Error while running hook_stop:\n", RETURN_MASK_ALL
);
1391 if (!target_has_stack
)
1394 /* Select innermost stack frame except on return from a stack dummy routine,
1395 or if the program has exited. Print it without a level number if
1396 we have changed functions or hit a breakpoint. Print source line
1398 if (!stop_stack_dummy
)
1400 select_frame (get_current_frame (), 0);
1402 if (stop_print_frame
)
1406 source_only
= bpstat_print (stop_bpstat
);
1407 source_only
= source_only
||
1409 && step_frame_address
== stop_frame_address
1410 && step_start_function
== find_pc_function (stop_pc
));
1412 print_stack_frame (selected_frame
, -1, source_only
? -1: 1);
1414 /* Display the auto-display expressions. */
1419 /* Save the function value return registers, if we care.
1420 We might be about to restore their previous contents. */
1421 if (proceed_to_finish
)
1422 read_register_bytes (0, stop_registers
, REGISTER_BYTES
);
1424 if (stop_stack_dummy
)
1426 /* Pop the empty frame that contains the stack dummy.
1427 POP_FRAME ends with a setting of the current frame, so we
1428 can use that next. */
1430 select_frame (get_current_frame (), 0);
1435 hook_stop_stub (cmd
)
1438 execute_user_command ((struct cmd_list_element
*)cmd
, 0);
1442 int signal_stop_state (signo
)
1445 return ((signo
>= 0 && signo
< NSIG
) ? signal_stop
[signo
] : 0);
1448 int signal_print_state (signo
)
1451 return ((signo
>= 0 && signo
< NSIG
) ? signal_print
[signo
] : 0);
1454 int signal_pass_state (signo
)
1457 return ((signo
>= 0 && signo
< NSIG
) ? signal_program
[signo
] : 0);
1463 printf_filtered ("Signal\t\tStop\tPrint\tPass to program\tDescription\n");
1467 sig_print_info (number
)
1472 if ((name
= strsigno (number
)) == NULL
)
1473 printf_filtered ("%d\t\t", number
);
1475 printf_filtered ("%s (%d)\t", name
, number
);
1476 printf_filtered ("%s\t", signal_stop
[number
] ? "Yes" : "No");
1477 printf_filtered ("%s\t", signal_print
[number
] ? "Yes" : "No");
1478 printf_filtered ("%s\t\t", signal_program
[number
] ? "Yes" : "No");
1479 printf_filtered ("%s\n", safe_strsignal (number
));
1482 /* Specify how various signals in the inferior should be handled. */
1485 handle_command (args
, from_tty
)
1490 int digits
, wordlen
;
1491 int sigfirst
, signum
, siglast
;
1494 unsigned char *sigs
;
1495 struct cleanup
*old_chain
;
1499 error_no_arg ("signal to handle");
1502 /* Allocate and zero an array of flags for which signals to handle. */
1504 nsigs
= signo_max () + 1;
1505 sigs
= (unsigned char *) alloca (nsigs
);
1506 memset (sigs
, 0, nsigs
);
1508 /* Break the command line up into args. */
1510 argv
= buildargv (args
);
1515 old_chain
= make_cleanup (freeargv
, (char *) argv
);
1517 /* Walk through the args, looking for signal numbers, signal names, and
1518 actions. Signal numbers and signal names may be interspersed with
1519 actions, with the actions being performed for all signals cumulatively
1520 specified. Signal ranges can be specified as <LOW>-<HIGH>. */
1522 while (*argv
!= NULL
)
1524 wordlen
= strlen (*argv
);
1525 for (digits
= 0; isdigit ((*argv
)[digits
]); digits
++) {;}
1527 sigfirst
= siglast
= -1;
1529 if (wordlen
>= 1 && !strncmp (*argv
, "all", wordlen
))
1531 /* Apply action to all signals except those used by the
1532 debugger. Silently skip those. */
1535 siglast
= nsigs
- 1;
1537 else if (wordlen
>= 1 && !strncmp (*argv
, "stop", wordlen
))
1539 SET_SIGS (nsigs
, sigs
, signal_stop
);
1540 SET_SIGS (nsigs
, sigs
, signal_print
);
1542 else if (wordlen
>= 1 && !strncmp (*argv
, "ignore", wordlen
))
1544 UNSET_SIGS (nsigs
, sigs
, signal_program
);
1546 else if (wordlen
>= 2 && !strncmp (*argv
, "print", wordlen
))
1548 SET_SIGS (nsigs
, sigs
, signal_print
);
1550 else if (wordlen
>= 2 && !strncmp (*argv
, "pass", wordlen
))
1552 SET_SIGS (nsigs
, sigs
, signal_program
);
1554 else if (wordlen
>= 3 && !strncmp (*argv
, "nostop", wordlen
))
1556 UNSET_SIGS (nsigs
, sigs
, signal_stop
);
1558 else if (wordlen
>= 3 && !strncmp (*argv
, "noignore", wordlen
))
1560 SET_SIGS (nsigs
, sigs
, signal_program
);
1562 else if (wordlen
>= 4 && !strncmp (*argv
, "noprint", wordlen
))
1564 UNSET_SIGS (nsigs
, sigs
, signal_print
);
1565 UNSET_SIGS (nsigs
, sigs
, signal_stop
);
1567 else if (wordlen
>= 4 && !strncmp (*argv
, "nopass", wordlen
))
1569 UNSET_SIGS (nsigs
, sigs
, signal_program
);
1571 else if (digits
> 0)
1573 sigfirst
= siglast
= atoi (*argv
);
1574 if ((*argv
)[digits
] == '-')
1576 siglast
= atoi ((*argv
) + digits
+ 1);
1578 if (sigfirst
> siglast
)
1580 /* Bet he didn't figure we'd think of this case... */
1585 if (sigfirst
< 0 || sigfirst
>= nsigs
)
1587 error ("Signal %d not in range 0-%d", sigfirst
, nsigs
- 1);
1589 if (siglast
< 0 || siglast
>= nsigs
)
1591 error ("Signal %d not in range 0-%d", siglast
, nsigs
- 1);
1594 else if ((signum
= strtosigno (*argv
)) != 0)
1596 sigfirst
= siglast
= signum
;
1600 /* Not a number and not a recognized flag word => complain. */
1601 error ("Unrecognized or ambiguous flag word: \"%s\".", *argv
);
1604 /* If any signal numbers or symbol names were found, set flags for
1605 which signals to apply actions to. */
1607 for (signum
= sigfirst
; signum
>= 0 && signum
<= siglast
; signum
++)
1613 if (!allsigs
&& !sigs
[signum
])
1615 if (query ("%s is used by the debugger.\nAre you sure you want to change it? ", strsigno (signum
)))
1621 printf ("Not confirmed, unchanged.\n");
1635 target_notice_signals(inferior_pid
);
1639 /* Show the results. */
1640 sig_print_header ();
1641 for (signum
= 0; signum
< nsigs
; signum
++)
1645 sig_print_info (signum
);
1650 do_cleanups (old_chain
);
1653 /* Print current contents of the tables set by the handle command. */
1656 signals_info (signum_exp
, from_tty
)
1661 sig_print_header ();
1665 /* First see if this is a symbol name. */
1666 i
= strtosigno (signum_exp
);
1669 /* Nope, maybe it's an address which evaluates to a signal
1671 i
= parse_and_eval_address (signum_exp
);
1672 if (i
>= NSIG
|| i
< 0)
1673 error ("Signal number out of bounds.");
1679 printf_filtered ("\n");
1680 for (i
= 0; i
< NSIG
; i
++)
1687 printf_filtered ("\nUse the \"handle\" command to change these tables.\n");
1690 /* Save all of the information associated with the inferior<==>gdb
1691 connection. INF_STATUS is a pointer to a "struct inferior_status"
1692 (defined in inferior.h). */
1695 save_inferior_status (inf_status
, restore_stack_info
)
1696 struct inferior_status
*inf_status
;
1697 int restore_stack_info
;
1699 inf_status
->stop_signal
= stop_signal
;
1700 inf_status
->stop_pc
= stop_pc
;
1701 inf_status
->stop_frame_address
= stop_frame_address
;
1702 inf_status
->stop_step
= stop_step
;
1703 inf_status
->stop_stack_dummy
= stop_stack_dummy
;
1704 inf_status
->stopped_by_random_signal
= stopped_by_random_signal
;
1705 inf_status
->trap_expected
= trap_expected
;
1706 inf_status
->step_range_start
= step_range_start
;
1707 inf_status
->step_range_end
= step_range_end
;
1708 inf_status
->step_frame_address
= step_frame_address
;
1709 inf_status
->step_over_calls
= step_over_calls
;
1710 inf_status
->stop_after_trap
= stop_after_trap
;
1711 inf_status
->stop_soon_quietly
= stop_soon_quietly
;
1712 /* Save original bpstat chain here; replace it with copy of chain.
1713 If caller's caller is walking the chain, they'll be happier if we
1714 hand them back the original chain when restore_i_s is called. */
1715 inf_status
->stop_bpstat
= stop_bpstat
;
1716 stop_bpstat
= bpstat_copy (stop_bpstat
);
1717 inf_status
->breakpoint_proceeded
= breakpoint_proceeded
;
1718 inf_status
->restore_stack_info
= restore_stack_info
;
1719 inf_status
->proceed_to_finish
= proceed_to_finish
;
1721 memcpy (inf_status
->stop_registers
, stop_registers
, REGISTER_BYTES
);
1723 read_register_bytes (0, inf_status
->registers
, REGISTER_BYTES
);
1725 record_selected_frame (&(inf_status
->selected_frame_address
),
1726 &(inf_status
->selected_level
));
1730 struct restore_selected_frame_args
{
1731 FRAME_ADDR frame_address
;
1735 static int restore_selected_frame
PARAMS ((char *));
1737 /* Restore the selected frame. args is really a struct
1738 restore_selected_frame_args * (declared as char * for catch_errors)
1739 telling us what frame to restore. Returns 1 for success, or 0 for
1740 failure. An error message will have been printed on error. */
1742 restore_selected_frame (args
)
1745 struct restore_selected_frame_args
*fr
=
1746 (struct restore_selected_frame_args
*) args
;
1748 int level
= fr
->level
;
1750 fid
= find_relative_frame (get_current_frame (), &level
);
1752 /* If inf_status->selected_frame_address is NULL, there was no
1753 previously selected frame. */
1755 FRAME_FP (fid
) != fr
->frame_address
||
1758 warning ("Unable to restore previously selected frame.\n");
1761 select_frame (fid
, fr
->level
);
1766 restore_inferior_status (inf_status
)
1767 struct inferior_status
*inf_status
;
1769 stop_signal
= inf_status
->stop_signal
;
1770 stop_pc
= inf_status
->stop_pc
;
1771 stop_frame_address
= inf_status
->stop_frame_address
;
1772 stop_step
= inf_status
->stop_step
;
1773 stop_stack_dummy
= inf_status
->stop_stack_dummy
;
1774 stopped_by_random_signal
= inf_status
->stopped_by_random_signal
;
1775 trap_expected
= inf_status
->trap_expected
;
1776 step_range_start
= inf_status
->step_range_start
;
1777 step_range_end
= inf_status
->step_range_end
;
1778 step_frame_address
= inf_status
->step_frame_address
;
1779 step_over_calls
= inf_status
->step_over_calls
;
1780 stop_after_trap
= inf_status
->stop_after_trap
;
1781 stop_soon_quietly
= inf_status
->stop_soon_quietly
;
1782 bpstat_clear (&stop_bpstat
);
1783 stop_bpstat
= inf_status
->stop_bpstat
;
1784 breakpoint_proceeded
= inf_status
->breakpoint_proceeded
;
1785 proceed_to_finish
= inf_status
->proceed_to_finish
;
1787 memcpy (stop_registers
, inf_status
->stop_registers
, REGISTER_BYTES
);
1789 /* The inferior can be gone if the user types "print exit(0)"
1790 (and perhaps other times). */
1791 if (target_has_execution
)
1792 write_register_bytes (0, inf_status
->registers
, REGISTER_BYTES
);
1794 /* The inferior can be gone if the user types "print exit(0)"
1795 (and perhaps other times). */
1797 /* FIXME: If we are being called after stopping in a function which
1798 is called from gdb, we should not be trying to restore the
1799 selected frame; it just prints a spurious error message (The
1800 message is useful, however, in detecting bugs in gdb (like if gdb
1801 clobbers the stack)). In fact, should we be restoring the
1802 inferior status at all in that case? . */
1804 if (target_has_stack
&& inf_status
->restore_stack_info
)
1806 struct restore_selected_frame_args fr
;
1807 fr
.level
= inf_status
->selected_level
;
1808 fr
.frame_address
= inf_status
->selected_frame_address
;
1809 /* The point of catch_errors is that if the stack is clobbered,
1810 walking the stack might encounter a garbage pointer and error()
1811 trying to dereference it. */
1812 if (catch_errors (restore_selected_frame
, &fr
,
1813 "Unable to restore previously selected frame:\n",
1814 RETURN_MASK_ERROR
) == 0)
1815 /* Error in restoring the selected frame. Select the innermost
1817 select_frame (get_current_frame (), 0);
1823 _initialize_infrun ()
1826 register int numsigs
;
1828 add_info ("signals", signals_info
,
1829 "What debugger does when program gets various signals.\n\
1830 Specify a signal number as argument to print info on that signal only.");
1831 add_info_alias ("handle", "signals", 0);
1833 add_com ("handle", class_run
, handle_command
,
1834 "Specify how to handle a signal.\n\
1835 Args are signal numbers and actions to apply to those signals.\n\
1836 Signal numbers may be numeric (ex. 11) or symbolic (ex. SIGSEGV).\n\
1837 Numeric ranges may be specified with the form LOW-HIGH (ex. 14-21).\n\
1838 The special arg \"all\" is recognized to mean all signals except those\n\
1839 used by the debugger, typically SIGTRAP and SIGINT.\n\
1840 Recognized actions include \"stop\", \"nostop\", \"print\", \"noprint\",\n\
1841 \"pass\", \"nopass\", \"ignore\", or \"noignore\".\n\
1842 Stop means reenter debugger if this signal happens (implies print).\n\
1843 Print means print a message if this signal happens.\n\
1844 Pass means let program see this signal; otherwise program doesn't know.\n\
1845 Ignore is a synonym for nopass and noignore is a synonym for pass.\n\
1846 Pass and Stop may be combined.");
1848 stop_command
= add_cmd ("stop", class_obscure
, not_just_help_class_command
,
1849 "There is no `stop' command, but you can set a hook on `stop'.\n\
1850 This allows you to set a list of commands to be run each time execution\n\
1851 of the program stops.", &cmdlist
);
1853 numsigs
= signo_max () + 1;
1854 signal_stop
= (unsigned char *)
1855 xmalloc (sizeof (signal_stop
[0]) * numsigs
);
1856 signal_print
= (unsigned char *)
1857 xmalloc (sizeof (signal_print
[0]) * numsigs
);
1858 signal_program
= (unsigned char *)
1859 xmalloc (sizeof (signal_program
[0]) * numsigs
);
1860 for (i
= 0; i
< numsigs
; i
++)
1863 signal_print
[i
] = 1;
1864 signal_program
[i
] = 1;
1867 /* Signals caused by debugger's own actions
1868 should not be given to the program afterwards. */
1869 signal_program
[SIGTRAP
] = 0;
1870 signal_program
[SIGINT
] = 0;
1872 /* Signals that are not errors should not normally enter the debugger. */
1874 signal_stop
[SIGALRM
] = 0;
1875 signal_print
[SIGALRM
] = 0;
1876 #endif /* SIGALRM */
1878 signal_stop
[SIGVTALRM
] = 0;
1879 signal_print
[SIGVTALRM
] = 0;
1880 #endif /* SIGVTALRM */
1882 signal_stop
[SIGPROF
] = 0;
1883 signal_print
[SIGPROF
] = 0;
1884 #endif /* SIGPROF */
1886 signal_stop
[SIGCHLD
] = 0;
1887 signal_print
[SIGCHLD
] = 0;
1888 #endif /* SIGCHLD */
1890 signal_stop
[SIGCLD
] = 0;
1891 signal_print
[SIGCLD
] = 0;
1894 signal_stop
[SIGIO
] = 0;
1895 signal_print
[SIGIO
] = 0;
1898 signal_stop
[SIGURG
] = 0;
1899 signal_print
[SIGURG
] = 0;