diff options
author | Daniel Jacobowitz <drow@false.org> | 2007-02-08 21:39:04 +0000 |
---|---|---|
committer | Daniel Jacobowitz <drow@false.org> | 2007-02-08 21:39:04 +0000 |
commit | fb1e4ffce36db7b63b85bc3a64917bda0c8ac84b (patch) | |
tree | fa96d864ea40641c4172c0b4becebddf54f02806 /gdb/testsuite/gdb.arch/iwmmxt-regs.exp | |
parent | f3cd89f49b5b3ac6dbf0b462e8643bc5d22aa04e (diff) | |
download | gdb-fb1e4ffce36db7b63b85bc3a64917bda0c8ac84b.zip gdb-fb1e4ffce36db7b63b85bc3a64917bda0c8ac84b.tar.gz gdb-fb1e4ffce36db7b63b85bc3a64917bda0c8ac84b.tar.bz2 |
* features/Makefile, features/arm-with-iwmmxt.xml,
features/gdbserver-regs.xsl, features/number-regs.xsl,
features/sort-regs.xsl, features/xscale-iwmmxt.xml: New files.
* regformats/arm-with-iwmmxt.dat: Generate.
* NEWS: Mention iWMMXt.
* gdb.arch/iwmmxt-regs.c, gdb.arch/iwmmxt-regs.exp: New.
* Makefile.in (OBS): Add $(XML_BUILTIN).
(XML_DIR, XML_TARGET, XML_FILES, XML_BUILTIN): New.
(clean): Update.
(target.xml, xml-builtin.c, stamp-xml, arm-with-iwmmxt.o)
(arm-with-iwmmxt.c): New.
* config.in, configure: Regenerate.
* configure.ac: Check for iWMMXt. Handle srv_xmltarget,
srv_xmlbuiltin, and srv_xmlfiles. Define USE_XML.
* configure.srv: Mention srv_xmltarget and srv_xmlfiles.
(arm*-*-linux*): Add iWMMXt and regset support.
* linux-arm-low.c (PTRACE_GETWMMXREGS, PTRACE_SETWMMXREGS): Define.
(arm_fill_gregset, arm_store_gregset, arm_fill_wmmxregset)
(arm_store_wmmxregset, target_regsets): New.
* server.c (get_features_xml): Take annex argument. Check builtin
XML documents.
(handle_query): Handle multiple annexes.
Diffstat (limited to 'gdb/testsuite/gdb.arch/iwmmxt-regs.exp')
-rw-r--r-- | gdb/testsuite/gdb.arch/iwmmxt-regs.exp | 78 |
1 files changed, 78 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.arch/iwmmxt-regs.exp b/gdb/testsuite/gdb.arch/iwmmxt-regs.exp new file mode 100644 index 0000000..c040157 --- /dev/null +++ b/gdb/testsuite/gdb.arch/iwmmxt-regs.exp @@ -0,0 +1,78 @@ +# Copyright 2007 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 2 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, write to the Free Software +# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. +# + +# Tests for ARM iWMMXt register setting and fetching. + +if ![istarget "arm*-*-*"] then { + verbose "Skipping iWMMXt register tests." + return +} + +set testfile "iwmmxt-regs" +set binfile ${objdir}/${subdir}/${testfile} +set src1 ${srcdir}/${subdir}/${testfile}.c + +# Try to compile the test case. If we can't, assume this is not an +# iWMMXt toolchain and bail out. +if { [gdb_compile ${src1} ${binfile} executable {quiet debug}] != "" } { + verbose "Skipping iWMMXt register tests." + return +} + +gdb_start +gdb_reinitialize_dir $srcdir/$subdir +gdb_load ${binfile} + +# +# Run to `main' where we begin our tests. +# + +if ![runto_main] then { + gdb_suppress_tests +} + +# Set all the registers to arbitrary values. +for {set i 0} {$i < 16} {incr i 1} { + gdb_test "set \$wr$i.u64 = ((${i}LL << 32) | ${i})" "" "set reg wr$i" +} +gdb_test "set \$wcssf = 300" "" "set reg wcssf" +gdb_test "set \$wcasf = 200" "" "set reg wcasf" +for {set i 0} {$i < 4} {incr i 1} { + gdb_test "set \$wcgr$i = 100 + $i" "" "set reg wcgr$i" +} + +# See if the sets stuck. +gdb_test "next" ".*write_regs.*" "next over read_regs" + +for {set i 0} {$i < 16} {incr i 1} { + gdb_test "p \$wr$i.u64 == ((${i}LL << 32) | ${i})" "\\\$$decimal = 1" "test reg wr$i" +} +# Don't test wcssf. +gdb_test "p \$wcasf" "\\\$$decimal = 200" "test reg wcasf" +for {set i 0} {$i < 4} {incr i 1} { + gdb_test "p \$wcgr$i == 100 + $i" "\\\$$decimal = 1" "test reg wcgr$i" +} + +# Also verify the copies read by the target. +for {set i 0} {$i < 16} {incr i 1} { + gdb_test "p regs\[$i\] == ((${i}LL << 32) | ${i})" "\\\$$decimal = 1" "test stored wr$i" +} +# Don't test wcssf. +gdb_test "p control_regs\[1\]" "\\\$$decimal = 200" "test stored wcasf" +for {set i 0} {$i < 4} {incr i 1} { + gdb_test "p control_regs\[$i + 2\] == 100 + $i" "\\\$$decimal = 1" "test stored wcgr$i" +} |