1 # Copyright 2006-2024 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 PowerPC(64le) prologue analyzer. 17 18 # Do not run on AIX (where we won't be able to build the tests without 19 # some surgery) or on PowerPC64 (ditto, dot symbols). 20 require {!istarget *-*-aix*} {istarget "powerpc*-*-*"} 21 22 standard_testfile .c 23 24 # Don't use "debug", so that we don't have line information for the assembly 25 # fragments. 26 if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {}] != "" } { 27 untested "PowerPC prologue tests" 28 return -1 29 } 30 31 if { [prepare_for_testing "failed to prepare" $testfile "$srcfile" \ 32 {}] } { 33 return -1 34 } 35 36 # Run to `main' where we begin our tests. 37 if {![runto_main]} { 38 return 0 39 } 40 41 # Testcase for PIC prologue. 42 gdb_breakpoint "gdb2029_marker" 43 gdb_test "continue" "Breakpoint $decimal, $hex in gdb2029_marker \\(\\).*" \ 44 "continue to PIC" 45 46 gdb_test "backtrace 10" \ 47 "#0\[ \t\]*$hex in gdb2029_marker.*\r\n#1\[ \t\]*$hex in gdb2029.*\r\n#2\[ \t\]*$hex in main.*" \ 48 "backtrace in PIC marker" 49 50 gdb_test "finish" ".*$hex in gdb2029 .*" "finish from PIC" 51 52 gdb_test "backtrace 10" \ 53 "#0\[ \t\]*$hex in gdb2029 .*\r\n#1\[ \t\]*$hex in main.*" \ 54 "backtrace in PIC" 55 56 gdb_test "info frame" \ 57 ".*Saved registers:.*r31 at.*pc at.*lr at.*" \ 58 "saved registers in PIC" 59 60 # Testcase for scheduled prologue. 61 gdb_breakpoint "optimized_1_marker" 62 gdb_test "continue" "Breakpoint $decimal, $hex in optimized_1_marker \\(\\).*" \ 63 "continue to optimized" 64 65 gdb_test "backtrace 10" \ 66 "#0\[ \t\]*$hex in optimized_1_marker.*\r\n#1\[ \t\]*$hex in optimized_1.*\r\n#2\[ \t\]*$hex in main.*" \ 67 "backtrace in optimized marker" 68 69 gdb_test "finish" ".*$hex in optimized_1 .*" "finish from optimized" 70 71 gdb_test "backtrace 10" \ 72 "#0\[ \t\]*$hex in optimized_1 .*\r\n#1\[ \t\]*$hex in main.*" \ 73 "backtrace in optimized" 74 75 gdb_test "info frame" \ 76 ".*Saved registers:.*r30 at.*pc at.*lr at.*" \ 77 "saved registers in optimized" 78 79