1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 22 /* 23 * Copyright (c) 1988 AT&T 24 * All Rights Reserved 25 * 26 * Copyright (c) 1992, 2010, Oracle and/or its affiliates. All rights reserved. 27 */ 28 29 /* 30 * Copyright (c) 2018, Joyent, Inc. 31 */ 32 33 #include <stdio.h> 34 #include <string.h> 35 #include "msg.h" 36 #include "_libld.h" 37 38 39 /* 40 * Print a virtual address map of input and output sections together with 41 * multiple symbol definitions (if they exist). 42 */ 43 static Boolean symbol_title = TRUE; 44 45 static void 46 sym_muldef_title() 47 { 48 (void) printf(MSG_INTL(MSG_ENT_MUL_FMT_TIL_0), 49 MSG_INTL(MSG_ENT_MUL_TIL_0)); 50 (void) printf(MSG_INTL(MSG_ENT_MUL_FMT_TIL_1), 51 MSG_INTL(MSG_ENT_MUL_ITM_SYM), 52 MSG_INTL(MSG_ENT_MUL_ITM_DEF_0), 53 MSG_INTL(MSG_ENT_MUL_ITM_DEF_1)); 54 symbol_title = FALSE; 55 } 56 57 void 58 ld_map_out(Ofl_desc *ofl) 59 { 60 Sg_desc *sgp; 61 Is_desc *isp; 62 Sym_avlnode *sav; 63 Aliste idx1; 64 65 (void) printf(MSG_INTL(MSG_ENT_MAP_FMT_TIL_1), 66 MSG_INTL(MSG_ENT_MAP_TITLE_1)); 67 if (ofl->ofl_flags & FLG_OF_RELOBJ) 68 (void) printf(MSG_INTL(MSG_ENT_MAP_FMT_TIL_2), 69 MSG_INTL(MSG_ENT_ITM_OUTPUT), 70 MSG_INTL(MSG_ENT_ITM_INPUT), 71 MSG_INTL(MSG_ENT_ITM_NEW), 72 MSG_INTL(MSG_ENT_ITM_SECTION), 73 MSG_INTL(MSG_ENT_ITM_SECTION), 74 MSG_INTL(MSG_ENT_ITM_DISPMNT), 75 MSG_INTL(MSG_ENT_ITM_SIZE)); 76 else 77 (void) printf(MSG_INTL(MSG_ENT_MAP_FMT_TIL_3), 78 MSG_INTL(MSG_ENT_ITM_OUTPUT), 79 MSG_INTL(MSG_ENT_ITM_INPUT), 80 MSG_INTL(MSG_ENT_ITM_VIRTUAL), 81 MSG_INTL(MSG_ENT_ITM_SECTION), 82 MSG_INTL(MSG_ENT_ITM_SECTION), 83 MSG_INTL(MSG_ENT_ITM_ADDRESS), 84 MSG_INTL(MSG_ENT_ITM_SIZE)); 85 86 for (APLIST_TRAVERSE(ofl->ofl_segs, idx1, sgp)) { 87 Os_desc *osp; 88 Aliste idx2; 89 90 if (sgp->sg_phdr.p_type != PT_LOAD) 91 continue; 92 93 for (APLIST_TRAVERSE(sgp->sg_osdescs, idx2, osp)) { 94 int os_isdescs_idx; 95 Aliste idx3; 96 97 (void) printf(MSG_INTL(MSG_ENT_MAP_ENTRY_1), 98 osp->os_name, EC_ADDR(osp->os_shdr->sh_addr), 99 EC_XWORD(osp->os_shdr->sh_size)); 100 101 OS_ISDESCS_TRAVERSE(os_isdescs_idx, osp, idx3, isp) { 102 Addr addr; 103 104 /* 105 * Although there seems little point in printing 106 * discarded (empty) sections, especially as 107 * diagnostics under -Dsegments,details are more 108 * informative, continue printing them. There 109 * are user scripts, fragile to say the least, 110 * that grep(1) through load-map output to 111 * discover object requirements. These scripts 112 * don't grep for all input sections types (ie. 113 * .picdata), and have become dependent on null 114 * sections (ie. .text) existing in the 115 * load-map output. 116 */ 117 if (isp->is_flags & FLG_IS_DISCARD) { 118 addr = 0; 119 } else { 120 addr = (Addr) 121 _elf_getxoff(isp->is_indata); 122 if (!(ofl->ofl_flags & FLG_OF_RELOBJ)) 123 addr += isp->is_osdesc-> 124 os_shdr->sh_addr; 125 } 126 127 (void) printf(MSG_INTL(MSG_ENT_MAP_ENTRY_2), 128 isp->is_name, EC_ADDR(addr), 129 EC_XWORD(isp->is_shdr->sh_size), 130 ((isp->is_file != NULL) ? 131 (char *)(isp->is_file->ifl_name) : 132 MSG_INTL(MSG_STR_NULL))); 133 } 134 } 135 } 136 137 if (ofl->ofl_flags & FLG_OF_RELOBJ) 138 return; 139 140 /* 141 * Check for any multiply referenced symbols (ie. symbols that have 142 * been overridden from a shared library). 143 */ 144 for (sav = avl_first(&ofl->ofl_symavl); sav; 145 sav = AVL_NEXT(&ofl->ofl_symavl, sav)) { 146 Sym_desc *sdp = sav->sav_sdp; 147 const char *name = sdp->sd_name, *ducp, *adcp; 148 APlist *dfiles; 149 Aliste idx; 150 151 if (((dfiles = sdp->sd_aux->sa_dfiles) == NULL) || 152 (aplist_nitems(dfiles) <= 1)) 153 continue; 154 155 /* 156 * Files that define a symbol are saved on the `sa_dfiles' list. 157 * Ignore symbols that aren't needed, and any special symbols 158 * that the link editor may produce (symbols of type ABS and 159 * COMMON are not recorded in the first place, however functions 160 * like _init() and _fini() commonly have multiple occurrences). 161 */ 162 if ((sdp->sd_ref == REF_DYN_SEEN) || 163 (sdp->sd_aux->sa_symspec) || 164 (strcmp(MSG_ORIG(MSG_SYM_FINI_U), name) == 0) || 165 (strcmp(MSG_ORIG(MSG_SYM_INIT_U), name) == 0) || 166 (strcmp(MSG_ORIG(MSG_SYM_LIBVER_U), name) == 0)) 167 continue; 168 169 if (symbol_title) 170 sym_muldef_title(); 171 172 ducp = sdp->sd_file->ifl_name; 173 (void) printf(MSG_INTL(MSG_ENT_MUL_ENTRY_1), demangle(name), 174 ducp); 175 for (APLIST_TRAVERSE(dfiles, idx, adcp)) { 176 /* 177 * Ignore the referenced symbol. 178 */ 179 if (strcmp(adcp, ducp) != 0) 180 (void) printf(MSG_INTL(MSG_ENT_MUL_ENTRY_2), 181 adcp); 182 } 183 } 184 } 185 186 /* 187 * Traverse the entrance criteria list searching for those sections that haven't 188 * been met and print error message. (only in the case of reordering) 189 */ 190 void 191 ld_ent_check(Ofl_desc * ofl) 192 { 193 Ent_desc *enp; 194 Aliste ndx; 195 196 /* 197 * Try to give as much information to the user about the specific 198 * line in the mapfile. If the line contains a file name then 199 * output the filename too. Hence we have two warning lines - 200 * one for criterias where a filename is used and the other 201 * for those without a filename. 202 */ 203 for (APLIST_TRAVERSE(ofl->ofl_ents, ndx, enp)) { 204 /* 205 * No warning if any of the following hold: 206 * - The segment has no entrance criteria requiring 207 * input section sorting (FLG_SG_IS_ORDER not set). 208 * - The entrance criteria was used to place a section. 209 * - The specific entrance criteria does not require sorting 210 */ 211 if (((enp->ec_segment->sg_flags & FLG_SG_IS_ORDER) == 0) || 212 (enp->ec_flags & FLG_EC_USED) || (enp->ec_ordndx == 0)) 213 continue; 214 215 216 if (alist_nitems(enp->ec_files) > 0) { 217 ld_eprintf(ofl, ERR_WARNING, MSG_INTL(MSG_ENT_NOSEC_1), 218 enp->ec_segment->sg_name, enp->ec_is_name); 219 } else { 220 ld_eprintf(ofl, ERR_WARNING, MSG_INTL(MSG_ENT_NOSEC_2), 221 enp->ec_segment->sg_name, enp->ec_is_name); 222 } 223 } 224 } 225