1 /* SPARC-specific support for 32-bit ELF 2 Copyright (C) 1993-2024 Free Software Foundation, Inc. 3 4 This file is part of BFD, the Binary File Descriptor library. 5 6 This program is free software; you can redistribute it and/or modify 7 it under the terms of the GNU General Public License as published by 8 the Free Software Foundation; either version 3 of the License, or 9 (at your option) any later version. 10 11 This program is distributed in the hope that it will be useful, 12 but WITHOUT ANY WARRANTY; without even the implied warranty of 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 GNU General Public License for more details. 15 16 You should have received a copy of the GNU General Public License 17 along with this program; if not, write to the Free Software 18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, 19 MA 02110-1301, USA. */ 20 21 #include "sysdep.h" 22 #include "bfd.h" 23 #include "bfdlink.h" 24 #include "libbfd.h" 25 #include "elf-bfd.h" 26 #include "elf/sparc.h" 27 #include "opcode/sparc.h" 28 #include "elfxx-sparc.h" 29 #include "elf-vxworks.h" 30 31 /* Support for core dump NOTE sections. */ 32 33 static bool 34 elf32_sparc_grok_psinfo (bfd *abfd, Elf_Internal_Note *note) 35 { 36 switch (note->descsz) 37 { 38 default: 39 return false; 40 41 case 260: /* Solaris prpsinfo_t. */ 42 elf_tdata (abfd)->core->program 43 = _bfd_elfcore_strndup (abfd, note->descdata + 84, 16); 44 elf_tdata (abfd)->core->command 45 = _bfd_elfcore_strndup (abfd, note->descdata + 100, 80); 46 break; 47 48 case 336: /* Solaris psinfo_t. */ 49 elf_tdata (abfd)->core->program 50 = _bfd_elfcore_strndup (abfd, note->descdata + 88, 16); 51 elf_tdata (abfd)->core->command 52 = _bfd_elfcore_strndup (abfd, note->descdata + 104, 80); 53 break; 54 } 55 56 return true; 57 } 58 59 /* Functions for dealing with the e_flags field. 60 61 We don't define set_private_flags or copy_private_bfd_data because 62 the only currently defined values are based on the bfd mach number, 63 so we use the latter instead and defer setting e_flags until the 64 file is written out. */ 65 66 /* Merge backend specific data from an object file to the output 67 object file when linking. */ 68 69 static bool 70 elf32_sparc_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info) 71 { 72 bfd *obfd = info->output_bfd; 73 bool error; 74 unsigned long ibfd_mach; 75 /* FIXME: This should not be static. */ 76 static unsigned long previous_ibfd_e_flags = (unsigned long) -1; 77 78 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour 79 || bfd_get_flavour (obfd) != bfd_target_elf_flavour) 80 return true; 81 82 error = false; 83 84 ibfd_mach = bfd_get_mach (ibfd); 85 if (bfd_mach_sparc_64bit_p (ibfd_mach)) 86 { 87 error = true; 88 _bfd_error_handler 89 (_("%pB: compiled for a 64 bit system and target is 32 bit"), ibfd); 90 } 91 else if ((ibfd->flags & DYNAMIC) == 0) 92 { 93 if (bfd_get_mach (obfd) < ibfd_mach) 94 bfd_set_arch_mach (obfd, bfd_arch_sparc, ibfd_mach); 95 } 96 97 if (((elf_elfheader (ibfd)->e_flags & EF_SPARC_LEDATA) 98 != previous_ibfd_e_flags) 99 && previous_ibfd_e_flags != (unsigned long) -1) 100 { 101 _bfd_error_handler 102 (_("%pB: linking little endian files with big endian files"), ibfd); 103 error = true; 104 } 105 previous_ibfd_e_flags = elf_elfheader (ibfd)->e_flags & EF_SPARC_LEDATA; 106 107 if (error) 108 { 109 bfd_set_error (bfd_error_bad_value); 110 return false; 111 } 112 113 return _bfd_sparc_elf_merge_private_bfd_data (ibfd, info); 114 } 115 116 /* The final processing done just before writing out the object file. 117 We need to set the e_machine field appropriately. */ 118 119 static void 120 sparc_final_write_processing (bfd *abfd) 121 { 122 switch (bfd_get_mach (abfd)) 123 { 124 case bfd_mach_sparc: 125 case bfd_mach_sparc_sparclet: 126 case bfd_mach_sparc_sparclite: 127 break; /* nothing to do */ 128 case bfd_mach_sparc_v8plus: 129 elf_elfheader (abfd)->e_machine = EM_SPARC32PLUS; 130 elf_elfheader (abfd)->e_flags &=~ EF_SPARC_32PLUS_MASK; 131 elf_elfheader (abfd)->e_flags |= EF_SPARC_32PLUS; 132 break; 133 case bfd_mach_sparc_v8plusa: 134 elf_elfheader (abfd)->e_machine = EM_SPARC32PLUS; 135 elf_elfheader (abfd)->e_flags &=~ EF_SPARC_32PLUS_MASK; 136 elf_elfheader (abfd)->e_flags |= EF_SPARC_32PLUS | EF_SPARC_SUN_US1; 137 break; 138 case bfd_mach_sparc_v8plusb: 139 case bfd_mach_sparc_v8plusc: 140 case bfd_mach_sparc_v8plusd: 141 case bfd_mach_sparc_v8pluse: 142 case bfd_mach_sparc_v8plusv: 143 case bfd_mach_sparc_v8plusm: 144 case bfd_mach_sparc_v8plusm8: 145 elf_elfheader (abfd)->e_machine = EM_SPARC32PLUS; 146 elf_elfheader (abfd)->e_flags &=~ EF_SPARC_32PLUS_MASK; 147 elf_elfheader (abfd)->e_flags |= EF_SPARC_32PLUS | EF_SPARC_SUN_US1 148 | EF_SPARC_SUN_US3; 149 break; 150 case bfd_mach_sparc_sparclite_le: 151 elf_elfheader (abfd)->e_flags |= EF_SPARC_LEDATA; 152 break; 153 case 0: /* A non-sparc architecture - ignore. */ 154 break; 155 default: 156 _bfd_error_handler 157 (_("%pB: unhandled sparc machine value '%lu' detected during write processing"), 158 abfd, (long) bfd_get_mach (abfd)); 159 break; 160 } 161 } 162 163 static bool 164 elf32_sparc_final_write_processing (bfd *abfd) 165 { 166 sparc_final_write_processing (abfd); 167 return _bfd_elf_final_write_processing (abfd); 168 } 169 170 /* Used to decide how to sort relocs in an optimal manner for the 171 dynamic linker, before writing them out. */ 172 173 static enum elf_reloc_type_class 174 elf32_sparc_reloc_type_class (const struct bfd_link_info *info, 175 const asection *rel_sec ATTRIBUTE_UNUSED, 176 const Elf_Internal_Rela *rela) 177 { 178 bfd *abfd = info->output_bfd; 179 const struct elf_backend_data *bed = get_elf_backend_data (abfd); 180 struct _bfd_sparc_elf_link_hash_table *htab 181 = _bfd_sparc_elf_hash_table (info); 182 BFD_ASSERT (htab != NULL); 183 184 if (htab->elf.dynsym != NULL 185 && htab->elf.dynsym->contents != NULL) 186 { 187 /* Check relocation against STT_GNU_IFUNC symbol if there are 188 dynamic symbols. */ 189 unsigned long r_symndx = htab->r_symndx (rela->r_info); 190 if (r_symndx != STN_UNDEF) 191 { 192 Elf_Internal_Sym sym; 193 if (!bed->s->swap_symbol_in (abfd, 194 (htab->elf.dynsym->contents 195 + r_symndx * bed->s->sizeof_sym), 196 0, &sym)) 197 abort (); 198 199 if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC) 200 return reloc_class_ifunc; 201 } 202 } 203 204 switch ((int) ELF32_R_TYPE (rela->r_info)) 205 { 206 case R_SPARC_IRELATIVE: 207 return reloc_class_ifunc; 208 case R_SPARC_RELATIVE: 209 return reloc_class_relative; 210 case R_SPARC_JMP_SLOT: 211 return reloc_class_plt; 212 case R_SPARC_COPY: 213 return reloc_class_copy; 214 default: 215 return reloc_class_normal; 216 } 217 } 218 219 #define TARGET_BIG_SYM sparc_elf32_vec 220 #define TARGET_BIG_NAME "elf32-sparc" 221 #define ELF_ARCH bfd_arch_sparc 222 #define ELF_TARGET_ID SPARC_ELF_DATA 223 #define ELF_MACHINE_CODE EM_SPARC 224 #define ELF_MACHINE_ALT1 EM_SPARC32PLUS 225 #define ELF_MAXPAGESIZE 0x10000 226 #define ELF_COMMONPAGESIZE 0x2000 227 228 #define bfd_elf32_bfd_merge_private_bfd_data \ 229 elf32_sparc_merge_private_bfd_data 230 #define elf_backend_final_write_processing \ 231 elf32_sparc_final_write_processing 232 #define elf_backend_grok_psinfo elf32_sparc_grok_psinfo 233 #define elf_backend_reloc_type_class elf32_sparc_reloc_type_class 234 235 #define elf_info_to_howto _bfd_sparc_elf_info_to_howto 236 #define bfd_elf32_bfd_reloc_type_lookup _bfd_sparc_elf_reloc_type_lookup 237 #define bfd_elf32_bfd_reloc_name_lookup \ 238 _bfd_sparc_elf_reloc_name_lookup 239 #define bfd_elf32_bfd_link_hash_table_create \ 240 _bfd_sparc_elf_link_hash_table_create 241 #define bfd_elf32_bfd_relax_section _bfd_sparc_elf_relax_section 242 #define bfd_elf32_new_section_hook _bfd_sparc_elf_new_section_hook 243 #define elf_backend_copy_indirect_symbol \ 244 _bfd_sparc_elf_copy_indirect_symbol 245 #define elf_backend_create_dynamic_sections \ 246 _bfd_sparc_elf_create_dynamic_sections 247 #define elf_backend_check_relocs _bfd_sparc_elf_check_relocs 248 #define elf_backend_adjust_dynamic_symbol \ 249 _bfd_sparc_elf_adjust_dynamic_symbol 250 #define elf_backend_omit_section_dynsym _bfd_sparc_elf_omit_section_dynsym 251 #define elf_backend_late_size_sections _bfd_sparc_elf_late_size_sections 252 #define elf_backend_relocate_section _bfd_sparc_elf_relocate_section 253 #define elf_backend_finish_dynamic_symbol \ 254 _bfd_sparc_elf_finish_dynamic_symbol 255 #define elf_backend_finish_dynamic_sections \ 256 _bfd_sparc_elf_finish_dynamic_sections 257 #define bfd_elf32_mkobject _bfd_sparc_elf_mkobject 258 #define elf_backend_object_p _bfd_sparc_elf_object_p 259 #define elf_backend_gc_mark_hook _bfd_sparc_elf_gc_mark_hook 260 #define elf_backend_plt_sym_val _bfd_sparc_elf_plt_sym_val 261 #define elf_backend_init_index_section _bfd_elf_init_1_index_section 262 #define elf_backend_fixup_symbol _bfd_sparc_elf_fixup_symbol 263 264 #define elf_backend_can_gc_sections 1 265 #define elf_backend_can_refcount 1 266 #define elf_backend_want_got_plt 0 267 #define elf_backend_plt_readonly 0 268 #define elf_backend_want_plt_sym 1 269 #define elf_backend_got_header_size 4 270 #define elf_backend_want_dynrelro 1 271 #define elf_backend_rela_normal 1 272 273 #define elf_backend_linux_prpsinfo32_ugid16 true 274 275 #include "elf32-target.h" 276 277 /* Solaris 2. */ 278 279 #undef TARGET_BIG_SYM 280 #define TARGET_BIG_SYM sparc_elf32_sol2_vec 281 #undef TARGET_BIG_NAME 282 #define TARGET_BIG_NAME "elf32-sparc-sol2" 283 284 #undef elf32_bed 285 #define elf32_bed elf32_sparc_sol2_bed 286 287 /* The 32-bit static TLS arena size is rounded to the nearest 8-byte 288 boundary. */ 289 #undef elf_backend_static_tls_alignment 290 #define elf_backend_static_tls_alignment 8 291 292 #undef elf_backend_strtab_flags 293 #define elf_backend_strtab_flags SHF_STRINGS 294 295 static bool 296 elf32_sparc_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED, 297 bfd *obfd ATTRIBUTE_UNUSED, 298 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED, 299 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED) 300 { 301 /* PR 19938: FIXME: Need to add code for setting the sh_info 302 and sh_link fields of Solaris specific section types. */ 303 return false; 304 } 305 306 #undef elf_backend_copy_special_section_fields 307 #define elf_backend_copy_special_section_fields elf32_sparc_copy_solaris_special_section_fields 308 309 #include "elf32-target.h" 310 311 /* A final_write_processing hook that does both the SPARC- and VxWorks- 312 specific handling. */ 313 314 static bool 315 elf32_sparc_vxworks_final_write_processing (bfd *abfd) 316 { 317 sparc_final_write_processing (abfd); 318 return elf_vxworks_final_write_processing (abfd); 319 } 320 321 #undef TARGET_BIG_SYM 322 #define TARGET_BIG_SYM sparc_elf32_vxworks_vec 323 #undef TARGET_BIG_NAME 324 #define TARGET_BIG_NAME "elf32-sparc-vxworks" 325 326 #undef ELF_MINPAGESIZE 327 #define ELF_MINPAGESIZE 0x1000 328 329 #undef ELF_TARGET_OS 330 #define ELF_TARGET_OS is_vxworks 331 332 #undef elf_backend_want_got_plt 333 #define elf_backend_want_got_plt 1 334 #undef elf_backend_plt_readonly 335 #define elf_backend_plt_readonly 1 336 #undef elf_backend_got_header_size 337 #define elf_backend_got_header_size 12 338 #undef elf_backend_dtrel_excludes_plt 339 #define elf_backend_dtrel_excludes_plt 1 340 #undef elf_backend_add_symbol_hook 341 #define elf_backend_add_symbol_hook \ 342 elf_vxworks_add_symbol_hook 343 #undef elf_backend_link_output_symbol_hook 344 #define elf_backend_link_output_symbol_hook \ 345 elf_vxworks_link_output_symbol_hook 346 #undef elf_backend_emit_relocs 347 #define elf_backend_emit_relocs \ 348 elf_vxworks_emit_relocs 349 #undef elf_backend_final_write_processing 350 #define elf_backend_final_write_processing \ 351 elf32_sparc_vxworks_final_write_processing 352 #undef elf_backend_static_tls_alignment 353 #undef elf_backend_strtab_flags 354 #undef elf_backend_copy_special_section_fields 355 356 #undef elf32_bed 357 #define elf32_bed sparc_elf_vxworks_bed 358 359 #include "elf32-target.h" 360