xref: /dragonfly/libexec/rtld-elf/rtld.h (revision b29f78b5)
1 /*-
2  * Copyright 1996, 1997, 1998, 1999, 2000 John D. Polstra.
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. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
18  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
19  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
20  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
21  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
23  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24  *
25  * $FreeBSD$
26  */
27 
28 #ifndef RTLD_H /* { */
29 #define RTLD_H 1
30 
31 #include <machine/elf.h>
32 #include <sys/types.h>
33 #include <sys/queue.h>
34 
35 #include <elf-hints.h>
36 #include <link.h>
37 #include <stdarg.h>
38 #include <setjmp.h>
39 #include <stddef.h>
40 
41 #include "rtld_lock.h"
42 #include "rtld_machdep.h"
43 
44 #ifndef STANDARD_LIBRARY_PATH
45 #define STANDARD_LIBRARY_PATH	"/lib:/usr/lib"
46 #endif
47 
48 #define NEW(type)	((type *) xmalloc(sizeof(type)))
49 #define CNEW(type)	((type *) xcalloc(1, sizeof(type)))
50 
51 /* We might as well do booleans like C++. */
52 typedef unsigned char bool;
53 #define false	0
54 #define true	1
55 
56 extern size_t tls_last_offset;
57 extern size_t tls_last_size;
58 extern size_t tls_static_space;
59 extern int tls_dtv_generation;
60 extern int tls_max_index;
61 
62 extern int main_argc;
63 extern char **main_argv;
64 extern char **environ;
65 extern const char *__ld_sharedlib_base;
66 
67 struct stat;
68 struct Struct_Obj_Entry;
69 
70 /* Lists of shared objects */
71 typedef struct Struct_Objlist_Entry {
72     STAILQ_ENTRY(Struct_Objlist_Entry) link;
73     struct Struct_Obj_Entry *obj;
74 } Objlist_Entry;
75 
76 typedef STAILQ_HEAD(Struct_Objlist, Struct_Objlist_Entry) Objlist;
77 
78 /* Types of init and fini functions */
79 typedef void (*InitFunc)(void);
80 typedef void (*InitArrFunc)(int, char **, char **);
81 
82 /* Lists of shared object dependencies */
83 typedef struct Struct_Needed_Entry {
84     struct Struct_Needed_Entry *next;
85     struct Struct_Obj_Entry *obj;
86     unsigned long name;		/* Offset of name in string table */
87 } Needed_Entry;
88 
89 typedef struct Struct_Name_Entry {
90     STAILQ_ENTRY(Struct_Name_Entry) link;
91     char   name[1];
92 } Name_Entry;
93 
94 /* Lock object */
95 typedef struct Struct_LockInfo {
96     void *context;		/* Client context for creating locks */
97     void *thelock;		/* The one big lock */
98     /* Debugging aids. */
99     volatile int rcount;	/* Number of readers holding lock */
100     volatile int wcount;	/* Number of writers holding lock */
101     /* Methods */
102     void *(*lock_create)(void *context);
103     void (*rlock_acquire)(void *lock);
104     void (*wlock_acquire)(void *lock);
105     void (*rlock_release)(void *lock);
106     void (*wlock_release)(void *lock);
107     void (*lock_destroy)(void *lock);
108     void (*context_destroy)(void *context);
109 } LockInfo;
110 
111 typedef struct Struct_Ver_Entry {
112 	Elf_Word     hash;
113 	unsigned int flags;
114 	const char  *name;
115 	const char  *file;
116 } Ver_Entry;
117 
118 typedef struct Struct_Sym_Match_Result {
119     const Elf_Sym *sym_out;
120     const Elf_Sym *vsymp;
121     int vcount;
122 } Sym_Match_Result;
123 
124 #define VER_INFO_HIDDEN	0x01
125 
126 /*
127  * Shared object descriptor.
128  *
129  * Items marked with "(%)" are dynamically allocated, and must be freed
130  * when the structure is destroyed.
131  *
132  * CAUTION: It appears that the JDK port peeks into these structures.
133  * It looks at "next" and "mapbase" at least.  Don't add new members
134  * near the front, until this can be straightened out.
135  */
136 typedef struct Struct_Obj_Entry {
137     /*
138      * These two items have to be set right for compatibility with the
139      * original ElfKit crt1.o.
140      */
141     Elf_Size magic;		/* Magic number (sanity check) */
142     Elf_Size version;		/* Version number of struct format */
143 
144     struct Struct_Obj_Entry *next;
145     char *path;			/* Pathname of underlying file (%) */
146     char *origin_path;		/* Directory path of origin file */
147     int refcount;
148     int dl_refcount;		/* Number of times loaded by dlopen */
149 
150     /* These items are computed by map_object() or by digest_phdr(). */
151     caddr_t mapbase;		/* Base address of mapped region */
152     size_t mapsize;		/* Size of mapped region in bytes */
153     size_t textsize;		/* Size of text segment in bytes */
154     Elf_Addr vaddrbase;		/* Base address in shared object file */
155     caddr_t relocbase;		/* Relocation constant = mapbase - vaddrbase */
156     const Elf_Dyn *dynamic;	/* Dynamic section */
157     caddr_t entry;		/* Entry point */
158     const Elf_Phdr *phdr;	/* Program header if it is mapped, else NULL */
159     size_t phsize;		/* Size of program header in bytes */
160     const char *interp;		/* Pathname of the interpreter, if any */
161     Elf_Word stack_flags;
162 
163     /* TLS information */
164     int tlsindex;		/* Index in DTV for this module */
165     void *tlsinit;		/* Base address of TLS init block */
166     size_t tlsinitsize;		/* Size of TLS init block for this module */
167     size_t tlssize;		/* Size of TLS block for this module */
168     size_t tlsoffset;		/* Offset of static TLS block for this module */
169     size_t tlsalign;		/* Alignment of static TLS block */
170 
171     caddr_t relro_page; 	/* Address of first page of read-only data */
172     size_t relro_size;  	/* Size of relro page(s) in bytes */
173 
174     /* Items from the dynamic section. */
175     Elf_Addr *pltgot;		/* PLT or GOT, depending on architecture */
176     const Elf_Rel *rel;		/* Relocation entries */
177     unsigned long relsize;	/* Size in bytes of relocation info */
178     const Elf_Rela *rela;	/* Relocation entries with addend */
179     unsigned long relasize;	/* Size in bytes of addend relocation info */
180     const Elf_Rel *pltrel;	/* PLT relocation entries */
181     unsigned long pltrelsize;	/* Size in bytes of PLT relocation info */
182     const Elf_Rela *pltrela;	/* PLT relocation entries with addend */
183     unsigned long pltrelasize;	/* Size in bytes of PLT addend reloc info */
184     const Elf_Sym *symtab;	/* Symbol table */
185     const char *strtab;		/* String table */
186     unsigned long strsize;	/* Size in bytes of string table */
187 
188     const Elf_Verneed *verneed; /* Required versions. */
189     Elf_Word verneednum;	/* Number of entries in verneed table */
190     const Elf_Verdef  *verdef;	/* Provided versions. */
191     Elf_Word verdefnum;		/* Number of entries in verdef table */
192     const Elf_Versym *versyms;  /* Symbol versions table */
193 
194     const Elf_Hashelt *buckets;	/* Hash table buckets array */
195     unsigned long nbuckets;	/* Number of buckets */
196     const Elf_Hashelt *chains;	/* Hash table chain array */
197     unsigned long nchains;	/* Number of entries in chain array */
198 
199     Elf32_Word nbuckets_gnu;		/* Number of GNU hash buckets*/
200     Elf32_Word symndx_gnu;		/* 1st accessible symbol on dynsym table */
201     Elf32_Word maskwords_bm_gnu;  	/* Bloom filter words - 1 (bitmask) */
202     Elf32_Word shift2_gnu;		/* Bloom filter shift count */
203     Elf32_Word dynsymcount;		/* Total entries in dynsym table */
204     Elf_Addr *bloom_gnu;		/* Bloom filter used by GNU hash func */
205     const Elf_Hashelt *buckets_gnu;	/* GNU hash table bucket array */
206     const Elf_Hashelt *chain_zero_gnu;	/* GNU hash table value array (Zeroed) */
207 
208     char *rpath;		/* Search path specified in object */
209     char *runpath;		/* Search path with different priority */
210     Needed_Entry *needed;	/* Shared objects needed by this one (%) */
211     Needed_Entry *needed_filtees;
212     Needed_Entry *needed_aux_filtees;
213 
214     STAILQ_HEAD(, Struct_Name_Entry) names; /* List of names for this object we
215 					       know about. */
216     Ver_Entry *vertab;		/* Versions required /defined by this object */
217     int vernum;			/* Number of entries in vertab */
218 
219     Elf_Addr init;		/* Initialization function to call */
220     Elf_Addr fini;		/* Termination function to call */
221     Elf_Addr preinit_array;	/* Pre-initialization array of functions */
222     Elf_Addr init_array;	/* Initialization array of functions */
223     Elf_Addr fini_array;	/* Termination array of functions */
224     int preinit_array_num;	/* Number of entries in preinit_array */
225     int init_array_num; 	/* Number of entries in init_array */
226     int fini_array_num; 	/* Number of entries in fini_array */
227 
228     int32_t osrel;		/* OSREL note value */
229 
230     bool mainprog : 1;		/* True if this is the main program */
231     bool rtld : 1;		/* True if this is the dynamic linker */
232     bool relocated : 1;		/* True if processed by relocate_objects() */
233     bool ver_checked : 1;	/* True if processed by rtld_verify_object_versions */
234     bool textrel : 1;		/* True if there are relocations to text seg */
235     bool symbolic : 1;		/* True if generated with "-Bsymbolic" */
236     bool bind_now : 1;		/* True if all relocations should be made first */
237     bool traced : 1;		/* Already printed in ldd trace output */
238     bool jmpslots_done : 1;	/* Already have relocated the jump slots */
239     bool init_done : 1;		/* Already have added object to init list */
240     bool tls_done : 1;		/* Already allocated offset for static TLS */
241     bool phdr_alloc : 1;	/* Phdr is allocated and needs to be freed. */
242     bool z_origin : 1;		/* Process rpath and soname tokens */
243     bool z_nodelete : 1;	/* Do not unload the object and dependencies */
244     bool z_noopen : 1;		/* Do not load on dlopen */
245     bool z_loadfltr : 1;	/* Immediately load filtees */
246     bool z_interpose : 1;	/* Interpose all objects but main */
247     bool z_nodeflib : 1;	/* Don't search default library path */
248     bool ref_nodel : 1;		/* Refcount increased to prevent dlclose */
249     bool init_scanned: 1;	/* Object is already on init list. */
250     bool on_fini_list: 1;	/* Object is already on fini list. */
251     bool dag_inited : 1;	/* Object has its DAG initialized. */
252     bool filtees_loaded : 1;	/* Filtees loaded */
253     bool irelative : 1;		/* Object has R_MACHDEP_IRELATIVE relocs */
254     bool gnu_ifunc : 1;		/* Object has references to STT_GNU_IFUNC */
255     bool non_plt_gnu_ifunc : 1;	/* Object has non-plt IFUNC references */
256     bool crt_no_init : 1;	/* Object's crt does not call _init/_fini */
257     bool note_present : 1;	/* True if at least one PT_NOTE header found */
258     bool valid_hash_sysv : 1;	/* A valid System V hash hash tag is available */
259     bool valid_hash_gnu : 1;	/* A valid GNU hash tag is available */
260 
261     struct link_map linkmap;	/* For GDB and dlinfo() */
262     Objlist dldags;		/* Object belongs to these dlopened DAGs (%) */
263     Objlist dagmembers;		/* DAG has these members (%) */
264     dev_t dev;			/* Object's filesystem's device */
265     ino_t ino;			/* Object's inode number */
266     void *priv;			/* Platform-dependent */
267 } Obj_Entry;
268 
269 #define RTLD_MAGIC	0xd550b87a
270 #define RTLD_VERSION	1
271 
272 #define RTLD_FUNCTRACE "_rtld_functrace"
273 
274 /* Flags to be passed into symlook_ family of functions. */
275 #define SYMLOOK_IN_PLT	0x01	/* Lookup for PLT symbol */
276 #define SYMLOOK_DLSYM	0x02	/* Return newest versioned symbol. Used by
277 				   dlsym. */
278 #define	SYMLOOK_EARLY	0x04	/* Symlook is done during initialization. */
279 #define	SYMLOOK_IFUNC	0x08	/* Allow IFUNC processing in
280 				   reloc_non_plt(). */
281 
282 /* Flags for load_object(). */
283 #define	RTLD_LO_NOLOAD	0x01	/* dlopen() specified RTLD_NOLOAD. */
284 #define	RTLD_LO_DLOPEN	0x02	/* Load_object() called from dlopen(). */
285 #define	RTLD_LO_TRACE	0x04	/* Only tracing. */
286 #define	RTLD_LO_NODELETE 0x08	/* Loaded object cannot be closed. */
287 #define	RTLD_LO_FILTEES 0x10	/* Loading filtee. */
288 #define	RTLD_LO_EARLY	0x20	/* Do not call ctors, postpone it to the
289 				   initialization during the image start. */
290 
291 /*
292  * Symbol cache entry used during relocation to avoid multiple lookups
293  * of the same symbol.
294  */
295 typedef struct Struct_SymCache {
296     const Elf_Sym *sym;		/* Symbol table entry */
297     const Obj_Entry *obj;	/* Shared object which defines it */
298 } SymCache;
299 
300 /*
301  * This structure provides a reentrant way to keep a list of objects and
302  * check which ones have already been processed in some way.
303  */
304 typedef struct Struct_DoneList {
305     const Obj_Entry **objs;		/* Array of object pointers */
306     unsigned int num_alloc;		/* Allocated size of the array */
307     unsigned int num_used;		/* Number of array slots used */
308 } DoneList;
309 
310 struct Struct_RtldLockState {
311 	int lockstate;
312 	sigjmp_buf env;
313 };
314 
315 struct fill_search_info_args {
316 	int request;
317 	unsigned int flags;
318 	struct dl_serinfo *serinfo;
319 	struct dl_serpath *serpath;
320 	char *strspace;
321 };
322 
323 /*
324  * The pack of arguments and results for the symbol lookup functions.
325  */
326 typedef struct Struct_SymLook {
327     const char *name;
328     unsigned long hash;
329     uint_fast32_t hash_gnu;
330     const Ver_Entry *ventry;
331     int flags;
332     const Obj_Entry *defobj_out;
333     const Elf_Sym *sym_out;
334     struct Struct_RtldLockState *lockstate;
335 } SymLook;
336 
337 void _rtld_error(const char *, ...) __printflike(1, 2);
338 const char *rtld_strerror(int);
339 Obj_Entry *map_object(int, const char *, const struct stat *);
340 void *xcalloc(size_t, size_t);
341 void *xmalloc(size_t);
342 char *xstrdup(const char *);
343 extern Elf_Addr _GLOBAL_OFFSET_TABLE_[];
344 
345 void dump_relocations(Obj_Entry *);
346 void dump_obj_relocations(Obj_Entry *);
347 void dump_Elf_Rel(Obj_Entry *, const Elf_Rel *, u_long);
348 void dump_Elf_Rela(Obj_Entry *, const Elf_Rela *, u_long);
349 
350 /*
351  * Function declarations.
352  */
353 const char *basename(const char *);
354 unsigned long elf_hash(const char *);
355 const Elf_Sym *find_symdef(unsigned long, const Obj_Entry *,
356   const Obj_Entry **, int, SymCache *, struct Struct_RtldLockState *);
357 void init_pltgot(Obj_Entry *);
358 void lockdflt_init(void);
359 void digest_notes(Obj_Entry *, Elf_Addr, Elf_Addr);
360 void obj_free(Obj_Entry *);
361 Obj_Entry *obj_new(void);
362 void _rtld_bind_start(void);
363 void *rtld_resolve_ifunc(const Obj_Entry *obj, const Elf_Sym *def);
364 void symlook_init(SymLook *, const char *);
365 int symlook_obj(SymLook *, const Obj_Entry *);
366 void *tls_get_addr_common(Elf_Addr** dtvp, int index, size_t offset);
367 struct tls_tcb	*allocate_tls(Obj_Entry *);
368 void free_tls(struct tls_tcb *);
369 void *allocate_module_tls(int index);
370 bool allocate_tls_offset(Obj_Entry *obj);
371 void free_tls_offset(Obj_Entry *obj);
372 const Ver_Entry *fetch_ventry(const Obj_Entry *obj, unsigned long);
373 
374 /*
375  * MD function declarations.
376  */
377 int do_copy_relocations(Obj_Entry *);
378 int reloc_non_plt(Obj_Entry *, Obj_Entry *, int flags,
379     struct Struct_RtldLockState *);
380 int reloc_plt(Obj_Entry *);
381 int reloc_jmpslots(Obj_Entry *, int flags, struct Struct_RtldLockState *);
382 int reloc_iresolve(Obj_Entry *, struct Struct_RtldLockState *);
383 int reloc_gnu_ifunc(Obj_Entry *, int flags, struct Struct_RtldLockState *);
384 void allocate_initial_tls(Obj_Entry *);
385 
386 #endif /* } */
387