exception.exp revision 1.8
1# This testcase is part of GDB, the GNU debugger. 2# 3# Copyright 2013-2023 Free Software Foundation, Inc. 4# 5# Contributed by Intel Corp. <markus.t.metzger@intel.com> 6# 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 3 of the License, or 10# (at your option) any later version. 11# 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. 16# 17# You should have received a copy of the GNU General Public License 18# along with this program. If not, see <http://www.gnu.org/licenses/>. 19 20if { [skip_btrace_tests] } { 21 unsupported "target does not support record-btrace" 22 return -1 23} 24 25# We expect a specific function call history. This gets messed up with 26# PIE on 32-bit. 27standard_testfile exception.cc 28if [prepare_for_testing "failed to prepare" $testfile $srcfile \ 29 {nopie c++ debug}] { 30 return -1 31} 32 33if ![runto_main] { 34 return -1 35} 36 37# we want to see the full trace for this test 38gdb_test_no_output "set record function-call-history-size 0" 39 40# set bp 41set bp_1 [gdb_get_line_number "bp.1" $srcfile] 42set bp_2 [gdb_get_line_number "bp.2" $srcfile] 43gdb_breakpoint $bp_1 44gdb_breakpoint $bp_2 45 46# trace the code between the two breakpoints 47gdb_continue_to_breakpoint "cont to bp.1" ".*$srcfile:$bp_1\r\n.*" 48# increase the BTS buffer size - the trace can be quite big 49gdb_test_no_output "set record btrace bts buffer-size 128000" 50gdb_test_no_output "record btrace" 51gdb_continue_to_breakpoint "cont to bp.2" ".*$srcfile:$bp_2\r\n.*" 52 53# show the flat branch trace 54send_gdb "record function-call-history 1\n" 55gdb_expect_list "flat" "\r\n$gdb_prompt $" [list \ 56 [multi_line \ 57 "1\tmain\\(\\)" \ 58 "2\ttest\\(\\)" \ 59 "3\tfoo\\(\\)" \ 60 "4\tbar\\(\\)" \ 61 "5\tbad\\(\\)\r" \ 62 ] "" \ 63 [multi_line \ 64 "\[0-9\]*\ttest\\(\\)" \ 65 "\[0-9\]*\tmain\\(\\)" \ 66 ] "" \ 67 ] 68 69# show the branch trace with calls indented 70send_gdb "record function-call-history /c 1\n" 71gdb_expect_list "indented" "\r\n$gdb_prompt $" [list \ 72 [multi_line \ 73 "1\tmain\\(\\)" \ 74 "2\t test\\(\\)" \ 75 "3\t foo\\(\\)" \ 76 "4\t bar\\(\\)" \ 77 "5\t bad\\(\\)\r" \ 78 ] "" \ 79 [multi_line \ 80 "\[0-9\]*\t test\\(\\)" \ 81 "\[0-9\]*\tmain\\(\\)" \ 82 ] "" \ 83 ] 84