2bf70d
From bfa89eae00ba7067445bc0532e1f17405c062954 Mon Sep 17 00:00:00 2001
2bf70d
From: Andreas Arnez <arnez@linux.ibm.com>
2bf70d
Date: Thu, 23 May 2019 17:17:43 +0200
2bf70d
Subject: [PATCH] Bug 407764 - s390x: drd fails on z13 due to function wrapping
2bf70d
 issue
2bf70d
2bf70d
The s390x-specific inline assembly macros for function wrapping in
2bf70d
include/valgrind.h have a few issues.
2bf70d
2bf70d
When the compiler uses vector registers, such as with "-march=z13", all
2bf70d
vector registers must be declared as clobbered by the callee.  Because
2bf70d
this is missing, many drd test failures are seen with "-march=z13".
2bf70d
2bf70d
Also, the inline assemblies write the return value into the target
2bf70d
register before restoring r11.  If r11 is used as the target register,
2bf70d
this means that the restore operation corrupts the result.  This bug
2bf70d
causes failures with memcheck's "wrap6" test case.
2bf70d
2bf70d
These bugs are fixed.  The clobber list is extended by the vector
2bf70d
registers (if appropriate), and the target register is now written at the
2bf70d
end, after restoring r11.
2bf70d
---
2bf70d
 include/valgrind.h | 38 +++++++++++++++++++++++---------------
2bf70d
 1 file changed, 23 insertions(+), 15 deletions(-)
2bf70d
2bf70d
diff --git a/include/valgrind.h b/include/valgrind.h
2bf70d
index f071bd392..815efa893 100644
2bf70d
--- a/include/valgrind.h
2bf70d
+++ b/include/valgrind.h
2bf70d
@@ -4687,8 +4687,16 @@ typedef
2bf70d
    r14 in s390_irgen_noredir (VEX/priv/guest_s390_irgen.c) to give the
2bf70d
    function a proper return address. All others are ABI defined call
2bf70d
    clobbers. */
2bf70d
-#define __CALLER_SAVED_REGS "0","1","2","3","4","5","14", \
2bf70d
-                           "f0","f1","f2","f3","f4","f5","f6","f7"
2bf70d
+#if defined(__VX__) || defined(__S390_VX__)
2bf70d
+#define __CALLER_SAVED_REGS "0", "1", "2", "3", "4", "5", "14",   \
2bf70d
+      "v0", "v1", "v2", "v3", "v4", "v5", "v6", "v7",             \
2bf70d
+      "v8", "v9", "v10", "v11", "v12", "v13", "v14", "v15",       \
2bf70d
+      "v16", "v17", "v18", "v19", "v20", "v21", "v22", "v23",     \
2bf70d
+      "v24", "v25", "v26", "v27", "v28", "v29", "v30", "v31"
2bf70d
+#else
2bf70d
+#define __CALLER_SAVED_REGS "0", "1", "2", "3", "4", "5", "14",   \
2bf70d
+      "f0", "f1", "f2", "f3", "f4", "f5", "f6", "f7"
2bf70d
+#endif
2bf70d
 
2bf70d
 /* Nb: Although r11 is modified in the asm snippets below (inside 
2bf70d
    VALGRIND_CFI_PROLOGUE) it is not listed in the clobber section, for
2bf70d
@@ -4710,9 +4718,9 @@ typedef
2bf70d
          "aghi 15,-160\n\t"                                      \
2bf70d
          "lg 1, 0(1)\n\t"  /* target->r1 */                      \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,160\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "d" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"7"     \
2bf70d
@@ -4734,9 +4742,9 @@ typedef
2bf70d
          "lg 2, 8(1)\n\t"                                        \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,160\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"7"     \
2bf70d
@@ -4759,9 +4767,9 @@ typedef
2bf70d
          "lg 3,16(1)\n\t"                                        \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,160\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"7"     \
2bf70d
@@ -4786,9 +4794,9 @@ typedef
2bf70d
          "lg 4,24(1)\n\t"                                        \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,160\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"7"     \
2bf70d
@@ -4815,9 +4823,9 @@ typedef
2bf70d
          "lg 5,32(1)\n\t"                                        \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,160\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"7"     \
2bf70d
@@ -4846,9 +4854,9 @@ typedef
2bf70d
          "lg 6,40(1)\n\t"                                        \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,160\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"6","7" \
2bf70d
@@ -4880,9 +4888,9 @@ typedef
2bf70d
          "mvc 160(8,15), 48(1)\n\t"                              \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,168\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"6","7" \
2bf70d
@@ -4916,9 +4924,9 @@ typedef
2bf70d
          "mvc 168(8,15), 56(1)\n\t"                              \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,176\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"6","7" \
2bf70d
@@ -4954,9 +4962,9 @@ typedef
2bf70d
          "mvc 176(8,15), 64(1)\n\t"                              \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,184\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"6","7" \
2bf70d
@@ -4994,9 +5002,9 @@ typedef
2bf70d
          "mvc 184(8,15), 72(1)\n\t"                              \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,192\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"6","7" \
2bf70d
@@ -5036,9 +5044,9 @@ typedef
2bf70d
          "mvc 192(8,15), 80(1)\n\t"                              \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,200\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"6","7" \
2bf70d
@@ -5080,9 +5088,9 @@ typedef
2bf70d
          "mvc 200(8,15), 88(1)\n\t"                              \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,208\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"6","7" \
2bf70d
@@ -5126,9 +5134,9 @@ typedef
2bf70d
          "mvc 208(8,15), 96(1)\n\t"                              \
2bf70d
          "lg 1, 0(1)\n\t"                                        \
2bf70d
          VALGRIND_CALL_NOREDIR_R1                                \
2bf70d
-         "lgr %0, 2\n\t"                                         \
2bf70d
          "aghi 15,216\n\t"                                       \
2bf70d
          VALGRIND_CFI_EPILOGUE                                   \
2bf70d
+         "lgr %0, 2\n\t"                                         \
2bf70d
          : /*out*/   "=d" (_res)                                 \
2bf70d
          : /*in*/    "a" (&_argvec[0]) __FRAME_POINTER           \
2bf70d
          : /*trash*/ "cc", "memory", __CALLER_SAVED_REGS,"6","7" \
2bf70d
-- 
2bf70d
2.17.0
2bf70d