bfd/elf32-sparc.c

   1 /* SPARC-specific support for 32-bit ELF
   2    Copyright (C) 1993-2020 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 bfd_boolean
  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 bfd_boolean
  70 elf32_sparc_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info)
  71 {
  72   bfd *obfd = info->output_bfd;
  73   bfd_boolean 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 bfd_boolean
 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_size_dynamic_sections \
 252                                         _bfd_sparc_elf_size_dynamic_sections
 253 #define elf_backend_relocate_section    _bfd_sparc_elf_relocate_section
 254 #define elf_backend_finish_dynamic_symbol \
 255                                         _bfd_sparc_elf_finish_dynamic_symbol
 256 #define elf_backend_finish_dynamic_sections \
 257                                         _bfd_sparc_elf_finish_dynamic_sections
 258 #define bfd_elf32_mkobject              _bfd_sparc_elf_mkobject
 259 #define elf_backend_object_p            _bfd_sparc_elf_object_p
 260 #define elf_backend_gc_mark_hook        _bfd_sparc_elf_gc_mark_hook
 261 #define elf_backend_plt_sym_val         _bfd_sparc_elf_plt_sym_val
 262 #define elf_backend_init_index_section  _bfd_elf_init_1_index_section
 263 #define elf_backend_fixup_symbol        _bfd_sparc_elf_fixup_symbol
 264
 265 #define elf_backend_can_gc_sections 1
 266 #define elf_backend_can_refcount 1
 267 #define elf_backend_want_got_plt 0
 268 #define elf_backend_plt_readonly 0
 269 #define elf_backend_want_plt_sym 1
 270 #define elf_backend_got_header_size 4
 271 #define elf_backend_want_dynrelro 1
 272 #define elf_backend_rela_normal 1
 273
 274 #define elf_backend_linux_prpsinfo32_ugid16     TRUE
 275
 276 #include "elf32-target.h"
 277
 278 /* Solaris 2.  */
 279
 280 #undef  TARGET_BIG_SYM
 281 #define TARGET_BIG_SYM                          sparc_elf32_sol2_vec
 282 #undef  TARGET_BIG_NAME
 283 #define TARGET_BIG_NAME                         "elf32-sparc-sol2"
 284
 285 #undef elf32_bed
 286 #define elf32_bed                               elf32_sparc_sol2_bed
 287
 288 /* The 32-bit static TLS arena size is rounded to the nearest 8-byte
 289    boundary.  */
 290 #undef  elf_backend_static_tls_alignment
 291 #define elf_backend_static_tls_alignment        8
 292
 293 #undef  elf_backend_strtab_flags
 294 #define elf_backend_strtab_flags        SHF_STRINGS
 295
 296 static bfd_boolean
 297 elf32_sparc_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
 298                                                  bfd *obfd ATTRIBUTE_UNUSED,
 299                                                  const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
 300                                                  Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
 301 {
 302   /* PR 19938: FIXME: Need to add code for setting the sh_info
 303      and sh_link fields of Solaris specific section types.  */
 304   return FALSE;
 305 }
 306
 307 #undef  elf_backend_copy_special_section_fields
 308 #define elf_backend_copy_special_section_fields elf32_sparc_copy_solaris_special_section_fields
 309
 310 #include "elf32-target.h"
 311
 312 /* A wrapper around _bfd_sparc_elf_link_hash_table_create that identifies
 313    the target system as VxWorks.  */
 314
 315 static struct bfd_link_hash_table *
 316 elf32_sparc_vxworks_link_hash_table_create (bfd *abfd)
 317 {
 318   struct bfd_link_hash_table *ret;
 319
 320   ret = _bfd_sparc_elf_link_hash_table_create (abfd);
 321   if (ret)
 322     {
 323       struct _bfd_sparc_elf_link_hash_table *htab;
 324
 325       htab = (struct _bfd_sparc_elf_link_hash_table *) ret;
 326       htab->is_vxworks = 1;
 327     }
 328   return ret;
 329 }
 330
 331 /* A final_write_processing hook that does both the SPARC- and VxWorks-
 332    specific handling.  */
 333
 334 static bfd_boolean
 335 elf32_sparc_vxworks_final_write_processing (bfd *abfd)
 336 {
 337   sparc_final_write_processing (abfd);
 338   return elf_vxworks_final_write_processing (abfd);
 339 }
 340
 341 #undef  TARGET_BIG_SYM
 342 #define TARGET_BIG_SYM  sparc_elf32_vxworks_vec
 343 #undef  TARGET_BIG_NAME
 344 #define TARGET_BIG_NAME "elf32-sparc-vxworks"
 345
 346 #undef  ELF_MINPAGESIZE
 347 #define ELF_MINPAGESIZE 0x1000
 348
 349 #undef bfd_elf32_bfd_link_hash_table_create
 350 #define bfd_elf32_bfd_link_hash_table_create \
 351   elf32_sparc_vxworks_link_hash_table_create
 352
 353 #undef  elf_backend_want_got_plt
 354 #define elf_backend_want_got_plt                1
 355 #undef  elf_backend_plt_readonly
 356 #define elf_backend_plt_readonly                1
 357 #undef  elf_backend_got_header_size
 358 #define elf_backend_got_header_size             12
 359 #undef  elf_backend_dtrel_excludes_plt
 360 #define elf_backend_dtrel_excludes_plt          1
 361 #undef  elf_backend_add_symbol_hook
 362 #define elf_backend_add_symbol_hook \
 363   elf_vxworks_add_symbol_hook
 364 #undef  elf_backend_link_output_symbol_hook
 365 #define elf_backend_link_output_symbol_hook \
 366   elf_vxworks_link_output_symbol_hook
 367 #undef  elf_backend_emit_relocs
 368 #define elf_backend_emit_relocs \
 369   elf_vxworks_emit_relocs
 370 #undef  elf_backend_final_write_processing
 371 #define elf_backend_final_write_processing \
 372   elf32_sparc_vxworks_final_write_processing
 373 #undef  elf_backend_static_tls_alignment
 374 #undef  elf_backend_strtab_flags
 375 #undef  elf_backend_copy_special_section_fields
 376
 377 #undef  elf32_bed
 378 #define elf32_bed                               sparc_elf_vxworks_bed
 379
 380 #include "elf32-target.h"