gdb/testsuite/gdb.arch/powerpc-vsx.exp

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