break-always.exp revision 1.6
1# Copyright 2008-2016 Free Software Foundation, Inc. 2 3# This program is free software; you can redistribute it and/or modify 4# it under the terms of the GNU General Public License as published by 5# the Free Software Foundation; either version 3 of the License, or 6# (at your option) any later version. 7# 8# This program is distributed in the hope that it will be useful, 9# but WITHOUT ANY WARRANTY; without even the implied warranty of 10# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 11# GNU General Public License for more details. 12# 13# You should have received a copy of the GNU General Public License 14# along with this program. If not, see <http://www.gnu.org/licenses/>. 15 16# Test that 'set breakpoint always-inserted 1' is not a brick 17# Also verifies that breakpoint enabling/disabling works properly 18# with duplicated breakpoints. 19 20if { [prepare_for_testing break-always.exp break-always break-always.c] } { 21 return -1 22} 23 24set bar_location [gdb_get_line_number "break in bar" break-always.c] 25 26gdb_test_no_output "set breakpoint always-inserted on" 27 28gdb_test "show breakpoint always-inserted" "mode is on\." \ 29 "confirm breakpoint always-inserted" 30 31runto foo 32 33gdb_test "break bar" "Breakpoint 2.*" "set breakpoint on bar" 34gdb_test "break bar" "Note: breakpoint 2 also set.*Breakpoint 3.*" "set 2nd breakpoint on bar" 35gdb_test "break bar" "Note: breakpoints 2 and 3 also set.*Breakpoint 4.*" "set 3rd breakpoint on bar" 36gdb_test "break bar" "Note: breakpoints 2, 3 and 4 also set.*Breakpoint 5.*" "set 4th breakpoint on bar" 37gdb_test "info breakpoints" "keep y.*keep y.*keep y.*keep y.*keep y.*" "initial check breakpoint state" 38gdb_test_no_output "disable" "initial disable all breakpoints" 39gdb_test_no_output "enable" "initial enable all breakpoints" 40gdb_test_no_output "disable" "re-disable all breakpoints" 41gdb_test_no_output "enable 3" "enable 3.A" 42gdb_test_no_output "disable 3" "disable 3.B" 43gdb_test_no_output "enable 3" "enable 3.C" 44gdb_test_no_output "enable 2" "enable 2.D" 45gdb_test_no_output "disable 2" "disable 2.E" 46gdb_test_no_output "disable 3" "disable 3.F" 47gdb_test_no_output "enable 3" "enable 3.G" 48gdb_test_no_output "enable 2" "enable 2.H" 49gdb_test_no_output "disable 2" "disable 2.I" 50gdb_test "info breakpoints" "keep n.*keep n.*keep y.*keep n.*keep n.*" "before re-enable check breakpoint state" 51gdb_test_no_output "enable" "re-enable all breakpoints" 52 53set bp_address 0 54set test "set breakpoint on bar 2" 55gdb_test_multiple "break bar" $test { 56 -re "Breakpoint 6 at ($hex).*$gdb_prompt $" { 57 set bp_address $expect_out(1,string) 58 pass $test 59 } 60} 61 62# Save the original INSN under the breakpoint. 63gdb_test "p /x \$shadow = *(char *) $bp_address" \ 64 " = $hex" \ 65 "save shadow" 66 67# Overwrite memory where the breakpoint is planted. GDB should update 68# its memory breakpoint's shadows, to account for the new contents, 69# and still leave the breakpoint insn planted. Try twice with 70# different values, in case we happen to be writting exactly what was 71# there already. 72foreach test_value {0 1} { 73 set write_test "write $test_value to breakpoint's address" 74 75 gdb_test_multiple "p /x *(char *) $bp_address = $test_value" $write_test { 76 -re "Cannot access memory at address $hex.*$gdb_prompt $" { 77 78 # Some targets do not allow manually writing a breakpoint to a 79 # certain memory address, like QEMU. In that case, just bail out. 80 unsupported "Cannot write to address $bp_address" 81 return -1 82 } 83 -re " = .*$gdb_prompt $" { 84 pass $write_test 85 } 86 } 87 88 set read_test "read back $test_value from the breakpoint's address" 89 gdb_test "p /x *(char *) $bp_address" " = 0x$test_value" $read_test 90} 91 92# Restore the original contents. 93gdb_test "p /x *(char *) $bp_address = \$shadow" "" \ 94 "restore the original contents" 95 96# Run to breakpoint. 97gdb_continue_to_breakpoint "bar" ".*break-always.c:$bar_location.*" 98