diff options
author | Jan Kratochvil <jan.kratochvil@redhat.com> | 2012-08-27 16:55:39 +0000 |
---|---|---|
committer | Jan Kratochvil <jan.kratochvil@redhat.com> | 2012-08-27 16:55:39 +0000 |
commit | 1c8cdcb14fe619a64accf1cc11d5d7009d76c748 (patch) | |
tree | bcb0239e74df36cba0c7f9f7a51874d565796709 /gdb | |
parent | e96877996081948d7f0f9ee2152b2e409781def3 (diff) | |
download | gdb-1c8cdcb14fe619a64accf1cc11d5d7009d76c748.zip gdb-1c8cdcb14fe619a64accf1cc11d5d7009d76c748.tar.gz gdb-1c8cdcb14fe619a64accf1cc11d5d7009d76c748.tar.bz2 |
gdb/
* breakpoint.c (parse_breakpoint_sals) <(*address) == NULL>: New
variable pc. Call find_pc_line instead of find_pc_overlay, restore
original PC for it.
gdb/testsuite/
* gdb.base/break-caller-line.c: New file.
* gdb.base/break-caller-line.exp: New file.
Diffstat (limited to 'gdb')
-rw-r--r-- | gdb/ChangeLog | 6 | ||||
-rw-r--r-- | gdb/breakpoint.c | 10 | ||||
-rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/break-caller-line.c | 31 | ||||
-rw-r--r-- | gdb/testsuite/gdb.base/break-caller-line.exp | 55 |
5 files changed, 105 insertions, 2 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 1b478ea..e20414b 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,9 @@ +2012-08-27 Jan Kratochvil <jan.kratochvil@redhat.com> + + * breakpoint.c (parse_breakpoint_sals) <(*address) == NULL>: New + variable pc. Call find_pc_line instead of find_pc_overlay, restore + original PC for it. + 2012-08-27 Eli Zaretskii <eliz@gnu.org> Jan Kratochvil <jan.kratochvil@redhat.com> diff --git a/gdb/breakpoint.c b/gdb/breakpoint.c index b2a00be..b074ecc 100644 --- a/gdb/breakpoint.c +++ b/gdb/breakpoint.c @@ -9126,21 +9126,27 @@ parse_breakpoint_sals (char **address, { struct linespec_sals lsal; struct symtab_and_line sal; + CORE_ADDR pc; init_sal (&sal); /* Initialize to zeroes. */ lsal.sals.sals = (struct symtab_and_line *) xmalloc (sizeof (struct symtab_and_line)); /* Set sal's pspace, pc, symtab, and line to the values - corresponding to the last call to print_frame_info. */ + corresponding to the last call to print_frame_info. + Be sure to reinitialize LINE with NOTCURRENT == 0 + as the breakpoint line number is inappropriate otherwise. + find_pc_line would adjust PC, re-set it back. */ get_last_displayed_sal (&sal); - sal.section = find_pc_overlay (sal.pc); + pc = sal.pc; + sal = find_pc_line (pc, 0); /* "break" without arguments is equivalent to "break *PC" where PC is the last displayed codepoint's address. So make sure to set sal.explicit_pc to prevent GDB from trying to expand the list of sals to include all other instances with the same symtab and line. */ + sal.pc = pc; sal.explicit_pc = 1; lsal.sals.sals[0] = sal; diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 13937de..0a3d01a 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,5 +1,10 @@ 2012-08-27 Jan Kratochvil <jan.kratochvil@redhat.com> + * gdb.base/break-caller-line.c: New file. + * gdb.base/break-caller-line.exp: New file. + +2012-08-27 Jan Kratochvil <jan.kratochvil@redhat.com> + * gdb.ada/rdv_wait.exp (set debug-file-directory): New command. * gdb.arch/i386-cfi-notcurrent.S: New file. * gdb.arch/i386-cfi-notcurrent.exp: New file. diff --git a/gdb/testsuite/gdb.base/break-caller-line.c b/gdb/testsuite/gdb.base/break-caller-line.c new file mode 100644 index 0000000..59d15ee --- /dev/null +++ b/gdb/testsuite/gdb.base/break-caller-line.c @@ -0,0 +1,31 @@ +/* This testcase is part of GDB, the GNU debugger. + + Copyright 2012 Free Software Foundation, Inc. + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program. If not, see <http://www.gnu.org/licenses/>. */ + +static int v; + +static void +callee (void) +{ + v++; +} + +int +main (void) +{ + callee (); + return 0; +} diff --git a/gdb/testsuite/gdb.base/break-caller-line.exp b/gdb/testsuite/gdb.base/break-caller-line.exp new file mode 100644 index 0000000..45abe476 --- /dev/null +++ b/gdb/testsuite/gdb.base/break-caller-line.exp @@ -0,0 +1,55 @@ +# Copyright (C) 2012 Free Software Foundation, Inc. + +# This program is free software; you can redistribute it and/or modify +# it under the terms of the GNU General Public License as published by +# the Free Software Foundation; either version 3 of the License, or +# (at your option) any later version. +# +# This program is distributed in the hope that it will be useful, +# but WITHOUT ANY WARRANTY; without even the implied warranty of +# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +# GNU General Public License for more details. +# +# You should have received a copy of the GNU General Public License +# along with this program. If not, see <http://www.gnu.org/licenses/>. + +standard_testfile + +if { [prepare_for_testing ${testfile}.exp ${testfile}] } { + return -1 +} + +if ![runto callee] { + return 0 +} + +set test "up" +gdb_test_multiple $test $test { + -re "\r\n(\[0-9\]+)\[ \t\]+callee \\(\\);\r\n$gdb_prompt $" { + set notcurrent $expect_out(1,string) + pass $test + } +} + +set test {info line *$pc} +gdb_test_multiple $test $test { + -re "\r\nLine (\[0-9\]+) of .*\r\n$gdb_prompt $" { + set current $expect_out(1,string) + pass $test + } +} + +if {$notcurrent == $current} { + untested "target arch has an instruction after call as part of the caller line" + return 0 +} + +set test "break" +gdb_test_multiple $test $test { + -re "\r\nBreakpoint \[0-9\]+ at .*, line $current\\.\r\n$gdb_prompt $" { + pass $test + } + -re "\r\nBreakpoint \[0-9\]+ at .*, line $notcurrent\\.\r\n$gdb_prompt $" { + fail "$test (caller line)" + } +} |