xref: /netbsd-src/external/gpl3/binutils.old/dist/bfd/elf32-sparc.c (revision d16b7486a53dcb8072b60ec6fcb4373a2d0c27b7)
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     default :
154       abort ();
155       break;
156     }
157 }
158 
159 static bfd_boolean
160 elf32_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 
169 static enum elf_reloc_type_class
170 elf32_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 
292 static bfd_boolean
293 elf32_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 
311 static struct bfd_link_hash_table *
312 elf32_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 
330 static bfd_boolean
331 elf32_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