Home | History | Annotate | Line # | Download | only in gdb.arch
      1  1.1.1.5  christos # Copyright 2014-2024 Free Software Foundation, Inc.
      2      1.1  christos 
      3      1.1  christos # This program is free software; you can redistribute it and/or modify
      4      1.1  christos # it under the terms of the GNU General Public License as published by
      5      1.1  christos # the Free Software Foundation; either version 3 of the License, or
      6      1.1  christos # (at your option) any later version.
      7      1.1  christos #
      8      1.1  christos # This program is distributed in the hope that it will be useful,
      9      1.1  christos # but WITHOUT ANY WARRANTY; without even the implied warranty of
     10      1.1  christos # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
     11      1.1  christos # GNU General Public License for more details.
     12      1.1  christos #
     13      1.1  christos # You should have received a copy of the GNU General Public License
     14      1.1  christos # along with this program.  If not, see <http://www.gnu.org/licenses/>.
     15      1.1  christos 
     16      1.1  christos # This file is part of the gdb testsuite.
     17      1.1  christos 
     18      1.1  christos # Test PowerPC instructions disassembly.
     19      1.1  christos 
     20      1.1  christos standard_testfile .s
     21      1.1  christos set objfile [standard_output_file ${testfile}.o]
     22      1.1  christos 
     23  1.1.1.5  christos require {istarget "powerpc*-*-*"}
     24      1.1  christos 
     25      1.1  christos if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${objfile}" object {debug}] != "" } {
     26      1.1  christos     untested "PowerPC instructions disassembly"
     27      1.1  christos     return -1
     28      1.1  christos }
     29      1.1  christos 
     30      1.1  christos clean_restart ${objfile}
     31      1.1  christos 
     32      1.1  christos # Disassemble the function.
     33      1.1  christos set func ""
     34      1.1  christos 
     35      1.1  christos gdb_test "set disassembler-options power7"
     36      1.1  christos set test "disass func"
     37      1.1  christos gdb_test_multiple $test $test {
     38      1.1  christos     -re "\r\nDump of assembler code for function func:(\r\n.*\r\n)End of assembler dump.\r\n$gdb_prompt $" {
     39      1.1  christos 	set func $expect_out(1,string)
     40      1.1  christos 	pass $test
     41      1.1  christos     }
     42      1.1  christos }
     43      1.1  christos 
     44      1.1  christos proc instr_to_patt {instr} {
     45      1.1  christos     global decimal hex
     46      1.1  christos     # 0x0000000000000018 <+24>:	stxvd2x vs43,r4,r5
     47      1.1  christos     return "\[ \t\]*$hex <\\+$decimal>:\[ \t\]*[string_to_regexp $instr]"
     48      1.1  christos }
     49      1.1  christos 
     50      1.1  christos proc func_check {instr} {
     51      1.1  christos     global func
     52      1.1  christos 
     53      1.1  christos     set test "found: $instr"
     54      1.1  christos     if [regexp -nocase -line [instr_to_patt $instr] $func] {
     55      1.1  christos 	pass $test
     56      1.1  christos     } else {
     57      1.1  christos 	fail $test
     58      1.1  christos     }
     59      1.1  christos }
     60      1.1  christos 
     61      1.1  christos func_check "lxvd2x  vs3,r4,r5"
     62      1.1  christos func_check "lxvd2x  vs43,r4,r5"
     63      1.1  christos func_check "stxvd2x vs3,r4,r5"
     64      1.1  christos func_check "stxvd2x vs43,r4,r5"
     65      1.1  christos func_check "xxmrghd vs3,vs4,vs5"
     66      1.1  christos func_check "xxmrghd vs43,vs44,vs45"
     67      1.1  christos func_check "xxmrgld vs3,vs4,vs5"
     68      1.1  christos func_check "xxmrgld vs43,vs44,vs45"
     69      1.1  christos func_check "xxpermdi vs3,vs4,vs5,1"
     70      1.1  christos func_check "xxpermdi vs43,vs44,vs45,1"
     71      1.1  christos func_check "xxpermdi vs3,vs4,vs5,2"
     72      1.1  christos func_check "xxpermdi vs43,vs44,vs45,2"
     73      1.1  christos func_check "xvmovdp vs3,vs4"
     74      1.1  christos func_check "xvmovdp vs43,vs44"
     75      1.1  christos func_check "xvcpsgndp vs3,vs4,vs5"
     76      1.1  christos func_check "xvcpsgndp vs43,vs44,vs45"
     77      1.1  christos func_check "doze"
     78      1.1  christos func_check "nap"
     79      1.1  christos func_check "sleep"
     80      1.1  christos func_check "rvwinkle"
     81      1.1  christos func_check "prtyw   r3,r4"
     82      1.1  christos func_check "prtyd   r13,r14"
     83      1.1  christos func_check "mfcfar  r10"
     84      1.1  christos func_check "mtcfar  r11"
     85      1.1  christos func_check "cmpb    r3,r4,r5"
     86      1.1  christos func_check "lwzcix  r10,r11,r12"
     87      1.1  christos func_check "dadd    f16,f17,f18"
     88      1.1  christos func_check "daddq   f20,f22,f24"
     89      1.1  christos func_check "dss     3"
     90      1.1  christos func_check "dssall"
     91      1.1  christos func_check "dst     r5,r4,1"
     92      1.1  christos func_check "dstt    r8,r7,0"
     93      1.1  christos func_check "dstst   r5,r6,3"
     94      1.1  christos func_check "dststt  r4,r5,2"
     95      1.1  christos func_check "divwe   r10,r11,r12"
     96      1.1  christos func_check "divwe.  r11,r12,r13"
     97      1.1  christos func_check "divweo  r12,r13,r14"
     98      1.1  christos func_check "divweo. r13,r14,r15"
     99      1.1  christos func_check "divweu  r10,r11,r12"
    100      1.1  christos func_check "divweu. r11,r12,r13"
    101      1.1  christos func_check "divweuo r12,r13,r14"
    102      1.1  christos func_check "divweuo. r13,r14,r15"
    103      1.1  christos func_check "bpermd  r7,r17,r27"
    104      1.1  christos func_check "popcntw r10,r20"
    105      1.1  christos func_check "popcntd r10,r20"
    106      1.1  christos func_check "ldbrx   r20,r21,r22"
    107      1.1  christos func_check "stdbrx  r20,r21,r22"
    108      1.1  christos func_check "lfiwzx  f10,0,r10"
    109      1.1  christos func_check "lfiwzx  f10,r9,r10"
    110      1.1  christos func_check "fcfids  f4,f5"
    111      1.1  christos func_check "fcfids. f4,f5"
    112      1.1  christos func_check "fcfidus f4,f5"
    113      1.1  christos func_check "fcfidus. f4,f5"
    114      1.1  christos func_check "fctiwu  f4,f5"
    115      1.1  christos func_check "fctiwu. f4,f5"
    116      1.1  christos func_check "fctiwuz f4,f5"
    117      1.1  christos func_check "fctiwuz. f4,f5"
    118      1.1  christos func_check "fctidu  f4,f5"
    119      1.1  christos func_check "fctidu. f4,f5"
    120      1.1  christos func_check "fctiduz f4,f5"
    121      1.1  christos func_check "fctiduz. f4,f5"
    122      1.1  christos func_check "fcfidu  f4,f5"
    123      1.1  christos func_check "fcfidu. f4,f5"
    124      1.1  christos func_check "ftdiv   cr0,f10,f11"
    125      1.1  christos func_check "ftdiv   cr7,f10,f11"
    126      1.1  christos func_check "ftsqrt  cr0,f10"
    127      1.1  christos func_check "ftsqrt  cr7,f10"
    128      1.1  christos func_check "dcbtt   r8,r9"
    129      1.1  christos func_check "dcbtstt r8,r9"
    130      1.1  christos func_check "dcffix  f10,f12"
    131      1.1  christos func_check "dcffix. f20,f22"
    132      1.1  christos func_check "fre     f14,f15"
    133      1.1  christos func_check "fre.    f14,f15"
    134      1.1  christos func_check "fres    f14,f15"
    135      1.1  christos func_check "fres.   f14,f15"
    136      1.1  christos func_check "frsqrte f14,f15"
    137      1.1  christos func_check "frsqrte. f14,f15"
    138      1.1  christos func_check "frsqrtes f14,f15"
    139      1.1  christos func_check "frsqrtes. f14,f15"
    140  1.1.1.4  christos func_check "isel    r2,r3,r4,4*cr7+lt"
    141      1.1  christos func_check "yield"
    142      1.1  christos func_check "ori     r2,r2,0"
    143      1.1  christos func_check "nop"
    144      1.1  christos func_check "mdoio"
    145      1.1  christos func_check "mdoom"
    146      1.1  christos func_check "mfppr   r10"
    147      1.1  christos func_check "mfppr32 r11"
    148      1.1  christos func_check "mtppr   r12"
    149      1.1  christos func_check "mtppr32 r13"
    150      1.1  christos func_check "tlbie   r10,r11"
    151