Source-Changes-HG archive

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index][Old Index]

[src/trunk]: src Add TLS support for AMD64, i386 and SH3.



details:   https://anonhg.NetBSD.org/src/rev/030584118256
branches:  trunk
changeset: 763202:030584118256
user:      joerg <joerg%NetBSD.org@localhost>
date:      Sat Mar 12 22:54:36 2011 +0000

description:
Add TLS support for AMD64, i386 and SH3.

This material is based upon work partially supported by
The NetBSD Foundation under a contract with Joerg Sonnenberger.

diffstat:

 libexec/ld.elf_so/arch/i386/mdreloc.c   |  68 ++++++++++++++++++++++++++++++++-
 libexec/ld.elf_so/arch/sh3/mdreloc.c    |  50 ++++++++++++++++++++++-
 libexec/ld.elf_so/arch/x86_64/mdreloc.c |  50 ++++++++++++++++++++++-
 libexec/ld.elf_so/rtld.h                |   6 ++-
 libexec/ld.elf_so/symbol.c              |   7 ++-
 sys/arch/amd64/include/types.h          |   4 +-
 sys/arch/i386/include/types.h           |   4 +-
 sys/arch/sh3/include/types.h            |   4 +-
 8 files changed, 179 insertions(+), 14 deletions(-)

diffs (truncated from 345 to 300 lines):

diff -r b8a201377dff -r 030584118256 libexec/ld.elf_so/arch/i386/mdreloc.c
--- a/libexec/ld.elf_so/arch/i386/mdreloc.c     Sat Mar 12 22:34:52 2011 +0000
+++ b/libexec/ld.elf_so/arch/i386/mdreloc.c     Sat Mar 12 22:54:36 2011 +0000
@@ -1,11 +1,12 @@
-/*     $NetBSD: mdreloc.c,v 1.32 2010/08/06 16:33:18 joerg Exp $       */
+/*     $NetBSD: mdreloc.c,v 1.33 2011/03/12 22:54:36 joerg Exp $       */
 
 #include <sys/cdefs.h>
 #ifndef lint
-__RCSID("$NetBSD: mdreloc.c,v 1.32 2010/08/06 16:33:18 joerg Exp $");
+__RCSID("$NetBSD: mdreloc.c,v 1.33 2011/03/12 22:54:36 joerg Exp $");
 #endif /* not lint */
 
 #include <sys/types.h>
+#include <sys/ucontext.h>
 
 #include "debug.h"
 #include "rtld.h"
@@ -119,6 +120,47 @@
                        rdbg(("COPY (avoid in main)"));
                        break;
 
+               case R_TYPE(TLS_TPOFF):
+                       def = _rtld_find_symdef(symnum, obj, &defobj, false);
+                       if (def == NULL)
+                               return -1;
+
+                       if (!defobj->tls_done &&
+                           _rtld_tls_offset_allocate(obj))
+                               return -1;
+
+                       *where = (Elf_Addr)(def->st_value - defobj->tlsoffset);
+
+                       rdbg(("TLS_TPOFF %s in %s --> %p",
+                           obj->strtab + obj->symtab[symnum].st_name,
+                           obj->path, (void *)*where));
+                       break;
+
+               case R_TYPE(TLS_DTPMOD32):
+                       def = _rtld_find_symdef(symnum, obj, &defobj, false);
+                       if (def == NULL)
+                               return -1;
+
+                       *where = (Elf_Addr)(defobj->tlsindex);
+
+                       rdbg(("TLS_DTPMOD32 %s in %s --> %p",
+                           obj->strtab + obj->symtab[symnum].st_name,
+                           obj->path, (void *)*where));
+                       break;
+
+               case R_TYPE(TLS_DTPOFF32):
+                       def = _rtld_find_symdef(symnum, obj, &defobj, false);
+                       if (def == NULL)
+                               return -1;
+
+                       *where = (Elf_Addr)(def->st_value);
+
+                       rdbg(("TLS_DTPOFF32 %s in %s --> %p",
+                           obj->strtab + obj->symtab[symnum].st_name,
+                           obj->path, (void *)*where));
+
+                       break;
+
                default:
                        rdbg(("sym = %lu, type = %lu, offset = %p, "
                            "contents = %p, symbol = %s",
@@ -214,3 +256,25 @@
        }
        return err;
 }
+
+/*
+ * i386 specific GNU variant of __tls_get_addr using register based
+ * argument passing.
+ */
+#define        DTV_MAX_INDEX(dtv)      ((size_t)((dtv)[-1]))
+
+__dso_public __attribute__((__regparm__(1))) void *
+___tls_get_addr(void *arg_)
+{
+       size_t *arg = (size_t *)arg_;
+       void **dtv;
+       struct tls_tcb *tcb = __lwp_getprivate_fast();
+       size_t idx = arg[0], offset = arg[1];
+
+       dtv = tcb->tcb_dtv;
+
+       if (__predict_true(idx < DTV_MAX_INDEX(dtv) && dtv[idx] != NULL))
+               return (uint8_t *)dtv[idx] + offset;
+
+       return _rtld_tls_get_addr(tcb, idx, offset);
+}
diff -r b8a201377dff -r 030584118256 libexec/ld.elf_so/arch/sh3/mdreloc.c
--- a/libexec/ld.elf_so/arch/sh3/mdreloc.c      Sat Mar 12 22:34:52 2011 +0000
+++ b/libexec/ld.elf_so/arch/sh3/mdreloc.c      Sat Mar 12 22:54:36 2011 +0000
@@ -1,16 +1,17 @@
-/*     $NetBSD: mdreloc.c,v 1.28 2010/08/06 16:33:18 joerg Exp $       */
+/*     $NetBSD: mdreloc.c,v 1.29 2011/03/12 22:54:36 joerg Exp $       */
 
 #include <sys/cdefs.h>
 #ifndef lint
-__RCSID("$NetBSD: mdreloc.c,v 1.28 2010/08/06 16:33:18 joerg Exp $");
+__RCSID("$NetBSD: mdreloc.c,v 1.29 2011/03/12 22:54:36 joerg Exp $");
 #endif /* not lint */
 
 #include <sys/cdefs.h>
 #ifndef lint
-__RCSID("$NetBSD: mdreloc.c,v 1.28 2010/08/06 16:33:18 joerg Exp $");
+__RCSID("$NetBSD: mdreloc.c,v 1.29 2011/03/12 22:54:36 joerg Exp $");
 #endif /* not lint */
 
 #include <sys/types.h>
+#include <sys/tls.h>
 
 #include "debug.h"
 #include "rtld.h"
@@ -154,6 +155,49 @@
                        rdbg(("COPY (avoid in main)"));
                        break;
 
+               case R_TYPE(TLS_DTPOFF32):
+                       def = _rtld_find_symdef(symnum, obj, &defobj, false);
+                       if (def == NULL)
+                               return -1;
+
+                       *where = (Elf_Addr)(def->st_value);
+
+                       rdbg(("TLS_DTPOFF32 %s in %s --> %p",
+                           obj->strtab + obj->symtab[symnum].st_name,
+                           obj->path, (void *)*where));
+
+                       break;
+               case R_TYPE(TLS_DTPMOD32):
+                       def = _rtld_find_symdef(symnum, obj, &defobj, false);
+                       if (def == NULL)
+                               return -1;
+
+                       *where = (Elf_Addr)(defobj->tlsindex);
+
+                       rdbg(("TLS_DTPMOD32 %s in %s --> %p",
+                           obj->strtab + obj->symtab[symnum].st_name,
+                           obj->path, (void *)*where));
+
+                       break;
+
+               case R_TYPE(TLS_TPOFF32):
+                       def = _rtld_find_symdef(symnum, obj, &defobj, false);
+                       if (def == NULL)
+                               return -1;
+
+                       if (!defobj->tls_done &&
+                           _rtld_tls_offset_allocate(obj))
+                               return -1;
+
+                       *where = (Elf_Addr)def->st_value +
+                           rela->r_addend + defobj->tlsoffset +
+                           sizeof(struct tls_tcb);
+
+                       rdbg(("TLS_TPOFF32 %s in %s --> %p",
+                           obj->strtab + obj->symtab[symnum].st_name,
+                           obj->path, (void *)*where));
+                       break;
+
                default:
                        rdbg(("sym = %lu, type = %lu, offset = %p, "
                            "addend = %p, contents = %p, symbol = %s",
diff -r b8a201377dff -r 030584118256 libexec/ld.elf_so/arch/x86_64/mdreloc.c
--- a/libexec/ld.elf_so/arch/x86_64/mdreloc.c   Sat Mar 12 22:34:52 2011 +0000
+++ b/libexec/ld.elf_so/arch/x86_64/mdreloc.c   Sat Mar 12 22:54:36 2011 +0000
@@ -1,4 +1,4 @@
-/*     $NetBSD: mdreloc.c,v 1.38 2010/08/06 16:33:19 joerg Exp $       */
+/*     $NetBSD: mdreloc.c,v 1.39 2011/03/12 22:54:36 joerg Exp $       */
 
 /*
  * Copyright (c) 2001 Wasabi Systems, Inc.
@@ -68,7 +68,7 @@
 
 #include <sys/cdefs.h>
 #ifndef lint
-__RCSID("$NetBSD: mdreloc.c,v 1.38 2010/08/06 16:33:19 joerg Exp $");
+__RCSID("$NetBSD: mdreloc.c,v 1.39 2011/03/12 22:54:36 joerg Exp $");
 #endif /* not lint */
 
 #include <sys/types.h>
@@ -161,7 +161,7 @@
                                *where32 = tmp32;
                        rdbg(("32/32S %s in %s --> %p in %s",
                            obj->strtab + obj->symtab[symnum].st_name,
-                           obj->path, (void *)(unsigned long)*where32,
+                           obj->path, (void *)(uintptr_t)*where32,
                            defobj->path));
                        break;
                case R_TYPE(64):        /* word64 S + A */
@@ -211,6 +211,50 @@
                            (void *)*where64));
                                break;
 
+               case R_TYPE(TPOFF64):
+                       def = _rtld_find_symdef(symnum, obj, &defobj, false);
+                       if (def == NULL)
+                               return -1;
+
+                       if (!defobj->tls_done &&
+                           _rtld_tls_offset_allocate(obj))
+                               return -1;
+
+                       *where64 = (Elf64_Addr)(def->st_value -
+                           defobj->tlsoffset + rela->r_addend);
+
+                       rdbg(("TPOFF64 %s in %s --> %p",
+                           obj->strtab + obj->symtab[symnum].st_name,
+                           obj->path, (void *)*where64));
+
+                       break;
+
+               case R_TYPE(DTPMOD64):
+                       def = _rtld_find_symdef(symnum, obj, &defobj, false);
+                       if (def == NULL)
+                               return -1;
+
+                       *where64 = (Elf64_Addr)defobj->tlsindex;
+
+                       rdbg(("DTPMOD64 %s in %s --> %p",
+                           obj->strtab + obj->symtab[symnum].st_name,
+                           obj->path, (void *)*where64));
+
+                       break;
+
+               case R_TYPE(DTPOFF64):
+                       def = _rtld_find_symdef(symnum, obj, &defobj, false);
+                       if (def == NULL)
+                               return -1;
+
+                       *where64 = (Elf64_Addr)(def->st_value + rela->r_addend);
+
+                       rdbg(("DTPOFF64 %s in %s --> %p",
+                           obj->strtab + obj->symtab[symnum].st_name,
+                           obj->path, (void *)*where64));
+
+                       break;
+
                case R_TYPE(COPY):
                        rdbg(("COPY"));
                        break;
diff -r b8a201377dff -r 030584118256 libexec/ld.elf_so/rtld.h
--- a/libexec/ld.elf_so/rtld.h  Sat Mar 12 22:34:52 2011 +0000
+++ b/libexec/ld.elf_so/rtld.h  Sat Mar 12 22:54:36 2011 +0000
@@ -1,4 +1,4 @@
-/*     $NetBSD: rtld.h,v 1.102 2011/03/10 14:27:31 joerg Exp $  */
+/*     $NetBSD: rtld.h,v 1.103 2011/03/12 22:54:36 joerg Exp $  */
 
 /*
  * Copyright 1996 John D. Polstra.
@@ -375,6 +375,10 @@
 extern size_t _rtld_tls_max_index;
 
 __dso_public extern void *__tls_get_addr(void *);
+#ifdef __i386__
+__dso_public extern void *___tls_get_addr(void *)
+    __attribute__((__regparm__(1)));
+#endif
 #endif
 
 /* map_object.c */
diff -r b8a201377dff -r 030584118256 libexec/ld.elf_so/symbol.c
--- a/libexec/ld.elf_so/symbol.c        Sat Mar 12 22:34:52 2011 +0000
+++ b/libexec/ld.elf_so/symbol.c        Sat Mar 12 22:54:36 2011 +0000
@@ -1,4 +1,4 @@
-/*     $NetBSD: symbol.c,v 1.55 2011/03/09 23:10:07 joerg Exp $         */
+/*     $NetBSD: symbol.c,v 1.56 2011/03/12 22:54:36 joerg Exp $         */
 
 /*
  * Copyright 1996 John D. Polstra.
@@ -40,7 +40,7 @@
 
 #include <sys/cdefs.h>
 #ifndef lint
-__RCSID("$NetBSD: symbol.c,v 1.55 2011/03/09 23:10:07 joerg Exp $");
+__RCSID("$NetBSD: symbol.c,v 1.56 2011/03/12 22:54:36 joerg Exp $");
 #endif /* not lint */
 
 #include <err.h>
@@ -97,6 +97,9 @@
                (fptr_t)_rtld_tls_allocate,
                (fptr_t)_rtld_tls_free,
                (fptr_t)__tls_get_addr,
+#ifdef __i386__
+               (fptr_t)___tls_get_addr,
+#endif
 #endif
                NULL
        };
diff -r b8a201377dff -r 030584118256 sys/arch/amd64/include/types.h
--- a/sys/arch/amd64/include/types.h    Sat Mar 12 22:34:52 2011 +0000
+++ b/sys/arch/amd64/include/types.h    Sat Mar 12 22:54:36 2011 +0000
@@ -1,4 +1,4 @@
-/*     $NetBSD: types.h,v 1.36 2011/02/24 04:28:45 joerg Exp $ */
+/*     $NetBSD: types.h,v 1.37 2011/03/12 22:54:37 joerg Exp $ */
 
 /*-



Home | Main Index | Thread Index | Old Index