+ /* 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 = lib->shortname = "libc.so";
+ lib->global = 1;
+ ehdr = (void *)lib->base;
+ lib->phnum = ehdr->e_phnum;
+ lib->phdr = (void *)(aux[AT_BASE]+ehdr->e_phoff);
+ find_map_range(lib->phdr, ehdr->e_phnum, ehdr->e_phentsize, lib);
+ lib->dynv = (void *)(lib->base + find_dyn(lib->phdr,
+ ehdr->e_phnum, ehdr->e_phentsize));
+ decode_dyn(lib);
+
+ if (aux[AT_PHDR]) {
+ size_t interp_off = 0;
+ size_t tls_image = 0;
+ /* Find load address of the main program, via AT_PHDR vs PT_PHDR. */
+ app->phdr = phdr = (void *)aux[AT_PHDR];
+ app->phnum = aux[AT_PHNUM];
+ 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);
+ else if (phdr->p_type == PT_INTERP)
+ interp_off = (size_t)phdr->p_vaddr;
+ else if (phdr->p_type == PT_TLS) {
+ tls_image = phdr->p_vaddr;
+ app->tls_len = phdr->p_filesz;
+ app->tls_size = phdr->p_memsz;
+ app->tls_align = phdr->p_align;
+ }
+ }
+ if (app->tls_size) app->tls_image = (char *)app->base + tls_image;
+ if (interp_off) lib->name = (char *)app->base + interp_off;
+ app->name = argv[0];
+ app->dynv = (void *)(app->base + find_dyn(
+ (void *)aux[AT_PHDR], aux[AT_PHNUM], aux[AT_PHENT]));
+ find_map_range((void *)aux[AT_PHDR],
+ aux[AT_PHNUM], aux[AT_PHENT], app);
+ } else {
+ int fd;
+ char *ldname = argv[0];
+ size_t l = strlen(ldname);
+ if (l >= 3 && !strcmp(ldname+l-3, "ldd")) ldd_mode = 1;
+ *argv++ = (void *)-1;
+ if (argv[0] && !strcmp(argv[0], "--")) *argv++ = (void *)-1;
+ if (!argv[0]) {
+ dprintf(2, "musl libc/dynamic program loader\n");
+ dprintf(2, "usage: %s pathname%s\n", ldname,
+ ldd_mode ? "" : " [args]");
+ _exit(1);
+ }
+ fd = open(argv[0], O_RDONLY);
+ if (fd < 0) {
+ dprintf(2, "%s: cannot load %s: %s\n", ldname, argv[0], strerror(errno));
+ _exit(1);
+ }
+ runtime = 1;
+ ehdr = (void *)map_library(fd, app);
+ if (!ehdr) {
+ dprintf(2, "%s: %s: Not a valid dynamic program\n", ldname, argv[0]);
+ _exit(1);
+ }
+ runtime = 0;
+ close(fd);
+ lib->name = ldname;
+ app->name = argv[0];
+ app->phnum = ehdr->e_phnum;
+ app->phdr = (void *)(app->base + ehdr->e_phoff);
+ aux[AT_ENTRY] = ehdr->e_entry;
+ }
+ if (app->tls_size) {
+ app->tls_id = tls_cnt = 1;
+#ifdef TLS_ABOVE_TP
+ app->tls_offset = 0;
+ tls_offset = app->tls_size
+ + ( -((uintptr_t)app->tls_image + app->tls_size)
+ & (app->tls_align-1) );
+#else
+ tls_offset = app->tls_offset = app->tls_size
+ + ( -((uintptr_t)app->tls_image + app->tls_size)
+ & (app->tls_align-1) );
+#endif
+ tls_align = MAXP2(tls_align, app->tls_align);
+ }
+ app->global = 1;
+ app->constructed = 1;
+ decode_dyn(app);
+
+ /* Attach to vdso, if provided by the kernel */
+ if (search_vec(auxv, &vdso_base, AT_SYSINFO_EHDR)) {
+ ehdr = (void *)vdso_base;
+ vdso->phdr = phdr = (void *)(vdso_base + ehdr->e_phoff);
+ vdso->phnum = ehdr->e_phnum;
+ for (i=ehdr->e_phnum; i; i--, phdr=(void *)((char *)phdr + ehdr->e_phentsize)) {
+ if (phdr->p_type == PT_DYNAMIC)
+ vdso->dynv = (void *)(vdso_base + phdr->p_offset);
+ if (phdr->p_type == PT_LOAD)
+ vdso->base = (void *)(vdso_base - phdr->p_vaddr + phdr->p_offset);