Blame SOURCES/valgrind-3.13.0-static-tls.patch

ba4a9b
commit f1ff8597ef9c37ff1a853411b9e3be1696c36d92
ba4a9b
Author: Philippe Waroquiers <philippe.waroquiers@skynet.be>
ba4a9b
Date:   Tue Sep 19 23:17:48 2017 +0200
ba4a9b
ba4a9b
    Implement static TLS code for more platforms
ba4a9b
    
ba4a9b
    gdbserver_tests/hgtls is failing on a number of platforms
ba4a9b
    as it looks like static tls handling is now needed.
ba4a9b
    So, omplement static tls for a few more platforms.
ba4a9b
    The formulas that are platform dependent are somewhat wild guesses
ba4a9b
    obtained with trial and errors.
ba4a9b
    Note that arm/arm64/ppc32 are not (yet) done
ba4a9b
ba4a9b
diff --git a/coregrind/m_gdbserver/target.c b/coregrind/m_gdbserver/target.c
ba4a9b
index 10e52fc..1f03c12 100644
ba4a9b
--- a/coregrind/m_gdbserver/target.c
ba4a9b
+++ b/coregrind/m_gdbserver/target.c
ba4a9b
@@ -712,6 +712,7 @@ Bool valgrind_get_tls_addr (ThreadState *tst,
ba4a9b
    // Check we can read the modid
ba4a9b
    CHECK_DEREF(lm+lm_modid_offset, sizeof(unsigned long int), "link_map modid");
ba4a9b
    modid = *(unsigned long int *)(lm+lm_modid_offset);
ba4a9b
+   dlog (2, "tid %u modid %lu\n", tst->tid, modid);
ba4a9b
 
ba4a9b
    // Check we can access the dtv entry for modid
ba4a9b
    CHECK_DEREF(dtv + 2 * modid, sizeof(CORE_ADDR), "dtv[2*modid]");
ba4a9b
@@ -719,7 +720,6 @@ Bool valgrind_get_tls_addr (ThreadState *tst,
ba4a9b
    // Compute the base address of the tls block.
ba4a9b
    *tls_addr = *(dtv + 2 * modid);
ba4a9b
 
ba4a9b
-#if defined(VGA_mips32) || defined(VGA_mips64)
ba4a9b
    if (*tls_addr & 1) {
ba4a9b
       /* This means that computed address is not valid, most probably
ba4a9b
          because given module uses Static TLS.
ba4a9b
@@ -731,17 +731,24 @@ Bool valgrind_get_tls_addr (ThreadState *tst,
ba4a9b
       CORE_ADDR tls_offset_addr;
ba4a9b
       PtrdiffT tls_offset;
ba4a9b
 
ba4a9b
-      dlog(1, "computing tls_addr using static TLS\n");
ba4a9b
+      dlog(2, "tls_addr (%p & 1) => computing tls_addr using static TLS\n",
ba4a9b
+           (void*) *tls_addr);
ba4a9b
 
ba4a9b
       /* Assumes that tls_offset is placed right before tls_modid.
ba4a9b
          To check the assumption, start a gdb on none/tests/tls and do:
ba4a9b
-         p &((struct link_map*)0x0)->l_tls_modid
ba4a9b
-         p &((struct link_map*)0x0)->l_tls_offset */
ba4a9b
+           p &((struct link_map*)0x0)->l_tls_modid
ba4a9b
+           p &((struct link_map*)0x0)->l_tls_offset
ba4a9b
+         Instead of assuming this, we could calculate this similarly to
ba4a9b
+         lm_modid_offset, by extending getplatformoffset to support querying
ba4a9b
+         more than one offset.
ba4a9b
+      */
ba4a9b
       tls_offset_addr = lm + lm_modid_offset - sizeof(PtrdiffT);
ba4a9b
 
ba4a9b
       // Check we can read the tls_offset.
ba4a9b
       CHECK_DEREF(tls_offset_addr, sizeof(PtrdiffT), "link_map tls_offset");
ba4a9b
       tls_offset = *(PtrdiffT *)(tls_offset_addr);
ba4a9b
+      dlog(2, "tls_offset_addr %p tls_offset %ld\n",
ba4a9b
+           (void*)tls_offset_addr, (long)tls_offset);
ba4a9b
 
ba4a9b
       /* Following two values represent platform dependent constants
ba4a9b
          NO_TLS_OFFSET and FORCED_DYNAMIC_TLS_OFFSET, respectively. */
ba4a9b
@@ -751,9 +758,18 @@ Bool valgrind_get_tls_addr (ThreadState *tst,
ba4a9b
       }
ba4a9b
 
ba4a9b
       // This calculation is also platform dependent.
ba4a9b
+#if defined(VGA_mips32) || defined(VGA_mips64)
ba4a9b
       *tls_addr = ((CORE_ADDR)dtv_loc + 2 * sizeof(CORE_ADDR) + tls_offset);
ba4a9b
-   }
ba4a9b
+#elif defined(VGA_ppc64be) || defined(VGA_ppc64le)
ba4a9b
+      *tls_addr = ((CORE_ADDR)dtv_loc + sizeof(CORE_ADDR) + tls_offset);
ba4a9b
+#elif defined(VGA_x86) || defined(VGA_amd64) || defined(VGA_s390x)
ba4a9b
+      *tls_addr = (CORE_ADDR)dtv_loc - tls_offset - sizeof(CORE_ADDR);
ba4a9b
+#else
ba4a9b
+      // ppc32, arm, arm64
ba4a9b
+      dlog(0, "target.c is missing platform code for static TLS\n");
ba4a9b
+      return False;
ba4a9b
 #endif
ba4a9b
+   }
ba4a9b
 
ba4a9b
    // Finally, add tls variable offset to tls block base address.
ba4a9b
    *tls_addr += offset;