1/* 2 * Copyright (c) 2010 Konstantin Belousov <kib@freebsd.org> 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Neither the name of the author nor the names of any co-contributors 11 * may be used to endorse or promote products derived from this software 12 * without specific prior written permission. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 * 26 * $FreeBSD: stable/11/lib/libc/gen/elf_utils.c 366094 2020-09-23 21:57:29Z jhb $ 27 */ 28 29#include <sys/types.h> 30#include <sys/mman.h> 31#include <sys/resource.h> 32#include <sys/sysctl.h> 33#include <link.h> 34#include <stddef.h> 35#include <string.h> 36#include "libc_private.h" 37#include "static_tls.h" 38 39void __pthread_map_stacks_exec(void); 40void __pthread_distribute_static_tls(size_t, void *, size_t, size_t); 41 42int 43__elf_phdr_match_addr(struct dl_phdr_info *phdr_info, void *addr) 44{ 45 const Elf_Phdr *ph; 46 int i; 47 48 for (i = 0; i < phdr_info->dlpi_phnum; i++) { 49 ph = &phdr_info->dlpi_phdr[i]; 50 if (ph->p_type != PT_LOAD || (ph->p_flags & PF_X) == 0) 51 continue; 52 if (phdr_info->dlpi_addr + ph->p_vaddr <= (uintptr_t)addr && 53 (uintptr_t)addr < phdr_info->dlpi_addr + 54 ph->p_vaddr + ph->p_memsz) 55 break; 56 } 57 return (i != phdr_info->dlpi_phnum); 58} 59 60void 61__libc_map_stacks_exec(void) 62{ 63 int mib[2]; 64 struct rlimit rlim; 65 u_long usrstack; 66 size_t len; 67 68 mib[0] = CTL_KERN; 69 mib[1] = KERN_USRSTACK; 70 len = sizeof(usrstack); 71 if (sysctl(mib, sizeof(mib) / sizeof(mib[0]), &usrstack, &len, NULL, 0) 72 == -1) 73 return; 74 if (getrlimit(RLIMIT_STACK, &rlim) == -1) 75 return; 76 mprotect((void *)(uintptr_t)(usrstack - rlim.rlim_cur), 77 rlim.rlim_cur, _rtld_get_stack_prot()); 78} 79 80#pragma weak __pthread_map_stacks_exec 81void 82__pthread_map_stacks_exec(void) 83{ 84 85 ((void (*)(void))__libc_interposing[INTERPOS_map_stacks_exec])(); 86} 87 88void 89__libc_distribute_static_tls(size_t offset, void *src, size_t len, 90 size_t total_len) 91{ 92 uintptr_t tlsbase; 93 94 tlsbase = _libc_get_static_tls_base(offset); 95 memcpy((void *)tlsbase, src, len); 96 memset((char *)tlsbase + len, 0, total_len - len); 97} 98 99#pragma weak __pthread_distribute_static_tls 100void 101__pthread_distribute_static_tls(size_t offset, void *src, size_t len, 102 size_t total_len) 103{ 104 105 ((void (*)(size_t, void *, size_t, size_t))__libc_interposing[ 106 INTERPOS_distribute_static_tls])(offset, src, len, total_len); 107} 108