You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
81 lines
3.5 KiB
81 lines
3.5 KiB
From FEDORA_PATCHES Mon Sep 17 00:00:00 2001 |
|
From: Jan Kratochvil <jan.kratochvil@redhat.com> |
|
Date: Fri, 23 Mar 2018 20:42:44 +0100 |
|
Subject: gdb-rhbz1553104-s390x-arch12-test.patch |
|
|
|
;; [s390x] Backport arch12 instructions decoding (RH BZ 1553104). |
|
;; =fedoratest |
|
|
|
diff --git a/gdb/testsuite/gdb.arch/s390x-arch12.S b/gdb/testsuite/gdb.arch/s390x-arch12.S |
|
new file mode 100644 |
|
--- /dev/null |
|
+++ b/gdb/testsuite/gdb.arch/s390x-arch12.S |
|
@@ -0,0 +1,4 @@ |
|
+.text |
|
+.globl load_guarded |
|
+load_guarded: |
|
+.byte 0xeb,0xbf,0xf0,0x58,0x00,0x24,0xe3,0xf0,0xff,0x50,0xff,0x71,0xb9,0x04,0x00,0xbf,0xe3,0x20,0xb0,0xa0,0x00,0x24,0xe3,0x10,0xb0,0xa0,0x00,0x04,0xe3,0x10,0x10,0x00,0x00,0x4c,0xe3,0x10,0xb0,0xa8,0x00,0x24,0xe3,0x10,0xb0,0xa8,0x00,0x04,0xb9,0x04,0x00,0x21,0xe3,0x40,0xb1,0x20,0x00,0x04,0xeb,0xbf,0xb1,0x08,0x00,0x04,0x07,0xf4 |
|
diff --git a/gdb/testsuite/gdb.arch/s390x-arch12.exp b/gdb/testsuite/gdb.arch/s390x-arch12.exp |
|
new file mode 100644 |
|
--- /dev/null |
|
+++ b/gdb/testsuite/gdb.arch/s390x-arch12.exp |
|
@@ -0,0 +1,34 @@ |
|
+# Copyright 2018 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/>. |
|
+ |
|
+#if { ![istarget s390x-*linux-*] || ![is_lp64_target] } { |
|
+# verbose "Skipping s390x-prologue-skip.exp" |
|
+# return |
|
+#} |
|
+ |
|
+set testfile "s390x-arch12" |
|
+set uufile "${srcdir}/${subdir}/${testfile}.o.uu" |
|
+set ofile "${srcdir}/${subdir}/${testfile}.o" |
|
+ |
|
+if { [catch "system \"uudecode -o ${ofile} ${uufile}\"" ] != 0 } { |
|
+ untested "failed uudecode" |
|
+ return -1 |
|
+} |
|
+ |
|
+gdb_exit |
|
+gdb_start |
|
+gdb_load $ofile |
|
+ |
|
+gdb_test "disas load_guarded" " <\\+28>:\tlgg\t%r1,0\\(%r1\\)\r\n\[^\r\n\]* <\\+34>:\tstg\t%r1,168\\(%r11\\)\r\n.*" |
|
diff --git a/gdb/testsuite/gdb.arch/s390x-arch12.o.uu b/gdb/testsuite/gdb.arch/s390x-arch12.o.uu |
|
new file mode 100644 |
|
--- /dev/null |
|
+++ b/gdb/testsuite/gdb.arch/s390x-arch12.o.uu |
|
@@ -0,0 +1,20 @@ |
|
+begin 644 s390x-arch12.o |
|
+M?T5,1@("`0`````````````!`!8````!```````````````````````````` |
|
+M``$X``````!```````!```<`!.N_\%@`)./P_U#_<;D$`+_C(+"@`"3C$+"@ |
|
+M``3C$!```$SC$+"H`"3C$+"H``2Y!``AXT"Q(``$Z[^Q"``$!_0`+G-Y;71A |
|
+M8@`N<W1R=&%B`"YS:'-T<G1A8@`N=&5X=``N9&%T80`N8G-S```````````` |
|
+M`````````````````````````````````P```0`````````````````````` |
|
+M`````P```@```````````````````````````P```P`````````````````` |
|
+M```````!$````0``````````````````````;&]A9%]G=6%R9&5D```````` |
|
+M```````````````````````````````````````````````````````````` |
|
+M`````````````````````````!L````!``````````8````````````````` |
|
+M``!``````````$`````````````````````$```````````````A`````0`` |
|
+M```````#````````````````````@``````````````````````````````` |
|
+M!```````````````)P````@``````````P```````````````````(`````` |
|
+M``````````````````````````0``````````````!$````#```````````` |
|
+M``````````````````"``````````"P````````````````````!```````` |
|
+M```````!`````@``````````````````````````````L`````````!X```` |
|
+M!@````0`````````"``````````8````"0````,````````````````````` |
|
+H`````````2@`````````#@````````````````````$````````````` |
|
+` |
|
+end
|
|
|