xref: /netbsd-src/external/gpl3/gdb.old/dist/gdb/testsuite/gdb.arch/powerpc-vsx.exp (revision 6881a4007f077b54e5f51159c52b9b25f57deb0d) 
1# Copyright 2014-2023 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# This file is part of the gdb testsuite.
17
18# Test PowerPC instructions disassembly.
19
20standard_testfile .s
21set objfile [standard_output_file ${testfile}.o]
22
23if {![istarget "powerpc*-*-*"]} {
24    verbose "Skipping PowerPC instructions disassembly."
25    return
26}
27
28if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${objfile}" object {debug}] != "" } {
29    untested "PowerPC instructions disassembly"
30    return -1
31}
32
33clean_restart ${objfile}
34
35# Disassemble the function.
36set func ""
37
38gdb_test "set disassembler-options vsx"
39set test "disass func"
40gdb_test_multiple $test $test {
41    -re "\r\nDump of assembler code for function func:(\r\n.*\r\n)End of assembler dump.\r\n$gdb_prompt $" {
42	set func $expect_out(1,string)
43	pass $test
44    }
45}
46
47proc instr_to_patt {instr} {
48    global decimal hex
49    # 0x0000000000000018 <+24>:	stxvd2x vs43,r4,r5
50    return "\[ \t\]*$hex <\\+$decimal>:\[ \t\]*[string_to_regexp $instr]"
51}
52
53proc func_check {instr} {
54    global func
55
56    set test "found: $instr"
57    if [regexp -nocase -line [instr_to_patt $instr] $func] {
58	pass $test
59    } else {
60	fail $test
61    }
62}
63
64func_check "lxsdx   vs40,r10,r20"
65func_check "lxvd2x  vs40,r10,r20"
66func_check "lxvdsx  vs40,r10,r20"
67func_check "lxvw4x  vs40,r10,r20"
68func_check "stxsdx  vs40,r10,r20"
69func_check "stxvd2x vs40,r10,r20"
70func_check "stxvw4x vs40,r10,r20"
71func_check "xsabsdp vs40,vs60"
72func_check "xsadddp vs40,vs50,vs60"
73func_check "xscmpodp cr1,vs50,vs60"
74func_check "xscmpudp cr1,vs50,vs60"
75func_check "xscpsgndp vs40,vs50,vs60"
76func_check "xscvdpsp vs40,vs60"
77func_check "xscvdpsxds vs40,vs60"
78func_check "xscvdpsxws vs40,vs60"
79func_check "xscvdpuxds vs40,vs60"
80func_check "xscvdpuxws vs40,vs60"
81func_check "xscvspdp vs40,vs60"
82func_check "xscvsxddp vs40,vs60"
83func_check "xscvuxddp vs40,vs60"
84func_check "xsdivdp vs40,vs50,vs60"
85func_check "xsmaddadp vs40,vs50,vs60"
86func_check "xsmaddmdp vs40,vs50,vs60"
87func_check "xsmaxdp vs40,vs50,vs60"
88func_check "xsmindp vs40,vs50,vs60"
89func_check "xsmsubadp vs40,vs50,vs60"
90func_check "xsmsubmdp vs40,vs50,vs60"
91func_check "xsmuldp vs40,vs50,vs60"
92func_check "xsnabsdp vs40,vs60"
93func_check "xsnegdp vs40,vs60"
94func_check "xsnmaddadp vs40,vs50,vs60"
95func_check "xsnmaddmdp vs40,vs50,vs60"
96func_check "xsnmsubadp vs40,vs50,vs60"
97func_check "xsnmsubmdp vs40,vs50,vs60"
98func_check "xsrdpi  vs40,vs60"
99func_check "xsrdpic vs40,vs60"
100func_check "xsrdpim vs40,vs60"
101func_check "xsrdpip vs40,vs60"
102func_check "xsrdpiz vs40,vs60"
103func_check "xsredp  vs40,vs60"
104func_check "xsrsqrtedp vs40,vs60"
105func_check "xssqrtdp vs40,vs60"
106func_check "xssubdp vs40,vs50,vs60"
107func_check "xstdivdp cr1,vs50,vs60"
108func_check "xstsqrtdp cr1,vs60"
109func_check "xvabsdp vs40,vs60"
110func_check "xvabssp vs40,vs60"
111func_check "xvadddp vs40,vs50,vs60"
112func_check "xvaddsp vs40,vs50,vs60"
113func_check "xvcmpeqdp vs40,vs50,vs60"
114func_check "xvcmpeqdp. vs40,vs50,vs60"
115func_check "xvcmpeqsp vs40,vs50,vs60"
116func_check "xvcmpeqsp. vs40,vs50,vs60"
117func_check "xvcmpgedp vs40,vs50,vs60"
118func_check "xvcmpgedp. vs40,vs50,vs60"
119func_check "xvcmpgesp vs40,vs50,vs60"
120func_check "xvcmpgesp. vs40,vs50,vs60"
121func_check "xvcmpgtdp vs40,vs50,vs60"
122func_check "xvcmpgtdp. vs40,vs50,vs60"
123func_check "xvcmpgtsp vs40,vs50,vs60"
124func_check "xvcmpgtsp. vs40,vs50,vs60"
125func_check "xvcpsgndp vs40,vs50,vs60"
126func_check "xvmovdp vs40,vs60"
127func_check "xvcpsgnsp vs40,vs50,vs60"
128func_check "xvmovsp vs40,vs60"
129func_check "xvcvdpsp vs40,vs60"
130func_check "xvcvdpsxds vs40,vs60"
131func_check "xvcvdpsxws vs40,vs60"
132func_check "xvcvdpuxds vs40,vs60"
133func_check "xvcvdpuxws vs40,vs60"
134func_check "xvcvspdp vs40,vs60"
135func_check "xvcvspsxds vs40,vs60"
136func_check "xvcvspsxws vs40,vs60"
137func_check "xvcvspuxds vs40,vs60"
138func_check "xvcvspuxws vs40,vs60"
139func_check "xvcvsxddp vs40,vs60"
140func_check "xvcvsxdsp vs40,vs60"
141func_check "xvcvsxwdp vs40,vs60"
142func_check "xvcvsxwsp vs40,vs60"
143func_check "xvcvuxddp vs40,vs60"
144func_check "xvcvuxdsp vs40,vs60"
145func_check "xvcvuxwdp vs40,vs60"
146func_check "xvcvuxwsp vs40,vs60"
147func_check "xvdivdp vs40,vs50,vs60"
148func_check "xvdivsp vs40,vs50,vs60"
149func_check "xvmaddadp vs40,vs50,vs60"
150func_check "xvmaddmdp vs40,vs50,vs60"
151func_check "xvmaddasp vs40,vs50,vs60"
152func_check "xvmaddmsp vs40,vs50,vs60"
153func_check "xvmaxdp vs40,vs50,vs60"
154func_check "xvmaxsp vs40,vs50,vs60"
155func_check "xvmindp vs40,vs50,vs60"
156func_check "xvminsp vs40,vs50,vs60"
157func_check "xvmsubadp vs40,vs50,vs60"
158func_check "xvmsubmdp vs40,vs50,vs60"
159func_check "xvmsubasp vs40,vs50,vs60"
160func_check "xvmsubmsp vs40,vs50,vs60"
161func_check "xvmuldp vs40,vs50,vs60"
162func_check "xvmulsp vs40,vs50,vs60"
163func_check "xvnabsdp vs40,vs60"
164func_check "xvnabssp vs40,vs60"
165func_check "xvnegdp vs40,vs60"
166func_check "xvnegsp vs40,vs60"
167func_check "xvnmaddadp vs40,vs50,vs60"
168func_check "xvnmaddmdp vs40,vs50,vs60"
169func_check "xvnmaddasp vs40,vs50,vs60"
170func_check "xvnmaddmsp vs40,vs50,vs60"
171func_check "xvnmsubadp vs40,vs50,vs60"
172func_check "xvnmsubmdp vs40,vs50,vs60"
173func_check "xvnmsubasp vs40,vs50,vs60"
174func_check "xvnmsubmsp vs40,vs50,vs60"
175func_check "xvrdpi  vs40,vs60"
176func_check "xvrdpic vs40,vs60"
177func_check "xvrdpim vs40,vs60"
178func_check "xvrdpip vs40,vs60"
179func_check "xvrdpiz vs40,vs60"
180func_check "xvredp  vs40,vs60"
181func_check "xvresp  vs40,vs60"
182func_check "xvrspi  vs40,vs60"
183func_check "xvrspic vs40,vs60"
184func_check "xvrspim vs40,vs60"
185func_check "xvrspip vs40,vs60"
186func_check "xvrspiz vs40,vs60"
187func_check "xvrsqrtedp vs40,vs60"
188func_check "xvrsqrtesp vs40,vs60"
189func_check "xvsqrtdp vs40,vs60"
190func_check "xvsqrtsp vs40,vs60"
191func_check "xvsubdp vs40,vs50,vs60"
192func_check "xvsubsp vs40,vs50,vs60"
193func_check "xvtdivdp cr1,vs50,vs60"
194func_check "xvtdivsp cr1,vs50,vs60"
195func_check "xvtsqrtdp cr1,vs60"
196func_check "xvtsqrtsp cr1,vs60"
197func_check "xxland  vs40,vs50,vs60"
198func_check "xxlandc vs40,vs50,vs60"
199func_check "xxlnor  vs40,vs50,vs60"
200func_check "xxlor   vs40,vs50,vs60"
201func_check "xxlxor  vs40,vs50,vs60"
202func_check "xxmrghw vs40,vs50,vs60"
203func_check "xxmrglw vs40,vs50,vs60"
204func_check "xxmrghd vs40,vs50,vs60"
205func_check "xxpermdi vs40,vs50,vs60,1"
206func_check "xxpermdi vs40,vs50,vs60,2"
207func_check "xxmrgld vs40,vs50,vs60"
208func_check "xxspltd vs40,vs50,0"
209func_check "xxspltd vs40,vs50,1"
210func_check "xxswapd vs40,vs50"
211func_check "xxsel   vs40,vs50,vs60,vs62"
212func_check "xxsldwi vs40,vs50,vs60,2"
213func_check "xxspltw vs40,vs60,2"
214func_check "lxvd2x  vs40,0,r20"
215func_check "stxvd2x vs40,0,r20"
216