17c478bd9Sstevel@tonic-gate /*
27c478bd9Sstevel@tonic-gate * CDDL HEADER START
37c478bd9Sstevel@tonic-gate *
47c478bd9Sstevel@tonic-gate * The contents of this file are subject to the terms of the
57a5d89c4Sab * Common Development and Distribution License (the "License").
67a5d89c4Sab * You may not use this file except in compliance with the License.
77c478bd9Sstevel@tonic-gate *
87c478bd9Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
97c478bd9Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
107c478bd9Sstevel@tonic-gate * See the License for the specific language governing permissions
117c478bd9Sstevel@tonic-gate * and limitations under the License.
127c478bd9Sstevel@tonic-gate *
137c478bd9Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
147c478bd9Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
157c478bd9Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
167c478bd9Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
177c478bd9Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
187c478bd9Sstevel@tonic-gate *
197c478bd9Sstevel@tonic-gate * CDDL HEADER END
207c478bd9Sstevel@tonic-gate */
2156deab07SRod Evans
227c478bd9Sstevel@tonic-gate /*
2320c1c355SRod Evans * Copyright (c) 2004, 2010, Oracle and/or its affiliates. All rights reserved.
247c478bd9Sstevel@tonic-gate */
257c478bd9Sstevel@tonic-gate
267c478bd9Sstevel@tonic-gate #include <stdio.h>
277c478bd9Sstevel@tonic-gate #include <stdlib.h>
287c478bd9Sstevel@tonic-gate #include <unistd.h>
297c478bd9Sstevel@tonic-gate #include <fcntl.h>
307c478bd9Sstevel@tonic-gate #include <string.h>
317c478bd9Sstevel@tonic-gate #include <errno.h>
327c478bd9Sstevel@tonic-gate #include <sys/types.h>
337c478bd9Sstevel@tonic-gate #include <sys/signal.h>
347c478bd9Sstevel@tonic-gate #include <sys/fault.h>
357c478bd9Sstevel@tonic-gate #include <sys/syscall.h>
367c478bd9Sstevel@tonic-gate #include <procfs.h>
377c478bd9Sstevel@tonic-gate #include <sys/auxv.h>
387c478bd9Sstevel@tonic-gate #include <libelf.h>
397c478bd9Sstevel@tonic-gate #include <sys/stat.h>
407c478bd9Sstevel@tonic-gate #include <sys/mman.h>
417c478bd9Sstevel@tonic-gate #include <link.h>
427c478bd9Sstevel@tonic-gate #include <sys/param.h>
4320c1c355SRod Evans #include <sys/machelf.h>
447c478bd9Sstevel@tonic-gate #include <stdarg.h>
457c478bd9Sstevel@tonic-gate
467c478bd9Sstevel@tonic-gate #include "rdb.h"
477c478bd9Sstevel@tonic-gate
4856deab07SRod Evans static char *
conv_lmid(Lmid_t ident,char * buf,size_t len)49b3fbe5e6Sseizo conv_lmid(Lmid_t ident, char *buf, size_t len)
507c478bd9Sstevel@tonic-gate {
517c478bd9Sstevel@tonic-gate if (len < 17)
5256deab07SRod Evans return (NULL);
537c478bd9Sstevel@tonic-gate if (ident == LM_ID_BASE)
547c478bd9Sstevel@tonic-gate return (strncpy(buf, " BASE ", len));
557c478bd9Sstevel@tonic-gate
567c478bd9Sstevel@tonic-gate if (ident == LM_ID_LDSO)
577c478bd9Sstevel@tonic-gate return (strncpy(buf, " LDSO ", len));
587c478bd9Sstevel@tonic-gate
597c478bd9Sstevel@tonic-gate (void) sprintf(buf, "0x%llx", (unsigned long long)ident);
607c478bd9Sstevel@tonic-gate return (buf);
617c478bd9Sstevel@tonic-gate }
627c478bd9Sstevel@tonic-gate
637c478bd9Sstevel@tonic-gate map_info_t *
str_to_map(struct ps_prochandle * ph,const char * soname)64b3fbe5e6Sseizo str_to_map(struct ps_prochandle *ph, const char *soname)
657c478bd9Sstevel@tonic-gate {
66b3fbe5e6Sseizo map_info_t *mip;
677c478bd9Sstevel@tonic-gate
687c478bd9Sstevel@tonic-gate if (soname == PS_OBJ_LDSO)
697c478bd9Sstevel@tonic-gate mip = (map_info_t *)&(ph->pp_ldsomap);
707c478bd9Sstevel@tonic-gate else if (soname == PS_OBJ_EXEC)
717c478bd9Sstevel@tonic-gate mip = (map_info_t *)&(ph->pp_execmap);
727c478bd9Sstevel@tonic-gate else {
737c478bd9Sstevel@tonic-gate for (mip = ph->pp_lmaplist.ml_head; mip; mip = mip->mi_next)
747c478bd9Sstevel@tonic-gate if (strcmp(soname, mip->mi_name) == 0)
757c478bd9Sstevel@tonic-gate break;
767c478bd9Sstevel@tonic-gate }
777c478bd9Sstevel@tonic-gate return (mip);
787c478bd9Sstevel@tonic-gate }
797c478bd9Sstevel@tonic-gate
807c478bd9Sstevel@tonic-gate map_info_t *
addr_to_map(struct ps_prochandle * ph,ulong_t addr)81b3fbe5e6Sseizo addr_to_map(struct ps_prochandle *ph, ulong_t addr)
827c478bd9Sstevel@tonic-gate {
83b3fbe5e6Sseizo map_info_t *mip;
8456deab07SRod Evans if (ph->pp_lmaplist.ml_head == NULL) {
857c478bd9Sstevel@tonic-gate /*
867c478bd9Sstevel@tonic-gate * To early to have the full Link Map info available
877c478bd9Sstevel@tonic-gate * so we use the initial info obtained from procfs
887c478bd9Sstevel@tonic-gate */
897c478bd9Sstevel@tonic-gate if ((addr >= ph->pp_ldsomap.mi_addr) &&
907c478bd9Sstevel@tonic-gate (addr <= ph->pp_ldsomap.mi_end))
917c478bd9Sstevel@tonic-gate return ((map_info_t *)&(ph->pp_ldsomap));
927c478bd9Sstevel@tonic-gate
937c478bd9Sstevel@tonic-gate if ((addr >= ph->pp_execmap.mi_addr) &&
947c478bd9Sstevel@tonic-gate (addr <= ph->pp_execmap.mi_end))
957c478bd9Sstevel@tonic-gate return ((map_info_t *)&(ph->pp_execmap));
967c478bd9Sstevel@tonic-gate
9756deab07SRod Evans return (NULL);
987c478bd9Sstevel@tonic-gate }
997c478bd9Sstevel@tonic-gate
1007c478bd9Sstevel@tonic-gate for (mip = ph->pp_lmaplist.ml_head; mip; mip = mip->mi_next)
1017c478bd9Sstevel@tonic-gate if ((addr >= mip->mi_addr) &&
1027c478bd9Sstevel@tonic-gate (addr <= mip->mi_end))
1037c478bd9Sstevel@tonic-gate return (mip);
1047c478bd9Sstevel@tonic-gate
10556deab07SRod Evans return (NULL);
1067c478bd9Sstevel@tonic-gate }
1077c478bd9Sstevel@tonic-gate
1087c478bd9Sstevel@tonic-gate retc_t
display_linkmaps(struct ps_prochandle * ph)109b3fbe5e6Sseizo display_linkmaps(struct ps_prochandle *ph)
1107c478bd9Sstevel@tonic-gate {
1117c478bd9Sstevel@tonic-gate char flagstr[1024];
112b3fbe5e6Sseizo map_info_t *mip;
1137c478bd9Sstevel@tonic-gate
11456deab07SRod Evans if (ph->pp_lmaplist.ml_head == NULL) {
11556deab07SRod Evans (void) printf("link-maps not yet available\n");
1167c478bd9Sstevel@tonic-gate return (RET_FAILED);
1177c478bd9Sstevel@tonic-gate }
11856deab07SRod Evans (void) printf("Link Maps\n");
11956deab07SRod Evans (void) printf("---------\n");
1207c478bd9Sstevel@tonic-gate for (mip = ph->pp_lmaplist.ml_head; mip; mip = mip->mi_next) {
1217c478bd9Sstevel@tonic-gate char sbuf[32];
122b3fbe5e6Sseizo rd_loadobj_t *lp = &mip->mi_loadobj;
12356deab07SRod Evans (void) printf("link-map: id: %s name: ",
12456deab07SRod Evans conv_lmid(lp->rl_lmident, sbuf, 32));
1257c478bd9Sstevel@tonic-gate if (mip->mi_refname)
12656deab07SRod Evans (void) printf("%s(%s)\n", mip->mi_name,
12756deab07SRod Evans mip->mi_refname);
1287c478bd9Sstevel@tonic-gate else
12956deab07SRod Evans (void) printf("%s\n", mip->mi_name);
13056deab07SRod Evans
13156deab07SRod Evans (void) printf(" base: 0x%08lx padd_base: 0x%08lx\n",
13256deab07SRod Evans lp->rl_base, lp->rl_padstart);
13356deab07SRod Evans (void) printf(" data_base: 0x%08llx\n",
13456deab07SRod Evans (unsigned long long)lp->rl_data_base);
13556deab07SRod Evans (void) printf(" end: 0x%08lx padd_end: 0x%08lx\n",
13656deab07SRod Evans lp->rl_bend, lp->rl_padend);
1377c478bd9Sstevel@tonic-gate flagstr[0] = '\0';
13856deab07SRod Evans
1397c478bd9Sstevel@tonic-gate if (lp->rl_flags & RD_FLG_MEM_OBJECT) {
14056deab07SRod Evans (void) strcat(flagstr, " MEMOBJECT");
1417c478bd9Sstevel@tonic-gate }
14256deab07SRod Evans (void) printf(" dynamic: 0x%08lx flags: "
14356deab07SRod Evans "0x%08x:[%s ]\n", lp->rl_dynamic, lp->rl_flags, flagstr);
1447c478bd9Sstevel@tonic-gate }
1457c478bd9Sstevel@tonic-gate
1467c478bd9Sstevel@tonic-gate return (RET_OK);
1477c478bd9Sstevel@tonic-gate }
1487c478bd9Sstevel@tonic-gate
1497c478bd9Sstevel@tonic-gate retc_t
display_maps(struct ps_prochandle * ph)150b3fbe5e6Sseizo display_maps(struct ps_prochandle *ph)
1517c478bd9Sstevel@tonic-gate {
1527c478bd9Sstevel@tonic-gate struct stat stbuf;
153b3fbe5e6Sseizo void *ptr;
154b3fbe5e6Sseizo prmap_t *mapptr;
1557c478bd9Sstevel@tonic-gate
1567c478bd9Sstevel@tonic-gate if (fstat(ph->pp_mapfd, &stbuf) == -1)
1577c478bd9Sstevel@tonic-gate perr("stat map");
1587c478bd9Sstevel@tonic-gate
1597c478bd9Sstevel@tonic-gate ptr = malloc(stbuf.st_size);
1607c478bd9Sstevel@tonic-gate if (pread(ph->pp_mapfd, ptr, stbuf.st_size, 0) == -1)
1617c478bd9Sstevel@tonic-gate perr("dm: reading map");
1627c478bd9Sstevel@tonic-gate
16356deab07SRod Evans (void) puts("\nMappings");
16456deab07SRod Evans (void) puts("--------");
1657c478bd9Sstevel@tonic-gate if (ph->pp_dmodel == PR_MODEL_LP64)
16656deab07SRod Evans (void) puts("addr size prot ident name");
1677c478bd9Sstevel@tonic-gate else
16856deab07SRod Evans (void) puts("addr size prot ident name");
1697c478bd9Sstevel@tonic-gate
1707c478bd9Sstevel@tonic-gate for (mapptr = (prmap_t *)ptr;
1717c478bd9Sstevel@tonic-gate (uintptr_t)mapptr < ((uintptr_t)ptr + stbuf.st_size);
1727c478bd9Sstevel@tonic-gate mapptr++) {
173b3fbe5e6Sseizo map_info_t *mip;
1747c478bd9Sstevel@tonic-gate
1757c478bd9Sstevel@tonic-gate if (ph->pp_dmodel == PR_MODEL_LP64)
17620c1c355SRod Evans (void) printf("%#18llx %#08llx %#04x",
17720c1c355SRod Evans EC_ADDR(mapptr->pr_vaddr), EC_OFF(mapptr->pr_size),
17820c1c355SRod Evans mapptr->pr_mflags);
1797c478bd9Sstevel@tonic-gate else
18020c1c355SRod Evans (void) printf("0x%08llx 0x%06llx 0x%02x",
18120c1c355SRod Evans EC_ADDR(mapptr->pr_vaddr), EC_OFF(mapptr->pr_size),
18256deab07SRod Evans mapptr->pr_mflags);
1837c478bd9Sstevel@tonic-gate
1847c478bd9Sstevel@tonic-gate if ((mip = addr_to_map(ph,
18556deab07SRod Evans (ulong_t)(mapptr->pr_vaddr))) != NULL) {
1867c478bd9Sstevel@tonic-gate if (mip->mi_refname) {
18756deab07SRod Evans (void) printf(" 0x%02lx %s(%s)",
18856deab07SRod Evans mip->mi_lmident, mip->mi_name,
18956deab07SRod Evans mip->mi_refname);
1907c478bd9Sstevel@tonic-gate } else
19156deab07SRod Evans (void) printf(" 0x%02lx %s", mip->mi_lmident,
19256deab07SRod Evans mip->mi_name);
1937c478bd9Sstevel@tonic-gate }
19456deab07SRod Evans (void) putchar('\n');
1957c478bd9Sstevel@tonic-gate }
19656deab07SRod Evans (void) putchar('\n');
1977c478bd9Sstevel@tonic-gate
1987c478bd9Sstevel@tonic-gate free(ptr);
1997c478bd9Sstevel@tonic-gate return (RET_OK);
2007c478bd9Sstevel@tonic-gate }
2017c478bd9Sstevel@tonic-gate
2027c478bd9Sstevel@tonic-gate retc_t
load_map(struct ps_prochandle * procp,caddr_t baddr,map_info_t * mp)203b3fbe5e6Sseizo load_map(struct ps_prochandle *procp, caddr_t baddr, map_info_t *mp)
2047c478bd9Sstevel@tonic-gate {
205b3fbe5e6Sseizo Elf *elf;
2067c478bd9Sstevel@tonic-gate GElf_Ehdr ehdr;
2077c478bd9Sstevel@tonic-gate GElf_Phdr phdr;
20856deab07SRod Evans Elf_Scn *scn = NULL;
2097c478bd9Sstevel@tonic-gate int cnt;
210b3fbe5e6Sseizo prmap_t *mapptr;
211b3fbe5e6Sseizo void *ptr;
2127c478bd9Sstevel@tonic-gate struct stat stbuf;
2137c478bd9Sstevel@tonic-gate int filefd = -1;
2147c478bd9Sstevel@tonic-gate
2157c478bd9Sstevel@tonic-gate if (fstat(procp->pp_mapfd, &stbuf) == -1)
2167c478bd9Sstevel@tonic-gate perr("stat map");
2177c478bd9Sstevel@tonic-gate
2187c478bd9Sstevel@tonic-gate ptr = malloc(stbuf.st_size);
2197c478bd9Sstevel@tonic-gate if (pread(procp->pp_mapfd, ptr, stbuf.st_size, 0) == -1)
2207c478bd9Sstevel@tonic-gate perr("dm: reading map");
2217c478bd9Sstevel@tonic-gate
2227c478bd9Sstevel@tonic-gate for (mapptr = (prmap_t *)ptr;
2237c478bd9Sstevel@tonic-gate (uintptr_t)mapptr < ((uintptr_t)ptr + stbuf.st_size);
2247c478bd9Sstevel@tonic-gate mapptr++) {
22556deab07SRod Evans
2267c478bd9Sstevel@tonic-gate if ((mapptr->pr_vaddr <= (uintptr_t)baddr) &&
22756deab07SRod Evans ((mapptr->pr_vaddr + mapptr->pr_size) >
2287c478bd9Sstevel@tonic-gate (uintptr_t)baddr)) {
2297c478bd9Sstevel@tonic-gate if (mapptr->pr_mapname[0]) {
2307c478bd9Sstevel@tonic-gate char procname[MAXPATHLEN];
23156deab07SRod Evans
23256deab07SRod Evans (void) snprintf(procname, MAXPATHLEN - 1,
2337c478bd9Sstevel@tonic-gate "/proc/%d/object/%s", procp->pp_pid,
2347c478bd9Sstevel@tonic-gate mapptr->pr_mapname);
2357c478bd9Sstevel@tonic-gate filefd = open(procname, O_RDONLY);
2367c478bd9Sstevel@tonic-gate }
2377c478bd9Sstevel@tonic-gate break;
2387c478bd9Sstevel@tonic-gate }
2397c478bd9Sstevel@tonic-gate }
2407c478bd9Sstevel@tonic-gate free(ptr);
2417c478bd9Sstevel@tonic-gate
2427c478bd9Sstevel@tonic-gate if (filefd == -1) {
24356deab07SRod Evans (void) fprintf(stderr, "unable to find file association to "
24420c1c355SRod Evans "mapping address 0x%08llx\n", EC_NATPTR(baddr));
2457c478bd9Sstevel@tonic-gate return (RET_FAILED);
2467c478bd9Sstevel@tonic-gate }
2477c478bd9Sstevel@tonic-gate
2487c478bd9Sstevel@tonic-gate if ((elf = elf_begin(filefd, ELF_C_READ, 0)) == NULL) {
24956deab07SRod Evans (void) fprintf(stderr, "elf_begin(): %s\n", elf_errmsg(-1));
2507c478bd9Sstevel@tonic-gate return (RET_FAILED);
2517c478bd9Sstevel@tonic-gate }
2527c478bd9Sstevel@tonic-gate
2537c478bd9Sstevel@tonic-gate if (elf_kind(elf) != ELF_K_ELF) {
25456deab07SRod Evans (void) printf("non-elf file\n");
25556deab07SRod Evans (void) elf_end(elf);
2567c478bd9Sstevel@tonic-gate return (RET_FAILED);
2577c478bd9Sstevel@tonic-gate }
2587c478bd9Sstevel@tonic-gate
2597c478bd9Sstevel@tonic-gate mp->mi_elf = elf;
2607c478bd9Sstevel@tonic-gate mp->mi_flags = 0;
2617c478bd9Sstevel@tonic-gate mp->mi_mapfd = filefd;
2627c478bd9Sstevel@tonic-gate
2637c478bd9Sstevel@tonic-gate if (gelf_getehdr(mp->mi_elf, &ehdr) == NULL) {
26456deab07SRod Evans (void) printf("gelf_getehdr(): %s\n", elf_errmsg(-1));
26556deab07SRod Evans (void) elf_end(mp->mi_elf);
2667c478bd9Sstevel@tonic-gate return (RET_FAILED);
2677c478bd9Sstevel@tonic-gate }
2687c478bd9Sstevel@tonic-gate mp->mi_ehdr = ehdr;
2697c478bd9Sstevel@tonic-gate if (ehdr.e_type == ET_EXEC)
2707c478bd9Sstevel@tonic-gate mp->mi_flags |= FLG_MI_EXEC;
2717c478bd9Sstevel@tonic-gate
2727c478bd9Sstevel@tonic-gate mp->mi_end = 0;
273b3fbe5e6Sseizo #if defined(_ELF64)
2747c478bd9Sstevel@tonic-gate mp->mi_addr = (ulong_t)0xffffffffffffffff;
275b3fbe5e6Sseizo #else
276b3fbe5e6Sseizo mp->mi_addr = (ulong_t)0xffffffff;
277b3fbe5e6Sseizo #endif
2787c478bd9Sstevel@tonic-gate for (cnt = 0; cnt < (int)(ehdr.e_phnum); cnt++) {
2797c478bd9Sstevel@tonic-gate if (gelf_getphdr(mp->mi_elf, cnt, &phdr) == NULL) {
28056deab07SRod Evans (void) printf("gelf_getphdr(): %s\n", elf_errmsg(-1));
28156deab07SRod Evans (void) elf_end(mp->mi_elf);
2827c478bd9Sstevel@tonic-gate return (RET_FAILED);
2837c478bd9Sstevel@tonic-gate }
2847c478bd9Sstevel@tonic-gate
2857c478bd9Sstevel@tonic-gate if (phdr.p_type == PT_LOAD) {
2867c478bd9Sstevel@tonic-gate if (mp->mi_end < (ulong_t)(phdr.p_vaddr +
2877c478bd9Sstevel@tonic-gate phdr.p_memsz))
2887c478bd9Sstevel@tonic-gate mp->mi_end = (ulong_t)(phdr.p_vaddr +
28956deab07SRod Evans phdr.p_memsz);
2907c478bd9Sstevel@tonic-gate if (mp->mi_addr > phdr.p_vaddr)
2917c478bd9Sstevel@tonic-gate mp->mi_addr = phdr.p_vaddr;
2927c478bd9Sstevel@tonic-gate }
2937c478bd9Sstevel@tonic-gate }
2947c478bd9Sstevel@tonic-gate
2957c478bd9Sstevel@tonic-gate mp->mi_pltbase = 0;
2967c478bd9Sstevel@tonic-gate mp->mi_pltsize = 0;
2977c478bd9Sstevel@tonic-gate mp->mi_pltentsz = 0;
2987a5d89c4Sab mp->mi_dynsym.st_symn = 0;
29956deab07SRod Evans while ((scn = elf_nextscn(mp->mi_elf, scn)) != NULL) {
3007c478bd9Sstevel@tonic-gate GElf_Shdr shdr;
30156deab07SRod Evans Elf_Data *dp;
30256deab07SRod Evans Elf_Scn *tscn = NULL;
3037c478bd9Sstevel@tonic-gate
30456deab07SRod Evans if (gelf_getshdr(scn, &shdr) == NULL) {
30556deab07SRod Evans (void) printf("gelf_getshdr(): %s\n", elf_errmsg(-1));
30656deab07SRod Evans (void) elf_end(mp->mi_elf);
3077c478bd9Sstevel@tonic-gate return (RET_FAILED);
3087c478bd9Sstevel@tonic-gate }
3097c478bd9Sstevel@tonic-gate
3107c478bd9Sstevel@tonic-gate switch (shdr.sh_type) {
3117c478bd9Sstevel@tonic-gate case SHT_DYNSYM:
3127c478bd9Sstevel@tonic-gate dp = elf_getdata(scn, 0);
3137a5d89c4Sab mp->mi_dynsym.st_syms_pri = dp;
3147c478bd9Sstevel@tonic-gate tscn = elf_getscn(mp->mi_elf, shdr.sh_link);
3157a5d89c4Sab mp->mi_dynsym.st_symn +=
31656deab07SRod Evans shdr.sh_size / shdr.sh_entsize;
3177c478bd9Sstevel@tonic-gate dp = elf_getdata(tscn, 0);
3187c478bd9Sstevel@tonic-gate mp->mi_dynsym.st_strs = (char *)dp->d_buf;
3197c478bd9Sstevel@tonic-gate break;
3207a5d89c4Sab case SHT_SUNW_LDYNSYM:
3217a5d89c4Sab dp = elf_getdata(scn, 0);
3227a5d89c4Sab mp->mi_dynsym.st_syms_aux = dp;
3237a5d89c4Sab mp->mi_dynsym.st_symn_aux =
32456deab07SRod Evans shdr.sh_size / shdr.sh_entsize;
3257a5d89c4Sab mp->mi_dynsym.st_symn += mp->mi_dynsym.st_symn_aux;
3267a5d89c4Sab break;
3277c478bd9Sstevel@tonic-gate case SHT_SYMTAB:
3287c478bd9Sstevel@tonic-gate dp = elf_getdata(scn, 0);
3297a5d89c4Sab mp->mi_symtab.st_syms_pri = dp;
3307c478bd9Sstevel@tonic-gate tscn = elf_getscn(mp->mi_elf, shdr.sh_link);
3317c478bd9Sstevel@tonic-gate mp->mi_symtab.st_symn =
33256deab07SRod Evans shdr.sh_size / shdr.sh_entsize;
3337c478bd9Sstevel@tonic-gate dp = elf_getdata(tscn, 0);
3347c478bd9Sstevel@tonic-gate mp->mi_symtab.st_strs = (char *)dp->d_buf;
3357c478bd9Sstevel@tonic-gate break;
3367c478bd9Sstevel@tonic-gate case PLTSECTT:
3377c478bd9Sstevel@tonic-gate if (strcmp(PLTSECT, elf_strptr(mp->mi_elf,
3387c478bd9Sstevel@tonic-gate ehdr.e_shstrndx, shdr.sh_name)) == 0) {
3397c478bd9Sstevel@tonic-gate mp->mi_pltbase = shdr.sh_addr;
3407c478bd9Sstevel@tonic-gate mp->mi_pltsize = shdr.sh_size;
34120c1c355SRod Evans mp->mi_pltentsz = shdr.sh_entsize;
3427c478bd9Sstevel@tonic-gate }
3437c478bd9Sstevel@tonic-gate break;
3447c478bd9Sstevel@tonic-gate default:
3457c478bd9Sstevel@tonic-gate /* nothing */
3467c478bd9Sstevel@tonic-gate break;
3477c478bd9Sstevel@tonic-gate }
3487c478bd9Sstevel@tonic-gate }
3497c478bd9Sstevel@tonic-gate return (RET_OK);
3507c478bd9Sstevel@tonic-gate }
3517c478bd9Sstevel@tonic-gate
3527c478bd9Sstevel@tonic-gate static int
map_iter(const rd_loadobj_t * lop,void * cd)353b3fbe5e6Sseizo map_iter(const rd_loadobj_t *lop, void *cd)
3547c478bd9Sstevel@tonic-gate {
355b3fbe5e6Sseizo struct ps_prochandle *ph = (struct ps_prochandle *)cd;
356b3fbe5e6Sseizo map_info_t *mip;
3577c478bd9Sstevel@tonic-gate char buf[MAXPATHLEN];
3587c478bd9Sstevel@tonic-gate
3597c478bd9Sstevel@tonic-gate if ((mip = (map_info_t *)calloc(1, sizeof (map_info_t))) == NULL) {
36056deab07SRod Evans (void) fprintf(stderr, "map_iter: memory error: allocation "
36156deab07SRod Evans "failed\n");
3627c478bd9Sstevel@tonic-gate return (0);
3637c478bd9Sstevel@tonic-gate }
3647c478bd9Sstevel@tonic-gate
3657c478bd9Sstevel@tonic-gate mip->mi_loadobj = *lop;
3667c478bd9Sstevel@tonic-gate
3677c478bd9Sstevel@tonic-gate if (proc_string_read(ph, lop->rl_nameaddr,
3687c478bd9Sstevel@tonic-gate buf, MAXPATHLEN) == RET_FAILED) {
36956deab07SRod Evans (void) fprintf(stderr, "mi: bad object name address "
37056deab07SRod Evans "passed: 0x%lx\n", lop->rl_nameaddr);
3717c478bd9Sstevel@tonic-gate free(mip);
3727c478bd9Sstevel@tonic-gate return (0);
3737c478bd9Sstevel@tonic-gate }
3747c478bd9Sstevel@tonic-gate mip->mi_name = strdup(buf);
3757c478bd9Sstevel@tonic-gate
3767c478bd9Sstevel@tonic-gate
3777c478bd9Sstevel@tonic-gate if (lop->rl_refnameaddr) {
3787c478bd9Sstevel@tonic-gate if (proc_string_read(ph, lop->rl_refnameaddr, buf,
3797c478bd9Sstevel@tonic-gate MAXPATHLEN) == RET_FAILED) {
38056deab07SRod Evans (void) fprintf(stderr, "mi1: bad object name address "
38156deab07SRod Evans "passed: 0x%lx\n", lop->rl_refnameaddr);
3827c478bd9Sstevel@tonic-gate free(mip);
3837c478bd9Sstevel@tonic-gate return (0);
3847c478bd9Sstevel@tonic-gate }
3857c478bd9Sstevel@tonic-gate mip->mi_refname = strdup(buf);
3867c478bd9Sstevel@tonic-gate } else
38756deab07SRod Evans mip->mi_refname = NULL;
38856deab07SRod Evans
38956deab07SRod Evans /*
39056deab07SRod Evans * Relocatable objects are processed to create in-memory shared objects,
39156deab07SRod Evans * and as such have no file associated with the allocated memory shared
39256deab07SRod Evans * object.
39356deab07SRod Evans */
39456deab07SRod Evans if ((lop->rl_flags & RD_FLG_MEM_OBJECT) == 0)
39556deab07SRod Evans (void) load_map(ph, (caddr_t)lop->rl_base, mip);
3967c478bd9Sstevel@tonic-gate if ((mip->mi_flags & FLG_MI_EXEC) == 0) {
3977c478bd9Sstevel@tonic-gate mip->mi_end += lop->rl_base;
3987c478bd9Sstevel@tonic-gate mip->mi_addr += lop->rl_base;
3997c478bd9Sstevel@tonic-gate }
4007c478bd9Sstevel@tonic-gate mip->mi_lmident = lop->rl_lmident;
40156deab07SRod Evans mip->mi_next = NULL;
4027c478bd9Sstevel@tonic-gate
40320c1c355SRod Evans if (ph->pp_lmaplist.ml_head == NULL) {
4047c478bd9Sstevel@tonic-gate ph->pp_lmaplist.ml_head = ph->pp_lmaplist.ml_tail = mip;
4057c478bd9Sstevel@tonic-gate return (1);
4067c478bd9Sstevel@tonic-gate }
4077c478bd9Sstevel@tonic-gate
4087c478bd9Sstevel@tonic-gate ph->pp_lmaplist.ml_tail->mi_next = mip;
4097c478bd9Sstevel@tonic-gate ph->pp_lmaplist.ml_tail = mip;
4107c478bd9Sstevel@tonic-gate
4117c478bd9Sstevel@tonic-gate return (1);
4127c478bd9Sstevel@tonic-gate }
4137c478bd9Sstevel@tonic-gate
4147c478bd9Sstevel@tonic-gate void
free_linkmaps(struct ps_prochandle * ph)415b3fbe5e6Sseizo free_linkmaps(struct ps_prochandle *ph)
4167c478bd9Sstevel@tonic-gate {
417b3fbe5e6Sseizo map_info_t *cur, *prev;
41856deab07SRod Evans
41956deab07SRod Evans for (cur = ph->pp_lmaplist.ml_head, prev = NULL; cur;
4207c478bd9Sstevel@tonic-gate prev = cur, cur = cur->mi_next) {
4217c478bd9Sstevel@tonic-gate if (prev) {
42256deab07SRod Evans (void) elf_end(prev->mi_elf);
42356deab07SRod Evans (void) close(prev->mi_mapfd);
4247c478bd9Sstevel@tonic-gate free(prev->mi_name);
4257c478bd9Sstevel@tonic-gate if (prev->mi_refname)
4267c478bd9Sstevel@tonic-gate free(prev->mi_refname);
4277c478bd9Sstevel@tonic-gate free(prev);
4287c478bd9Sstevel@tonic-gate }
4297c478bd9Sstevel@tonic-gate }
4307c478bd9Sstevel@tonic-gate if (prev) {
43156deab07SRod Evans (void) elf_end(prev->mi_elf);
43256deab07SRod Evans (void) close(prev->mi_mapfd);
4337c478bd9Sstevel@tonic-gate free(prev->mi_name);
4347c478bd9Sstevel@tonic-gate if (prev->mi_refname)
4357c478bd9Sstevel@tonic-gate free(prev->mi_refname);
4367c478bd9Sstevel@tonic-gate free(prev);
4377c478bd9Sstevel@tonic-gate }
43856deab07SRod Evans ph->pp_lmaplist.ml_head = ph->pp_lmaplist.ml_tail = NULL;
4397c478bd9Sstevel@tonic-gate }
4407c478bd9Sstevel@tonic-gate
4417c478bd9Sstevel@tonic-gate retc_t
get_linkmaps(struct ps_prochandle * ph)442b3fbe5e6Sseizo get_linkmaps(struct ps_prochandle *ph)
4437c478bd9Sstevel@tonic-gate {
4447c478bd9Sstevel@tonic-gate free_linkmaps(ph);
44520c1c355SRod Evans (void) rd_loadobj_iter(ph->pp_rap, map_iter, ph);
4467c478bd9Sstevel@tonic-gate return (RET_OK);
4477c478bd9Sstevel@tonic-gate }
4487c478bd9Sstevel@tonic-gate
4497c478bd9Sstevel@tonic-gate retc_t
set_objpad(struct ps_prochandle * ph,size_t padsize)450b3fbe5e6Sseizo set_objpad(struct ps_prochandle *ph, size_t padsize)
4517c478bd9Sstevel@tonic-gate {
4527c478bd9Sstevel@tonic-gate if (rd_objpad_enable(ph->pp_rap, padsize) != RD_OK) {
45356deab07SRod Evans (void) printf("rdb: error setting object padding\n");
4547c478bd9Sstevel@tonic-gate return (RET_FAILED);
4557c478bd9Sstevel@tonic-gate }
4567c478bd9Sstevel@tonic-gate return (RET_OK);
4577c478bd9Sstevel@tonic-gate }
458