From 8a30f00fe8ea30054c2df183d34ef3ad8a522cc5 Mon Sep 17 00:00:00 2001 From: Ulrich Drepper Date: Tue, 23 Jul 2002 23:12:01 +0000 Subject: [PATCH] Update. 2002-07-23 Ulrich Drepper * sysdeps/generic/libc-tls.c: New file. * csu/Makefile (routines): Add libc-tls. (static-only-routines): Add libc-tls. * elf/dl-support.c (_dl_phdr): New variable. (_dl_phnum): New variable. (_dl_aux_init): Initialize _dl_phdr and _dl_phnum from aux vector. * sysdeps/generic/libc-start.c (__libc_start_main): Reorganize code for !SHARED. First look through auxiliary vector. If TLS always call __pthread_initialize_minimal. * sysdeps/generic/dl-tls.c (_dl_allocate_tls): Make sure size argument in mmap call is never zero. --- ChangeLog | 15 ++++ csu/Makefile | 6 +- linuxthreads/ChangeLog | 6 +- linuxthreads/Examples/tststatic.c | 1 + linuxthreads/pthread.c | 15 +++- sysdeps/generic/dl-tls.c | 2 +- sysdeps/generic/libc-start.c | 22 +++-- sysdeps/generic/libc-tls.c | 182 ++++++++++++++++++++++++++++++++++++++ 8 files changed, 236 insertions(+), 13 deletions(-) create mode 100644 linuxthreads/Examples/tststatic.c create mode 100644 sysdeps/generic/libc-tls.c diff --git a/ChangeLog b/ChangeLog index d6980b0..b4795a8 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,18 @@ +2002-07-23 Ulrich Drepper + + * sysdeps/generic/libc-tls.c: New file. + * csu/Makefile (routines): Add libc-tls. + (static-only-routines): Add libc-tls. + * elf/dl-support.c (_dl_phdr): New variable. + (_dl_phnum): New variable. + (_dl_aux_init): Initialize _dl_phdr and _dl_phnum from aux vector. + * sysdeps/generic/libc-start.c (__libc_start_main): Reorganize code + for !SHARED. First look through auxiliary vector. If TLS always + call __pthread_initialize_minimal. + + * sysdeps/generic/dl-tls.c (_dl_allocate_tls): Make sure size argument + in mmap call is never zero. + 2002-07-23 Andreas Jaeger * sysdeps/x86_64/fpu/s_copysign.S: Use optimized version. diff --git a/csu/Makefile b/csu/Makefile index 994e2b2..ca8dbbb 100644 --- a/csu/Makefile +++ b/csu/Makefile @@ -1,5 +1,5 @@ # Makefile for csu code for GNU C library. -# Copyright (C) 1995,96,97,98,99,2000,01 Free Software Foundation, Inc. +# Copyright (C) 1995,96,97,98,99,2000,01,2002 Free Software Foundation, Inc. # This file is part of the GNU C Library. # The GNU C Library is free software; you can redistribute it and/or @@ -26,7 +26,9 @@ subdir := csu -routines = init-first libc-start $(libc-init) sysdep version check_fds +routines = init-first libc-start $(libc-init) sysdep version check_fds \ + libc-tls +static-only-routines = libc-tls csu-dummies = $(filter-out $(start-installed-name),crt1.o Mcrt1.o) extra-objs = start.o gmon-start.o \ $(start-installed-name) g$(start-installed-name) $(csu-dummies) diff --git a/linuxthreads/ChangeLog b/linuxthreads/ChangeLog index 3b87581..95feff2 100644 --- a/linuxthreads/ChangeLog +++ b/linuxthreads/ChangeLog @@ -1,6 +1,10 @@ 2002-07-22 Ulrich Drepper - * Makefile: Actually creat tst-signal.out file when running the test. + * pthread.c (__pthread_initialize_minimal): If !SHARED and TLS + call __libc_setup_tls first. + * Makefile: Actually create tst-signal.out file when running the test. + (tests): Add tststatic. + * Examples/tststatic.c: New file. 2002-07-19 Ulrich Drepper diff --git a/linuxthreads/Examples/tststatic.c b/linuxthreads/Examples/tststatic.c new file mode 100644 index 0000000..421011a --- /dev/null +++ b/linuxthreads/Examples/tststatic.c @@ -0,0 +1 @@ +#include "ex1.c" diff --git a/linuxthreads/pthread.c b/linuxthreads/pthread.c index 12ce38b..8bca63e 100644 --- a/linuxthreads/pthread.c +++ b/linuxthreads/pthread.c @@ -394,13 +394,26 @@ extern void *__dso_handle __attribute__ ((weak)); #endif +#if defined USE_TLS && !defined SHARED +extern void __libc_setup_tls (size_t tcbsize, size_t tcbalign); +#endif + + /* Do some minimal initialization which has to be done during the startup of the C library. */ void __pthread_initialize_minimal(void) { #ifdef USE_TLS - pthread_descr self = THREAD_SELF; + pthread_descr self; + +# ifndef SHARED + /* Unlike in the dynamically linked case the dynamic linker has not + taken care of initializing the TLS data structures. */ + __libc_setup_tls (TLS_TCB_SIZE, TLS_TCB_ALIGN); +# endif + + self = THREAD_SELF; /* The memory for the thread descriptor was allocated elsewhere as part of the TLS allocation. We have to initialize the data diff --git a/sysdeps/generic/dl-tls.c b/sysdeps/generic/dl-tls.c index 0d6fcec..8877023 100644 --- a/sysdeps/generic/dl-tls.c +++ b/sysdeps/generic/dl-tls.c @@ -215,7 +215,7 @@ _dl_allocate_tls (void) GL(dl_zerofd) = _dl_sysdep_open_zero_fill (); # define MAP_ANON 0 # endif - result = __mmap (0, GL(dl_tls_static_size), PROT_READ|PROT_WRITE, + result = __mmap (0, GL(dl_tls_static_size) ?: 1, PROT_READ|PROT_WRITE, MAP_ANON|MAP_PRIVATE, _dl_zerofd, 0); /* We allocate a few more elements in the dtv than are needed for the diff --git a/sysdeps/generic/libc-start.c b/sysdeps/generic/libc-start.c index 4d17486..600136d 100644 --- a/sysdeps/generic/libc-start.c +++ b/sysdeps/generic/libc-start.c @@ -77,10 +77,23 @@ BP_SYM (__libc_start_main) (int (*main) (int, char **, char **), __libc_stack_end = stack_end; #ifndef SHARED +# ifdef HAVE_AUX_VECTOR + /* First process the auxiliary vector since we need to find the + program header to locate an eventually present PT_TLS entry. */ + for (auxvec = (void *__unbounded *__unbounded) ubp_ev; + *auxvec != NULL; ++auxvec); + ++auxvec; + _dl_aux_init ((ElfW(auxv_t) *) auxvec); +# endif + /* Initialize the thread library at least a bit since the libgcc functions are using thread functions if these are available and - we need to setup errno. */ + we need to setup errno. If there is no thread library and we + handle TLS the function is defined in the libc to initialized the + TLS handling. */ +# ifndef TLS if (__pthread_initialize_minimal) +# endif __pthread_initialize_minimal (); /* Some security at this point. Prevent starting a SUID binary where @@ -89,13 +102,6 @@ BP_SYM (__libc_start_main) (int (*main) (int, char **, char **), loader did the work already. */ if (__builtin_expect (__libc_enable_secure, 0)) __libc_check_standard_fds (); - -# ifdef HAVE_AUX_VECTOR - for (auxvec = (void *__unbounded *__unbounded) ubp_ev; - *auxvec != NULL; ++auxvec); - ++auxvec; - _dl_aux_init ((ElfW(auxv_t) *) auxvec); -# endif #endif /* Register the destructor of the dynamic linker if there is any. */ diff --git a/sysdeps/generic/libc-tls.c b/sysdeps/generic/libc-tls.c new file mode 100644 index 0000000..8c82040 --- /dev/null +++ b/sysdeps/generic/libc-tls.c @@ -0,0 +1,182 @@ +/* Initialization code for TLS in statically linked application. + Copyright (C) 2002 Free Software Foundation, Inc. + This file is part of the GNU C Library. + + The GNU C Library is free software; you can redistribute it and/or + modify it under the terms of the GNU Lesser General Public + License as published by the Free Software Foundation; either + version 2.1 of the License, or (at your option) any later version. + + The GNU C Library 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 + Lesser General Public License for more details. + + You should have received a copy of the GNU Lesser General Public + License along with the GNU C Library; if not, write to the Free + Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA + 02111-1307 USA. */ + +#include +#include +#include + + +#ifdef USE_TLS +extern ElfW(Phdr) *_dl_phdr; +extern size_t _dl_phnum; + + +/* DTV with just one element plus overhead. */ +static dtv_t static_dtv[3]; + + +static struct +{ + struct dtv_slotinfo_list si; + /* The dtv_slotinfo_list data structure does not include the actual + informatin since it is defined as an array of size zero. We + define here the necessary entries. Not that it is not important + whether there is padding or not since we will always access the + informatin through the 'si' element. */ + struct dtv_slotinfo info[2 + TLS_SLOTINFO_SURPLUS]; +} static_slotinfo; + +/* Fake link map for the application. */ +static struct link_map static_map; + + +void +__libc_setup_tls (size_t tcbsize, size_t tcbalign) +{ + void *tlsblock; + size_t memsz = 0; + size_t filesz = 0; + off_t offset = 0; + size_t align = 0; + size_t max_align = tcbalign; + size_t loadaddr = ~0ul; + size_t tcb_offset; + + /* Look through the TLS segment if there is any. */ + if (_dl_phdr != NULL) + { + ElfW(Phdr) *phdr = _dl_phdr; + size_t phnum = _dl_phnum; + + while (phnum-- > 0) + if (phdr->p_type == PT_TLS) + { + /* Remember the values we need. */ + memsz = phdr->p_memsz; + filesz = phdr->p_filesz; + offset = phdr->p_offset; + align = phdr->p_align; + if (phdr->p_align > max_align) + max_align = phdr->p_align; + } + else if (phdr->p_type == PT_LOAD) + { + /* We have to find the load address which is not easy. + Look for the load segment with the lowest address. */ + if (phdr->p_vaddr < loadaddr) + loadaddr = phdr->p_type; + } + } + + if (memsz == 0 && tcbsize == 0) + /* We do not need a TLS block and no thread descriptor. */ + return; + + /* We have to set up the TCB block which also (possibly) contains + 'errno'. Therefore we avoid 'malloc' which might touch 'errno'. + Instead we use 'sbrk' which would only uses 'errno' if it fails. + In this case we are right away out of memory and the user gets + what she/he deserves. */ +# if TLS_TCB_AT_TP + tlsblock = __sbrk (roundup (memsz, tcbalign) + tcbsize + max_align); +# elif TLS_DTV_AT_TP + tlsblock = __sbrk (roundup (tcbsize, align) + memsz + max_align); +# else + /* In case a model with a different layout for the TCB and DTV + is defined add another #elif here and in the following #ifs. */ +# error "Either TLS_TCB_AT_TP or TLS_DTV_AT_TP must be defined" +# endif + + /* Align the TLS block. */ + tlsblock = (void *) (((uintptr_t) tlsblock + max_align - 1) + & ~(max_align - 1)); + + /* Initialize the dtv. [0] is the length, [1] the generation counter. */ + static_dtv[0].counter = 1; + // static_dtv[1].counter = 0; would be needed if not already done + + /* Initialize the TLS block. */ +# if TLS_TCB_AT_TP + static_dtv[2].pointer = tlsblock; +# elif TLS_DTV_AT_TP + tcb_offset = roundup (tcbsize, align); + static_dtv[2].pointer = (char *) tlsblock + tcb_offset; +# else +# error "Either TLS_TCB_AT_TP or TLS_DTV_AT_TP must be defined" +# endif + memset (__mempcpy (static_dtv[2].pointer, (char *) loadaddr + offset, + filesz), + '\0', memsz - filesz); + + /* Install the pointer to the dtv. */ + + /* Initialize the thread pointer. */ +# if TLS_TCB_AT_TP + tcb_offset = roundup (memsz, tcbalign); + + INSTALL_DTV ((char *) tlsblock + tcb_offset, static_dtv); + + TLS_INIT_TP ((char *) tlsblock + tcb_offset); +# elif TLS_DTV_AT_TP + INSTALL_DTV (tlsblock, static_dtv); + TLS_INIT_TP (tlsblock); +# else +# error "Either TLS_TCB_AT_TP or TLS_DTV_AT_TP must be defined" +# endif + + /* We have to create a fake link map which normally would be created + by the dynamic linker. It just has to have enough informatino to + make the TLS routines happy. */ + static_map.l_tls_align = align; + static_map.l_tls_blocksize = memsz; + static_map.l_tls_initimage_size = filesz; + static_map.l_tls_offset = offset; + static_map.l_type = lt_executable; + static_map.l_tls_modid = 1; + + /* Create the slotinfo list. */ + static_slotinfo.si.len = 1; /* Only one element. */ + // static_slotinfo.si.next = NULL; already zero + + static_slotinfo.si.slotinfo[1].gen = 0; + static_slotinfo.si.slotinfo[1].map = &static_map; + + /* The slotinfo list. Will be extended by the code doing dynamic + linking. */ + GL(dl_tls_max_dtv_idx) = 1; + GL(dl_tls_dtv_slotinfo_list) = &static_slotinfo.si; + + /* That is the size of the TLS memory for this object. */ +# if TLS_TCB_AT_TP + GL(dl_tls_static_size) = roundup (memsz, align ?: 1) + tcbsize; +#else + GL(dl_tls_static_size) = roundup (memsz, align ?: 1); +#endif +} + + +/* This is the minimal initialization function used when libpthread is + not used. */ +void +__attribute__ ((weak)) +__pthread_initialize_minimal (void) +{ + __libc_setup_tls (0, 1); +} +#endif -- 2.7.4