1 /* $NetBSD: rtld.h,v 1.140 2020/04/19 01:06:15 joerg Exp $ */ 2 3 /* 4 * Copyright 1996 John D. Polstra. 5 * Copyright 1996 Matt Thomas <matt@3am-software.com> 6 * All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 3. All advertising materials mentioning features or use of this software 17 * must display the following acknowledgement: 18 * This product includes software developed by John Polstra. 19 * 4. The name of the author may not be used to endorse or promote products 20 * derived from this software without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 25 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 26 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 27 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 28 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 29 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 30 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 31 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 32 */ 33 34 #ifndef RTLD_H 35 #define RTLD_H 36 37 #include <dlfcn.h> 38 #include <signal.h> 39 #include <stdbool.h> 40 #include <stddef.h> 41 #include <sys/param.h> 42 #include <sys/types.h> 43 #include <sys/queue.h> 44 #include <sys/exec_elf.h> 45 #include <sys/tls.h> 46 #include "rtldenv.h" 47 #include "link.h" 48 49 #if defined(_RTLD_SOURCE) 50 51 #if defined(__ARM_EABI__) && !defined(__ARM_DWARF_EH__) 52 #include "unwind.h" 53 #endif 54 55 #ifndef RTLD_DEFAULT_LIBRARY_PATH 56 #define RTLD_DEFAULT_LIBRARY_PATH "/usr/lib" 57 #endif 58 #define _PATH_LD_HINTS "/etc/ld.so.conf" 59 60 extern size_t _rtld_pagesz; 61 62 #define round_down(x) ((x) & ~(_rtld_pagesz - 1)) 63 #define round_up(x) round_down((x) + _rtld_pagesz - 1) 64 65 #define NEW(type) ((type *) xmalloc(sizeof(type))) 66 #define CNEW(type) ((type *) xcalloc(sizeof(type))) 67 68 /* 69 * Fill in a DoneList with an allocation large enough to hold all of 70 * the currently-loaded objects. Keep this in a macro since it calls 71 * alloca and we want that to occur within the scope of the caller. 72 */ 73 #define _rtld_donelist_init(dlp) \ 74 ((dlp)->num_alloc = _rtld_objcount, \ 75 (dlp)->objs = alloca((dlp)->num_alloc * sizeof((dlp)->objs[0])), \ 76 assert((dlp)->objs != NULL), \ 77 (dlp)->num_used = 0) 78 79 80 typedef struct Struct_Elf_Hash { 81 unsigned long sysv; 82 unsigned long gnu; 83 } Elf_Hash; 84 #endif /* _RTLD_SOURCE */ 85 86 /* 87 * C++ has mandated the use of the following keywords for its new boolean 88 * type. We might as well follow their lead. 89 */ 90 struct Struct_Obj_Entry; 91 92 typedef struct Struct_Objlist_Entry { 93 SIMPLEQ_ENTRY(Struct_Objlist_Entry) link; 94 struct Struct_Obj_Entry *obj; 95 } Objlist_Entry; 96 97 typedef SIMPLEQ_HEAD(Struct_Objlist, Struct_Objlist_Entry) Objlist; 98 99 typedef struct Struct_Name_Entry { 100 SIMPLEQ_ENTRY(Struct_Name_Entry) link; 101 char name[1]; 102 } Name_Entry; 103 104 typedef struct Struct_Needed_Entry { 105 struct Struct_Needed_Entry *next; 106 struct Struct_Obj_Entry *obj; 107 unsigned long name; /* Offset of name in string table */ 108 } Needed_Entry; 109 110 typedef struct _rtld_search_path_t { 111 struct _rtld_search_path_t *sp_next; 112 const char *sp_path; 113 size_t sp_pathlen; 114 } Search_Path; 115 116 typedef struct Struct_Ver_Entry { 117 Elf_Word hash; 118 u_int flags; 119 const char *name; 120 const char *file; 121 } Ver_Entry; 122 123 /* Ver_Entry.flags */ 124 #define VER_INFO_HIDDEN 0x01 125 126 #define RTLD_MAX_ENTRY 10 127 #define RTLD_MAX_LIBRARY 4 128 #define RTLD_MAX_CTL 2 129 typedef struct _rtld_library_xform_t { 130 struct _rtld_library_xform_t *next; 131 char *name; 132 const char *ctlname; 133 struct { 134 char *value; 135 char *library[RTLD_MAX_LIBRARY]; 136 } entry[RTLD_MAX_ENTRY]; 137 } Library_Xform; 138 139 /* 140 * Shared object descriptor. 141 * 142 * Items marked with "(%)" are dynamically allocated, and must be freed 143 * when the structure is destroyed. 144 */ 145 146 typedef void (*fptr_t)(void); 147 148 typedef struct Struct_Obj_Entry { 149 struct Struct_Obj_Entry *next; 150 char *path; /* Pathname of underlying file (%) */ 151 int refcount; 152 int dl_refcount; /* Number of times loaded by dlopen */ 153 154 /* These items are computed by map_object() or by digest_phdr(). */ 155 caddr_t mapbase; /* Base address of mapped region */ 156 size_t mapsize; /* Size of mapped region in bytes */ 157 size_t textsize; /* Size of text segment in bytes */ 158 Elf_Addr vaddrbase; /* Base address in shared object file */ 159 caddr_t relocbase; /* Reloc const = mapbase - *vaddrbase */ 160 Elf_Dyn *dynamic; /* Dynamic section */ 161 caddr_t entry; /* Entry point */ 162 const Elf_Phdr *phdr; /* Program header (may be xmalloc'ed) */ 163 size_t phsize; /* Size of program header in bytes */ 164 165 /* Items from the dynamic section. */ 166 Elf_Addr *pltgot; /* PLTGOT table */ 167 const Elf_Rel *rel; /* Relocation entries */ 168 const Elf_Rel *rellim; /* Limit of Relocation entries */ 169 const Elf_Rela *rela; /* Relocation entries */ 170 const Elf_Rela *relalim; /* Limit of Relocation entries */ 171 const Elf_Rel *pltrel; /* PLT relocation entries */ 172 const Elf_Rel *pltrellim; /* Limit of PLT relocation entries */ 173 const Elf_Rela *pltrela; /* PLT relocation entries */ 174 const Elf_Rela *pltrelalim; /* Limit of PLT relocation entries */ 175 const Elf_Sym *symtab; /* Symbol table */ 176 const char *strtab; /* String table */ 177 unsigned long strsize; /* Size in bytes of string table */ 178 #if defined(__mips__) || defined(__riscv__) 179 Elf_Word local_gotno; /* Number of local GOT entries */ 180 Elf_Word symtabno; /* Number of dynamic symbols */ 181 Elf_Word gotsym; /* First dynamic symbol in GOT */ 182 #endif 183 184 /* SysV Hash fields */ 185 const Elf_Symindx *buckets; /* Hash table buckets array */ 186 unsigned long unused1; /* Used to be nbuckets */ 187 const Elf_Symindx *chains; /* Hash table chain array */ 188 unsigned long nchains; /* Number of chains */ 189 190 Search_Path *rpaths; /* Search path specified in object */ 191 Needed_Entry *needed; /* Shared objects needed by this (%) */ 192 193 Elf_Addr init; /* Initialization function to call */ 194 Elf_Addr fini; /* Termination function to call */ 195 196 u_int32_t mainprog:1, /* True if this is the main program */ 197 rtld:1, /* True if this is the dynamic linker */ 198 textrel:1, /* True if there are relocations to 199 * text seg */ 200 symbolic:1, /* True if generated with 201 * "-Bsymbolic" */ 202 printed:1, /* True if ldd has printed it */ 203 isdynamic:1, /* True if this is a pure PIC object */ 204 mainref:1, /* True if on _rtld_list_main */ 205 globalref:1, /* True if on _rtld_list_global */ 206 init_done:1, /* True if .init has been added */ 207 init_called:1, /* True if .init function has been 208 * called */ 209 fini_called:1, /* True if .fini function has been 210 * called */ 211 z_now:1, /* True if object's symbols should be 212 bound immediately */ 213 z_nodelete:1, /* True if object should never be 214 unloaded */ 215 z_initfirst:1, /* True if object's .init/.fini take 216 * priority over others */ 217 z_noopen:1, /* True if object should never be 218 dlopen'ed */ 219 phdr_loaded:1, /* Phdr is loaded and doesn't need to 220 * be freed. */ 221 #if defined(__HAVE_TLS_VARIANT_I) || defined(__HAVE_TLS_VARIANT_II) 222 tls_done:1, /* True if static TLS offset 223 * has been allocated */ 224 #endif 225 ref_nodel:1, /* Refcount increased to prevent dlclose */ 226 sysv_hash:1, /* SysV Hash available */ 227 gnu_hash:1; /* GNU Hash available */ 228 229 struct link_map linkmap; /* for GDB */ 230 231 /* These items are computed by map_object() or by digest_phdr(). */ 232 const char *interp; /* Pathname of the interpreter, if any */ 233 Objlist dldags; /* Object belongs to these dlopened DAGs (%) */ 234 Objlist dagmembers; /* DAG has these members (%) */ 235 dev_t dev; /* Object's filesystem's device */ 236 ino_t ino; /* Object's inode number */ 237 238 void *ehdr; 239 240 /* SysV Hash fields */ 241 uint32_t nbuckets; /* Number of buckets */ 242 uint32_t nbuckets_m; /* Precomputed for fast remainder */ 243 uint8_t nbuckets_s1; 244 uint8_t nbuckets_s2; 245 246 /* GNU Hash fields */ 247 const uint32_t *buckets_gnu; /* Hash table buckets array */ 248 uint32_t nbuckets_gnu; /* Number of GNU hash buckets */ 249 uint32_t nbuckets_m_gnu; /* Precomputed for fast remainder */ 250 uint8_t nbuckets_s1_gnu; 251 uint8_t nbuckets_s2_gnu; 252 const uint32_t *chains_gnu; /* Hash table chain array */ 253 #define nchains_gnu nchains /* Number of symbols, shared with SysV Hash */ 254 const Elf_Addr *bloom_gnu; 255 uint32_t symndx_gnu; /* First accessible symbol on dynsym table */ 256 uint32_t mask_bm_gnu; /* Bloom filter words - 1 (bitmask) */ 257 uint32_t shift2_gnu; /* Bloom filter shift count */ 258 259 size_t pathlen; /* Pathname length */ 260 SIMPLEQ_HEAD(, Struct_Name_Entry) names; /* List of names for this 261 * object we know about. */ 262 263 #ifdef __powerpc__ 264 #ifdef _LP64 265 Elf_Addr glink; /* global linkage */ 266 #else 267 Elf_Addr *gotptr; /* GOT table (secure-plt only) */ 268 #endif 269 #endif 270 271 #if defined(__HAVE_TLS_VARIANT_I) || defined(__HAVE_TLS_VARIANT_II) 272 /* Thread Local Storage support for this module */ 273 size_t tlsindex; /* Index in DTV */ 274 void *tlsinit; /* Base address of TLS init block */ 275 size_t tlsinitsize; /* Size of TLS init block */ 276 size_t tlssize; /* Size of TLS block */ 277 size_t tlsoffset; /* Offset in the static TLS block */ 278 size_t tlsalign; /* Needed alignment for static TLS */ 279 #endif 280 281 #ifdef GNU_RELRO 282 /* relocation readonly */ 283 void *relro_page; 284 size_t relro_size; 285 #endif 286 287 /* symbol versioning */ 288 const Elf_Verneed *verneed; /* Required versions. */ 289 Elf_Word verneednum; /* Number of entries in verneed table */ 290 const Elf_Verdef *verdef; /* Provided versions. */ 291 Elf_Word verdefnum; /* Number of entries in verdef table */ 292 const Elf_Versym *versyms; /* Symbol versions table */ 293 294 Ver_Entry *vertab; /* Versions required/defined by this 295 * object */ 296 int vertabnum; /* Number of entries in vertab */ 297 298 /* init_array/fini_array */ 299 Elf_Addr *init_array; /* start of init array */ 300 size_t init_arraysz; /* # of entries in it */ 301 Elf_Addr *fini_array; /* start of fini array */ 302 size_t fini_arraysz; /* # of entries in it */ 303 /* IRELATIVE relocations */ 304 size_t ifunc_remaining; 305 #if defined(__sparc__) || defined(__powerpc__) || defined(__arm__) || \ 306 defined(__i386__) || defined(__x86_64__) 307 #define IFUNC_NONPLT 308 /* On SPARC, the PLT variant is called JMP_IREL and counted above. */ 309 size_t ifunc_remaining_nonplt; 310 #endif 311 size_t cxa_refcount; /* For TLS destructors. */ 312 #ifdef __ARM_EABI__ 313 void *exidx_start; 314 size_t exidx_sz; 315 #endif 316 } Obj_Entry; 317 318 typedef struct Struct_DoneList { 319 const Obj_Entry **objs; /* Array of object pointers */ 320 unsigned int num_alloc; /* Allocated size of the array */ 321 unsigned int num_used; /* Number of array slots used */ 322 } DoneList; 323 324 325 #if defined(_RTLD_SOURCE) 326 327 extern struct r_debug _rtld_debug; 328 extern Search_Path *_rtld_default_paths; 329 extern Obj_Entry *_rtld_objlist; 330 extern Obj_Entry **_rtld_objtail; 331 extern u_int _rtld_objcount; 332 extern u_int _rtld_objloads; 333 extern const uintptr_t _rtld_compat_obj[]; 334 extern Obj_Entry *_rtld_objmain; 335 extern Obj_Entry _rtld_objself; 336 extern Search_Path *_rtld_paths; 337 extern Library_Xform *_rtld_xforms; 338 extern bool _rtld_trust; 339 extern Objlist _rtld_list_global; 340 extern Objlist _rtld_list_main; 341 extern Elf_Sym _rtld_sym_zero; 342 extern u_int _rtld_objgen; 343 344 #define RTLD_MODEMASK 0x3 345 346 /* Flags to be passed into _rtld_symlook_ family of functions. */ 347 #define SYMLOOK_IN_PLT 0x01 /* Lookup for PLT symbol */ 348 #define SYMLOOK_DLSYM 0x02 /* Return newest versioned symbol. 349 Used by dlsym. */ 350 351 /* Flags for _rtld_load_object() and friends. */ 352 #define _RTLD_GLOBAL 0x01 /* Add object to global DAG. */ 353 #define _RTLD_MAIN 0x02 354 #define _RTLD_NOLOAD 0x04 /* dlopen() specified RTLD_NOLOAD. */ 355 #define _RTLD_DLOPEN 0x08 /* Load_object() called from dlopen(). */ 356 357 /* Preallocation for static TLS model */ 358 #define RTLD_STATIC_TLS_RESERVATION 64 359 360 /* rtld.c */ 361 __dso_public char *dlerror(void); 362 __dso_public void *dlopen(const char *, int); 363 __dso_public void *dlsym(void *, const char *); 364 __dso_public int dlclose(void *); 365 __dso_public int dladdr(const void *, Dl_info *); 366 __dso_public int dlinfo(void *, int, void *); 367 __dso_public int dl_iterate_phdr(int (*)(struct dl_phdr_info *, size_t, void *), 368 void *); 369 370 __dso_public void *_dlauxinfo(void) __pure; 371 __dso_public void __dl_cxa_refcount(void *addr, ssize_t delta); 372 373 __dso_public pid_t __locked_fork(int *); 374 375 #if defined(__ARM_EABI__) && !defined(__ARM_DWARF_EH__) 376 /* 377 * This is used by libgcc to find the start and length of the exception table 378 * associated with a PC. 379 */ 380 __dso_public _Unwind_Ptr __gnu_Unwind_Find_exidx(_Unwind_Ptr, int *); 381 #endif 382 383 /* These aren't exported */ 384 void _rtld_error(const char *, ...) __printflike(1,2); 385 void _rtld_die(void) __dead; 386 void *_rtld_objmain_sym(const char *); 387 __dso_public void _rtld_debug_state(void) __noinline; 388 void _rtld_linkmap_add(Obj_Entry *); 389 void _rtld_linkmap_delete(Obj_Entry *); 390 void _rtld_objlist_push_head(Objlist *, Obj_Entry *); 391 void _rtld_objlist_push_tail(Objlist *, Obj_Entry *); 392 Objlist_Entry *_rtld_objlist_find(Objlist *, const Obj_Entry *); 393 void _rtld_ref_dag(Obj_Entry *); 394 395 void _rtld_shared_enter(void); 396 void _rtld_shared_exit(void); 397 void _rtld_exclusive_enter(sigset_t *); 398 void _rtld_exclusive_exit(sigset_t *); 399 400 int _rtld_relro(const Obj_Entry *, bool); 401 402 /* expand.c */ 403 size_t _rtld_expand_path(char *, size_t, const char *, const char *,\ 404 const char *); 405 406 /* headers.c */ 407 void _rtld_digest_dynamic(const char *, Obj_Entry *); 408 Obj_Entry *_rtld_digest_phdr(const Elf_Phdr *, int, caddr_t); 409 410 /* load.c */ 411 Obj_Entry *_rtld_load_object(const char *, int); 412 int _rtld_load_needed_objects(Obj_Entry *, int); 413 int _rtld_preload(const char *); 414 415 #define OBJ_ERR (Obj_Entry *)(-1) 416 /* path.c */ 417 void _rtld_add_paths(const char *, Search_Path **, const char *); 418 void _rtld_process_hints(const char *, Search_Path **, Library_Xform **, 419 const char *); 420 int _rtld_sysctl(const char *, void *, size_t *); 421 422 /* reloc.c */ 423 int _rtld_do_copy_relocations(const Obj_Entry *); 424 int _rtld_relocate_objects(Obj_Entry *, bool); 425 int _rtld_relocate_nonplt_objects(Obj_Entry *); 426 int _rtld_relocate_plt_lazy(Obj_Entry *); 427 int _rtld_relocate_plt_objects(const Obj_Entry *); 428 void _rtld_setup_pltgot(const Obj_Entry *); 429 Elf_Addr _rtld_resolve_ifunc(const Obj_Entry *, const Elf_Sym *); 430 Elf_Addr _rtld_resolve_ifunc2(const Obj_Entry *, Elf_Addr); 431 432 void _rtld_call_ifunc(Obj_Entry *, sigset_t *, u_int); 433 434 /* search.c */ 435 Obj_Entry *_rtld_load_library(const char *, const Obj_Entry *, int); 436 437 /* symbol.c */ 438 unsigned long _rtld_sysv_hash(const char *); 439 unsigned long _rtld_gnu_hash(const char *); 440 const Elf_Sym *_rtld_symlook_obj(const char *, Elf_Hash *, 441 const Obj_Entry *, u_int, const Ver_Entry *); 442 const Elf_Sym *_rtld_find_symdef(unsigned long, const Obj_Entry *, 443 const Obj_Entry **, u_int); 444 const Elf_Sym *_rtld_find_plt_symdef(unsigned long, const Obj_Entry *, 445 const Obj_Entry **, bool); 446 447 const Elf_Sym *_rtld_symlook_list(const char *, Elf_Hash *, 448 const Objlist *, const Obj_Entry **, u_int, const Ver_Entry *, DoneList *); 449 const Elf_Sym *_rtld_symlook_default(const char *, Elf_Hash *, 450 const Obj_Entry *, const Obj_Entry **, u_int, const Ver_Entry *); 451 const Elf_Sym *_rtld_symlook_needed(const char *, Elf_Hash *, 452 const Needed_Entry *, const Obj_Entry **, u_int, const Ver_Entry *, 453 DoneList *, DoneList *); 454 455 /* symver.c */ 456 void _rtld_object_add_name(Obj_Entry *, const char *); 457 int _rtld_object_match_name(const Obj_Entry *, const char *); 458 int _rtld_verify_object_versions(Obj_Entry *); 459 460 static __inline const Ver_Entry * 461 _rtld_fetch_ventry(const Obj_Entry *obj, unsigned long symnum) 462 { 463 Elf_Half vernum; 464 465 if (obj->vertab) { 466 vernum = VER_NDX(obj->versyms[symnum].vs_vers); 467 if (vernum >= obj->vertabnum) { 468 _rtld_error("%s: symbol %s has wrong verneed value %d", 469 obj->path, &obj->strtab[symnum], vernum); 470 } else if (obj->vertab[vernum].hash) { 471 return &obj->vertab[vernum]; 472 } 473 } 474 return NULL; 475 } 476 477 #if defined(__HAVE_TLS_VARIANT_I) || defined(__HAVE_TLS_VARIANT_II) 478 /* tls.c */ 479 void *_rtld_tls_get_addr(void *, size_t, size_t); 480 void _rtld_tls_initial_allocation(void); 481 void *_rtld_tls_module_allocate(size_t index); 482 int _rtld_tls_offset_allocate(Obj_Entry *); 483 void _rtld_tls_offset_free(Obj_Entry *); 484 485 extern size_t _rtld_tls_dtv_generation; 486 extern size_t _rtld_tls_max_index; 487 488 __dso_public extern void *__tls_get_addr(void *); 489 #ifdef __i386__ 490 __dso_public extern void *___tls_get_addr(void *) 491 __attribute__((__regparm__(1))); 492 #endif 493 #endif 494 495 /* map_object.c */ 496 struct stat; 497 Obj_Entry *_rtld_map_object(const char *, int, const struct stat *); 498 void _rtld_obj_free(Obj_Entry *); 499 Obj_Entry *_rtld_obj_new(void); 500 501 #ifdef RTLD_LOADER 502 /* function descriptors */ 503 #ifdef __HAVE_FUNCTION_DESCRIPTORS 504 Elf_Addr _rtld_function_descriptor_alloc(const Obj_Entry *, 505 const Elf_Sym *, Elf_Addr); 506 const void *_rtld_function_descriptor_function(const void *); 507 508 void _rtld_call_function_void(const Obj_Entry *, Elf_Addr); 509 Elf_Addr _rtld_call_function_addr(const Obj_Entry *, Elf_Addr); 510 #else 511 static inline void 512 _rtld_call_function_void(const Obj_Entry *obj, Elf_Addr addr) 513 { 514 ((void (*)(void))addr)(); 515 } 516 static inline Elf_Addr 517 _rtld_call_function_addr(const Obj_Entry *obj, Elf_Addr addr) 518 { 519 return ((Elf_Addr(*)(void))addr)(); 520 } 521 #endif /* __HAVE_FUNCTION_DESCRIPTORS */ 522 #endif /* RTLD_LOADER */ 523 524 #endif /* _RTLD_SOURCE */ 525 526 #endif /* RTLD_H */ 527