X-Git-Url: http://nsz.repo.hu/git/?p=musl;a=blobdiff_plain;f=src%2Fldso%2Fdynlink.c;h=df54230c8cf2517ce9941f14b711f51297b3fcae;hp=7a26e9ed7ba21c6645860ac747138e999d39d2e9;hb=e12fe65c928f038fb8db0caddcf535ab0a980c58;hpb=e01ac67599dea1fd78a1bd1a0339a1da07dc9578 diff --git a/src/ldso/dynlink.c b/src/ldso/dynlink.c index 7a26e9ed..df54230c 100644 --- a/src/ldso/dynlink.c +++ b/src/ldso/dynlink.c @@ -1,3 +1,4 @@ +#ifdef __PIC__ #include #include #include @@ -14,6 +15,7 @@ #include #include #include +#include #include #include "reloc.h" @@ -59,7 +61,7 @@ static int runtime; static jmp_buf rtld_fail; static pthread_rwlock_t lock; -#define AUX_CNT 15 +#define AUX_CNT 24 #define DYN_CNT 34 static void decode_vec(size_t *v, size_t *a, size_t cnt) @@ -71,8 +73,9 @@ static void decode_vec(size_t *v, size_t *a, size_t cnt) } } -static uint32_t hash(const char *s) +static uint32_t hash(const char *s0) { + const unsigned char *s = (void *)s0; uint_fast32_t h = 0; while (*s) { h = 16*h + *s++; @@ -283,12 +286,20 @@ static int path_open(const char *name, const char *search) } } +static void decode_dyn(struct dso *p) +{ + size_t dyn[DYN_CNT] = {0}; + decode_vec(p->dynv, dyn, DYN_CNT); + p->syms = (void *)(p->base + dyn[DT_SYMTAB]); + p->hashtab = (void *)(p->base + dyn[DT_HASH]); + p->strings = (void *)(p->base + dyn[DT_STRTAB]); +} + static struct dso *load_library(const char *name) { unsigned char *base, *map; size_t dyno, map_len; struct dso *p; - size_t dyn[DYN_CNT] = {0}; int fd; struct stat st; @@ -362,11 +373,8 @@ static struct dso *load_library(const char *name) p->map_len = map_len; p->base = base; p->dynv = (void *)(base + dyno); - decode_vec(p->dynv, dyn, DYN_CNT); + decode_dyn(p); - p->syms = (void *)(base + dyn[DT_SYMTAB]); - p->hashtab = (void *)(base + dyn[DT_HASH]); - p->strings = (void *)(base + dyn[DT_STRTAB]); p->dev = st.st_dev; p->ino = st.st_ino; p->refcnt = 1; @@ -410,6 +418,20 @@ static void load_deps(struct dso *p) } } +static void load_preload(char *s) +{ + int tmp; + char *z; + for (z=s; *z; s=z) { + for ( ; *s && isspace(*s); s++); + for (z=s; *z && !isspace(*z); z++); + tmp = *z; + *z = 0; + load_library(s); + *z = tmp; + } +} + static void make_global(struct dso *p) { for (; p; p=p->next) p->global = 1; @@ -441,12 +463,17 @@ static void free_all(struct dso *p) } } -void *__dynlink(int argc, char **argv, size_t *got) +static size_t find_dyn(Phdr *ph, size_t cnt, size_t stride) +{ + for (; cnt--; ph = (void *)((char *)ph + stride)) + if (ph->p_type == PT_DYNAMIC) + return ph->p_vaddr; + return 0; +} + +void *__dynlink(int argc, char **argv) { size_t *auxv, aux[AUX_CNT] = {0}; - size_t app_dyn[DYN_CNT] = {0}; - size_t lib_dyn[DYN_CNT] = {0}; - size_t vdso_dyn[DYN_CNT] = {0}; size_t i; Phdr *phdr; Ehdr *ehdr; @@ -454,64 +481,53 @@ void *__dynlink(int argc, char **argv, size_t *got) struct dso *const app = builtin_dsos+0; struct dso *const lib = builtin_dsos+1; struct dso *const vdso = builtin_dsos+2; - size_t vdso_base=0; + char *env_preload=0; /* Find aux vector just past environ[] */ for (i=argc+1; argv[i]; i++) if (!memcmp(argv[i], "LD_LIBRARY_PATH=", 16)) env_path = argv[i]+16; + else if (!memcmp(argv[i], "LD_PRELOAD=", 11)) + env_preload = argv[i]+11; auxv = (void *)(argv+i+1); decode_vec(auxv, aux, AUX_CNT); - for (i=0; auxv[i]; i+=2) { - if (auxv[i]==AT_SYSINFO_EHDR) { - vdso_base = auxv[i+1]; - break; - } - } - /* Only trust user/env if kernel says we're not suid/sgid */ if ((aux[0]&0x7800)!=0x7800 || aux[AT_UID]!=aux[AT_EUID] - || aux[AT_GID]!=aux[AT_EGID]) { + || aux[AT_GID]!=aux[AT_EGID] || aux[AT_SECURE]) { env_path = 0; + env_preload = 0; } - /* Relocate ldso's DYNAMIC pointer and load vector */ - decode_vec((void *)(got[0] += aux[AT_BASE]), lib_dyn, DYN_CNT); + /* The dynamic linker load address is passed by the kernel + * in the AUX vector, so this is easy. */ + lib->base = (void *)aux[AT_BASE]; + lib->name = "libc.so"; + lib->global = 1; + ehdr = (void *)lib->base; + lib->dynv = (void *)(lib->base + find_dyn( + (void *)(aux[AT_BASE]+ehdr->e_phoff), + ehdr->e_phnum, ehdr->e_phentsize)); + decode_dyn(lib); - /* Find the program image's DYNAMIC section and decode it */ + /* Find load address of the main program, via AT_PHDR vs PT_PHDR. */ + app->base = 0; phdr = (void *)aux[AT_PHDR]; - for (i=aux[AT_PHNUM]; i--; phdr=(void *)((char *)phdr + aux[AT_PHENT])) { - if (phdr->p_type == PT_DYNAMIC) { - decode_vec((void *)phdr->p_vaddr, app_dyn, DYN_CNT); - break; - } + for (i=aux[AT_PHNUM]; i; i--, phdr=(void *)((char *)phdr + aux[AT_PHENT])) { + if (phdr->p_type == PT_PHDR) + app->base = (void *)(aux[AT_PHDR] - phdr->p_vaddr); } + app->name = argv[0]; + app->global = 1; + app->dynv = (void *)(app->base + find_dyn( + (void *)aux[AT_PHDR], aux[AT_PHNUM], aux[AT_PHENT])); + decode_dyn(app); - *app = (struct dso){ - .base = 0, - .strings = (void *)(app_dyn[DT_STRTAB]), - .hashtab = (void *)(app_dyn[DT_HASH]), - .syms = (void *)(app_dyn[DT_SYMTAB]), - .dynv = (void *)(phdr->p_vaddr), - .name = argv[0], - .global = 1, - .next = lib - }; - - *lib = (struct dso){ - .base = (void *)aux[AT_BASE], - .strings = (void *)(aux[AT_BASE]+lib_dyn[DT_STRTAB]), - .hashtab = (void *)(aux[AT_BASE]+lib_dyn[DT_HASH]), - .syms = (void *)(aux[AT_BASE]+lib_dyn[DT_SYMTAB]), - .dynv = (void *)(got[0]), - .name = "libc.so", - .global = 1, - .relocated = 1 - }; - - if (vdso_base) { + /* Attach to vdso, if provided by the kernel */ + for (i=0; auxv[i]; i+=2) { + size_t vdso_base = auxv[i+1]; + if (auxv[i] != AT_SYSINFO_EHDR) continue; ehdr = (void *)vdso_base; phdr = (void *)(vdso_base + ehdr->e_phoff); for (i=ehdr->e_phnum; i; i--, phdr=(void *)((char *)phdr + ehdr->e_phentsize)) { @@ -520,39 +536,43 @@ void *__dynlink(int argc, char **argv, size_t *got) if (phdr->p_type == PT_LOAD) vdso->base = (void *)(vdso_base - phdr->p_vaddr + phdr->p_offset); } - decode_vec(vdso->dynv, vdso_dyn, DYN_CNT); - vdso->syms = (void *)(vdso->base + vdso_dyn[DT_SYMTAB]); - vdso->hashtab = (void *)(vdso->base + vdso_dyn[DT_HASH]); - vdso->strings = (void *)(vdso->base + vdso_dyn[DT_STRTAB]); vdso->name = "linux-gate.so.1"; vdso->global = 1; - + decode_dyn(vdso); vdso->prev = lib; lib->next = vdso; + break; } - /* Relocate the dynamic linker/libc */ - do_relocs((void *)aux[AT_BASE], (void *)(aux[AT_BASE]+lib_dyn[DT_REL]), - lib_dyn[DT_RELSZ], 2, lib->syms, lib->strings, app); - do_relocs((void *)aux[AT_BASE], (void *)(aux[AT_BASE]+lib_dyn[DT_RELA]), - lib_dyn[DT_RELASZ], 3, lib->syms, lib->strings, app); + /* Initial dso chain consists only of the app. We temporarily + * append the dynamic linker/libc so we can relocate it, then + * restore the initial chain in preparation for loading third + * party libraries (preload/needed). */ + head = tail = app; + libc = lib; + app->next = lib; + reloc_all(lib); + app->next = 0; - /* At this point the standard library is fully functional */ + /* PAST THIS POINT, ALL LIBC INTERFACES ARE FULLY USABLE. */ + /* Donate unused parts of app and library mapping to malloc */ reclaim_gaps(app->base, (void *)aux[AT_PHDR], aux[AT_PHENT], aux[AT_PHNUM]); ehdr = (void *)lib->base; reclaim_gaps(lib->base, (void *)(lib->base+ehdr->e_phoff), ehdr->e_phentsize, ehdr->e_phnum); - head = tail = app; - libc = lib; - app->next = 0; - load_deps(head); - - make_global(head); - reloc_all(head->next); - reloc_all(head); - + /* Load preload/needed libraries, add their symbols to the global + * namespace, and perform all remaining relocations. */ + if (env_preload) load_preload(env_preload); + load_deps(app); + make_global(app); + reloc_all(app); + + /* Switch to runtime mode: any further failures in the dynamic + * linker are a reportable failure rather than a fatal startup + * error. If the dynamic loader (dlopen) will not be used, free + * all memory used by the dynamic linker. */ runtime = 1; if (!rtld_used) { free_all(head); @@ -618,11 +638,16 @@ end: return p; } -static void *do_dlsym(struct dso *p, const char *s) +static void *do_dlsym(struct dso *p, const char *s, void *ra) { size_t i; uint32_t h; Sym *sym; + if (p == RTLD_NEXT) { + for (p=head; p && (unsigned char *)ra-p->map>p->map_len; p=p->next); + if (!p) p=head; + p=p->next; + } if (p == head || p == RTLD_DEFAULT) return find_sym(head, s, 0); h = hash(s); @@ -638,11 +663,11 @@ static void *do_dlsym(struct dso *p, const char *s) return 0; } -void *dlsym(void *p, const char *s) +void *__dlsym(void *p, const char *s, void *ra) { void *res; pthread_rwlock_rdlock(&lock); - res = do_dlsym(p, s); + res = do_dlsym(p, s, ra); pthread_rwlock_unlock(&lock); return res; } @@ -656,3 +681,4 @@ int dlclose(void *p) { return 0; } +#endif