diff options
-rw-r--r-- | gdb/ChangeLog | 7 | ||||
-rw-r--r-- | gdb/mips-tdep.c | 41 |
2 files changed, 42 insertions, 6 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 9638be5..a0823c5 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -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. diff --git a/gdb/mips-tdep.c b/gdb/mips-tdep.c index 14267fa..2e960d3 100644 --- a/gdb/mips-tdep.c +++ b/gdb/mips-tdep.c @@ -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); } |