1 /* $NetBSD: rtld.h,v 1.133 2018/04/03 21:10:27 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 #endif /* _RTLD_SOURCE */ 80 81 /* 82 * C++ has mandated the use of the following keywords for its new boolean 83 * type. We might as well follow their lead. 84 */ 85 struct Struct_Obj_Entry; 86 87 typedef struct Struct_Objlist_Entry { 88 SIMPLEQ_ENTRY(Struct_Objlist_Entry) link; 89 struct Struct_Obj_Entry *obj; 90 } Objlist_Entry; 91 92 typedef SIMPLEQ_HEAD(Struct_Objlist, Struct_Objlist_Entry) Objlist; 93 94 typedef struct Struct_Name_Entry { 95 SIMPLEQ_ENTRY(Struct_Name_Entry) link; 96 char name[1]; 97 } Name_Entry; 98 99 typedef struct Struct_Needed_Entry { 100 struct Struct_Needed_Entry *next; 101 struct Struct_Obj_Entry *obj; 102 unsigned long name; /* Offset of name in string table */ 103 } Needed_Entry; 104 105 typedef struct _rtld_search_path_t { 106 struct _rtld_search_path_t *sp_next; 107 const char *sp_path; 108 size_t sp_pathlen; 109 } Search_Path; 110 111 typedef struct Struct_Ver_Entry { 112 Elf_Word hash; 113 u_int flags; 114 const char *name; 115 const char *file; 116 } Ver_Entry; 117 118 /* Ver_Entry.flags */ 119 #define VER_INFO_HIDDEN 0x01 120 121 #define RTLD_MAX_ENTRY 10 122 #define RTLD_MAX_LIBRARY 4 123 #define RTLD_MAX_CTL 2 124 typedef struct _rtld_library_xform_t { 125 struct _rtld_library_xform_t *next; 126 char *name; 127 const char *ctlname; 128 struct { 129 char *value; 130 char *library[RTLD_MAX_LIBRARY]; 131 } entry[RTLD_MAX_ENTRY]; 132 } Library_Xform; 133 134 /* 135 * Shared object descriptor. 136 * 137 * Items marked with "(%)" are dynamically allocated, and must be freed 138 * when the structure is destroyed. 139 * 140 * The layout of this structure needs to be preserved because pre-2.0 binaries 141 * hard-coded the location of dlopen() and friends. 142 */ 143 144 #define RTLD_MAGIC 0xd550b87a 145 #define RTLD_VERSION 1 146 147 typedef void (*fptr_t)(void); 148 149 typedef struct Struct_Obj_Entry { 150 Elf32_Word magic; /* Magic number (sanity check) */ 151 Elf32_Word version; /* Version number of struct format */ 152 153 struct Struct_Obj_Entry *next; 154 char *path; /* Pathname of underlying file (%) */ 155 int refcount; 156 int dl_refcount; /* Number of times loaded by dlopen */ 157 158 /* These items are computed by map_object() or by digest_phdr(). */ 159 caddr_t mapbase; /* Base address of mapped region */ 160 size_t mapsize; /* Size of mapped region in bytes */ 161 size_t textsize; /* Size of text segment in bytes */ 162 Elf_Addr vaddrbase; /* Base address in shared object file */ 163 caddr_t relocbase; /* Reloc const = mapbase - *vaddrbase */ 164 Elf_Dyn *dynamic; /* Dynamic section */ 165 caddr_t entry; /* Entry point */ 166 const Elf_Phdr *phdr; /* Program header (may be xmalloc'ed) */ 167 size_t phsize; /* Size of program header in bytes */ 168 169 /* Items from the dynamic section. */ 170 Elf_Addr *pltgot; /* PLTGOT table */ 171 const Elf_Rel *rel; /* Relocation entries */ 172 const Elf_Rel *rellim; /* Limit of Relocation entries */ 173 const Elf_Rela *rela; /* Relocation entries */ 174 const Elf_Rela *relalim; /* Limit of Relocation entries */ 175 const Elf_Rel *pltrel; /* PLT relocation entries */ 176 const Elf_Rel *pltrellim; /* Limit of PLT relocation entries */ 177 const Elf_Rela *pltrela; /* PLT relocation entries */ 178 const Elf_Rela *pltrelalim; /* Limit of PLT relocation entries */ 179 const Elf_Sym *symtab; /* Symbol table */ 180 const char *strtab; /* String table */ 181 unsigned long strsize; /* Size in bytes of string table */ 182 #if defined(__mips__) || defined(__riscv__) 183 Elf_Word local_gotno; /* Number of local GOT entries */ 184 Elf_Word symtabno; /* Number of dynamic symbols */ 185 Elf_Word gotsym; /* First dynamic symbol in GOT */ 186 #endif 187 188 const Elf_Symindx *buckets; /* Hash table buckets array */ 189 unsigned long unused1; /* Used to be nbuckets */ 190 const Elf_Symindx *chains; /* Hash table chain array */ 191 unsigned long nchains; /* Number of chains */ 192 193 Search_Path *rpaths; /* Search path specified in object */ 194 Needed_Entry *needed; /* Shared objects needed by this (%) */ 195 196 Elf_Addr init; /* Initialization function to call */ 197 Elf_Addr fini; /* Termination function to call */ 198 199 /* 200 * BACKWARDS COMPAT Entry points for dlopen() and friends. 201 * 202 * DO NOT MOVE OR ADD TO THE LIST 203 * 204 */ 205 void *(*dlopen)(const char *, int); 206 void *(*dlsym)(void *, const char *); 207 char *(*dlerror)(void); 208 int (*dlclose)(void *); 209 int (*dladdr)(const void *, Dl_info *); 210 211 u_int32_t mainprog:1, /* True if this is the main program */ 212 rtld:1, /* True if this is the dynamic linker */ 213 textrel:1, /* True if there are relocations to 214 * text seg */ 215 symbolic:1, /* True if generated with 216 * "-Bsymbolic" */ 217 printed:1, /* True if ldd has printed it */ 218 isdynamic:1, /* True if this is a pure PIC object */ 219 mainref:1, /* True if on _rtld_list_main */ 220 globalref:1, /* True if on _rtld_list_global */ 221 init_done:1, /* True if .init has been added */ 222 init_called:1, /* True if .init function has been 223 * called */ 224 fini_called:1, /* True if .fini function has been 225 * called */ 226 z_now:1, /* True if object's symbols should be 227 bound immediately */ 228 z_nodelete:1, /* True if object should never be 229 unloaded */ 230 z_initfirst:1, /* True if object's .init/.fini take 231 * priority over others */ 232 z_noopen:1, /* True if object should never be 233 dlopen'ed */ 234 phdr_loaded:1, /* Phdr is loaded and doesn't need to 235 * be freed. */ 236 #if defined(__HAVE_TLS_VARIANT_I) || defined(__HAVE_TLS_VARIANT_II) 237 tls_done:1, /* True if static TLS offset 238 * has been allocated */ 239 #endif 240 ref_nodel:1; /* Refcount increased to prevent dlclose */ 241 242 struct link_map linkmap; /* for GDB */ 243 244 /* These items are computed by map_object() or by digest_phdr(). */ 245 const char *interp; /* Pathname of the interpreter, if any */ 246 Objlist dldags; /* Object belongs to these dlopened DAGs (%) */ 247 Objlist dagmembers; /* DAG has these members (%) */ 248 dev_t dev; /* Object's filesystem's device */ 249 ino_t ino; /* Object's inode number */ 250 251 void *ehdr; 252 253 uint32_t nbuckets; /* Number of buckets */ 254 uint32_t nbuckets_m; /* Precomputed for fast remainder */ 255 uint8_t nbuckets_s1; 256 uint8_t nbuckets_s2; 257 size_t pathlen; /* Pathname length */ 258 SIMPLEQ_HEAD(, Struct_Name_Entry) names; /* List of names for this 259 * object we know about. */ 260 261 #ifdef __powerpc__ 262 #ifdef _LP64 263 Elf_Addr glink; /* global linkage */ 264 #else 265 Elf_Addr *gotptr; /* GOT table (secure-plt only) */ 266 #endif 267 #endif 268 269 #if defined(__HAVE_TLS_VARIANT_I) || defined(__HAVE_TLS_VARIANT_II) 270 /* Thread Local Storage support for this module */ 271 size_t tlsindex; /* Index in DTV */ 272 void *tlsinit; /* Base address of TLS init block */ 273 size_t tlsinitsize; /* Size of TLS init block */ 274 size_t tlssize; /* Size of TLS block */ 275 size_t tlsoffset; /* Offset in the static TLS block */ 276 size_t tlsalign; /* Needed alignment for static TLS */ 277 #endif 278 279 #ifdef GNU_RELRO 280 /* relocation readonly */ 281 void *relro_page; 282 size_t relro_size; 283 #endif 284 285 /* symbol versioning */ 286 const Elf_Verneed *verneed; /* Required versions. */ 287 Elf_Word verneednum; /* Number of entries in verneed table */ 288 const Elf_Verdef *verdef; /* Provided versions. */ 289 Elf_Word verdefnum; /* Number of entries in verdef table */ 290 const Elf_Versym *versyms; /* Symbol versions table */ 291 292 Ver_Entry *vertab; /* Versions required/defined by this 293 * object */ 294 int vertabnum; /* Number of entries in vertab */ 295 296 /* init_array/fini_array */ 297 Elf_Addr *init_array; /* start of init array */ 298 size_t init_arraysz; /* # of entries in it */ 299 Elf_Addr *fini_array; /* start of fini array */ 300 size_t fini_arraysz; /* # of entries in it */ 301 /* IRELATIVE relocations */ 302 size_t ifunc_remaining; 303 #if defined(__sparc__) || defined(__powerpc__) || defined(__arm__) || \ 304 defined(__i386__) || defined(__x86_64__) 305 #define IFUNC_NONPLT 306 /* On SPARC, the PLT variant is called JMP_IREL and counted above. */ 307 size_t ifunc_remaining_nonplt; 308 #endif 309 size_t cxa_refcount; /* For TLS destructors. */ 310 #ifdef __ARM_EABI__ 311 void *exidx_start; 312 size_t exidx_sz; 313 #endif 314 } Obj_Entry; 315 316 typedef struct Struct_DoneList { 317 const Obj_Entry **objs; /* Array of object pointers */ 318 unsigned int num_alloc; /* Allocated size of the array */ 319 unsigned int num_used; /* Number of array slots used */ 320 } DoneList; 321 322 323 #if defined(_RTLD_SOURCE) 324 325 extern struct r_debug _rtld_debug; 326 extern Search_Path *_rtld_default_paths; 327 extern Obj_Entry *_rtld_objlist; 328 extern Obj_Entry **_rtld_objtail; 329 extern u_int _rtld_objcount; 330 extern u_int _rtld_objloads; 331 extern Obj_Entry *_rtld_objmain; 332 extern Obj_Entry _rtld_objself; 333 extern Search_Path *_rtld_paths; 334 extern Library_Xform *_rtld_xforms; 335 extern bool _rtld_trust; 336 extern Objlist _rtld_list_global; 337 extern Objlist _rtld_list_main; 338 extern Elf_Sym _rtld_sym_zero; 339 extern u_int _rtld_objgen; 340 341 #define RTLD_MODEMASK 0x3 342 343 /* Flags to be passed into _rtld_symlook_ family of functions. */ 344 #define SYMLOOK_IN_PLT 0x01 /* Lookup for PLT symbol */ 345 #define SYMLOOK_DLSYM 0x02 /* Return newest versioned symbol. 346 Used by dlsym. */ 347 348 /* Flags for _rtld_load_object() and friends. */ 349 #define _RTLD_GLOBAL 0x01 /* Add object to global DAG. */ 350 #define _RTLD_MAIN 0x02 351 #define _RTLD_NOLOAD 0x04 /* dlopen() specified RTLD_NOLOAD. */ 352 #define _RTLD_DLOPEN 0x08 /* Load_object() called from dlopen(). */ 353 354 /* Preallocation for static TLS model */ 355 #define RTLD_STATIC_TLS_RESERVATION 64 356 357 /* rtld.c */ 358 __dso_public char *dlerror(void); 359 __dso_public void *dlopen(const char *, int); 360 __dso_public void *dlsym(void *, const char *); 361 __dso_public int dlclose(void *); 362 __dso_public int dladdr(const void *, Dl_info *); 363 __dso_public int dlinfo(void *, int, void *); 364 __dso_public int dl_iterate_phdr(int (*)(struct dl_phdr_info *, size_t, void *), 365 void *); 366 367 __dso_public void *_dlauxinfo(void) __pure; 368 __dso_public void __dl_cxa_refcount(void *addr, ssize_t delta); 369 370 #if defined(__ARM_EABI__) && !defined(__ARM_DWARF_EH__) 371 /* 372 * This is used by libgcc to find the start and length of the exception table 373 * associated with a PC. 374 */ 375 __dso_public _Unwind_Ptr __gnu_Unwind_Find_exidx(_Unwind_Ptr, int *); 376 #endif 377 378 /* These aren't exported */ 379 void _rtld_error(const char *, ...) __printflike(1,2); 380 void _rtld_die(void) __dead; 381 void *_rtld_objmain_sym(const char *); 382 __dso_public void _rtld_debug_state(void) __noinline; 383 void _rtld_linkmap_add(Obj_Entry *); 384 void _rtld_linkmap_delete(Obj_Entry *); 385 void _rtld_objlist_push_head(Objlist *, Obj_Entry *); 386 void _rtld_objlist_push_tail(Objlist *, Obj_Entry *); 387 Objlist_Entry *_rtld_objlist_find(Objlist *, const Obj_Entry *); 388 void _rtld_ref_dag(Obj_Entry *); 389 390 void _rtld_shared_enter(void); 391 void _rtld_shared_exit(void); 392 void _rtld_exclusive_enter(sigset_t *); 393 void _rtld_exclusive_exit(sigset_t *); 394 395 /* expand.c */ 396 size_t _rtld_expand_path(char *, size_t, const char *, const char *,\ 397 const char *); 398 399 /* headers.c */ 400 void _rtld_digest_dynamic(const char *, Obj_Entry *); 401 Obj_Entry *_rtld_digest_phdr(const Elf_Phdr *, int, caddr_t); 402 403 /* load.c */ 404 Obj_Entry *_rtld_load_object(const char *, int); 405 int _rtld_load_needed_objects(Obj_Entry *, int); 406 int _rtld_preload(const char *); 407 408 #define OBJ_ERR (Obj_Entry *)(-1) 409 /* path.c */ 410 void _rtld_add_paths(const char *, Search_Path **, const char *); 411 void _rtld_process_hints(const char *, Search_Path **, Library_Xform **, 412 const char *); 413 int _rtld_sysctl(const char *, void *, size_t *); 414 415 /* reloc.c */ 416 int _rtld_do_copy_relocations(const Obj_Entry *); 417 int _rtld_relocate_objects(Obj_Entry *, bool); 418 int _rtld_relocate_nonplt_objects(Obj_Entry *); 419 int _rtld_relocate_plt_lazy(Obj_Entry *); 420 int _rtld_relocate_plt_objects(const Obj_Entry *); 421 void _rtld_setup_pltgot(const Obj_Entry *); 422 Elf_Addr _rtld_resolve_ifunc(const Obj_Entry *, const Elf_Sym *); 423 Elf_Addr _rtld_resolve_ifunc2(const Obj_Entry *, Elf_Addr); 424 425 void _rtld_call_ifunc(Obj_Entry *, sigset_t *, u_int); 426 427 /* search.c */ 428 Obj_Entry *_rtld_load_library(const char *, const Obj_Entry *, int); 429 430 /* symbol.c */ 431 unsigned long _rtld_elf_hash(const char *); 432 const Elf_Sym *_rtld_symlook_obj(const char *, unsigned long, 433 const Obj_Entry *, u_int, const Ver_Entry *); 434 const Elf_Sym *_rtld_find_symdef(unsigned long, const Obj_Entry *, 435 const Obj_Entry **, u_int); 436 const Elf_Sym *_rtld_find_plt_symdef(unsigned long, const Obj_Entry *, 437 const Obj_Entry **, bool); 438 439 const Elf_Sym *_rtld_symlook_list(const char *, unsigned long, 440 const Objlist *, const Obj_Entry **, u_int, const Ver_Entry *, DoneList *); 441 const Elf_Sym *_rtld_symlook_default(const char *, unsigned long, 442 const Obj_Entry *, const Obj_Entry **, u_int, const Ver_Entry *); 443 const Elf_Sym *_rtld_symlook_needed(const char *, unsigned long, 444 const Needed_Entry *, const Obj_Entry **, u_int, const Ver_Entry *, 445 DoneList *, DoneList *); 446 447 /* symver.c */ 448 void _rtld_object_add_name(Obj_Entry *, const char *); 449 int _rtld_object_match_name(const Obj_Entry *, const char *); 450 int _rtld_verify_object_versions(Obj_Entry *); 451 452 static __inline const Ver_Entry * 453 _rtld_fetch_ventry(const Obj_Entry *obj, unsigned long symnum) 454 { 455 Elf_Half vernum; 456 457 if (obj->vertab) { 458 vernum = VER_NDX(obj->versyms[symnum].vs_vers); 459 if (vernum >= obj->vertabnum) { 460 _rtld_error("%s: symbol %s has wrong verneed value %d", 461 obj->path, &obj->strtab[symnum], vernum); 462 } else if (obj->vertab[vernum].hash) { 463 return &obj->vertab[vernum]; 464 } 465 } 466 return NULL; 467 } 468 469 #if defined(__HAVE_TLS_VARIANT_I) || defined(__HAVE_TLS_VARIANT_II) 470 /* tls.c */ 471 void *_rtld_tls_get_addr(void *, size_t, size_t); 472 void _rtld_tls_initial_allocation(void); 473 void *_rtld_tls_module_allocate(size_t index); 474 int _rtld_tls_offset_allocate(Obj_Entry *); 475 void _rtld_tls_offset_free(Obj_Entry *); 476 477 extern size_t _rtld_tls_dtv_generation; 478 extern size_t _rtld_tls_max_index; 479 480 __dso_public extern void *__tls_get_addr(void *); 481 #ifdef __i386__ 482 __dso_public extern void *___tls_get_addr(void *) 483 __attribute__((__regparm__(1))); 484 #endif 485 #endif 486 487 /* map_object.c */ 488 struct stat; 489 Obj_Entry *_rtld_map_object(const char *, int, const struct stat *); 490 void _rtld_obj_free(Obj_Entry *); 491 Obj_Entry *_rtld_obj_new(void); 492 493 #ifdef RTLD_LOADER 494 /* function descriptors */ 495 #ifdef __HAVE_FUNCTION_DESCRIPTORS 496 Elf_Addr _rtld_function_descriptor_alloc(const Obj_Entry *, 497 const Elf_Sym *, Elf_Addr); 498 const void *_rtld_function_descriptor_function(const void *); 499 500 void _rtld_call_function_void(const Obj_Entry *, Elf_Addr); 501 Elf_Addr _rtld_call_function_addr(const Obj_Entry *, Elf_Addr); 502 #else 503 static inline void 504 _rtld_call_function_void(const Obj_Entry *obj, Elf_Addr addr) 505 { 506 ((void (*)(void))addr)(); 507 } 508 static inline Elf_Addr 509 _rtld_call_function_addr(const Obj_Entry *obj, Elf_Addr addr) 510 { 511 return ((Elf_Addr(*)(void))addr)(); 512 } 513 #endif /* __HAVE_FUNCTION_DESCRIPTORS */ 514 #endif /* RTLD_LOADER */ 515 516 #endif /* _RTLD_SOURCE */ 517 518 #endif /* RTLD_H */ 519