File Manager

003 File Manager

Current Path: /usr/src/lib/libc/gen

📁 ..
📄 Makefile.inc(11.75 KB)
📄 Symbol.map(8.61 KB)
📄 __getosreldate.c(2.34 KB)
📄 __pthread_mutex_init_calloc_cb_stub.c(1.78 KB)
📄 __xuname.c(3.54 KB)
📄 _once_stub.c(2.45 KB)
📄 _pthread_stubs.c(13.83 KB)
📄 _rand48.c(1.37 KB)
📄 _spinlock_stub.c(2.33 KB)
📄 _thread_init.c(1.74 KB)
📄 alarm.3(2.8 KB)
📄 alarm.c(2.1 KB)
📄 arc4random-compat.c(2.35 KB)
📄 arc4random.3(4.78 KB)
📄 arc4random.c(5.87 KB)
📄 arc4random.h(4.11 KB)
📄 arc4random_uniform.c(1.77 KB)
📄 assert.c(2.12 KB)
📄 auxv.3(3.28 KB)
📄 auxv.c(8.11 KB)
📄 basename.3(2.22 KB)
📄 basename.c(1.91 KB)
📄 basename_compat.c(2.18 KB)
📄 cap_rights_get.3(3.53 KB)
📄 cap_sandboxed.3(2.45 KB)
📄 cap_sandboxed.c(1.79 KB)
📄 check_utility_compat.3(2.99 KB)
📄 check_utility_compat.c(2.3 KB)
📄 clock.3(2.59 KB)
📄 clock.c(2.16 KB)
📄 clock_getcpuclockid.3(3.31 KB)
📄 clock_getcpuclockid.c(1.67 KB)
📄 closedir.c(2.38 KB)
📄 confstr.3(3.6 KB)
📄 confstr.c(3.78 KB)
📄 crypt.c(3.13 KB)
📄 ctermid.3(3.03 KB)
📄 ctermid.c(2.21 KB)
📄 daemon.3(3.92 KB)
📄 daemon.c(3.09 KB)
📄 devname-compat11.c(1.79 KB)
📄 devname.3(3.25 KB)
📄 devname.c(2.41 KB)
📄 directory.3(8.7 KB)
📄 dirfd.c(1.62 KB)
📄 dirname.3(2.22 KB)
📄 dirname.c(2.29 KB)
📄 dirname_compat.c(2.05 KB)
📄 disklabel.c(4.86 KB)
📄 dl_iterate_phdr.3(3.27 KB)
📄 dladdr.3(3.92 KB)
📄 dlfcn.c(6.44 KB)
📄 dlinfo.3(7.14 KB)
📄 dllockinit.3(3.9 KB)
📄 dlopen.3(11.35 KB)
📄 drand48.c(605 B)
📄 dup3.3(2.74 KB)
📄 dup3.c(1.96 KB)
📄 elf_utils.c(3.67 KB)
📄 erand48.c(691 B)
📄 err.3(5.79 KB)
📄 err.c(4.35 KB)
📄 errlst.c(8.3 KB)
📄 errno.c(1.45 KB)
📄 eventfd.c(1.79 KB)
📄 exec.3(9.24 KB)
📄 exec.c(7 KB)
📄 exect.c(1.61 KB)
📄 fdevname.c(1.83 KB)
📄 feature_present.3(2.48 KB)
📄 feature_present.c(2.26 KB)
📄 fmtcheck.3(3.27 KB)
📄 fmtcheck.c(6.92 KB)
📄 fmtmsg.3(6.45 KB)
📄 fmtmsg.c(5.86 KB)
📄 fnmatch.3(4.11 KB)
📄 fnmatch.c(8.85 KB)
📄 fpclassify.3(3.11 KB)
📄 fpclassify.c(2.67 KB)
📄 frexp.3(2.76 KB)
📄 frexp.c(1.88 KB)
📄 fstab.c(6.85 KB)
📄 ftok.3(2.71 KB)
📄 ftok.c(1.83 KB)
📄 fts-compat.c(32.07 KB)
📄 fts-compat.h(5.28 KB)
📄 fts-compat11.c(31.65 KB)
📄 fts-compat11.h(3.85 KB)
📄 fts.3(19.27 KB)
📄 fts.c(30.66 KB)
📄 ftw-compat11.c(2.59 KB)
📄 ftw.3(5.7 KB)
📄 ftw.c(2.28 KB)
📄 gen-compat.h(2.35 KB)
📄 gen-private.h(2.64 KB)
📄 getbootfile.3(2.57 KB)
📄 getbootfile.c(2.01 KB)
📄 getbsize.3(3.05 KB)
📄 getbsize.c(3 KB)
📄 getcap.3(14.8 KB)
📄 getcap.c(22.93 KB)
📄 getcontext.3(4.92 KB)
📄 getcwd.3(4.08 KB)
📄 getcwd.c(5.61 KB)
📄 getdiskbyname.3(2.23 KB)
📄 getdomainname.3(2.94 KB)
📄 getdomainname.c(1.98 KB)
📄 getentropy.3(2.05 KB)
📄 getentropy.c(4.09 KB)
📄 getfsent.3(4.54 KB)
📄 getgrent.3(6.7 KB)
📄 getgrent.c(34.33 KB)
📄 getgrouplist.3(2.81 KB)
📄 getgrouplist.c(2.03 KB)
📄 gethostname.3(3.58 KB)
📄 gethostname.c(2.02 KB)
📄 getloadavg.3(2.44 KB)
📄 getloadavg.c(2.39 KB)
📄 getlogin.c(2.65 KB)
📄 getmntinfo-compat11.c(2.61 KB)
📄 getmntinfo.3(3.1 KB)
📄 getmntinfo.c(2.57 KB)
📄 getnetgrent.3(4.02 KB)
📄 getnetgrent.c(24.86 KB)
📄 getosreldate.3(2.48 KB)
📄 getosreldate.c(2.09 KB)
📄 getpagesize.3(2.17 KB)
📄 getpagesize.c(2.46 KB)
📄 getpagesizes.3(2.94 KB)
📄 getpagesizes.c(2.99 KB)
📄 getpass.3(3 KB)
📄 getpeereid.3(3.36 KB)
📄 getpeereid.c(1.95 KB)
📄 getprogname.3(3.1 KB)
📄 getprogname.c(249 B)
📄 getpwent.3(7.67 KB)
📄 getpwent.c(44.7 KB)
📄 getttyent.3(5.75 KB)
📄 getttyent.c(6.7 KB)
📄 getusershell.3(2.86 KB)
📄 getusershell.c(5.74 KB)
📄 getutxent.3(11.32 KB)
📄 getutxent.c(4.89 KB)
📄 getvfsbyname.3(3.44 KB)
📄 getvfsbyname.c(3.1 KB)
📄 glob-compat11.c(25.67 KB)
📄 glob-compat11.h(2.8 KB)
📄 glob.3(10.79 KB)
📄 glob.c(26.49 KB)
📄 initgroups.3(2.62 KB)
📄 initgroups.c(2.33 KB)
📄 isatty.c(1.84 KB)
📄 isgreater.3(2.86 KB)
📄 isinf.c(2.14 KB)
📄 isnan.c(2.36 KB)
📄 jrand48.c(662 B)
📄 lcong48.c(832 B)
📄 ldexp.3(2.47 KB)
📄 ldexp.c(2.89 KB)
📄 libc_dlopen.c(1.88 KB)
📄 lockf.3(7.27 KB)
📄 lockf.c(2.55 KB)
📄 lrand48.c(670 B)
📄 makecontext.3(4.25 KB)
📄 memalign.c(1.63 KB)
📄 modf.3(2.63 KB)
📄 modf.c(2.95 KB)
📄 mrand48.c(709 B)
📄 nftw-compat11.c(2.91 KB)
📄 nftw.c(2.71 KB)
📄 nice.3(2.92 KB)
📄 nice.c(2.14 KB)
📄 nlist.3(2.55 KB)
📄 nlist.c(7.54 KB)
📄 nrand48.c(628 B)
📄 opendir.c(8.52 KB)
📄 pause.3(2.36 KB)
📄 pause.c(2.01 KB)
📄 pmadvise.c(425 B)
📄 popen.3(4.86 KB)
📄 popen.c(6 KB)
📄 posix_spawn.3(14.35 KB)
📄 posix_spawn.c(14.04 KB)
📄 posix_spawn_file_actions_addopen.3(6.28 KB)
📄 posix_spawn_file_actions_init.3(3.78 KB)
📄 posix_spawnattr_getflags.3(3.81 KB)
📄 posix_spawnattr_getpgroup.3(3.45 KB)
📄 posix_spawnattr_getschedparam.3(3.69 KB)
📄 posix_spawnattr_getschedpolicy.3(3.63 KB)
📄 posix_spawnattr_getsigdefault.3(3.65 KB)
📄 posix_spawnattr_getsigmask.3(3.56 KB)
📄 posix_spawnattr_init.3(4.09 KB)
📄 psignal.3(3.18 KB)
📄 psignal.c(2.22 KB)
📄 pututxline.c(7.34 KB)
📄 pw_scan.c(6.3 KB)
📄 pw_scan.h(1.8 KB)
📄 raise.3(2.31 KB)
📄 raise.c(1.96 KB)
📄 rand48.3(4.56 KB)
📄 rand48.h(811 B)
📄 readdir-compat11.c(3.63 KB)
📄 readdir.c(3.91 KB)
📄 readpassphrase.3(4.77 KB)
📄 readpassphrase.c(5.65 KB)
📄 recvmmsg.c(2.83 KB)
📄 rewinddir.c(2.29 KB)
📄 rfork_thread.3(2.7 KB)
📄 scandir-compat11.c(4.89 KB)
📄 scandir.3(3.86 KB)
📄 scandir.c(4.8 KB)
📄 scandir_b.c(1.38 KB)
📄 seed48.c(1 KB)
📄 seekdir.c(2.17 KB)
📄 sem.c(11.4 KB)
📄 sem_destroy.3(2.51 KB)
📄 sem_getvalue.3(2.56 KB)
📄 sem_init.3(2.81 KB)
📄 sem_new.c(9.95 KB)
📄 sem_open.3(5.37 KB)
📄 sem_post.3(2.45 KB)
📄 sem_timedwait.3(5 KB)
📄 sem_wait.3(2.73 KB)
📄 semctl.c(2.67 KB)
📄 sendmmsg.c(2.1 KB)
📄 setdomainname.c(1.97 KB)
📄 sethostname.c(1.96 KB)
📄 setjmp.3(4.48 KB)
📄 setjmperr.c(2.11 KB)
📄 setmode.3(3.56 KB)
📄 setmode.c(11.38 KB)
📄 setproctitle.3(3.54 KB)
📄 setproctitle.c(4.87 KB)
📄 setprogname.c(273 B)
📄 siginterrupt.3(3.74 KB)
📄 siginterrupt.c(2.29 KB)
📄 siglist.c(3.49 KB)
📄 signal.3(9.11 KB)
📄 signal.c(2.17 KB)
📄 sigsetops.3(4.15 KB)
📄 sigsetops.c(3.04 KB)
📄 sleep.3(2.88 KB)
📄 sleep.c(2.61 KB)
📄 srand48.c(859 B)
📄 statvfs.3(4.96 KB)
📄 statvfs.c(3.82 KB)
📄 stringlist.3(3.14 KB)
📄 stringlist.c(2.74 KB)
📄 strtofflags.3(2.96 KB)
📄 strtofflags.c(4.78 KB)
📄 sysconf.3(8.75 KB)
📄 sysconf.c(15.62 KB)
📄 sysctl.3(28.37 KB)
📄 sysctl.c(5.35 KB)
📄 sysctlbyname.c(1.81 KB)
📄 sysctlnametomib.c(2.14 KB)
📄 syslog.3(7.35 KB)
📄 syslog.c(12.21 KB)
📄 tcgetpgrp.3(2.6 KB)
📄 tcgetsid.3(2.24 KB)
📄 tcgetwinsize.3(4.62 KB)
📄 tcsendbreak.3(4.75 KB)
📄 tcsetattr.3(8.86 KB)
📄 tcsetpgrp.3(3.09 KB)
📄 tcsetsid.3(2.83 KB)
📄 telldir.c(5.62 KB)
📄 telldir.h(3.84 KB)
📄 termios.c(5.63 KB)
📄 time.3(2.94 KB)
📄 time.c(1.93 KB)
📄 times.3(3.62 KB)
📄 times.c(2.49 KB)
📄 timespec_get.3(2.52 KB)
📄 timespec_get.c(1.92 KB)
📄 timezone.3(2.29 KB)
📄 timezone.c(3.94 KB)
📄 tls.c(12.39 KB)
📄 trivial-getcontextx.c(1.97 KB)
📄 ttyname.3(3.39 KB)
📄 ttyname.c(3.24 KB)
📄 ttyslot.c(1.8 KB)
📄 tzset.3(7.41 KB)
📄 ualarm.3(2.88 KB)
📄 ualarm.c(2.33 KB)
📄 ucontext.3(3.57 KB)
📄 ulimit.3(2.8 KB)
📄 ulimit.c(2.25 KB)
📄 uname.3(3.14 KB)
📄 uname.c(1.91 KB)
📄 unvis-compat.c(1.89 KB)
📄 usleep.3(2.75 KB)
📄 usleep.c(2.2 KB)
📄 utime.3(2.74 KB)
📄 utime.c(2 KB)
📄 utxdb.c(4.56 KB)
📄 utxdb.h(2.2 KB)
📄 valloc.3(2.37 KB)
📄 valloc.c(1.85 KB)
📄 wait.c(2.1 KB)
📄 wait3.c(2.13 KB)
📄 waitid.c(2.49 KB)
📄 waitpid.c(2.15 KB)
📄 wordexp.3(5.04 KB)
📄 wordexp.c(10.48 KB)

Editing: tls.c

/*-
 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
 *
 * Copyright (c) 2004 Doug Rabson
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 *	$FreeBSD$
 */

/*
 * Define stubs for TLS internals so that programs and libraries can
 * link. These functions will be replaced by functional versions at
 * runtime from ld-elf.so.1.
 */

#include <sys/cdefs.h>
#include <sys/param.h>
#include <stdlib.h>
#include <string.h>
#include <elf.h>
#include <unistd.h>

#include "libc_private.h"

#define	tls_assert(cond)	((cond) ? (void) 0 :			\
    (tls_msg(#cond ": assert failed: " __FILE__ ":"			\
      __XSTRING(__LINE__) "\n"), abort()))
#define	tls_msg(s)		write(STDOUT_FILENO, s, strlen(s))

/* Provided by jemalloc to avoid bootstrapping issues. */
void	*__je_bootstrap_malloc(size_t size);
void	*__je_bootstrap_calloc(size_t num, size_t size);
void	__je_bootstrap_free(void *ptr);

__weak_reference(__libc_allocate_tls, _rtld_allocate_tls);
__weak_reference(__libc_free_tls, _rtld_free_tls);

#ifdef __i386__

__weak_reference(___libc_tls_get_addr, ___tls_get_addr);
__attribute__((__regparm__(1))) void * ___libc_tls_get_addr(void *);

#endif

void * __libc_tls_get_addr(void *);
__weak_reference(__libc_tls_get_addr, __tls_get_addr);

void *_rtld_allocate_tls(void *oldtls, size_t tcbsize, size_t tcbalign);
void _rtld_free_tls(void *tls, size_t tcbsize, size_t tcbalign);
void *__libc_allocate_tls(void *oldtls, size_t tcbsize, size_t tcbalign);
void __libc_free_tls(void *tls, size_t tcbsize, size_t tcbalign);

#if defined(__amd64__)
#define TLS_TCB_ALIGN 16
#elif defined(__aarch64__) || defined(__arm__) || defined(__i386__) || \
    defined(__mips__) || defined(__powerpc__) || defined(__riscv)
#define TLS_TCB_ALIGN sizeof(void *)
#else
#error TLS_TCB_ALIGN undefined for target architecture
#endif

#if defined(__aarch64__) || defined(__arm__) || defined(__mips__) || \
    defined(__powerpc__) || defined(__riscv)
#define TLS_VARIANT_I
#endif
#if defined(__i386__) || defined(__amd64__)
#define TLS_VARIANT_II
#endif

#if defined(__mips__) || defined(__powerpc__) || defined(__riscv)
#define DTV_OFFSET 0x8000
#else
#define DTV_OFFSET 0
#endif

#ifndef PIC

static size_t tls_static_space;
static size_t tls_init_size;
static size_t tls_init_align;
static void *tls_init;
#endif

#ifdef __i386__

/* GNU ABI */

__attribute__((__regparm__(1)))
void *
___libc_tls_get_addr(void *ti __unused)
{
	return (0);
}

#endif

void *
__libc_tls_get_addr(void *ti __unused)
{
	return (0);
}

#ifndef PIC

static void *
malloc_aligned(size_t size, size_t align)
{
	void *mem, *res;

if (align < sizeof(void *))
		align = sizeof(void *);

mem = __je_bootstrap_malloc(size + sizeof(void *) + align - 1);
	res = (void *)roundup2((uintptr_t)mem + sizeof(void *), align);
	*(void **)((uintptr_t)res - sizeof(void *)) = mem;
	return (res);
}

static void
free_aligned(void *ptr)
{
	void *mem;
	uintptr_t x;

if (ptr == NULL)
		return;

x = (uintptr_t)ptr;
	x -= sizeof(void *);
	mem = *(void **)x;
	__je_bootstrap_free(mem);
}

#ifdef TLS_VARIANT_I

/*
 * There are two versions of variant I of TLS
 *
 * - ARM and aarch64 uses original variant I as is described in [1] and [2],
 *   where TP points to start of TCB followed by aligned TLS segment.
 *   Both TCB and TLS must be aligned to alignment of TLS section. The TCB[0]
 *   points to DTV vector and DTV values are real addresses (without bias).
 *   Note: for Local Exec TLS Model, the offsets from TP (TCB in this case) to
 *   TLS variables are computed by linker, so we cannot overalign TLS section.
 *
 * - MIPS, PowerPC and RISC-V use modified version of variant I,
 *   described in [3] where TP points (with bias) to TLS and TCB immediately
 *   precedes TLS without any alignment gap[4]. Only TLS should be aligned.
 *   The TCB[0] points to DTV vector and DTV values are biased by constant
 *   value (0x8000) from real addresses[5].
 *
 * [1] Ulrich Drepper: ELF Handling for Thread-Local Storage
 *     www.akkadia.org/drepper/tls.pdf
 *
 * [2] ARM IHI 0045E: Addenda to, and Errata in, the ABI for the ARM(r)
 *     Architecture
 *   infocenter.arm.com/help/topic/com.arm.doc.ihi0045e/IHI0045E_ABI_addenda.pdf
 *
 * [3] OpenPOWER: Power Architecture 64-Bit ELF V2 ABI Specification
 *     https://members.openpowerfoundation.org/document/dl/576
 *
 * [4] Its unclear if "without any alignment gap" is hard ABI requirement,
 *     but we must follow this rule due to suboptimal _set_tp()
 *     (aka <ARCH>_SET_TP) implementation. This function doesn't expect TP but
 *     TCB as argument.
 *
 * [5] I'm not able to validate "values are biased" assertions.
 */

#define	TLS_TCB_SIZE	(2 * sizeof(void *))

/*
 * Return pointer to allocated TLS block
 */
static void *
get_tls_block_ptr(void *tcb, size_t tcbsize)
{
	size_t extra_size, post_size, pre_size, tls_block_size;

/* Compute fragments sizes. */
	extra_size = tcbsize - TLS_TCB_SIZE;
#if defined(__aarch64__) || defined(__arm__)
	post_size =  roundup2(TLS_TCB_SIZE, tls_init_align) - TLS_TCB_SIZE;
#else
	post_size = 0;
#endif
	tls_block_size = tcbsize + post_size;
	pre_size = roundup2(tls_block_size, tls_init_align) - tls_block_size;

return ((char *)tcb - pre_size - extra_size);
}

/*
 * Free Static TLS using the Variant I method. The tcbsize
 * and tcbalign parameters must be the same as those used to allocate
 * the block.
 */
void
__libc_free_tls(void *tcb, size_t tcbsize, size_t tcbalign __unused)
{
	Elf_Addr *dtv;
	Elf_Addr **tls;

tls = (Elf_Addr **)tcb;
	dtv = tls[0];
	__je_bootstrap_free(dtv);
	free_aligned(get_tls_block_ptr(tcb, tcbsize));
}

/*
 * Allocate Static TLS using the Variant I method.
 *
 * To handle all above requirements, we setup the following layout for 
 * TLS block:
 * (whole memory block is aligned with MAX(TLS_TCB_ALIGN, tls_init_align))
 *
 * +----------+--------------+--------------+-----------+------------------+
 * | pre gap  | extended TCB |     TCB      | post gap  |    TLS segment   |
 * | pre_size |  extra_size  | TLS_TCB_SIZE | post_size | tls_static_space |
 * +----------+--------------+--------------+-----------+------------------+
 *
 * where:
 *  extra_size is tcbsize - TLS_TCB_SIZE
 *  post_size is used to adjust TCB to TLS aligment for first version of TLS
 *            layout and is always 0 for second version.
 *  pre_size  is used to adjust TCB aligment for first version and to adjust
 *            TLS alignment for second version.
 *
 */
void *
__libc_allocate_tls(void *oldtcb, size_t tcbsize, size_t tcbalign)
{
	Elf_Addr *dtv, **tcb;
	char *tls_block, *tls;
	size_t extra_size, maxalign, post_size, pre_size, tls_block_size;

if (oldtcb != NULL && tcbsize == TLS_TCB_SIZE)
		return (oldtcb);

tls_assert(tcbalign >= TLS_TCB_ALIGN);
	maxalign = MAX(tcbalign, tls_init_align);

/* Compute fragmets sizes. */
	extra_size = tcbsize - TLS_TCB_SIZE;
#if defined(__aarch64__) || defined(__arm__)
	post_size = roundup2(TLS_TCB_SIZE, tls_init_align) - TLS_TCB_SIZE;
#else
	post_size = 0;
#endif
	tls_block_size = tcbsize + post_size;
	pre_size = roundup2(tls_block_size, tls_init_align) - tls_block_size;
	tls_block_size += pre_size + tls_static_space;

/* Allocate whole TLS block */
	tls_block = malloc_aligned(tls_block_size, maxalign);
	if (tls_block == NULL) {
		tls_msg("__libc_allocate_tls: Out of memory.\n");
		abort();
	}
	memset(tls_block, 0, tls_block_size);
	tcb = (Elf_Addr **)(tls_block + pre_size + extra_size);
	tls = (char *)tcb + TLS_TCB_SIZE + post_size;

if (oldtcb != NULL) {
		memcpy(tls_block, get_tls_block_ptr(oldtcb, tcbsize),
		    tls_block_size);
		free_aligned(oldtcb);

/* Adjust the DTV. */
		dtv = tcb[0];
		dtv[2] = (Elf_Addr)(tls + DTV_OFFSET);
	} else {
		dtv = __je_bootstrap_malloc(3 * sizeof(Elf_Addr));
		if (dtv == NULL) {
			tls_msg("__libc_allocate_tls: Out of memory.\n");
			abort();
		}
		/* Build the DTV. */
		tcb[0] = dtv;
		dtv[0] = 1;		/* Generation. */
		dtv[1] = 1;		/* Segments count. */
		dtv[2] = (Elf_Addr)(tls + DTV_OFFSET);

if (tls_init_size > 0)
			memcpy(tls, tls_init, tls_init_size);
	}

return (tcb);
}

#endif

#ifdef TLS_VARIANT_II

#define	TLS_TCB_SIZE	(3 * sizeof(Elf_Addr))

/*
 * Free Static TLS using the Variant II method.
 */
void
__libc_free_tls(void *tcb, size_t tcbsize __unused, size_t tcbalign)
{
	size_t size;
	Elf_Addr* dtv;
	Elf_Addr tlsstart, tlsend;

/*
	 * Figure out the size of the initial TLS block so that we can
	 * find stuff which ___tls_get_addr() allocated dynamically.
	 */
	tcbalign = MAX(tcbalign, tls_init_align);
	size = roundup2(tls_static_space, tcbalign);

dtv = ((Elf_Addr**)tcb)[1];
	tlsend = (Elf_Addr) tcb;
	tlsstart = tlsend - size;
	free_aligned((void*)tlsstart);
	__je_bootstrap_free(dtv);
}

/*
 * Allocate Static TLS using the Variant II method.
 */
void *
__libc_allocate_tls(void *oldtls, size_t tcbsize, size_t tcbalign)
{
	size_t size;
	char *tls;
	Elf_Addr *dtv;
	Elf_Addr segbase, oldsegbase;

tcbalign = MAX(tcbalign, tls_init_align);
	size = roundup2(tls_static_space, tcbalign);

if (tcbsize < 2 * sizeof(Elf_Addr))
		tcbsize = 2 * sizeof(Elf_Addr);
	tls = malloc_aligned(size + tcbsize, tcbalign);
	if (tls == NULL) {
		tls_msg("__libc_allocate_tls: Out of memory.\n");
		abort();
	}
	memset(tls, 0, size + tcbsize);
	dtv = __je_bootstrap_malloc(3 * sizeof(Elf_Addr));
	if (dtv == NULL) {
		tls_msg("__libc_allocate_tls: Out of memory.\n");
		abort();
	}

segbase = (Elf_Addr)(tls + size);
	((Elf_Addr*)segbase)[0] = segbase;
	((Elf_Addr*)segbase)[1] = (Elf_Addr) dtv;

dtv[0] = 1;
	dtv[1] = 1;
	dtv[2] = segbase - tls_static_space;

if (oldtls) {
		/*
		 * Copy the static TLS block over whole.
		 */
		oldsegbase = (Elf_Addr) oldtls;
		memcpy((void *)(segbase - tls_static_space),
		    (const void *)(oldsegbase - tls_static_space),
		    tls_static_space);

/*
		 * We assume that this block was the one we created with
		 * allocate_initial_tls().
		 */
		_rtld_free_tls(oldtls, 2*sizeof(Elf_Addr), sizeof(Elf_Addr));
	} else {
		memcpy((void *)(segbase - tls_static_space),
		    tls_init, tls_init_size);
		memset((void *)(segbase - tls_static_space + tls_init_size),
		    0, tls_static_space - tls_init_size);
	}

return (void*) segbase;
}

#endif /* TLS_VARIANT_II */

#else

void *
__libc_allocate_tls(void *oldtls __unused, size_t tcbsize __unused,
	size_t tcbalign __unused)
{
	return (0);
}

void
__libc_free_tls(void *tcb __unused, size_t tcbsize __unused,
	size_t tcbalign __unused)
{
}

#endif /* PIC */

extern char **environ;

void
_init_tls(void)
{
#ifndef PIC
	Elf_Addr *sp;
	Elf_Auxinfo *aux, *auxp;
	Elf_Phdr *phdr;
	size_t phent, phnum;
	int i;
	void *tls;

sp = (Elf_Addr *) environ;
	while (*sp++ != 0)
		;
	aux = (Elf_Auxinfo *) sp;
	phdr = NULL;
	phent = phnum = 0;
	for (auxp = aux; auxp->a_type != AT_NULL; auxp++) {
		switch (auxp->a_type) {
		case AT_PHDR:
			phdr = auxp->a_un.a_ptr;
			break;

case AT_PHENT:
			phent = auxp->a_un.a_val;
			break;

case AT_PHNUM:
			phnum = auxp->a_un.a_val;
			break;
		}
	}
	if (phdr == NULL || phent != sizeof(Elf_Phdr) || phnum == 0)
		return;

for (i = 0; (unsigned) i < phnum; i++) {
		if (phdr[i].p_type == PT_TLS) {
			tls_static_space = roundup2(phdr[i].p_memsz,
			    phdr[i].p_align);
			tls_init_size = phdr[i].p_filesz;
			tls_init_align = phdr[i].p_align;
			tls_init = (void*) phdr[i].p_vaddr;
			break;
		}
	}
	tls = _rtld_allocate_tls(NULL, TLS_TCB_SIZE, TLS_TCB_ALIGN);

_set_tp(tls);
#endif
}

003 File Manager

Editing: tls.c

Upload File

Create Folder