Update copyright year range in header of all files managed by GDB
[binutils-gdb.git] / gdb / testsuite / gdb.arch / aarch64-pauth.exp
blob731bf760410b26a8216d49e1dbadd83309d0d24b
1 # Copyright (C) 2019-2023 Free Software Foundation, Inc.
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.
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.
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/>.
16 # Test a binary with address signing works regardless of whether the target
17 # supports pauth instructions.  On non pauth systems, all pauth instructions
18 # are treated as nops.
20 if {![is_aarch64_target]} {
21     verbose "Skipping ${gdb_test_file_name}."
22     return
25 # Build program with address signing forced on.
26 standard_testfile
27 set compile_flags {debug}
28 lappend compile_flags "additional_flags=-fno-inline"
30 # Records whether the compilation was successful or not.
31 set compilation_ok 0
33 # We need to try a couple compilation flags here because -msign-return-address
34 # was dropped at some point, but could still be supported.
35 foreach pauth_flag "-mbranch-protection=pac-ret+leaf -msign-return-address=all" {
36     set flags $compile_flags
37     lappend flags "additional_flags=$pauth_flag"
39     if {!$compilation_ok && ![prepare_for_testing "failed to prepare" ${testfile} ${srcfile} ${flags}] } {
40         set compilation_ok 1
41     }
44 # If we couldn't compile, just bail out.
45 if {!$compilation_ok} {
46     return -1
49 if ![runto_main] {
50     return -1
53 gdb_breakpoint [ gdb_get_line_number "break here" ]
54 gdb_continue_to_breakpoint "break here" ".*break here.*"
56 # Ensure we can get a full backtrace, despite the address signing.
57 gdb_test "bt" \
58     [multi_line \
59         "#0\[ \t\]+bar \\(b=9\\) at \[^\r\n\]+" \
60         "#1\[ \t\]+$hex (\\\[PAC\\\] )?in foo \\(a=5\\) at \[^\r\n\]+" \
61         "#2\[ \t\]+$hex (\\\[PAC\\\] )?in main \\(\\) at \[^\r\n\]+" ] \
62     "backtrace"