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
33static bfd_boolean
34elf32_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
69static bfd_boolean
70elf32_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
119static void
120sparc_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    default :
154      abort ();
155      break;
156    }
157}
158
159static bfd_boolean
160elf32_sparc_final_write_processing (bfd *abfd)
161{
162  sparc_final_write_processing (abfd);
163  return _bfd_elf_final_write_processing (abfd);
164}
165
166/* Used to decide how to sort relocs in an optimal manner for the
167   dynamic linker, before writing them out.  */
168
169static enum elf_reloc_type_class
170elf32_sparc_reloc_type_class (const struct bfd_link_info *info,
171			      const asection *rel_sec ATTRIBUTE_UNUSED,
172			      const Elf_Internal_Rela *rela)
173{
174  bfd *abfd = info->output_bfd;
175  const struct elf_backend_data *bed = get_elf_backend_data (abfd);
176  struct _bfd_sparc_elf_link_hash_table *htab
177    = _bfd_sparc_elf_hash_table (info);
178  BFD_ASSERT (htab != NULL);
179
180  if (htab->elf.dynsym != NULL
181      && htab->elf.dynsym->contents != NULL)
182    {
183      /* Check relocation against STT_GNU_IFUNC symbol if there are
184	 dynamic symbols.  */
185      unsigned long r_symndx = htab->r_symndx (rela->r_info);
186      if (r_symndx != STN_UNDEF)
187	{
188	  Elf_Internal_Sym sym;
189	  if (!bed->s->swap_symbol_in (abfd,
190				       (htab->elf.dynsym->contents
191					+ r_symndx * bed->s->sizeof_sym),
192				       0, &sym))
193	    abort ();
194
195	  if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
196	    return reloc_class_ifunc;
197	}
198    }
199
200  switch ((int) ELF32_R_TYPE (rela->r_info))
201    {
202    case R_SPARC_IRELATIVE:
203      return reloc_class_ifunc;
204    case R_SPARC_RELATIVE:
205      return reloc_class_relative;
206    case R_SPARC_JMP_SLOT:
207      return reloc_class_plt;
208    case R_SPARC_COPY:
209      return reloc_class_copy;
210    default:
211      return reloc_class_normal;
212    }
213}
214
215#define TARGET_BIG_SYM	sparc_elf32_vec
216#define TARGET_BIG_NAME	"elf32-sparc"
217#define ELF_ARCH	bfd_arch_sparc
218#define ELF_TARGET_ID	SPARC_ELF_DATA
219#define ELF_MACHINE_CODE EM_SPARC
220#define ELF_MACHINE_ALT1 EM_SPARC32PLUS
221#define ELF_MAXPAGESIZE 0x10000
222#define ELF_COMMONPAGESIZE 0x2000
223
224#define bfd_elf32_bfd_merge_private_bfd_data \
225					elf32_sparc_merge_private_bfd_data
226#define elf_backend_final_write_processing \
227					elf32_sparc_final_write_processing
228#define elf_backend_grok_psinfo		elf32_sparc_grok_psinfo
229#define elf_backend_reloc_type_class	elf32_sparc_reloc_type_class
230
231#define elf_info_to_howto		_bfd_sparc_elf_info_to_howto
232#define bfd_elf32_bfd_reloc_type_lookup	_bfd_sparc_elf_reloc_type_lookup
233#define bfd_elf32_bfd_reloc_name_lookup \
234  _bfd_sparc_elf_reloc_name_lookup
235#define bfd_elf32_bfd_link_hash_table_create \
236					_bfd_sparc_elf_link_hash_table_create
237#define bfd_elf32_bfd_relax_section	_bfd_sparc_elf_relax_section
238#define bfd_elf32_new_section_hook	_bfd_sparc_elf_new_section_hook
239#define elf_backend_copy_indirect_symbol \
240					_bfd_sparc_elf_copy_indirect_symbol
241#define elf_backend_create_dynamic_sections \
242					_bfd_sparc_elf_create_dynamic_sections
243#define elf_backend_check_relocs	_bfd_sparc_elf_check_relocs
244#define elf_backend_adjust_dynamic_symbol \
245					_bfd_sparc_elf_adjust_dynamic_symbol
246#define elf_backend_omit_section_dynsym	_bfd_sparc_elf_omit_section_dynsym
247#define elf_backend_size_dynamic_sections \
248					_bfd_sparc_elf_size_dynamic_sections
249#define elf_backend_relocate_section	_bfd_sparc_elf_relocate_section
250#define elf_backend_finish_dynamic_symbol \
251					_bfd_sparc_elf_finish_dynamic_symbol
252#define elf_backend_finish_dynamic_sections \
253					_bfd_sparc_elf_finish_dynamic_sections
254#define bfd_elf32_mkobject		_bfd_sparc_elf_mkobject
255#define elf_backend_object_p		_bfd_sparc_elf_object_p
256#define elf_backend_gc_mark_hook	_bfd_sparc_elf_gc_mark_hook
257#define elf_backend_plt_sym_val		_bfd_sparc_elf_plt_sym_val
258#define elf_backend_init_index_section	_bfd_elf_init_1_index_section
259#define elf_backend_fixup_symbol	_bfd_sparc_elf_fixup_symbol
260
261#define elf_backend_can_gc_sections 1
262#define elf_backend_can_refcount 1
263#define elf_backend_want_got_plt 0
264#define elf_backend_plt_readonly 0
265#define elf_backend_want_plt_sym 1
266#define elf_backend_got_header_size 4
267#define elf_backend_want_dynrelro 1
268#define elf_backend_rela_normal 1
269
270#define elf_backend_linux_prpsinfo32_ugid16	TRUE
271
272#include "elf32-target.h"
273
274/* Solaris 2.  */
275
276#undef	TARGET_BIG_SYM
277#define	TARGET_BIG_SYM				sparc_elf32_sol2_vec
278#undef	TARGET_BIG_NAME
279#define	TARGET_BIG_NAME				"elf32-sparc-sol2"
280
281#undef elf32_bed
282#define elf32_bed				elf32_sparc_sol2_bed
283
284/* The 32-bit static TLS arena size is rounded to the nearest 8-byte
285   boundary.  */
286#undef	elf_backend_static_tls_alignment
287#define elf_backend_static_tls_alignment	8
288
289#undef	elf_backend_strtab_flags
290#define elf_backend_strtab_flags	SHF_STRINGS
291
292static bfd_boolean
293elf32_sparc_copy_solaris_special_section_fields (const bfd *ibfd ATTRIBUTE_UNUSED,
294						 bfd *obfd ATTRIBUTE_UNUSED,
295						 const Elf_Internal_Shdr *isection ATTRIBUTE_UNUSED,
296						 Elf_Internal_Shdr *osection ATTRIBUTE_UNUSED)
297{
298  /* PR 19938: FIXME: Need to add code for setting the sh_info
299     and sh_link fields of Solaris specific section types.  */
300  return FALSE;
301}
302
303#undef  elf_backend_copy_special_section_fields
304#define elf_backend_copy_special_section_fields elf32_sparc_copy_solaris_special_section_fields
305
306#include "elf32-target.h"
307
308/* A wrapper around _bfd_sparc_elf_link_hash_table_create that identifies
309   the target system as VxWorks.  */
310
311static struct bfd_link_hash_table *
312elf32_sparc_vxworks_link_hash_table_create (bfd *abfd)
313{
314  struct bfd_link_hash_table *ret;
315
316  ret = _bfd_sparc_elf_link_hash_table_create (abfd);
317  if (ret)
318    {
319      struct _bfd_sparc_elf_link_hash_table *htab;
320
321      htab = (struct _bfd_sparc_elf_link_hash_table *) ret;
322      htab->is_vxworks = 1;
323    }
324  return ret;
325}
326
327/* A final_write_processing hook that does both the SPARC- and VxWorks-
328   specific handling.  */
329
330static bfd_boolean
331elf32_sparc_vxworks_final_write_processing (bfd *abfd)
332{
333  sparc_final_write_processing (abfd);
334  return elf_vxworks_final_write_processing (abfd);
335}
336
337#undef  TARGET_BIG_SYM
338#define TARGET_BIG_SYM	sparc_elf32_vxworks_vec
339#undef  TARGET_BIG_NAME
340#define TARGET_BIG_NAME	"elf32-sparc-vxworks"
341
342#undef  ELF_MINPAGESIZE
343#define ELF_MINPAGESIZE	0x1000
344
345#undef bfd_elf32_bfd_link_hash_table_create
346#define bfd_elf32_bfd_link_hash_table_create \
347  elf32_sparc_vxworks_link_hash_table_create
348
349#undef  elf_backend_want_got_plt
350#define elf_backend_want_got_plt		1
351#undef  elf_backend_plt_readonly
352#define elf_backend_plt_readonly		1
353#undef  elf_backend_got_header_size
354#define elf_backend_got_header_size		12
355#undef  elf_backend_dtrel_excludes_plt
356#define elf_backend_dtrel_excludes_plt		1
357#undef  elf_backend_add_symbol_hook
358#define elf_backend_add_symbol_hook \
359  elf_vxworks_add_symbol_hook
360#undef  elf_backend_link_output_symbol_hook
361#define elf_backend_link_output_symbol_hook \
362  elf_vxworks_link_output_symbol_hook
363#undef  elf_backend_emit_relocs
364#define elf_backend_emit_relocs \
365  elf_vxworks_emit_relocs
366#undef  elf_backend_final_write_processing
367#define elf_backend_final_write_processing \
368  elf32_sparc_vxworks_final_write_processing
369#undef  elf_backend_static_tls_alignment
370#undef  elf_backend_strtab_flags
371#undef  elf_backend_copy_special_section_fields
372
373#undef  elf32_bed
374#define elf32_bed				sparc_elf_vxworks_bed
375
376#include "elf32-target.h"
377