* mips-tdep.c (heuristic_fence_post): new static variable.
(heuristic_proc_start): use heuristic_fence_post, print better warnings, but only if not stop_soon_quietly. (_initialize_mips_tdep): add_set_cmd for heuristic-fence-post.
This commit is contained in:
parent
5afa2040f4
commit
3127785acd
2 changed files with 42 additions and 6 deletions
|
@ -1,3 +1,10 @@
|
|||
Thu Apr 22 16:24:36 1993 K. Richard Pixley (rich@rtl.cygnus.com)
|
||||
|
||||
* mips-tdep.c (heuristic_fence_post): new static variable.
|
||||
(heuristic_proc_start): use heuristic_fence_post, print better
|
||||
warnings, but only if not stop_soon_quietly.
|
||||
(_initialize_mips_tdep): add_set_cmd for heuristic-fence-post.
|
||||
|
||||
Thu Apr 22 14:50:05 1993 Jim Kingdon (kingdon@cygnus.com)
|
||||
|
||||
* symtab.h: Fix LOC_REF_ARG comment.
|
||||
|
|
|
@ -59,6 +59,11 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
|
|||
user to turn it off. */
|
||||
int mips_fpu = 1;
|
||||
|
||||
/* Heuristic_proc_start may hunt through the text section for a long
|
||||
time across a 2400 baud serial line. Allows the user to limit this
|
||||
search. */
|
||||
static unsigned int heuristic_fence_post = 0;
|
||||
|
||||
#define PROC_LOW_ADDR(proc) ((proc)->pdr.adr) /* least address */
|
||||
#define PROC_HIGH_ADDR(proc) ((proc)->pdr.iline) /* upper address bound */
|
||||
#define PROC_FRAME_OFFSET(proc) ((proc)->pdr.frameoffset)
|
||||
|
@ -126,24 +131,39 @@ static struct frame_saved_regs temp_saved_regs;
|
|||
|
||||
/* This fencepost looks highly suspicious to me. Removing it also
|
||||
seems suspicious as it could affect remote debugging across serial
|
||||
lines. At the very least, this needs a warning message.
|
||||
rich@cygnus.com 12mar93. */
|
||||
lines. */
|
||||
|
||||
static CORE_ADDR
|
||||
heuristic_proc_start(pc)
|
||||
CORE_ADDR pc;
|
||||
{
|
||||
CORE_ADDR start_pc = pc;
|
||||
CORE_ADDR fence = start_pc - 200;
|
||||
CORE_ADDR fence = start_pc - heuristic_fence_post;
|
||||
|
||||
if (start_pc == 0) return 0;
|
||||
if (fence < VM_MIN_ADDRESS) fence = VM_MIN_ADDRESS;
|
||||
|
||||
if (heuristic_fence_post == UINT_MAX
|
||||
|| fence < VM_MIN_ADDRESS)
|
||||
fence = VM_MIN_ADDRESS;
|
||||
|
||||
/* search back for previous return */
|
||||
for (start_pc -= 4; ; start_pc -= 4)
|
||||
if (start_pc < fence)
|
||||
{
|
||||
warning("Cannot find enclosing function for pc 0x%x", pc);
|
||||
/* It's not clear to me why we reach this point when
|
||||
stop_soon_quietly, but with this test, at least we
|
||||
don't print out warnings for every child forked (eg, on
|
||||
decstation). 22apr93 rich@cygnus.com. */
|
||||
if (!stop_soon_quietly)
|
||||
{
|
||||
if (fence == VM_MIN_ADDRESS)
|
||||
warning("Hit beginning of text section without finding");
|
||||
else
|
||||
warning("Hit heuristic-fence-post without finding");
|
||||
|
||||
warning("enclosing function for pc 0x%x", pc);
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
else if (ABOUT_TO_RETURN(start_pc))
|
||||
|
@ -781,7 +801,8 @@ mips_skip_prologue(pc)
|
|||
#endif
|
||||
}
|
||||
|
||||
/* Let the user turn off floating point. */
|
||||
/* Let the user turn off floating point and set the fence post for
|
||||
heuristic_proc_start. */
|
||||
|
||||
void
|
||||
_initialize_mips_tdep ()
|
||||
|
@ -793,4 +814,12 @@ _initialize_mips_tdep ()
|
|||
Turn off to avoid using floating point instructions when calling functions\n\
|
||||
or dealing with return values.", &setlist),
|
||||
&showlist);
|
||||
|
||||
add_show_from_set
|
||||
(add_set_cmd ("heuristic-fence-post", class_support, var_uinteger,
|
||||
(char *) &heuristic_fence_post,
|
||||
"Set the distance searched for the start of a function.\n\
|
||||
Set number of bytes to be searched backward to find the beginning of a
|
||||
function without symbols.", &setlist),
|
||||
&showlist);
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue