1d506c26d9
This commit is the result of the following actions:
- Running gdb/copyright.py to update all of the copyright headers to
include 2024,
- Manually updating a few files the copyright.py script told me to
update, these files had copyright headers embedded within the
file,
- Regenerating gdbsupport/Makefile.in to refresh it's copyright
date,
- Using grep to find other files that still mentioned 2023. If
these files were updated last year from 2022 to 2023 then I've
updated them this year to 2024.
I'm sure I've probably missed some dates. Feel free to fix them up as
you spot them.
152 lines
5 KiB
Text
152 lines
5 KiB
Text
# Copyright 2018-2024 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/>.
|
|
#
|
|
# This file is part of the gdb testsuite.
|
|
|
|
require is_aarch64_target
|
|
|
|
set compile_flags {debug}
|
|
|
|
if { ![allow_aarch64_sve_tests] } {
|
|
unsupported "target does not support SVE"
|
|
set sve_hw 0
|
|
} else {
|
|
set sve_hw 1
|
|
lappend compile_flags "additional_flags=-DSVE"
|
|
}
|
|
|
|
standard_testfile
|
|
if { [prepare_for_testing "failed to prepare" ${testfile} ${srcfile} ${compile_flags}] } {
|
|
return -1
|
|
}
|
|
|
|
if ![runto_main] {
|
|
return -1
|
|
}
|
|
|
|
set endianness [get_endianness]
|
|
|
|
if {$endianness == "little"} {
|
|
set reg_handler_value_128 "0x5f5e5d5c5b5a59585756555453525150"
|
|
set reg_handler_value_64 "0x5756555453525150"
|
|
set reg_handler_value_32 "0x53525150"
|
|
set reg_handler_value_16 "0x5150"
|
|
set reg_handler_value_8 "0x50"
|
|
set reg_main_value_128 "0x1f1e1d1c1b1a19181716151413121110"
|
|
set reg_main_value_64 "0x1716151413121110"
|
|
set reg_main_value_32 "0x13121110"
|
|
set reg_main_value_16 "0x1110"
|
|
set reg_main_value_8 "0x10"
|
|
} else {
|
|
set reg_handler_value_128 "0x505152535455565758595a5b5c5d5e5f"
|
|
set reg_handler_value_64 "0x5051525354555657"
|
|
set reg_handler_value_32 "0x50515253"
|
|
set reg_handler_value_16 "0x5051"
|
|
set reg_handler_value_8 "0x50"
|
|
set reg_main_value_128 "0x101112131415161718191a1b1c1d1e1f"
|
|
set reg_main_value_64 "0x1011121314151617"
|
|
set reg_main_value_32 "0x10111213"
|
|
set reg_main_value_16 "0x1011"
|
|
set reg_main_value_8 "0x10"
|
|
}
|
|
set zreg_handler_value "\\{0x5756555453525150, .*"
|
|
set zreg_main_value "\\{0x1716151413121110, .*"
|
|
set preg_handler_value "\\{0x11, .*"
|
|
set preg_main_value "\\{0x1, 0x0, .*"
|
|
|
|
#Ignore x0, and x29 to x31
|
|
set xreg_nums [list 1 2 3 4 5 6 7 8 9 11 12 13 14 15 16 17 18 19 21 22 23 24 \
|
|
25 26 27 28 ]
|
|
set vreg_nums [list 0 1 2 3 4 5 6 7 8 9 11 12 13 14 15 16 17 18 19 21 22 23 \
|
|
24 25 26 27 28 29 30 31]
|
|
set preg_nums [list 0 1 2 3 4 5 6 7 8 9 11 12 13 14 15]
|
|
|
|
proc check_regs {regtype regnums value postfix} {
|
|
foreach regnum $regnums {
|
|
gdb_test "print /x \$$regtype$regnum$postfix" \
|
|
".* = {?$value}?" \
|
|
"check register \$$regtype$regnum has value $value"
|
|
}
|
|
}
|
|
|
|
# Run until end of signal handler
|
|
|
|
gdb_test "continue" \
|
|
"Continuing.*Program received signal SIGILL.*" \
|
|
"continue until signal"
|
|
|
|
gdb_breakpoint [gdb_get_line_number "exit(0)"]
|
|
gdb_continue_to_breakpoint "exit" ".*exit.*"
|
|
|
|
set handlerframe [get_current_frame_number]
|
|
set mainframe [expr $handlerframe + 2]
|
|
|
|
|
|
# Check register values
|
|
|
|
with_test_prefix "handler frame 1st" {
|
|
check_regs x $xreg_nums $reg_handler_value_64 ""
|
|
check_regs v $vreg_nums $reg_handler_value_128 ".q.u"
|
|
check_regs q $vreg_nums $reg_handler_value_128 ".u"
|
|
check_regs d $vreg_nums $reg_handler_value_64 ".u"
|
|
check_regs s $vreg_nums $reg_handler_value_32 ".u"
|
|
check_regs h $vreg_nums $reg_handler_value_16 ".u"
|
|
check_regs b $vreg_nums $reg_handler_value_8 ".u"
|
|
if { $sve_hw } {
|
|
check_regs z $vreg_nums $zreg_handler_value ".d.u"
|
|
check_regs p $preg_nums $preg_handler_value ""
|
|
}
|
|
}
|
|
|
|
# Switch to the frame for main(), and check register values
|
|
|
|
gdb_test "frame $mainframe" \
|
|
"#$mainframe.*in main ().*" \
|
|
"set to main frame"
|
|
|
|
|
|
with_test_prefix "main frame" {
|
|
check_regs x $xreg_nums $reg_main_value_64 ""
|
|
check_regs v $vreg_nums $reg_main_value_128 ".q.u"
|
|
check_regs q $vreg_nums $reg_main_value_128 ".u"
|
|
check_regs d $vreg_nums $reg_main_value_64 ".u"
|
|
check_regs s $vreg_nums $reg_main_value_32 ".u"
|
|
check_regs h $vreg_nums $reg_main_value_16 ".u"
|
|
check_regs b $vreg_nums $reg_main_value_8 ".u"
|
|
if { $sve_hw } {
|
|
check_regs z $vreg_nums $zreg_main_value ".d.u"
|
|
check_regs p $preg_nums $preg_main_value ""
|
|
}
|
|
}
|
|
|
|
# Switch back to the signal handler frame, and check register values
|
|
|
|
gdb_test "frame $handlerframe" \
|
|
"#$handlerframe.*handler \\\(sig=4\\\).*" \
|
|
"set to signal handler frame"
|
|
|
|
with_test_prefix "handler frame 2nd" {
|
|
check_regs x $xreg_nums $reg_handler_value_64 ""
|
|
check_regs v $vreg_nums $reg_handler_value_128 ".q.u"
|
|
check_regs q $vreg_nums $reg_handler_value_128 ".u"
|
|
check_regs d $vreg_nums $reg_handler_value_64 ".u"
|
|
check_regs s $vreg_nums $reg_handler_value_32 ".u"
|
|
check_regs h $vreg_nums $reg_handler_value_16 ".u"
|
|
check_regs b $vreg_nums $reg_handler_value_8 ".u"
|
|
if { $sve_hw } {
|
|
check_regs z $vreg_nums $zreg_handler_value ".d.u"
|
|
check_regs p $preg_nums $preg_handler_value ""
|
|
}
|
|
}
|