* elf32-sh.c (sh_elf_size_dynamic_sections): Create .interp section
[platform/upstream/binutils.git] / bfd / elf32-sh.c
1 /* Renesas / SuperH SH specific support for 32-bit ELF
2    Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
3    Free Software Foundation, Inc.
4    Contributed by Ian Lance Taylor, Cygnus Support.
5
6    This file is part of BFD, the Binary File Descriptor library.
7
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 2 of the License, or
11    (at your option) any later version.
12
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
21
22 #include "bfd.h"
23 #include "sysdep.h"
24 #include "bfdlink.h"
25 #include "libbfd.h"
26 #include "elf-bfd.h"
27 #include "elf/sh.h"
28
29 static bfd_reloc_status_type sh_elf_reloc
30   PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
31 static bfd_reloc_status_type sh_elf_ignore_reloc
32   PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
33 static reloc_howto_type *sh_elf_reloc_type_lookup
34   PARAMS ((bfd *, bfd_reloc_code_real_type));
35 static void sh_elf_info_to_howto
36   PARAMS ((bfd *, arelent *, Elf_Internal_Rela *));
37 static bfd_boolean sh_elf_set_private_flags
38   PARAMS ((bfd *, flagword));
39 static bfd_boolean sh_elf_copy_private_data
40   PARAMS ((bfd *, bfd *));
41 static bfd_boolean sh_elf_merge_private_data
42   PARAMS ((bfd *, bfd *));
43 static bfd_boolean sh_elf_set_mach_from_flags
44   PARAMS ((bfd *));
45 static bfd_boolean sh_elf_relax_section
46   PARAMS ((bfd *, asection *, struct bfd_link_info *, bfd_boolean *));
47 static bfd_boolean sh_elf_relax_delete_bytes
48   PARAMS ((bfd *, asection *, bfd_vma, int));
49 static bfd_boolean sh_elf_align_loads
50   PARAMS ((bfd *, asection *, Elf_Internal_Rela *, bfd_byte *, bfd_boolean *));
51 static bfd_boolean sh_elf_swap_insns
52   PARAMS ((bfd *, asection *, PTR, bfd_byte *, bfd_vma));
53 static bfd_boolean sh_elf_relocate_section
54   PARAMS ((bfd *, struct bfd_link_info *, bfd *, asection *, bfd_byte *,
55            Elf_Internal_Rela *, Elf_Internal_Sym *, asection **));
56 static bfd_byte *sh_elf_get_relocated_section_contents
57   PARAMS ((bfd *, struct bfd_link_info *, struct bfd_link_order *,
58            bfd_byte *, bfd_boolean, asymbol **));
59 static void sh_elf_copy_indirect_symbol
60   PARAMS ((struct elf_backend_data *, struct elf_link_hash_entry *,
61            struct elf_link_hash_entry *));
62 static int sh_elf_optimized_tls_reloc
63   PARAMS ((struct bfd_link_info *, int, int));
64 static bfd_boolean sh_elf_mkobject
65   PARAMS ((bfd *));
66 static bfd_boolean sh_elf_object_p
67   PARAMS ((bfd *));
68 static bfd_boolean sh_elf_check_relocs
69   PARAMS ((bfd *, struct bfd_link_info *, asection *,
70            const Elf_Internal_Rela *));
71 static struct bfd_hash_entry *sh_elf_link_hash_newfunc
72   PARAMS ((struct bfd_hash_entry *, struct bfd_hash_table *, const char *));
73 static struct bfd_link_hash_table *sh_elf_link_hash_table_create
74   PARAMS ((bfd *));
75 static bfd_boolean sh_elf_adjust_dynamic_symbol
76   PARAMS ((struct bfd_link_info *, struct elf_link_hash_entry *));
77 static bfd_boolean sh_elf_size_dynamic_sections
78   PARAMS ((bfd *, struct bfd_link_info *));
79 static bfd_boolean sh_elf_finish_dynamic_symbol
80   PARAMS ((bfd *, struct bfd_link_info *, struct elf_link_hash_entry *,
81            Elf_Internal_Sym *));
82 static bfd_boolean sh_elf_finish_dynamic_sections
83   PARAMS ((bfd *, struct bfd_link_info *));
84 static bfd_reloc_status_type sh_elf_reloc_loop
85   PARAMS ((int, bfd *, asection *, bfd_byte *, bfd_vma, asection *,
86            bfd_vma, bfd_vma));
87 static bfd_boolean create_got_section
88   PARAMS ((bfd *, struct bfd_link_info *));
89 static bfd_boolean sh_elf_create_dynamic_sections
90   PARAMS ((bfd *, struct bfd_link_info *));
91 static bfd_vma dtpoff_base
92   PARAMS ((struct bfd_link_info *));
93 static bfd_vma tpoff
94   PARAMS ((struct bfd_link_info *, bfd_vma));
95 static asection * sh_elf_gc_mark_hook
96   PARAMS ((asection *, struct bfd_link_info *, Elf_Internal_Rela *,
97            struct elf_link_hash_entry *, Elf_Internal_Sym *));
98 static bfd_boolean sh_elf_gc_sweep_hook
99   PARAMS ((bfd *, struct bfd_link_info *, asection *,
100            const Elf_Internal_Rela *));
101 static bfd_boolean allocate_dynrelocs
102   PARAMS ((struct elf_link_hash_entry *, PTR));
103 static bfd_boolean readonly_dynrelocs
104   PARAMS ((struct elf_link_hash_entry *, PTR));
105 static enum elf_reloc_type_class sh_elf_reloc_type_class
106   PARAMS ((const Elf_Internal_Rela *));
107 #ifdef INCLUDE_SHMEDIA
108 inline static void movi_shori_putval PARAMS ((bfd *, unsigned long, char *));
109 #endif
110 static bfd_boolean elf32_shlin_grok_prstatus
111   PARAMS ((bfd *abfd, Elf_Internal_Note *note));
112 static bfd_boolean elf32_shlin_grok_psinfo
113   PARAMS ((bfd *abfd, Elf_Internal_Note *note));
114
115 /* The name of the dynamic interpreter.  This is put in the .interp
116    section.  */
117
118 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/libc.so.1"
119
120 static reloc_howto_type sh_elf_howto_table[] =
121 {
122   /* No relocation.  */
123   HOWTO (R_SH_NONE,             /* type */
124          0,                     /* rightshift */
125          0,                     /* size (0 = byte, 1 = short, 2 = long) */
126          0,                     /* bitsize */
127          FALSE,                 /* pc_relative */
128          0,                     /* bitpos */
129          complain_overflow_dont, /* complain_on_overflow */
130          sh_elf_ignore_reloc,   /* special_function */
131          "R_SH_NONE",           /* name */
132          FALSE,                 /* partial_inplace */
133          0,                     /* src_mask */
134          0,                     /* dst_mask */
135          FALSE),                /* pcrel_offset */
136
137   /* 32 bit absolute relocation.  Setting partial_inplace to TRUE and
138      src_mask to a non-zero value is similar to the COFF toolchain.  */
139   HOWTO (R_SH_DIR32,            /* type */
140          0,                     /* rightshift */
141          2,                     /* size (0 = byte, 1 = short, 2 = long) */
142          32,                    /* bitsize */
143          FALSE,                 /* pc_relative */
144          0,                     /* bitpos */
145          complain_overflow_bitfield, /* complain_on_overflow */
146          sh_elf_reloc,          /* special_function */
147          "R_SH_DIR32",          /* name */
148          TRUE,                  /* partial_inplace */
149          0xffffffff,            /* src_mask */
150          0xffffffff,            /* dst_mask */
151          FALSE),                /* pcrel_offset */
152
153   /* 32 bit PC relative relocation.  */
154   HOWTO (R_SH_REL32,            /* type */
155          0,                     /* rightshift */
156          2,                     /* size (0 = byte, 1 = short, 2 = long) */
157          32,                    /* bitsize */
158          TRUE,                  /* pc_relative */
159          0,                     /* bitpos */
160          complain_overflow_signed, /* complain_on_overflow */
161          sh_elf_ignore_reloc,   /* special_function */
162          "R_SH_REL32",          /* name */
163          TRUE,                  /* partial_inplace */
164          0xffffffff,            /* src_mask */
165          0xffffffff,            /* dst_mask */
166          TRUE),                 /* pcrel_offset */
167
168   /* 8 bit PC relative branch divided by 2.  */
169   HOWTO (R_SH_DIR8WPN,          /* type */
170          1,                     /* rightshift */
171          1,                     /* size (0 = byte, 1 = short, 2 = long) */
172          8,                     /* bitsize */
173          TRUE,                  /* pc_relative */
174          0,                     /* bitpos */
175          complain_overflow_signed, /* complain_on_overflow */
176          sh_elf_ignore_reloc,   /* special_function */
177          "R_SH_DIR8WPN",        /* name */
178          TRUE,                  /* partial_inplace */
179          0xff,                  /* src_mask */
180          0xff,                  /* dst_mask */
181          TRUE),                 /* pcrel_offset */
182
183   /* 12 bit PC relative branch divided by 2.  */
184   /* This cannot be partial_inplace because relaxation can't know the
185      eventual value of a symbol.  */
186   HOWTO (R_SH_IND12W,           /* type */
187          1,                     /* rightshift */
188          1,                     /* size (0 = byte, 1 = short, 2 = long) */
189          12,                    /* bitsize */
190          TRUE,                  /* pc_relative */
191          0,                     /* bitpos */
192          complain_overflow_signed, /* complain_on_overflow */
193          NULL,                  /* special_function */
194          "R_SH_IND12W",         /* name */
195          FALSE,                 /* partial_inplace */
196          0x0,                   /* src_mask */
197          0xfff,                 /* dst_mask */
198          TRUE),                 /* pcrel_offset */
199
200   /* 8 bit unsigned PC relative divided by 4.  */
201   HOWTO (R_SH_DIR8WPL,          /* type */
202          2,                     /* rightshift */
203          1,                     /* size (0 = byte, 1 = short, 2 = long) */
204          8,                     /* bitsize */
205          TRUE,                  /* pc_relative */
206          0,                     /* bitpos */
207          complain_overflow_unsigned, /* complain_on_overflow */
208          sh_elf_ignore_reloc,   /* special_function */
209          "R_SH_DIR8WPL",        /* name */
210          TRUE,                  /* partial_inplace */
211          0xff,                  /* src_mask */
212          0xff,                  /* dst_mask */
213          TRUE),                 /* pcrel_offset */
214
215   /* 8 bit unsigned PC relative divided by 2.  */
216   HOWTO (R_SH_DIR8WPZ,          /* type */
217          1,                     /* rightshift */
218          1,                     /* size (0 = byte, 1 = short, 2 = long) */
219          8,                     /* bitsize */
220          TRUE,                  /* pc_relative */
221          0,                     /* bitpos */
222          complain_overflow_unsigned, /* complain_on_overflow */
223          sh_elf_ignore_reloc,   /* special_function */
224          "R_SH_DIR8WPZ",        /* name */
225          TRUE,                  /* partial_inplace */
226          0xff,                  /* src_mask */
227          0xff,                  /* dst_mask */
228          TRUE),                 /* pcrel_offset */
229
230   /* 8 bit GBR relative.  FIXME: This only makes sense if we have some
231      special symbol for the GBR relative area, and that is not
232      implemented.  */
233   HOWTO (R_SH_DIR8BP,           /* type */
234          0,                     /* rightshift */
235          1,                     /* size (0 = byte, 1 = short, 2 = long) */
236          8,                     /* bitsize */
237          FALSE,                 /* pc_relative */
238          0,                     /* bitpos */
239          complain_overflow_unsigned, /* complain_on_overflow */
240          sh_elf_ignore_reloc,   /* special_function */
241          "R_SH_DIR8BP",         /* name */
242          FALSE,                 /* partial_inplace */
243          0,                     /* src_mask */
244          0xff,                  /* dst_mask */
245          TRUE),                 /* pcrel_offset */
246
247   /* 8 bit GBR relative divided by 2.  FIXME: This only makes sense if
248      we have some special symbol for the GBR relative area, and that
249      is not implemented.  */
250   HOWTO (R_SH_DIR8W,            /* type */
251          1,                     /* rightshift */
252          1,                     /* size (0 = byte, 1 = short, 2 = long) */
253          8,                     /* bitsize */
254          FALSE,                 /* pc_relative */
255          0,                     /* bitpos */
256          complain_overflow_unsigned, /* complain_on_overflow */
257          sh_elf_ignore_reloc,   /* special_function */
258          "R_SH_DIR8W",          /* name */
259          FALSE,                 /* partial_inplace */
260          0,                     /* src_mask */
261          0xff,                  /* dst_mask */
262          TRUE),                 /* pcrel_offset */
263
264   /* 8 bit GBR relative divided by 4.  FIXME: This only makes sense if
265      we have some special symbol for the GBR relative area, and that
266      is not implemented.  */
267   HOWTO (R_SH_DIR8L,            /* type */
268          2,                     /* rightshift */
269          1,                     /* size (0 = byte, 1 = short, 2 = long) */
270          8,                     /* bitsize */
271          FALSE,                 /* pc_relative */
272          0,                     /* bitpos */
273          complain_overflow_unsigned, /* complain_on_overflow */
274          sh_elf_ignore_reloc,   /* special_function */
275          "R_SH_DIR8L",          /* name */
276          FALSE,                 /* partial_inplace */
277          0,                     /* src_mask */
278          0xff,                  /* dst_mask */
279          TRUE),                 /* pcrel_offset */
280
281   EMPTY_HOWTO (10),
282   EMPTY_HOWTO (11),
283   EMPTY_HOWTO (12),
284   EMPTY_HOWTO (13),
285   EMPTY_HOWTO (14),
286   EMPTY_HOWTO (15),
287   EMPTY_HOWTO (16),
288   EMPTY_HOWTO (17),
289   EMPTY_HOWTO (18),
290   EMPTY_HOWTO (19),
291   EMPTY_HOWTO (20),
292   EMPTY_HOWTO (21),
293   EMPTY_HOWTO (22),
294   EMPTY_HOWTO (23),
295   EMPTY_HOWTO (24),
296
297   /* The remaining relocs are a GNU extension used for relaxing.  The
298      final pass of the linker never needs to do anything with any of
299      these relocs.  Any required operations are handled by the
300      relaxation code.  */
301
302   /* A 16 bit switch table entry.  This is generated for an expression
303      such as ``.word L1 - L2''.  The offset holds the difference
304      between the reloc address and L2.  */
305   HOWTO (R_SH_SWITCH16,         /* type */
306          0,                     /* rightshift */
307          1,                     /* size (0 = byte, 1 = short, 2 = long) */
308          16,                    /* bitsize */
309          FALSE,                 /* pc_relative */
310          0,                     /* bitpos */
311          complain_overflow_unsigned, /* complain_on_overflow */
312          sh_elf_ignore_reloc,   /* special_function */
313          "R_SH_SWITCH16",       /* name */
314          FALSE,                 /* partial_inplace */
315          0,                     /* src_mask */
316          0,                     /* dst_mask */
317          TRUE),                 /* pcrel_offset */
318
319   /* A 32 bit switch table entry.  This is generated for an expression
320      such as ``.long L1 - L2''.  The offset holds the difference
321      between the reloc address and L2.  */
322   HOWTO (R_SH_SWITCH32,         /* type */
323          0,                     /* rightshift */
324          2,                     /* size (0 = byte, 1 = short, 2 = long) */
325          32,                    /* bitsize */
326          FALSE,                 /* pc_relative */
327          0,                     /* bitpos */
328          complain_overflow_unsigned, /* complain_on_overflow */
329          sh_elf_ignore_reloc,   /* special_function */
330          "R_SH_SWITCH32",       /* name */
331          FALSE,                 /* partial_inplace */
332          0,                     /* src_mask */
333          0,                     /* dst_mask */
334          TRUE),                 /* pcrel_offset */
335
336   /* Indicates a .uses pseudo-op.  The compiler will generate .uses
337      pseudo-ops when it finds a function call which can be relaxed.
338      The offset field holds the PC relative offset to the instruction
339      which loads the register used in the function call.  */
340   HOWTO (R_SH_USES,             /* type */
341          0,                     /* rightshift */
342          1,                     /* size (0 = byte, 1 = short, 2 = long) */
343          0,                     /* bitsize */
344          FALSE,                 /* pc_relative */
345          0,                     /* bitpos */
346          complain_overflow_unsigned, /* complain_on_overflow */
347          sh_elf_ignore_reloc,   /* special_function */
348          "R_SH_USES",           /* name */
349          FALSE,                 /* partial_inplace */
350          0,                     /* src_mask */
351          0,                     /* dst_mask */
352          TRUE),                 /* pcrel_offset */
353
354   /* The assembler will generate this reloc for addresses referred to
355      by the register loads associated with USES relocs.  The offset
356      field holds the number of times the address is referenced in the
357      object file.  */
358   HOWTO (R_SH_COUNT,            /* type */
359          0,                     /* rightshift */
360          1,                     /* size (0 = byte, 1 = short, 2 = long) */
361          0,                     /* bitsize */
362          FALSE,                 /* pc_relative */
363          0,                     /* bitpos */
364          complain_overflow_unsigned, /* complain_on_overflow */
365          sh_elf_ignore_reloc,   /* special_function */
366          "R_SH_COUNT",          /* name */
367          FALSE,                 /* partial_inplace */
368          0,                     /* src_mask */
369          0,                     /* dst_mask */
370          TRUE),                 /* pcrel_offset */
371
372   /* Indicates an alignment statement.  The offset field is the power
373      of 2 to which subsequent portions of the object file must be
374      aligned.  */
375   HOWTO (R_SH_ALIGN,            /* type */
376          0,                     /* rightshift */
377          1,                     /* size (0 = byte, 1 = short, 2 = long) */
378          0,                     /* bitsize */
379          FALSE,                 /* pc_relative */
380          0,                     /* bitpos */
381          complain_overflow_unsigned, /* complain_on_overflow */
382          sh_elf_ignore_reloc,   /* special_function */
383          "R_SH_ALIGN",  /* name */
384          FALSE,                 /* partial_inplace */
385          0,                     /* src_mask */
386          0,                     /* dst_mask */
387          TRUE),                 /* pcrel_offset */
388
389   /* The assembler will generate this reloc before a block of
390      instructions.  A section should be processed as assumining it
391      contains data, unless this reloc is seen.  */
392   HOWTO (R_SH_CODE,             /* type */
393          0,                     /* rightshift */
394          1,                     /* size (0 = byte, 1 = short, 2 = long) */
395          0,                     /* bitsize */
396          FALSE,                 /* pc_relative */
397          0,                     /* bitpos */
398          complain_overflow_unsigned, /* complain_on_overflow */
399          sh_elf_ignore_reloc,   /* special_function */
400          "R_SH_CODE",           /* name */
401          FALSE,                 /* partial_inplace */
402          0,                     /* src_mask */
403          0,                     /* dst_mask */
404          TRUE),                 /* pcrel_offset */
405
406   /* The assembler will generate this reloc after a block of
407      instructions when it sees data that is not instructions.  */
408   HOWTO (R_SH_DATA,             /* type */
409          0,                     /* rightshift */
410          1,                     /* size (0 = byte, 1 = short, 2 = long) */
411          0,                     /* bitsize */
412          FALSE,                 /* pc_relative */
413          0,                     /* bitpos */
414          complain_overflow_unsigned, /* complain_on_overflow */
415          sh_elf_ignore_reloc,   /* special_function */
416          "R_SH_DATA",           /* name */
417          FALSE,                 /* partial_inplace */
418          0,                     /* src_mask */
419          0,                     /* dst_mask */
420          TRUE),                 /* pcrel_offset */
421
422   /* The assembler generates this reloc for each label within a block
423      of instructions.  This permits the linker to avoid swapping
424      instructions which are the targets of branches.  */
425   HOWTO (R_SH_LABEL,            /* type */
426          0,                     /* rightshift */
427          1,                     /* size (0 = byte, 1 = short, 2 = long) */
428          0,                     /* bitsize */
429          FALSE,                 /* pc_relative */
430          0,                     /* bitpos */
431          complain_overflow_unsigned, /* complain_on_overflow */
432          sh_elf_ignore_reloc,   /* special_function */
433          "R_SH_LABEL",          /* name */
434          FALSE,                 /* partial_inplace */
435          0,                     /* src_mask */
436          0,                     /* dst_mask */
437          TRUE),                 /* pcrel_offset */
438
439   /* An 8 bit switch table entry.  This is generated for an expression
440      such as ``.word L1 - L2''.  The offset holds the difference
441      between the reloc address and L2.  */
442   HOWTO (R_SH_SWITCH8,          /* type */
443          0,                     /* rightshift */
444          0,                     /* size (0 = byte, 1 = short, 2 = long) */
445          8,                     /* bitsize */
446          FALSE,                 /* pc_relative */
447          0,                     /* bitpos */
448          complain_overflow_unsigned, /* complain_on_overflow */
449          sh_elf_ignore_reloc,   /* special_function */
450          "R_SH_SWITCH8",        /* name */
451          FALSE,                 /* partial_inplace */
452          0,                     /* src_mask */
453          0,                     /* dst_mask */
454          TRUE),                 /* pcrel_offset */
455
456   /* GNU extension to record C++ vtable hierarchy */
457   HOWTO (R_SH_GNU_VTINHERIT, /* type */
458          0,                     /* rightshift */
459          2,                     /* size (0 = byte, 1 = short, 2 = long) */
460          0,                     /* bitsize */
461          FALSE,                 /* pc_relative */
462          0,                     /* bitpos */
463          complain_overflow_dont, /* complain_on_overflow */
464          NULL,                  /* special_function */
465          "R_SH_GNU_VTINHERIT", /* name */
466          FALSE,                 /* partial_inplace */
467          0,                     /* src_mask */
468          0,                     /* dst_mask */
469          FALSE),                /* pcrel_offset */
470
471   /* GNU extension to record C++ vtable member usage */
472   HOWTO (R_SH_GNU_VTENTRY,     /* type */
473          0,                     /* rightshift */
474          2,                     /* size (0 = byte, 1 = short, 2 = long) */
475          0,                     /* bitsize */
476          FALSE,                 /* pc_relative */
477          0,                     /* bitpos */
478          complain_overflow_dont, /* complain_on_overflow */
479          _bfd_elf_rel_vtable_reloc_fn,  /* special_function */
480          "R_SH_GNU_VTENTRY",   /* name */
481          FALSE,                 /* partial_inplace */
482          0,                     /* src_mask */
483          0,                     /* dst_mask */
484          FALSE),                /* pcrel_offset */
485
486   /* 8 bit PC relative divided by 2 - but specified in a very odd way.  */
487   HOWTO (R_SH_LOOP_START,       /* type */
488          1,                     /* rightshift */
489          1,                     /* size (0 = byte, 1 = short, 2 = long) */
490          8,                     /* bitsize */
491          FALSE,                 /* pc_relative */
492          0,                     /* bitpos */
493          complain_overflow_signed, /* complain_on_overflow */
494          sh_elf_ignore_reloc,   /* special_function */
495          "R_SH_LOOP_START",     /* name */
496          TRUE,                  /* partial_inplace */
497          0xff,                  /* src_mask */
498          0xff,                  /* dst_mask */
499          TRUE),                 /* pcrel_offset */
500
501   /* 8 bit PC relative divided by 2 - but specified in a very odd way.  */
502   HOWTO (R_SH_LOOP_END,         /* type */
503          1,                     /* rightshift */
504          1,                     /* size (0 = byte, 1 = short, 2 = long) */
505          8,                     /* bitsize */
506          FALSE,                 /* pc_relative */
507          0,                     /* bitpos */
508          complain_overflow_signed, /* complain_on_overflow */
509          sh_elf_ignore_reloc,   /* special_function */
510          "R_SH_LOOP_END",       /* name */
511          TRUE,                  /* partial_inplace */
512          0xff,                  /* src_mask */
513          0xff,                  /* dst_mask */
514          TRUE),                 /* pcrel_offset */
515
516   EMPTY_HOWTO (38),
517   EMPTY_HOWTO (39),
518   EMPTY_HOWTO (40),
519   EMPTY_HOWTO (41),
520   EMPTY_HOWTO (42),
521   EMPTY_HOWTO (43),
522   EMPTY_HOWTO (44),
523
524 #ifdef INCLUDE_SHMEDIA
525   /* Used in SHLLI.L and SHLRI.L.  */
526   HOWTO (R_SH_DIR5U,            /* type */
527          0,                     /* rightshift */
528          2,                     /* size (0 = byte, 1 = short, 2 = long) */
529          5,                     /* bitsize */
530          FALSE,                 /* pc_relative */
531          10,                    /* bitpos */
532          complain_overflow_unsigned, /* complain_on_overflow */
533          bfd_elf_generic_reloc, /* special_function */
534          "R_SH_DIR5U",          /* name */
535          FALSE,                 /* partial_inplace */
536          0,                     /* src_mask */
537          0xfc00,                /* dst_mask */
538          FALSE),                /* pcrel_offset */
539
540   /* Used in SHARI, SHLLI et al.  */
541   HOWTO (R_SH_DIR6U,            /* type */
542          0,                     /* rightshift */
543          2,                     /* size (0 = byte, 1 = short, 2 = long) */
544          6,                     /* bitsize */
545          FALSE,                 /* pc_relative */
546          10,                    /* bitpos */
547          complain_overflow_unsigned, /* complain_on_overflow */
548          bfd_elf_generic_reloc, /* special_function */
549          "R_SH_DIR6U",          /* name */
550          FALSE,                 /* partial_inplace */
551          0,                     /* src_mask */
552          0xfc00,                /* dst_mask */
553          FALSE),                /* pcrel_offset */
554
555   /* Used in BxxI, LDHI.L et al.  */
556   HOWTO (R_SH_DIR6S,            /* type */
557          0,                     /* rightshift */
558          2,                     /* size (0 = byte, 1 = short, 2 = long) */
559          6,                     /* bitsize */
560          FALSE,                 /* pc_relative */
561          10,                    /* bitpos */
562          complain_overflow_signed, /* complain_on_overflow */
563          bfd_elf_generic_reloc, /* special_function */
564          "R_SH_DIR6S",          /* name */
565          FALSE,                 /* partial_inplace */
566          0,                     /* src_mask */
567          0xfc00,                /* dst_mask */
568          FALSE),                /* pcrel_offset */
569
570   /* Used in ADDI, ANDI et al.  */
571   HOWTO (R_SH_DIR10S,           /* type */
572          0,                     /* rightshift */
573          2,                     /* size (0 = byte, 1 = short, 2 = long) */
574          10,                    /* bitsize */
575          FALSE,                 /* pc_relative */
576          10,                    /* bitpos */
577          complain_overflow_signed, /* complain_on_overflow */
578          bfd_elf_generic_reloc, /* special_function */
579          "R_SH_DIR10S",         /* name */
580          FALSE,                 /* partial_inplace */
581          0,                     /* src_mask */
582          0xffc00,               /* dst_mask */
583          FALSE),                /* pcrel_offset */
584
585   /* Used in LD.UW, ST.W et al.  */
586   HOWTO (R_SH_DIR10SW,  /* type */
587          1,                     /* rightshift */
588          2,                     /* size (0 = byte, 1 = short, 2 = long) */
589          11,                    /* bitsize */
590          FALSE,                 /* pc_relative */
591          10,                    /* bitpos */
592          complain_overflow_signed, /* complain_on_overflow */
593          bfd_elf_generic_reloc, /* special_function */
594          "R_SH_DIR10SW",        /* name */
595          FALSE,                 /* partial_inplace */
596          0,                     /* src_mask */
597          0xffc00,               /* dst_mask */
598          FALSE),                /* pcrel_offset */
599
600   /* Used in LD.L, FLD.S et al.  */
601   HOWTO (R_SH_DIR10SL,  /* type */
602          2,                     /* rightshift */
603          2,                     /* size (0 = byte, 1 = short, 2 = long) */
604          12,                    /* bitsize */
605          FALSE,                 /* pc_relative */
606          10,                    /* bitpos */
607          complain_overflow_signed, /* complain_on_overflow */
608          bfd_elf_generic_reloc, /* special_function */
609          "R_SH_DIR10SL",        /* name */
610          FALSE,                 /* partial_inplace */
611          0,                     /* src_mask */
612          0xffc00,               /* dst_mask */
613          FALSE),                /* pcrel_offset */
614
615   /* Used in FLD.D, FST.P et al.  */
616   HOWTO (R_SH_DIR10SQ,  /* type */
617          3,                     /* rightshift */
618          2,                     /* size (0 = byte, 1 = short, 2 = long) */
619          13,                    /* bitsize */
620          FALSE,                 /* pc_relative */
621          10,                    /* bitpos */
622          complain_overflow_signed, /* complain_on_overflow */
623          bfd_elf_generic_reloc, /* special_function */
624          "R_SH_DIR10SQ",        /* name */
625          FALSE,                 /* partial_inplace */
626          0,                     /* src_mask */
627          0xffc00,               /* dst_mask */
628          FALSE),                /* pcrel_offset */
629
630 #else
631   EMPTY_HOWTO (45),
632   EMPTY_HOWTO (46),
633   EMPTY_HOWTO (47),
634   EMPTY_HOWTO (48),
635   EMPTY_HOWTO (49),
636   EMPTY_HOWTO (50),
637   EMPTY_HOWTO (51),
638 #endif
639
640   EMPTY_HOWTO (52),
641   EMPTY_HOWTO (53),
642   EMPTY_HOWTO (54),
643   EMPTY_HOWTO (55),
644   EMPTY_HOWTO (56),
645   EMPTY_HOWTO (57),
646   EMPTY_HOWTO (58),
647   EMPTY_HOWTO (59),
648   EMPTY_HOWTO (60),
649   EMPTY_HOWTO (61),
650   EMPTY_HOWTO (62),
651   EMPTY_HOWTO (63),
652   EMPTY_HOWTO (64),
653   EMPTY_HOWTO (65),
654   EMPTY_HOWTO (66),
655   EMPTY_HOWTO (67),
656   EMPTY_HOWTO (68),
657   EMPTY_HOWTO (69),
658   EMPTY_HOWTO (70),
659   EMPTY_HOWTO (71),
660   EMPTY_HOWTO (72),
661   EMPTY_HOWTO (73),
662   EMPTY_HOWTO (74),
663   EMPTY_HOWTO (75),
664   EMPTY_HOWTO (76),
665   EMPTY_HOWTO (77),
666   EMPTY_HOWTO (78),
667   EMPTY_HOWTO (79),
668   EMPTY_HOWTO (80),
669   EMPTY_HOWTO (81),
670   EMPTY_HOWTO (82),
671   EMPTY_HOWTO (83),
672   EMPTY_HOWTO (84),
673   EMPTY_HOWTO (85),
674   EMPTY_HOWTO (86),
675   EMPTY_HOWTO (87),
676   EMPTY_HOWTO (88),
677   EMPTY_HOWTO (89),
678   EMPTY_HOWTO (90),
679   EMPTY_HOWTO (91),
680   EMPTY_HOWTO (92),
681   EMPTY_HOWTO (93),
682   EMPTY_HOWTO (94),
683   EMPTY_HOWTO (95),
684   EMPTY_HOWTO (96),
685   EMPTY_HOWTO (97),
686   EMPTY_HOWTO (98),
687   EMPTY_HOWTO (99),
688   EMPTY_HOWTO (100),
689   EMPTY_HOWTO (101),
690   EMPTY_HOWTO (102),
691   EMPTY_HOWTO (103),
692   EMPTY_HOWTO (104),
693   EMPTY_HOWTO (105),
694   EMPTY_HOWTO (106),
695   EMPTY_HOWTO (107),
696   EMPTY_HOWTO (108),
697   EMPTY_HOWTO (109),
698   EMPTY_HOWTO (110),
699   EMPTY_HOWTO (111),
700   EMPTY_HOWTO (112),
701   EMPTY_HOWTO (113),
702   EMPTY_HOWTO (114),
703   EMPTY_HOWTO (115),
704   EMPTY_HOWTO (116),
705   EMPTY_HOWTO (117),
706   EMPTY_HOWTO (118),
707   EMPTY_HOWTO (119),
708   EMPTY_HOWTO (120),
709   EMPTY_HOWTO (121),
710   EMPTY_HOWTO (122),
711   EMPTY_HOWTO (123),
712   EMPTY_HOWTO (124),
713   EMPTY_HOWTO (125),
714   EMPTY_HOWTO (126),
715   EMPTY_HOWTO (127),
716   EMPTY_HOWTO (128),
717   EMPTY_HOWTO (129),
718   EMPTY_HOWTO (130),
719   EMPTY_HOWTO (131),
720   EMPTY_HOWTO (132),
721   EMPTY_HOWTO (133),
722   EMPTY_HOWTO (134),
723   EMPTY_HOWTO (135),
724   EMPTY_HOWTO (136),
725   EMPTY_HOWTO (137),
726   EMPTY_HOWTO (138),
727   EMPTY_HOWTO (139),
728   EMPTY_HOWTO (140),
729   EMPTY_HOWTO (141),
730   EMPTY_HOWTO (142),
731   EMPTY_HOWTO (143),
732
733   HOWTO (R_SH_TLS_GD_32,        /* type */
734          0,                     /* rightshift */
735          2,                     /* size (0 = byte, 1 = short, 2 = long) */
736          32,                    /* bitsize */
737          FALSE,                 /* pc_relative */
738          0,                     /* bitpos */
739          complain_overflow_bitfield, /* complain_on_overflow */
740          bfd_elf_generic_reloc, /* */
741          "R_SH_TLS_GD_32",      /* name */
742          TRUE,                  /* partial_inplace */
743          0xffffffff,            /* src_mask */
744          0xffffffff,            /* dst_mask */
745          FALSE),                /* pcrel_offset */
746
747   HOWTO (R_SH_TLS_LD_32,        /* type */
748          0,                     /* rightshift */
749          2,                     /* size (0 = byte, 1 = short, 2 = long) */
750          32,                    /* bitsize */
751          FALSE,                 /* pc_relative */
752          0,                     /* bitpos */
753          complain_overflow_bitfield, /* complain_on_overflow */
754          bfd_elf_generic_reloc, /* */
755          "R_SH_TLS_LD_32",      /* name */
756          TRUE,                  /* partial_inplace */
757          0xffffffff,            /* src_mask */
758          0xffffffff,            /* dst_mask */
759          FALSE),                /* pcrel_offset */
760
761   HOWTO (R_SH_TLS_LDO_32,       /* type */
762          0,                     /* rightshift */
763          2,                     /* size (0 = byte, 1 = short, 2 = long) */
764          32,                    /* bitsize */
765          FALSE,                 /* pc_relative */
766          0,                     /* bitpos */
767          complain_overflow_bitfield, /* complain_on_overflow */
768          bfd_elf_generic_reloc, /* */
769          "R_SH_TLS_LDO_32",     /* name */
770          TRUE,                  /* partial_inplace */
771          0xffffffff,            /* src_mask */
772          0xffffffff,            /* dst_mask */
773          FALSE),                /* pcrel_offset */
774
775   HOWTO (R_SH_TLS_IE_32,        /* type */
776          0,                     /* rightshift */
777          2,                     /* size (0 = byte, 1 = short, 2 = long) */
778          32,                    /* bitsize */
779          FALSE,                 /* pc_relative */
780          0,                     /* bitpos */
781          complain_overflow_bitfield, /* complain_on_overflow */
782          bfd_elf_generic_reloc, /* */
783          "R_SH_TLS_IE_32",      /* name */
784          TRUE,                  /* partial_inplace */
785          0xffffffff,            /* src_mask */
786          0xffffffff,            /* dst_mask */
787          FALSE),                /* pcrel_offset */
788
789   HOWTO (R_SH_TLS_LE_32,        /* type */
790          0,                     /* rightshift */
791          2,                     /* size (0 = byte, 1 = short, 2 = long) */
792          32,                    /* bitsize */
793          FALSE,                 /* pc_relative */
794          0,                     /* bitpos */
795          complain_overflow_bitfield, /* complain_on_overflow */
796          bfd_elf_generic_reloc, /* */
797          "R_SH_TLS_LE_32",      /* name */
798          TRUE,                  /* partial_inplace */
799          0xffffffff,            /* src_mask */
800          0xffffffff,            /* dst_mask */
801          FALSE),                /* pcrel_offset */
802
803   HOWTO (R_SH_TLS_DTPMOD32,     /* type */
804          0,                     /* rightshift */
805          2,                     /* size (0 = byte, 1 = short, 2 = long) */
806          32,                    /* bitsize */
807          FALSE,                 /* pc_relative */
808          0,                     /* bitpos */
809          complain_overflow_bitfield, /* complain_on_overflow */
810          bfd_elf_generic_reloc, /* */
811          "R_SH_TLS_DTPMOD32",   /* name */
812          TRUE,                  /* partial_inplace */
813          0xffffffff,            /* src_mask */
814          0xffffffff,            /* dst_mask */
815          FALSE),                /* pcrel_offset */
816
817   HOWTO (R_SH_TLS_DTPOFF32,     /* type */
818          0,                     /* rightshift */
819          2,                     /* size (0 = byte, 1 = short, 2 = long) */
820          32,                    /* bitsize */
821          FALSE,                 /* pc_relative */
822          0,                     /* bitpos */
823          complain_overflow_bitfield, /* complain_on_overflow */
824          bfd_elf_generic_reloc, /* */
825          "R_SH_TLS_DTPOFF32",   /* name */
826          TRUE,                  /* partial_inplace */
827          0xffffffff,            /* src_mask */
828          0xffffffff,            /* dst_mask */
829          FALSE),                /* pcrel_offset */
830
831   HOWTO (R_SH_TLS_TPOFF32,      /* type */
832          0,                     /* rightshift */
833          2,                     /* size (0 = byte, 1 = short, 2 = long) */
834          32,                    /* bitsize */
835          FALSE,                 /* pc_relative */
836          0,                     /* bitpos */
837          complain_overflow_bitfield, /* complain_on_overflow */
838          bfd_elf_generic_reloc, /* */
839          "R_SH_TLS_TPOFF32",    /* name */
840          TRUE,                  /* partial_inplace */
841          0xffffffff,            /* src_mask */
842          0xffffffff,            /* dst_mask */
843          FALSE),                /* pcrel_offset */
844
845   EMPTY_HOWTO (152),
846   EMPTY_HOWTO (153),
847   EMPTY_HOWTO (154),
848   EMPTY_HOWTO (155),
849   EMPTY_HOWTO (156),
850   EMPTY_HOWTO (157),
851   EMPTY_HOWTO (158),
852   EMPTY_HOWTO (159),
853
854   HOWTO (R_SH_GOT32,            /* type */
855          0,                     /* rightshift */
856          2,                     /* size (0 = byte, 1 = short, 2 = long) */
857          32,                    /* bitsize */
858          FALSE,                 /* pc_relative */
859          0,                     /* bitpos */
860          complain_overflow_bitfield, /* complain_on_overflow */
861          bfd_elf_generic_reloc, /* */
862          "R_SH_GOT32",          /* name */
863          TRUE,                  /* partial_inplace */
864          0xffffffff,            /* src_mask */
865          0xffffffff,            /* dst_mask */
866          FALSE),                /* pcrel_offset */
867
868   HOWTO (R_SH_PLT32,            /* type */
869          0,                     /* rightshift */
870          2,                     /* size (0 = byte, 1 = short, 2 = long) */
871          32,                    /* bitsize */
872          TRUE,                  /* pc_relative */
873          0,                     /* bitpos */
874          complain_overflow_bitfield, /* complain_on_overflow */
875          bfd_elf_generic_reloc, /* */
876          "R_SH_PLT32",          /* name */
877          TRUE,                  /* partial_inplace */
878          0xffffffff,            /* src_mask */
879          0xffffffff,            /* dst_mask */
880          TRUE),                 /* pcrel_offset */
881
882   HOWTO (R_SH_COPY,             /* type */
883          0,                     /* rightshift */
884          2,                     /* size (0 = byte, 1 = short, 2 = long) */
885          32,                    /* bitsize */
886          FALSE,                 /* pc_relative */
887          0,                     /* bitpos */
888          complain_overflow_bitfield, /* complain_on_overflow */
889          bfd_elf_generic_reloc, /* */
890          "R_SH_COPY",           /* name */
891          TRUE,                  /* partial_inplace */
892          0xffffffff,            /* src_mask */
893          0xffffffff,            /* dst_mask */
894          FALSE),                /* pcrel_offset */
895
896   HOWTO (R_SH_GLOB_DAT,         /* type */
897          0,                     /* rightshift */
898          2,                     /* size (0 = byte, 1 = short, 2 = long) */
899          32,                    /* bitsize */
900          FALSE,                 /* pc_relative */
901          0,                     /* bitpos */
902          complain_overflow_bitfield, /* complain_on_overflow */
903          bfd_elf_generic_reloc, /* */
904          "R_SH_GLOB_DAT",       /* name */
905          TRUE,                  /* partial_inplace */
906          0xffffffff,            /* src_mask */
907          0xffffffff,            /* dst_mask */
908          FALSE),                /* pcrel_offset */
909
910   HOWTO (R_SH_JMP_SLOT,         /* type */
911          0,                     /* rightshift */
912          2,                     /* size (0 = byte, 1 = short, 2 = long) */
913          32,                    /* bitsize */
914          FALSE,                 /* pc_relative */
915          0,                     /* bitpos */
916          complain_overflow_bitfield, /* complain_on_overflow */
917          bfd_elf_generic_reloc, /* */
918          "R_SH_JMP_SLOT",       /* name */
919          TRUE,                  /* partial_inplace */
920          0xffffffff,            /* src_mask */
921          0xffffffff,            /* dst_mask */
922          FALSE),                /* pcrel_offset */
923
924   HOWTO (R_SH_RELATIVE,         /* type */
925          0,                     /* rightshift */
926          2,                     /* size (0 = byte, 1 = short, 2 = long) */
927          32,                    /* bitsize */
928          FALSE,                 /* pc_relative */
929          0,                     /* bitpos */
930          complain_overflow_bitfield, /* complain_on_overflow */
931          bfd_elf_generic_reloc, /* */
932          "R_SH_RELATIVE",       /* name */
933          TRUE,                  /* partial_inplace */
934          0xffffffff,            /* src_mask */
935          0xffffffff,            /* dst_mask */
936          FALSE),                /* pcrel_offset */
937
938   HOWTO (R_SH_GOTOFF,           /* type */
939          0,                     /* rightshift */
940          2,                     /* size (0 = byte, 1 = short, 2 = long) */
941          32,                    /* bitsize */
942          FALSE,                 /* pc_relative */
943          0,                     /* bitpos */
944          complain_overflow_bitfield, /* complain_on_overflow */
945          bfd_elf_generic_reloc, /* */
946          "R_SH_GOTOFF",         /* name */
947          TRUE,                  /* partial_inplace */
948          0xffffffff,            /* src_mask */
949          0xffffffff,            /* dst_mask */
950          FALSE),                /* pcrel_offset */
951
952   HOWTO (R_SH_GOTPC,            /* type */
953          0,                     /* rightshift */
954          2,                     /* size (0 = byte, 1 = short, 2 = long) */
955          32,                    /* bitsize */
956          TRUE,                  /* pc_relative */
957          0,                     /* bitpos */
958          complain_overflow_bitfield, /* complain_on_overflow */
959          bfd_elf_generic_reloc, /* */
960          "R_SH_GOTPC",          /* name */
961          TRUE,                  /* partial_inplace */
962          0xffffffff,            /* src_mask */
963          0xffffffff,            /* dst_mask */
964          TRUE),                 /* pcrel_offset */
965
966   HOWTO (R_SH_GOTPLT32,         /* type */
967          0,                     /* rightshift */
968          2,                     /* size (0 = byte, 1 = short, 2 = long) */
969          32,                    /* bitsize */
970          FALSE,                 /* pc_relative */
971          0,                     /* bitpos */
972          complain_overflow_bitfield, /* complain_on_overflow */
973          bfd_elf_generic_reloc, /* */
974          "R_SH_GOTPLT32",       /* name */
975          FALSE,                 /* partial_inplace */
976          0xffffffff,            /* src_mask */
977          0xffffffff,            /* dst_mask */
978          FALSE),                /* pcrel_offset */
979
980 #ifdef INCLUDE_SHMEDIA
981   /* Used in MOVI and SHORI (x & 65536).  */
982   HOWTO (R_SH_GOT_LOW16,        /* type */
983          0,                     /* rightshift */
984          2,                     /* size (0 = byte, 1 = short, 2 = long) */
985          64,                    /* bitsize */
986          FALSE,                 /* pc_relative */
987          10,                    /* bitpos */
988          complain_overflow_dont, /* complain_on_overflow */
989          bfd_elf_generic_reloc, /* special_function */
990          "R_SH_GOT_LOW16",      /* name */
991          FALSE,                 /* partial_inplace */
992          0,                     /* src_mask */
993          0x3fffc00,             /* dst_mask */
994          FALSE),                /* pcrel_offset */
995
996   /* Used in MOVI and SHORI ((x >> 16) & 65536).  */
997   HOWTO (R_SH_GOT_MEDLOW16,     /* type */
998          16,                    /* rightshift */
999          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1000          64,                    /* bitsize */
1001          FALSE,                 /* pc_relative */
1002          10,                    /* bitpos */
1003          complain_overflow_dont, /* complain_on_overflow */
1004          bfd_elf_generic_reloc, /* special_function */
1005          "R_SH_GOT_MEDLOW16",   /* name */
1006          FALSE,                 /* partial_inplace */
1007          0,                     /* src_mask */
1008          0x3fffc00,             /* dst_mask */
1009          FALSE),                /* pcrel_offset */
1010
1011   /* Used in MOVI and SHORI ((x >> 32) & 65536).  */
1012   HOWTO (R_SH_GOT_MEDHI16,      /* type */
1013          32,                    /* rightshift */
1014          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1015          64,                    /* bitsize */
1016          FALSE,                 /* pc_relative */
1017          10,                    /* bitpos */
1018          complain_overflow_dont, /* complain_on_overflow */
1019          bfd_elf_generic_reloc, /* special_function */
1020          "R_SH_GOT_MEDHI16",    /* name */
1021          FALSE,                 /* partial_inplace */
1022          0,                     /* src_mask */
1023          0x3fffc00,             /* dst_mask */
1024          FALSE),                /* pcrel_offset */
1025
1026   /* Used in MOVI and SHORI ((x >> 48) & 65536).  */
1027   HOWTO (R_SH_GOT_HI16,         /* type */
1028          48,                    /* rightshift */
1029          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1030          64,                    /* bitsize */
1031          FALSE,                 /* pc_relative */
1032          10,                    /* bitpos */
1033          complain_overflow_dont, /* complain_on_overflow */
1034          bfd_elf_generic_reloc, /* special_function */
1035          "R_SH_GOT_HI16",       /* name */
1036          FALSE,                 /* partial_inplace */
1037          0,                     /* src_mask */
1038          0x3fffc00,             /* dst_mask */
1039          FALSE),                /* pcrel_offset */
1040
1041   /* Used in MOVI and SHORI (x & 65536).  */
1042   HOWTO (R_SH_GOTPLT_LOW16,     /* type */
1043          0,                     /* rightshift */
1044          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1045          64,                    /* bitsize */
1046          FALSE,                 /* pc_relative */
1047          10,                    /* bitpos */
1048          complain_overflow_dont, /* complain_on_overflow */
1049          bfd_elf_generic_reloc, /* special_function */
1050          "R_SH_GOTPLT_LOW16",   /* name */
1051          FALSE,                 /* partial_inplace */
1052          0,                     /* src_mask */
1053          0x3fffc00,             /* dst_mask */
1054          FALSE),                /* pcrel_offset */
1055
1056   /* Used in MOVI and SHORI ((x >> 16) & 65536).  */
1057   HOWTO (R_SH_GOTPLT_MEDLOW16,  /* type */
1058          16,                    /* rightshift */
1059          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1060          64,                    /* bitsize */
1061          FALSE,                 /* pc_relative */
1062          10,                    /* bitpos */
1063          complain_overflow_dont, /* complain_on_overflow */
1064          bfd_elf_generic_reloc, /* special_function */
1065          "R_SH_GOTPLT_MEDLOW16", /* name */
1066          FALSE,                 /* partial_inplace */
1067          0,                     /* src_mask */
1068          0x3fffc00,             /* dst_mask */
1069          FALSE),                /* pcrel_offset */
1070
1071   /* Used in MOVI and SHORI ((x >> 32) & 65536).  */
1072   HOWTO (R_SH_GOTPLT_MEDHI16,   /* type */
1073          32,                    /* rightshift */
1074          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1075          64,                    /* bitsize */
1076          FALSE,                 /* pc_relative */
1077          10,                    /* bitpos */
1078          complain_overflow_dont, /* complain_on_overflow */
1079          bfd_elf_generic_reloc, /* special_function */
1080          "R_SH_GOTPLT_MEDHI16", /* name */
1081          FALSE,                 /* partial_inplace */
1082          0,                     /* src_mask */
1083          0x3fffc00,             /* dst_mask */
1084          FALSE),                /* pcrel_offset */
1085
1086   /* Used in MOVI and SHORI ((x >> 48) & 65536).  */
1087   HOWTO (R_SH_GOTPLT_HI16,      /* type */
1088          48,                    /* rightshift */
1089          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1090          64,                    /* bitsize */
1091          FALSE,                 /* pc_relative */
1092          10,                    /* bitpos */
1093          complain_overflow_dont, /* complain_on_overflow */
1094          bfd_elf_generic_reloc, /* special_function */
1095          "R_SH_GOTPLT_HI16",    /* name */
1096          FALSE,                 /* partial_inplace */
1097          0,                     /* src_mask */
1098          0x3fffc00,             /* dst_mask */
1099          FALSE),                /* pcrel_offset */
1100
1101   /* Used in MOVI and SHORI (x & 65536).  */
1102   HOWTO (R_SH_PLT_LOW16,        /* type */
1103          0,                     /* rightshift */
1104          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1105          64,                    /* bitsize */
1106          TRUE,                  /* pc_relative */
1107          10,                    /* bitpos */
1108          complain_overflow_dont, /* complain_on_overflow */
1109          bfd_elf_generic_reloc, /* special_function */
1110          "R_SH_PLT_LOW16",      /* name */
1111          FALSE,                 /* partial_inplace */
1112          0,                     /* src_mask */
1113          0x3fffc00,             /* dst_mask */
1114          TRUE),                 /* pcrel_offset */
1115
1116   /* Used in MOVI and SHORI ((x >> 16) & 65536).  */
1117   HOWTO (R_SH_PLT_MEDLOW16,     /* type */
1118          16,                    /* rightshift */
1119          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1120          64,                    /* bitsize */
1121          TRUE,                  /* pc_relative */
1122          10,                    /* bitpos */
1123          complain_overflow_dont, /* complain_on_overflow */
1124          bfd_elf_generic_reloc, /* special_function */
1125          "R_SH_PLT_MEDLOW16",   /* name */
1126          FALSE,                 /* partial_inplace */
1127          0,                     /* src_mask */
1128          0x3fffc00,             /* dst_mask */
1129          TRUE),                 /* pcrel_offset */
1130
1131   /* Used in MOVI and SHORI ((x >> 32) & 65536).  */
1132   HOWTO (R_SH_PLT_MEDHI16,      /* type */
1133          32,                    /* rightshift */
1134          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1135          64,                    /* bitsize */
1136          TRUE,                  /* pc_relative */
1137          10,                    /* bitpos */
1138          complain_overflow_dont, /* complain_on_overflow */
1139          bfd_elf_generic_reloc, /* special_function */
1140          "R_SH_PLT_MEDHI16",    /* name */
1141          FALSE,                 /* partial_inplace */
1142          0,                     /* src_mask */
1143          0x3fffc00,             /* dst_mask */
1144          TRUE),                 /* pcrel_offset */
1145
1146   /* Used in MOVI and SHORI ((x >> 48) & 65536).  */
1147   HOWTO (R_SH_PLT_HI16,         /* type */
1148          48,                    /* rightshift */
1149          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1150          64,                    /* bitsize */
1151          TRUE,                  /* pc_relative */
1152          10,                    /* bitpos */
1153          complain_overflow_dont, /* complain_on_overflow */
1154          bfd_elf_generic_reloc, /* special_function */
1155          "R_SH_PLT_HI16",       /* name */
1156          FALSE,                 /* partial_inplace */
1157          0,                     /* src_mask */
1158          0x3fffc00,             /* dst_mask */
1159          TRUE),                 /* pcrel_offset */
1160
1161   /* Used in MOVI and SHORI (x & 65536).  */
1162   HOWTO (R_SH_GOTOFF_LOW16,     /* type */
1163          0,                     /* rightshift */
1164          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1165          64,                    /* bitsize */
1166          FALSE,                 /* pc_relative */
1167          10,                    /* bitpos */
1168          complain_overflow_dont, /* complain_on_overflow */
1169          bfd_elf_generic_reloc, /* special_function */
1170          "R_SH_GOTOFF_LOW16",   /* name */
1171          FALSE,                 /* partial_inplace */
1172          0,                     /* src_mask */
1173          0x3fffc00,             /* dst_mask */
1174          FALSE),                /* pcrel_offset */
1175
1176   /* Used in MOVI and SHORI ((x >> 16) & 65536).  */
1177   HOWTO (R_SH_GOTOFF_MEDLOW16,  /* type */
1178          16,                    /* rightshift */
1179          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1180          64,                    /* bitsize */
1181          FALSE,                 /* pc_relative */
1182          10,                    /* bitpos */
1183          complain_overflow_dont, /* complain_on_overflow */
1184          bfd_elf_generic_reloc, /* special_function */
1185          "R_SH_GOTOFF_MEDLOW16", /* name */
1186          FALSE,                 /* partial_inplace */
1187          0,                     /* src_mask */
1188          0x3fffc00,             /* dst_mask */
1189          FALSE),                /* pcrel_offset */
1190
1191   /* Used in MOVI and SHORI ((x >> 32) & 65536).  */
1192   HOWTO (R_SH_GOTOFF_MEDHI16,   /* type */
1193          32,                    /* rightshift */
1194          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1195          64,                    /* bitsize */
1196          FALSE,                 /* pc_relative */
1197          10,                    /* bitpos */
1198          complain_overflow_dont, /* complain_on_overflow */
1199          bfd_elf_generic_reloc, /* special_function */
1200          "R_SH_GOTOFF_MEDHI16", /* name */
1201          FALSE,                 /* partial_inplace */
1202          0,                     /* src_mask */
1203          0x3fffc00,             /* dst_mask */
1204          FALSE),                /* pcrel_offset */
1205
1206   /* Used in MOVI and SHORI ((x >> 48) & 65536).  */
1207   HOWTO (R_SH_GOTOFF_HI16,      /* type */
1208          48,                    /* rightshift */
1209          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1210          64,                    /* bitsize */
1211          FALSE,                 /* pc_relative */
1212          10,                    /* bitpos */
1213          complain_overflow_dont, /* complain_on_overflow */
1214          bfd_elf_generic_reloc, /* special_function */
1215          "R_SH_GOTOFF_HI16",    /* name */
1216          FALSE,                 /* partial_inplace */
1217          0,                     /* src_mask */
1218          0x3fffc00,             /* dst_mask */
1219          FALSE),                /* pcrel_offset */
1220
1221   /* Used in MOVI and SHORI (x & 65536).  */
1222   HOWTO (R_SH_GOTPC_LOW16,      /* type */
1223          0,                     /* rightshift */
1224          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1225          64,                    /* bitsize */
1226          TRUE,                  /* pc_relative */
1227          10,                    /* bitpos */
1228          complain_overflow_dont, /* complain_on_overflow */
1229          bfd_elf_generic_reloc, /* special_function */
1230          "R_SH_GOTPC_LOW16",    /* name */
1231          FALSE,                 /* partial_inplace */
1232          0,                     /* src_mask */
1233          0x3fffc00,             /* dst_mask */
1234          TRUE),                 /* pcrel_offset */
1235
1236   /* Used in MOVI and SHORI ((x >> 16) & 65536).  */
1237   HOWTO (R_SH_GOTPC_MEDLOW16,   /* type */
1238          16,                    /* rightshift */
1239          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1240          64,                    /* bitsize */
1241          TRUE,                  /* pc_relative */
1242          10,                    /* bitpos */
1243          complain_overflow_dont, /* complain_on_overflow */
1244          bfd_elf_generic_reloc, /* special_function */
1245          "R_SH_GOTPC_MEDLOW16", /* name */
1246          FALSE,                 /* partial_inplace */
1247          0,                     /* src_mask */
1248          0x3fffc00,             /* dst_mask */
1249          TRUE),                 /* pcrel_offset */
1250
1251   /* Used in MOVI and SHORI ((x >> 32) & 65536).  */
1252   HOWTO (R_SH_GOTPC_MEDHI16,    /* type */
1253          32,                    /* rightshift */
1254          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1255          64,                    /* bitsize */
1256          TRUE,                  /* pc_relative */
1257          10,                    /* bitpos */
1258          complain_overflow_dont, /* complain_on_overflow */
1259          bfd_elf_generic_reloc, /* special_function */
1260          "R_SH_GOTPC_MEDHI16",  /* name */
1261          FALSE,                 /* partial_inplace */
1262          0,                     /* src_mask */
1263          0x3fffc00,             /* dst_mask */
1264          TRUE),                 /* pcrel_offset */
1265
1266   /* Used in MOVI and SHORI ((x >> 48) & 65536).  */
1267   HOWTO (R_SH_GOTPC_HI16,       /* type */
1268          48,                    /* rightshift */
1269          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1270          64,                    /* bitsize */
1271          TRUE,                  /* pc_relative */
1272          10,                    /* bitpos */
1273          complain_overflow_dont, /* complain_on_overflow */
1274          bfd_elf_generic_reloc, /* special_function */
1275          "R_SH_GOTPC_HI16",     /* name */
1276          FALSE,                 /* partial_inplace */
1277          0,                     /* src_mask */
1278          0x3fffc00,             /* dst_mask */
1279          TRUE),                 /* pcrel_offset */
1280
1281   /* Used in LD.L, FLD.S et al.  */
1282   HOWTO (R_SH_GOT10BY4,         /* type */
1283          2,                     /* rightshift */
1284          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1285          12,                    /* bitsize */
1286          FALSE,                 /* pc_relative */
1287          10,                    /* bitpos */
1288          complain_overflow_signed, /* complain_on_overflow */
1289          bfd_elf_generic_reloc, /* special_function */
1290          "R_SH_GOT10BY4",       /* name */
1291          FALSE,                 /* partial_inplace */
1292          0,                     /* src_mask */
1293          0xffc00,               /* dst_mask */
1294          FALSE),                /* pcrel_offset */
1295
1296   /* Used in LD.L, FLD.S et al.  */
1297   HOWTO (R_SH_GOTPLT10BY4,      /* type */
1298          2,                     /* rightshift */
1299          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1300          12,                    /* bitsize */
1301          FALSE,                 /* pc_relative */
1302          10,                    /* bitpos */
1303          complain_overflow_signed, /* complain_on_overflow */
1304          bfd_elf_generic_reloc, /* special_function */
1305          "R_SH_GOTPLT10BY4",    /* name */
1306          FALSE,                 /* partial_inplace */
1307          0,                     /* src_mask */
1308          0xffc00,               /* dst_mask */
1309          FALSE),                /* pcrel_offset */
1310
1311   /* Used in FLD.D, FST.P et al.  */
1312   HOWTO (R_SH_GOT10BY8,         /* type */
1313          3,                     /* rightshift */
1314          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1315          13,                    /* bitsize */
1316          FALSE,                 /* pc_relative */
1317          10,                    /* bitpos */
1318          complain_overflow_signed, /* complain_on_overflow */
1319          bfd_elf_generic_reloc, /* special_function */
1320          "R_SH_GOT10BY8",       /* name */
1321          FALSE,                 /* partial_inplace */
1322          0,                     /* src_mask */
1323          0xffc00,               /* dst_mask */
1324          FALSE),                /* pcrel_offset */
1325
1326   /* Used in FLD.D, FST.P et al.  */
1327   HOWTO (R_SH_GOTPLT10BY8,      /* type */
1328          3,                     /* rightshift */
1329          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1330          13,                    /* bitsize */
1331          FALSE,                 /* pc_relative */
1332          10,                    /* bitpos */
1333          complain_overflow_signed, /* complain_on_overflow */
1334          bfd_elf_generic_reloc, /* special_function */
1335          "R_SH_GOTPLT10BY8",    /* name */
1336          FALSE,                 /* partial_inplace */
1337          0,                     /* src_mask */
1338          0xffc00,               /* dst_mask */
1339          FALSE),                /* pcrel_offset */
1340
1341   HOWTO (R_SH_COPY64,           /* type */
1342          0,                     /* rightshift */
1343          4,                     /* size (0 = byte, 1 = short, 2 = long) */
1344          64,                    /* bitsize */
1345          FALSE,                 /* pc_relative */
1346          0,                     /* bitpos */
1347          complain_overflow_dont, /* complain_on_overflow */
1348          bfd_elf_generic_reloc, /* special_function */
1349          "R_SH_COPY64",         /* name */
1350          FALSE,                 /* partial_inplace */
1351          0,                     /* src_mask */
1352          ((bfd_vma) 0) - 1,     /* dst_mask */
1353          FALSE),                /* pcrel_offset */
1354
1355   HOWTO (R_SH_GLOB_DAT64,       /* type */
1356          0,                     /* rightshift */
1357          4,                     /* size (0 = byte, 1 = short, 2 = long) */
1358          64,                    /* bitsize */
1359          FALSE,                 /* pc_relative */
1360          0,                     /* bitpos */
1361          complain_overflow_dont, /* complain_on_overflow */
1362          bfd_elf_generic_reloc, /* special_function */
1363          "R_SH_GLOB_DAT64",     /* name */
1364          FALSE,                 /* partial_inplace */
1365          0,                     /* src_mask */
1366          ((bfd_vma) 0) - 1,     /* dst_mask */
1367          FALSE),                /* pcrel_offset */
1368
1369   HOWTO (R_SH_JMP_SLOT64,       /* type */
1370          0,                     /* rightshift */
1371          4,                     /* size (0 = byte, 1 = short, 2 = long) */
1372          64,                    /* bitsize */
1373          FALSE,                 /* pc_relative */
1374          0,                     /* bitpos */
1375          complain_overflow_dont, /* complain_on_overflow */
1376          bfd_elf_generic_reloc, /* special_function */
1377          "R_SH_JMP_SLOT64",     /* name */
1378          FALSE,                 /* partial_inplace */
1379          0,                     /* src_mask */
1380          ((bfd_vma) 0) - 1,     /* dst_mask */
1381          FALSE),                /* pcrel_offset */
1382
1383   HOWTO (R_SH_RELATIVE64,       /* type */
1384          0,                     /* rightshift */
1385          4,                     /* size (0 = byte, 1 = short, 2 = long) */
1386          64,                    /* bitsize */
1387          FALSE,                 /* pc_relative */
1388          0,                     /* bitpos */
1389          complain_overflow_dont, /* complain_on_overflow */
1390          bfd_elf_generic_reloc, /* special_function */
1391          "R_SH_RELATIVE64",     /* name */
1392          FALSE,                 /* partial_inplace */
1393          0,                     /* src_mask */
1394          ((bfd_vma) 0) - 1,     /* dst_mask */
1395          FALSE),                /* pcrel_offset */
1396
1397   EMPTY_HOWTO (197),
1398   EMPTY_HOWTO (198),
1399   EMPTY_HOWTO (199),
1400   EMPTY_HOWTO (200),
1401   EMPTY_HOWTO (201),
1402   EMPTY_HOWTO (202),
1403   EMPTY_HOWTO (203),
1404   EMPTY_HOWTO (204),
1405   EMPTY_HOWTO (205),
1406   EMPTY_HOWTO (206),
1407   EMPTY_HOWTO (207),
1408   EMPTY_HOWTO (208),
1409   EMPTY_HOWTO (209),
1410   EMPTY_HOWTO (210),
1411   EMPTY_HOWTO (211),
1412   EMPTY_HOWTO (212),
1413   EMPTY_HOWTO (213),
1414   EMPTY_HOWTO (214),
1415   EMPTY_HOWTO (215),
1416   EMPTY_HOWTO (216),
1417   EMPTY_HOWTO (217),
1418   EMPTY_HOWTO (218),
1419   EMPTY_HOWTO (219),
1420   EMPTY_HOWTO (220),
1421   EMPTY_HOWTO (221),
1422   EMPTY_HOWTO (222),
1423   EMPTY_HOWTO (223),
1424   EMPTY_HOWTO (224),
1425   EMPTY_HOWTO (225),
1426   EMPTY_HOWTO (226),
1427   EMPTY_HOWTO (227),
1428   EMPTY_HOWTO (228),
1429   EMPTY_HOWTO (229),
1430   EMPTY_HOWTO (230),
1431   EMPTY_HOWTO (231),
1432   EMPTY_HOWTO (232),
1433   EMPTY_HOWTO (233),
1434   EMPTY_HOWTO (234),
1435   EMPTY_HOWTO (235),
1436   EMPTY_HOWTO (236),
1437   EMPTY_HOWTO (237),
1438   EMPTY_HOWTO (238),
1439   EMPTY_HOWTO (239),
1440   EMPTY_HOWTO (240),
1441   EMPTY_HOWTO (241),
1442
1443   /* Relocations for SHmedia code.  None of these are partial_inplace or
1444      use the field being relocated (except R_SH_PT_16).  */
1445
1446   /* The assembler will generate this reloc before a block of SHmedia
1447      instructions.  A section should be processed as assuming it contains
1448      data, unless this reloc is seen.  Note that a block of SHcompact
1449      instructions are instead preceded by R_SH_CODE.
1450      This is currently not implemented, but should be used for SHmedia
1451      linker relaxation.  */
1452   HOWTO (R_SH_SHMEDIA_CODE,     /* type */
1453          0,                     /* rightshift */
1454          1,                     /* size (0 = byte, 1 = short, 2 = long) */
1455          0,                     /* bitsize */
1456          FALSE,                 /* pc_relative */
1457          0,                     /* bitpos */
1458          complain_overflow_unsigned, /* complain_on_overflow */
1459          sh_elf_ignore_reloc,   /* special_function */
1460          "R_SH_SHMEDIA_CODE",   /* name */
1461          FALSE,                 /* partial_inplace */
1462          0,                     /* src_mask */
1463          0,                     /* dst_mask */
1464          FALSE),                /* pcrel_offset */
1465
1466   /* The assembler will generate this reloc at a PTA or PTB instruction,
1467      and the linker checks the right type of target, or changes a PTA to a
1468      PTB, if the original insn was PT.  */
1469   HOWTO (R_SH_PT_16,            /* type */
1470          2,                     /* rightshift */
1471          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1472          18,                    /* bitsize */
1473          TRUE,                  /* pc_relative */
1474          10,                    /* bitpos */
1475          complain_overflow_signed, /* complain_on_overflow */
1476          bfd_elf_generic_reloc, /* special_function */
1477          "R_SH_PT_16",          /* name */
1478          FALSE,                 /* partial_inplace */
1479          0,                     /* src_mask */
1480          0x3fffc00,             /* dst_mask */
1481          TRUE),                 /* pcrel_offset */
1482
1483   /* Used in unexpanded MOVI.  */
1484   HOWTO (R_SH_IMMS16,           /* type */
1485          0,                     /* rightshift */
1486          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1487          16,                    /* bitsize */
1488          FALSE,                 /* pc_relative */
1489          10,                    /* bitpos */
1490          complain_overflow_signed, /* complain_on_overflow */
1491          bfd_elf_generic_reloc, /* special_function */
1492          "R_SH_IMMS16",         /* name */
1493          FALSE,                 /* partial_inplace */
1494          0,                     /* src_mask */
1495          0x3fffc00,             /* dst_mask */
1496          FALSE),                /* pcrel_offset */
1497
1498   /* Used in SHORI.  */
1499   HOWTO (R_SH_IMMU16,           /* type */
1500          0,                     /* rightshift */
1501          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1502          16,                    /* bitsize */
1503          FALSE,                 /* pc_relative */
1504          10,                    /* bitpos */
1505          complain_overflow_unsigned, /* complain_on_overflow */
1506          bfd_elf_generic_reloc, /* special_function */
1507          "R_SH_IMMU16",         /* name */
1508          FALSE,                 /* partial_inplace */
1509          0,                     /* src_mask */
1510          0x3fffc00,             /* dst_mask */
1511          FALSE),                /* pcrel_offset */
1512
1513   /* Used in MOVI and SHORI (x & 65536).  */
1514   HOWTO (R_SH_IMM_LOW16,        /* type */
1515          0,                     /* rightshift */
1516          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1517          64,                    /* bitsize */
1518          FALSE,                 /* pc_relative */
1519          10,                    /* bitpos */
1520          complain_overflow_dont, /* complain_on_overflow */
1521          bfd_elf_generic_reloc, /* special_function */
1522          "R_SH_IMM_LOW16",      /* name */
1523          FALSE,                 /* partial_inplace */
1524          0,                     /* src_mask */
1525          0x3fffc00,             /* dst_mask */
1526          FALSE),                /* pcrel_offset */
1527
1528   /* Used in MOVI and SHORI ((x - $) & 65536).  */
1529   HOWTO (R_SH_IMM_LOW16_PCREL,  /* type */
1530          0,                     /* rightshift */
1531          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1532          64,                    /* bitsize */
1533          TRUE,                  /* pc_relative */
1534          10,                    /* bitpos */
1535          complain_overflow_dont, /* complain_on_overflow */
1536          bfd_elf_generic_reloc, /* special_function */
1537          "R_SH_IMM_LOW16_PCREL", /* name */
1538          FALSE,                 /* partial_inplace */
1539          0,                     /* src_mask */
1540          0x3fffc00,             /* dst_mask */
1541          TRUE),                 /* pcrel_offset */
1542
1543   /* Used in MOVI and SHORI ((x >> 16) & 65536).  */
1544   HOWTO (R_SH_IMM_MEDLOW16,     /* type */
1545          16,                    /* rightshift */
1546          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1547          64,                    /* bitsize */
1548          FALSE,                 /* pc_relative */
1549          10,                    /* bitpos */
1550          complain_overflow_dont, /* complain_on_overflow */
1551          bfd_elf_generic_reloc, /* special_function */
1552          "R_SH_IMM_MEDLOW16",   /* name */
1553          FALSE,                 /* partial_inplace */
1554          0,                     /* src_mask */
1555          0x3fffc00,             /* dst_mask */
1556          FALSE),                /* pcrel_offset */
1557
1558   /* Used in MOVI and SHORI (((x - $) >> 16) & 65536).  */
1559   HOWTO (R_SH_IMM_MEDLOW16_PCREL, /* type */
1560          16,                    /* rightshift */
1561          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1562          64,                    /* bitsize */
1563          TRUE,                  /* pc_relative */
1564          10,                    /* bitpos */
1565          complain_overflow_dont, /* complain_on_overflow */
1566          bfd_elf_generic_reloc, /* special_function */
1567          "R_SH_IMM_MEDLOW16_PCREL", /* name */
1568          FALSE,                 /* partial_inplace */
1569          0,                     /* src_mask */
1570          0x3fffc00,             /* dst_mask */
1571          TRUE),                 /* pcrel_offset */
1572
1573   /* Used in MOVI and SHORI ((x >> 32) & 65536).  */
1574   HOWTO (R_SH_IMM_MEDHI16,      /* type */
1575          32,                    /* rightshift */
1576          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1577          64,                    /* bitsize */
1578          FALSE,                 /* pc_relative */
1579          10,                    /* bitpos */
1580          complain_overflow_dont, /* complain_on_overflow */
1581          bfd_elf_generic_reloc, /* special_function */
1582          "R_SH_IMM_MEDHI16",    /* name */
1583          FALSE,                 /* partial_inplace */
1584          0,                     /* src_mask */
1585          0x3fffc00,             /* dst_mask */
1586          FALSE),                /* pcrel_offset */
1587
1588   /* Used in MOVI and SHORI (((x - $) >> 32) & 65536).  */
1589   HOWTO (R_SH_IMM_MEDHI16_PCREL, /* type */
1590          32,                    /* rightshift */
1591          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1592          64,                    /* bitsize */
1593          TRUE,                  /* pc_relative */
1594          10,                    /* bitpos */
1595          complain_overflow_dont, /* complain_on_overflow */
1596          bfd_elf_generic_reloc, /* special_function */
1597          "R_SH_IMM_MEDHI16_PCREL", /* name */
1598          FALSE,                 /* partial_inplace */
1599          0,                     /* src_mask */
1600          0x3fffc00,             /* dst_mask */
1601          TRUE),                 /* pcrel_offset */
1602
1603   /* Used in MOVI and SHORI ((x >> 48) & 65536).  */
1604   HOWTO (R_SH_IMM_HI16,         /* type */
1605          48,                    /* rightshift */
1606          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1607          64,                    /* bitsize */
1608          FALSE,                 /* pc_relative */
1609          10,                    /* bitpos */
1610          complain_overflow_dont, /* complain_on_overflow */
1611          bfd_elf_generic_reloc, /* special_function */
1612          "R_SH_IMM_HI16",       /* name */
1613          FALSE,                 /* partial_inplace */
1614          0,                     /* src_mask */
1615          0x3fffc00,             /* dst_mask */
1616          FALSE),                /* pcrel_offset */
1617
1618   /* Used in MOVI and SHORI (((x - $) >> 48) & 65536).  */
1619   HOWTO (R_SH_IMM_HI16_PCREL,   /* type */
1620          48,                    /* rightshift */
1621          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1622          64,                    /* bitsize */
1623          TRUE,                  /* pc_relative */
1624          10,                    /* bitpos */
1625          complain_overflow_dont, /* complain_on_overflow */
1626          bfd_elf_generic_reloc, /* special_function */
1627          "R_SH_IMM_HI16_PCREL", /* name */
1628          FALSE,                 /* partial_inplace */
1629          0,                     /* src_mask */
1630          0x3fffc00,             /* dst_mask */
1631          TRUE),                 /* pcrel_offset */
1632
1633   /* For the .uaquad pseudo.  */
1634   HOWTO (R_SH_64,               /* type */
1635          0,                     /* rightshift */
1636          4,                     /* size (0 = byte, 1 = short, 2 = long) */
1637          64,                    /* bitsize */
1638          FALSE,                 /* pc_relative */
1639          0,                     /* bitpos */
1640          complain_overflow_dont, /* complain_on_overflow */
1641          bfd_elf_generic_reloc, /* special_function */
1642          "R_SH_64",             /* name */
1643          FALSE,                 /* partial_inplace */
1644          0,                     /* src_mask */
1645          ((bfd_vma) 0) - 1,     /* dst_mask */
1646          FALSE),                /* pcrel_offset */
1647
1648   /* For the .uaquad pseudo, (x - $).  */
1649   HOWTO (R_SH_64_PCREL,         /* type */
1650          48,                    /* rightshift */
1651          2,                     /* size (0 = byte, 1 = short, 2 = long) */
1652          64,                    /* bitsize */
1653          TRUE,                  /* pc_relative */
1654          10,                    /* bitpos */
1655          complain_overflow_dont, /* complain_on_overflow */
1656          bfd_elf_generic_reloc, /* special_function */
1657          "R_SH_64_PCREL",       /* name */
1658          FALSE,                 /* partial_inplace */
1659          0,                     /* src_mask */
1660          ((bfd_vma) 0) - 1,     /* dst_mask */
1661          TRUE),                 /* pcrel_offset */
1662
1663 #endif
1664 };
1665
1666 static bfd_reloc_status_type
1667 sh_elf_reloc_loop (r_type, input_bfd, input_section, contents, addr,
1668                    symbol_section, start, end)
1669      int r_type ATTRIBUTE_UNUSED;
1670      bfd *input_bfd;
1671      asection *input_section;
1672      bfd_byte *contents;
1673      bfd_vma addr;
1674      asection *symbol_section;
1675      bfd_vma start, end;
1676 {
1677   static bfd_vma last_addr;
1678   static asection *last_symbol_section;
1679   bfd_byte *start_ptr, *ptr, *last_ptr;
1680   int diff, cum_diff;
1681   bfd_signed_vma x;
1682   int insn;
1683
1684   /* Sanity check the address.  */
1685   if (addr > input_section->_raw_size)
1686     return bfd_reloc_outofrange;
1687
1688   /* We require the start and end relocations to be processed consecutively -
1689      although we allow then to be processed forwards or backwards.  */
1690   if (! last_addr)
1691     {
1692       last_addr = addr;
1693       last_symbol_section = symbol_section;
1694       return bfd_reloc_ok;
1695     }
1696   if (last_addr != addr)
1697     abort ();
1698   last_addr = 0;
1699
1700   if (! symbol_section || last_symbol_section != symbol_section || end < start)
1701     return bfd_reloc_outofrange;
1702
1703   /* Get the symbol_section contents.  */
1704   if (symbol_section != input_section)
1705     {
1706       if (elf_section_data (symbol_section)->this_hdr.contents != NULL)
1707         contents = elf_section_data (symbol_section)->this_hdr.contents;
1708       else
1709         {
1710           contents = (bfd_byte *) bfd_malloc (symbol_section->_raw_size);
1711           if (contents == NULL)
1712             return bfd_reloc_outofrange;
1713           if (! bfd_get_section_contents (input_bfd, symbol_section, contents,
1714                                           (file_ptr) 0,
1715                                           symbol_section->_raw_size))
1716             {
1717               free (contents);
1718               return bfd_reloc_outofrange;
1719             }
1720         }
1721     }
1722 #define IS_PPI(PTR) ((bfd_get_16 (input_bfd, (PTR)) & 0xfc00) == 0xf800)
1723   start_ptr = contents + start;
1724   for (cum_diff = -6, ptr = contents + end; cum_diff < 0 && ptr > start_ptr;)
1725     {
1726       for (last_ptr = ptr, ptr -= 4; ptr >= start_ptr && IS_PPI (ptr);)
1727         ptr -= 2;
1728       ptr += 2;
1729       diff = (last_ptr - ptr) >> 1;
1730       cum_diff += diff & 1;
1731       cum_diff += diff;
1732     }
1733   /* Calculate the start / end values to load into rs / re minus four -
1734      so that will cancel out the four we would otherwise have to add to
1735      addr to get the value to subtract in order to get relative addressing.  */
1736   if (cum_diff >= 0)
1737     {
1738       start -= 4;
1739       end = (ptr + cum_diff * 2) - contents;
1740     }
1741   else
1742     {
1743       bfd_vma start0 = start - 4;
1744
1745       while (start0 && IS_PPI (contents + start0))
1746         start0 -= 2;
1747       start0 = start - 2 - ((start - start0) & 2);
1748       start = start0 - cum_diff - 2;
1749       end = start0;
1750     }
1751
1752   if (contents != NULL
1753       && elf_section_data (symbol_section)->this_hdr.contents != contents)
1754     free (contents);
1755
1756   insn = bfd_get_16 (input_bfd, contents + addr);
1757
1758   x = (insn & 0x200 ? end : start) - addr;
1759   if (input_section != symbol_section)
1760     x += ((symbol_section->output_section->vma + symbol_section->output_offset)
1761           - (input_section->output_section->vma
1762              + input_section->output_offset));
1763   x >>= 1;
1764   if (x < -128 || x > 127)
1765     return bfd_reloc_overflow;
1766
1767   x = (insn & ~0xff) | (x & 0xff);
1768   bfd_put_16 (input_bfd, (bfd_vma) x, contents + addr);
1769
1770   return bfd_reloc_ok;
1771 }
1772
1773 /* This function is used for normal relocs.  This used to be like the COFF
1774    function, and is almost certainly incorrect for other ELF targets.  */
1775
1776 static bfd_reloc_status_type
1777 sh_elf_reloc (abfd, reloc_entry, symbol_in, data, input_section, output_bfd,
1778               error_message)
1779      bfd *abfd;
1780      arelent *reloc_entry;
1781      asymbol *symbol_in;
1782      PTR data;
1783      asection *input_section;
1784      bfd *output_bfd;
1785      char **error_message ATTRIBUTE_UNUSED;
1786 {
1787   unsigned long insn;
1788   bfd_vma sym_value;
1789   enum elf_sh_reloc_type r_type;
1790   bfd_vma addr = reloc_entry->address;
1791   bfd_byte *hit_data = addr + (bfd_byte *) data;
1792
1793   r_type = (enum elf_sh_reloc_type) reloc_entry->howto->type;
1794
1795   if (output_bfd != NULL)
1796     {
1797       /* Partial linking--do nothing.  */
1798       reloc_entry->address += input_section->output_offset;
1799       return bfd_reloc_ok;
1800     }
1801
1802   /* Almost all relocs have to do with relaxing.  If any work must be
1803      done for them, it has been done in sh_relax_section.  */
1804   if (r_type == R_SH_IND12W && (symbol_in->flags & BSF_LOCAL) != 0)
1805     return bfd_reloc_ok;
1806
1807   if (symbol_in != NULL
1808       && bfd_is_und_section (symbol_in->section))
1809     return bfd_reloc_undefined;
1810
1811   if (bfd_is_com_section (symbol_in->section))
1812     sym_value = 0;
1813   else
1814     sym_value = (symbol_in->value +
1815                  symbol_in->section->output_section->vma +
1816                  symbol_in->section->output_offset);
1817
1818   switch (r_type)
1819     {
1820     case R_SH_DIR32:
1821       insn = bfd_get_32 (abfd, hit_data);
1822       insn += sym_value + reloc_entry->addend;
1823       bfd_put_32 (abfd, (bfd_vma) insn, hit_data);
1824       break;
1825     case R_SH_IND12W:
1826       insn = bfd_get_16 (abfd, hit_data);
1827       sym_value += reloc_entry->addend;
1828       sym_value -= (input_section->output_section->vma
1829                     + input_section->output_offset
1830                     + addr
1831                     + 4);
1832       sym_value += (insn & 0xfff) << 1;
1833       if (insn & 0x800)
1834         sym_value -= 0x1000;
1835       insn = (insn & 0xf000) | (sym_value & 0xfff);
1836       bfd_put_16 (abfd, (bfd_vma) insn, hit_data);
1837       if (sym_value < (bfd_vma) -0x1000 || sym_value >= 0x1000)
1838         return bfd_reloc_overflow;
1839       break;
1840     default:
1841       abort ();
1842       break;
1843     }
1844
1845   return bfd_reloc_ok;
1846 }
1847
1848 /* This function is used for relocs which are only used for relaxing,
1849    which the linker should otherwise ignore.  */
1850
1851 static bfd_reloc_status_type
1852 sh_elf_ignore_reloc (abfd, reloc_entry, symbol, data, input_section,
1853                      output_bfd, error_message)
1854      bfd *abfd ATTRIBUTE_UNUSED;
1855      arelent *reloc_entry;
1856      asymbol *symbol ATTRIBUTE_UNUSED;
1857      PTR data ATTRIBUTE_UNUSED;
1858      asection *input_section;
1859      bfd *output_bfd;
1860      char **error_message ATTRIBUTE_UNUSED;
1861 {
1862   if (output_bfd != NULL)
1863     reloc_entry->address += input_section->output_offset;
1864   return bfd_reloc_ok;
1865 }
1866
1867 /* This structure is used to map BFD reloc codes to SH ELF relocs.  */
1868
1869 struct elf_reloc_map
1870 {
1871   bfd_reloc_code_real_type bfd_reloc_val;
1872   unsigned char elf_reloc_val;
1873 };
1874
1875 /* An array mapping BFD reloc codes to SH ELF relocs.  */
1876
1877 static const struct elf_reloc_map sh_reloc_map[] =
1878 {
1879   { BFD_RELOC_NONE, R_SH_NONE },
1880   { BFD_RELOC_32, R_SH_DIR32 },
1881   { BFD_RELOC_CTOR, R_SH_DIR32 },
1882   { BFD_RELOC_32_PCREL, R_SH_REL32 },
1883   { BFD_RELOC_SH_PCDISP8BY2, R_SH_DIR8WPN },
1884   { BFD_RELOC_SH_PCDISP12BY2, R_SH_IND12W },
1885   { BFD_RELOC_SH_PCRELIMM8BY2, R_SH_DIR8WPZ },
1886   { BFD_RELOC_SH_PCRELIMM8BY4, R_SH_DIR8WPL },
1887   { BFD_RELOC_8_PCREL, R_SH_SWITCH8 },
1888   { BFD_RELOC_SH_SWITCH16, R_SH_SWITCH16 },
1889   { BFD_RELOC_SH_SWITCH32, R_SH_SWITCH32 },
1890   { BFD_RELOC_SH_USES, R_SH_USES },
1891   { BFD_RELOC_SH_COUNT, R_SH_COUNT },
1892   { BFD_RELOC_SH_ALIGN, R_SH_ALIGN },
1893   { BFD_RELOC_SH_CODE, R_SH_CODE },
1894   { BFD_RELOC_SH_DATA, R_SH_DATA },
1895   { BFD_RELOC_SH_LABEL, R_SH_LABEL },
1896   { BFD_RELOC_VTABLE_INHERIT, R_SH_GNU_VTINHERIT },
1897   { BFD_RELOC_VTABLE_ENTRY, R_SH_GNU_VTENTRY },
1898   { BFD_RELOC_SH_LOOP_START, R_SH_LOOP_START },
1899   { BFD_RELOC_SH_LOOP_END, R_SH_LOOP_END },
1900   { BFD_RELOC_SH_TLS_GD_32, R_SH_TLS_GD_32 },
1901   { BFD_RELOC_SH_TLS_LD_32, R_SH_TLS_LD_32 },
1902   { BFD_RELOC_SH_TLS_LDO_32, R_SH_TLS_LDO_32 },
1903   { BFD_RELOC_SH_TLS_IE_32, R_SH_TLS_IE_32 },
1904   { BFD_RELOC_SH_TLS_LE_32, R_SH_TLS_LE_32 },
1905   { BFD_RELOC_SH_TLS_DTPMOD32, R_SH_TLS_DTPMOD32 },
1906   { BFD_RELOC_SH_TLS_DTPOFF32, R_SH_TLS_DTPOFF32 },
1907   { BFD_RELOC_SH_TLS_TPOFF32, R_SH_TLS_TPOFF32 },
1908   { BFD_RELOC_32_GOT_PCREL, R_SH_GOT32 },
1909   { BFD_RELOC_32_PLT_PCREL, R_SH_PLT32 },
1910   { BFD_RELOC_SH_COPY, R_SH_COPY },
1911   { BFD_RELOC_SH_GLOB_DAT, R_SH_GLOB_DAT },
1912   { BFD_RELOC_SH_JMP_SLOT, R_SH_JMP_SLOT },
1913   { BFD_RELOC_SH_RELATIVE, R_SH_RELATIVE },
1914   { BFD_RELOC_32_GOTOFF, R_SH_GOTOFF },
1915   { BFD_RELOC_SH_GOTPC, R_SH_GOTPC },
1916   { BFD_RELOC_SH_GOTPLT32, R_SH_GOTPLT32 },
1917 #ifdef INCLUDE_SHMEDIA
1918   { BFD_RELOC_SH_GOT_LOW16, R_SH_GOT_LOW16 },
1919   { BFD_RELOC_SH_GOT_MEDLOW16, R_SH_GOT_MEDLOW16 },
1920   { BFD_RELOC_SH_GOT_MEDHI16, R_SH_GOT_MEDHI16 },
1921   { BFD_RELOC_SH_GOT_HI16, R_SH_GOT_HI16 },
1922   { BFD_RELOC_SH_GOTPLT_LOW16, R_SH_GOTPLT_LOW16 },
1923   { BFD_RELOC_SH_GOTPLT_MEDLOW16, R_SH_GOTPLT_MEDLOW16 },
1924   { BFD_RELOC_SH_GOTPLT_MEDHI16, R_SH_GOTPLT_MEDHI16 },
1925   { BFD_RELOC_SH_GOTPLT_HI16, R_SH_GOTPLT_HI16 },
1926   { BFD_RELOC_SH_PLT_LOW16, R_SH_PLT_LOW16 },
1927   { BFD_RELOC_SH_PLT_MEDLOW16, R_SH_PLT_MEDLOW16 },
1928   { BFD_RELOC_SH_PLT_MEDHI16, R_SH_PLT_MEDHI16 },
1929   { BFD_RELOC_SH_PLT_HI16, R_SH_PLT_HI16 },
1930   { BFD_RELOC_SH_GOTOFF_LOW16, R_SH_GOTOFF_LOW16 },
1931   { BFD_RELOC_SH_GOTOFF_MEDLOW16, R_SH_GOTOFF_MEDLOW16 },
1932   { BFD_RELOC_SH_GOTOFF_MEDHI16, R_SH_GOTOFF_MEDHI16 },
1933   { BFD_RELOC_SH_GOTOFF_HI16, R_SH_GOTOFF_HI16 },
1934   { BFD_RELOC_SH_GOTPC_LOW16, R_SH_GOTPC_LOW16 },
1935   { BFD_RELOC_SH_GOTPC_MEDLOW16, R_SH_GOTPC_MEDLOW16 },
1936   { BFD_RELOC_SH_GOTPC_MEDHI16, R_SH_GOTPC_MEDHI16 },
1937   { BFD_RELOC_SH_GOTPC_HI16, R_SH_GOTPC_HI16 },
1938   { BFD_RELOC_SH_COPY64, R_SH_COPY64 },
1939   { BFD_RELOC_SH_GLOB_DAT64, R_SH_GLOB_DAT64 },
1940   { BFD_RELOC_SH_JMP_SLOT64, R_SH_JMP_SLOT64 },
1941   { BFD_RELOC_SH_RELATIVE64, R_SH_RELATIVE64 },
1942   { BFD_RELOC_SH_GOT10BY4, R_SH_GOT10BY4 },
1943   { BFD_RELOC_SH_GOT10BY8, R_SH_GOT10BY8 },
1944   { BFD_RELOC_SH_GOTPLT10BY4, R_SH_GOTPLT10BY4 },
1945   { BFD_RELOC_SH_GOTPLT10BY8, R_SH_GOTPLT10BY8 },
1946   { BFD_RELOC_SH_PT_16, R_SH_PT_16 },
1947   { BFD_RELOC_SH_SHMEDIA_CODE, R_SH_SHMEDIA_CODE },
1948   { BFD_RELOC_SH_IMMU5, R_SH_DIR5U },
1949   { BFD_RELOC_SH_IMMS6, R_SH_DIR6S },
1950   { BFD_RELOC_SH_IMMU6, R_SH_DIR6U },
1951   { BFD_RELOC_SH_IMMS10, R_SH_DIR10S },
1952   { BFD_RELOC_SH_IMMS10BY2, R_SH_DIR10SW },
1953   { BFD_RELOC_SH_IMMS10BY4, R_SH_DIR10SL },
1954   { BFD_RELOC_SH_IMMS10BY8, R_SH_DIR10SQ },
1955   { BFD_RELOC_SH_IMMS16, R_SH_IMMS16 },
1956   { BFD_RELOC_SH_IMMU16, R_SH_IMMU16 },
1957   { BFD_RELOC_SH_IMM_LOW16, R_SH_IMM_LOW16 },
1958   { BFD_RELOC_SH_IMM_LOW16_PCREL, R_SH_IMM_LOW16_PCREL },
1959   { BFD_RELOC_SH_IMM_MEDLOW16, R_SH_IMM_MEDLOW16 },
1960   { BFD_RELOC_SH_IMM_MEDLOW16_PCREL, R_SH_IMM_MEDLOW16_PCREL },
1961   { BFD_RELOC_SH_IMM_MEDHI16, R_SH_IMM_MEDHI16 },
1962   { BFD_RELOC_SH_IMM_MEDHI16_PCREL, R_SH_IMM_MEDHI16_PCREL },
1963   { BFD_RELOC_SH_IMM_HI16, R_SH_IMM_HI16 },
1964   { BFD_RELOC_SH_IMM_HI16_PCREL, R_SH_IMM_HI16_PCREL },
1965   { BFD_RELOC_64, R_SH_64 },
1966   { BFD_RELOC_64_PCREL, R_SH_64_PCREL },
1967 #endif /* not INCLUDE_SHMEDIA */
1968 };
1969
1970 /* Given a BFD reloc code, return the howto structure for the
1971    corresponding SH ELf reloc.  */
1972
1973 static reloc_howto_type *
1974 sh_elf_reloc_type_lookup (abfd, code)
1975      bfd *abfd ATTRIBUTE_UNUSED;
1976      bfd_reloc_code_real_type code;
1977 {
1978   unsigned int i;
1979
1980   for (i = 0; i < sizeof (sh_reloc_map) / sizeof (struct elf_reloc_map); i++)
1981     {
1982       if (sh_reloc_map[i].bfd_reloc_val == code)
1983         return &sh_elf_howto_table[(int) sh_reloc_map[i].elf_reloc_val];
1984     }
1985
1986   return NULL;
1987 }
1988
1989 /* Given an ELF reloc, fill in the howto field of a relent.  */
1990
1991 static void
1992 sh_elf_info_to_howto (abfd, cache_ptr, dst)
1993      bfd *abfd ATTRIBUTE_UNUSED;
1994      arelent *cache_ptr;
1995      Elf_Internal_Rela *dst;
1996 {
1997   unsigned int r;
1998
1999   r = ELF32_R_TYPE (dst->r_info);
2000
2001   BFD_ASSERT (r < (unsigned int) R_SH_max);
2002   BFD_ASSERT (r < R_SH_FIRST_INVALID_RELOC || r > R_SH_LAST_INVALID_RELOC);
2003   BFD_ASSERT (r < R_SH_FIRST_INVALID_RELOC_2 || r > R_SH_LAST_INVALID_RELOC_2);
2004   BFD_ASSERT (r < R_SH_FIRST_INVALID_RELOC_3 || r > R_SH_LAST_INVALID_RELOC_3);
2005   BFD_ASSERT (r < R_SH_FIRST_INVALID_RELOC_4 || r > R_SH_LAST_INVALID_RELOC_4);
2006   BFD_ASSERT (r < R_SH_FIRST_INVALID_RELOC_5 || r > R_SH_LAST_INVALID_RELOC_5);
2007
2008   cache_ptr->howto = &sh_elf_howto_table[r];
2009 }
2010 \f
2011 /* This function handles relaxing for SH ELF.  See the corresponding
2012    function in coff-sh.c for a description of what this does.  FIXME:
2013    There is a lot of duplication here between this code and the COFF
2014    specific code.  The format of relocs and symbols is wound deeply
2015    into this code, but it would still be better if the duplication
2016    could be eliminated somehow.  Note in particular that although both
2017    functions use symbols like R_SH_CODE, those symbols have different
2018    values; in coff-sh.c they come from include/coff/sh.h, whereas here
2019    they come from enum elf_sh_reloc_type in include/elf/sh.h.  */
2020
2021 static bfd_boolean
2022 sh_elf_relax_section (abfd, sec, link_info, again)
2023      bfd *abfd;
2024      asection *sec;
2025      struct bfd_link_info *link_info;
2026      bfd_boolean *again;
2027 {
2028   Elf_Internal_Shdr *symtab_hdr;
2029   Elf_Internal_Rela *internal_relocs;
2030   bfd_boolean have_code;
2031   Elf_Internal_Rela *irel, *irelend;
2032   bfd_byte *contents = NULL;
2033   Elf_Internal_Sym *isymbuf = NULL;
2034
2035   *again = FALSE;
2036
2037   if (link_info->relocateable
2038       || (sec->flags & SEC_RELOC) == 0
2039       || sec->reloc_count == 0)
2040     return TRUE;
2041
2042 #ifdef INCLUDE_SHMEDIA
2043   if (elf_section_data (sec)->this_hdr.sh_flags
2044       & (SHF_SH5_ISA32 | SHF_SH5_ISA32_MIXED))
2045     {
2046       return TRUE;
2047     }
2048 #endif
2049
2050   /* If this is the first time we have been called for this section,
2051      initialize the cooked size.  */
2052   if (sec->_cooked_size == 0)
2053     sec->_cooked_size = sec->_raw_size;
2054
2055   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2056
2057   internal_relocs = (_bfd_elf_link_read_relocs
2058                      (abfd, sec, (PTR) NULL, (Elf_Internal_Rela *) NULL,
2059                       link_info->keep_memory));
2060   if (internal_relocs == NULL)
2061     goto error_return;
2062
2063   have_code = FALSE;
2064
2065   irelend = internal_relocs + sec->reloc_count;
2066   for (irel = internal_relocs; irel < irelend; irel++)
2067     {
2068       bfd_vma laddr, paddr, symval;
2069       unsigned short insn;
2070       Elf_Internal_Rela *irelfn, *irelscan, *irelcount;
2071       bfd_signed_vma foff;
2072
2073       if (ELF32_R_TYPE (irel->r_info) == (int) R_SH_CODE)
2074         have_code = TRUE;
2075
2076       if (ELF32_R_TYPE (irel->r_info) != (int) R_SH_USES)
2077         continue;
2078
2079       /* Get the section contents.  */
2080       if (contents == NULL)
2081         {
2082           if (elf_section_data (sec)->this_hdr.contents != NULL)
2083             contents = elf_section_data (sec)->this_hdr.contents;
2084           else
2085             {
2086               contents = (bfd_byte *) bfd_malloc (sec->_raw_size);
2087               if (contents == NULL)
2088                 goto error_return;
2089
2090               if (! bfd_get_section_contents (abfd, sec, contents,
2091                                               (file_ptr) 0, sec->_raw_size))
2092                 goto error_return;
2093             }
2094         }
2095
2096       /* The r_addend field of the R_SH_USES reloc will point us to
2097          the register load.  The 4 is because the r_addend field is
2098          computed as though it were a jump offset, which are based
2099          from 4 bytes after the jump instruction.  */
2100       laddr = irel->r_offset + 4 + irel->r_addend;
2101       if (laddr >= sec->_raw_size)
2102         {
2103           (*_bfd_error_handler) (_("%s: 0x%lx: warning: bad R_SH_USES offset"),
2104                                  bfd_archive_filename (abfd),
2105                                  (unsigned long) irel->r_offset);
2106           continue;
2107         }
2108       insn = bfd_get_16 (abfd, contents + laddr);
2109
2110       /* If the instruction is not mov.l NN,rN, we don't know what to
2111          do.  */
2112       if ((insn & 0xf000) != 0xd000)
2113         {
2114           ((*_bfd_error_handler)
2115            (_("%s: 0x%lx: warning: R_SH_USES points to unrecognized insn 0x%x"),
2116             bfd_archive_filename (abfd), (unsigned long) irel->r_offset, insn));
2117           continue;
2118         }
2119
2120       /* Get the address from which the register is being loaded.  The
2121          displacement in the mov.l instruction is quadrupled.  It is a
2122          displacement from four bytes after the movl instruction, but,
2123          before adding in the PC address, two least significant bits
2124          of the PC are cleared.  We assume that the section is aligned
2125          on a four byte boundary.  */
2126       paddr = insn & 0xff;
2127       paddr *= 4;
2128       paddr += (laddr + 4) &~ (bfd_vma) 3;
2129       if (paddr >= sec->_raw_size)
2130         {
2131           ((*_bfd_error_handler)
2132            (_("%s: 0x%lx: warning: bad R_SH_USES load offset"),
2133             bfd_archive_filename (abfd), (unsigned long) irel->r_offset));
2134           continue;
2135         }
2136
2137       /* Get the reloc for the address from which the register is
2138          being loaded.  This reloc will tell us which function is
2139          actually being called.  */
2140       for (irelfn = internal_relocs; irelfn < irelend; irelfn++)
2141         if (irelfn->r_offset == paddr
2142             && ELF32_R_TYPE (irelfn->r_info) == (int) R_SH_DIR32)
2143           break;
2144       if (irelfn >= irelend)
2145         {
2146           ((*_bfd_error_handler)
2147            (_("%s: 0x%lx: warning: could not find expected reloc"),
2148             bfd_archive_filename (abfd), (unsigned long) paddr));
2149           continue;
2150         }
2151
2152       /* Read this BFD's symbols if we haven't done so already.  */
2153       if (isymbuf == NULL && symtab_hdr->sh_info != 0)
2154         {
2155           isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
2156           if (isymbuf == NULL)
2157             isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr,
2158                                             symtab_hdr->sh_info, 0,
2159                                             NULL, NULL, NULL);
2160           if (isymbuf == NULL)
2161             goto error_return;
2162         }
2163
2164       /* Get the value of the symbol referred to by the reloc.  */
2165       if (ELF32_R_SYM (irelfn->r_info) < symtab_hdr->sh_info)
2166         {
2167           /* A local symbol.  */
2168           Elf_Internal_Sym *isym;
2169
2170           isym = isymbuf + ELF32_R_SYM (irelfn->r_info);
2171           if (isym->st_shndx
2172               != (unsigned int) _bfd_elf_section_from_bfd_section (abfd, sec))
2173             {
2174               ((*_bfd_error_handler)
2175                (_("%s: 0x%lx: warning: symbol in unexpected section"),
2176                 bfd_archive_filename (abfd), (unsigned long) paddr));
2177               continue;
2178             }
2179
2180           symval = (isym->st_value
2181                     + sec->output_section->vma
2182                     + sec->output_offset);
2183         }
2184       else
2185         {
2186           unsigned long indx;
2187           struct elf_link_hash_entry *h;
2188
2189           indx = ELF32_R_SYM (irelfn->r_info) - symtab_hdr->sh_info;
2190           h = elf_sym_hashes (abfd)[indx];
2191           BFD_ASSERT (h != NULL);
2192           if (h->root.type != bfd_link_hash_defined
2193               && h->root.type != bfd_link_hash_defweak)
2194             {
2195               /* This appears to be a reference to an undefined
2196                  symbol.  Just ignore it--it will be caught by the
2197                  regular reloc processing.  */
2198               continue;
2199             }
2200
2201           symval = (h->root.u.def.value
2202                     + h->root.u.def.section->output_section->vma
2203                     + h->root.u.def.section->output_offset);
2204         }
2205
2206       symval += bfd_get_32 (abfd, contents + paddr);
2207
2208       /* See if this function call can be shortened.  */
2209       foff = (symval
2210               - (irel->r_offset
2211                  + sec->output_section->vma
2212                  + sec->output_offset
2213                  + 4));
2214       if (foff < -0x1000 || foff >= 0x1000)
2215         {
2216           /* After all that work, we can't shorten this function call.  */
2217           continue;
2218         }
2219
2220       /* Shorten the function call.  */
2221
2222       /* For simplicity of coding, we are going to modify the section
2223          contents, the section relocs, and the BFD symbol table.  We
2224          must tell the rest of the code not to free up this
2225          information.  It would be possible to instead create a table
2226          of changes which have to be made, as is done in coff-mips.c;
2227          that would be more work, but would require less memory when
2228          the linker is run.  */
2229
2230       elf_section_data (sec)->relocs = internal_relocs;
2231       elf_section_data (sec)->this_hdr.contents = contents;
2232       symtab_hdr->contents = (unsigned char *) isymbuf;
2233
2234       /* Replace the jsr with a bsr.  */
2235
2236       /* Change the R_SH_USES reloc into an R_SH_IND12W reloc, and
2237          replace the jsr with a bsr.  */
2238       irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irelfn->r_info), R_SH_IND12W);
2239       /* We used to test (ELF32_R_SYM (irelfn->r_info) < symtab_hdr->sh_info)
2240          here, but that only checks if the symbol is an external symbol,
2241          not if the symbol is in a different section.  Besides, we need
2242          a consistent meaning for the relocation, so we just assume here that
2243          the value of the symbol is not available.  */
2244 #if 0
2245       if (ELF32_R_SYM (irelfn->r_info) < symtab_hdr->sh_info)
2246         {
2247           /* If this needs to be changed because of future relaxing,
2248              it will be handled here like other internal IND12W
2249              relocs.  */
2250           bfd_put_16 (abfd,
2251                       (bfd_vma) 0xb000 | ((foff >> 1) & 0xfff),
2252                       contents + irel->r_offset);
2253         }
2254       else
2255 #endif
2256         {
2257           /* We can't fully resolve this yet, because the external
2258              symbol value may be changed by future relaxing.  We let
2259              the final link phase handle it.  */
2260           bfd_put_16 (abfd, (bfd_vma) 0xb000, contents + irel->r_offset);
2261         }
2262       irel->r_addend = -4;
2263
2264       /* See if there is another R_SH_USES reloc referring to the same
2265          register load.  */
2266       for (irelscan = internal_relocs; irelscan < irelend; irelscan++)
2267         if (ELF32_R_TYPE (irelscan->r_info) == (int) R_SH_USES
2268             && laddr == irelscan->r_offset + 4 + irelscan->r_addend)
2269           break;
2270       if (irelscan < irelend)
2271         {
2272           /* Some other function call depends upon this register load,
2273              and we have not yet converted that function call.
2274              Indeed, we may never be able to convert it.  There is
2275              nothing else we can do at this point.  */
2276           continue;
2277         }
2278
2279       /* Look for a R_SH_COUNT reloc on the location where the
2280          function address is stored.  Do this before deleting any
2281          bytes, to avoid confusion about the address.  */
2282       for (irelcount = internal_relocs; irelcount < irelend; irelcount++)
2283         if (irelcount->r_offset == paddr
2284             && ELF32_R_TYPE (irelcount->r_info) == (int) R_SH_COUNT)
2285           break;
2286
2287       /* Delete the register load.  */
2288       if (! sh_elf_relax_delete_bytes (abfd, sec, laddr, 2))
2289         goto error_return;
2290
2291       /* That will change things, so, just in case it permits some
2292          other function call to come within range, we should relax
2293          again.  Note that this is not required, and it may be slow.  */
2294       *again = TRUE;
2295
2296       /* Now check whether we got a COUNT reloc.  */
2297       if (irelcount >= irelend)
2298         {
2299           ((*_bfd_error_handler)
2300            (_("%s: 0x%lx: warning: could not find expected COUNT reloc"),
2301             bfd_archive_filename (abfd), (unsigned long) paddr));
2302           continue;
2303         }
2304
2305       /* The number of uses is stored in the r_addend field.  We've
2306          just deleted one.  */
2307       if (irelcount->r_addend == 0)
2308         {
2309           ((*_bfd_error_handler) (_("%s: 0x%lx: warning: bad count"),
2310                                   bfd_archive_filename (abfd),
2311                                   (unsigned long) paddr));
2312           continue;
2313         }
2314
2315       --irelcount->r_addend;
2316
2317       /* If there are no more uses, we can delete the address.  Reload
2318          the address from irelfn, in case it was changed by the
2319          previous call to sh_elf_relax_delete_bytes.  */
2320       if (irelcount->r_addend == 0)
2321         {
2322           if (! sh_elf_relax_delete_bytes (abfd, sec, irelfn->r_offset, 4))
2323             goto error_return;
2324         }
2325
2326       /* We've done all we can with that function call.  */
2327     }
2328
2329   /* Look for load and store instructions that we can align on four
2330      byte boundaries.  */
2331   if ((elf_elfheader (abfd)->e_flags & EF_SH_MACH_MASK) != EF_SH4
2332       && have_code)
2333     {
2334       bfd_boolean swapped;
2335
2336       /* Get the section contents.  */
2337       if (contents == NULL)
2338         {
2339           if (elf_section_data (sec)->this_hdr.contents != NULL)
2340             contents = elf_section_data (sec)->this_hdr.contents;
2341           else
2342             {
2343               contents = (bfd_byte *) bfd_malloc (sec->_raw_size);
2344               if (contents == NULL)
2345                 goto error_return;
2346
2347               if (! bfd_get_section_contents (abfd, sec, contents,
2348                                               (file_ptr) 0, sec->_raw_size))
2349                 goto error_return;
2350             }
2351         }
2352
2353       if (! sh_elf_align_loads (abfd, sec, internal_relocs, contents,
2354                                 &swapped))
2355         goto error_return;
2356
2357       if (swapped)
2358         {
2359           elf_section_data (sec)->relocs = internal_relocs;
2360           elf_section_data (sec)->this_hdr.contents = contents;
2361           symtab_hdr->contents = (unsigned char *) isymbuf;
2362         }
2363     }
2364
2365   if (isymbuf != NULL
2366       && symtab_hdr->contents != (unsigned char *) isymbuf)
2367     {
2368       if (! link_info->keep_memory)
2369         free (isymbuf);
2370       else
2371         {
2372           /* Cache the symbols for elf_link_input_bfd.  */
2373           symtab_hdr->contents = (unsigned char *) isymbuf;
2374         }
2375     }
2376
2377   if (contents != NULL
2378       && elf_section_data (sec)->this_hdr.contents != contents)
2379     {
2380       if (! link_info->keep_memory)
2381         free (contents);
2382       else
2383         {
2384           /* Cache the section contents for elf_link_input_bfd.  */
2385           elf_section_data (sec)->this_hdr.contents = contents;
2386         }
2387     }
2388
2389   if (internal_relocs != NULL
2390       && elf_section_data (sec)->relocs != internal_relocs)
2391     free (internal_relocs);
2392
2393   return TRUE;
2394
2395  error_return:
2396   if (isymbuf != NULL
2397       && symtab_hdr->contents != (unsigned char *) isymbuf)
2398     free (isymbuf);
2399   if (contents != NULL
2400       && elf_section_data (sec)->this_hdr.contents != contents)
2401     free (contents);
2402   if (internal_relocs != NULL
2403       && elf_section_data (sec)->relocs != internal_relocs)
2404     free (internal_relocs);
2405
2406   return FALSE;
2407 }
2408
2409 /* Delete some bytes from a section while relaxing.  FIXME: There is a
2410    lot of duplication between this function and sh_relax_delete_bytes
2411    in coff-sh.c.  */
2412
2413 static bfd_boolean
2414 sh_elf_relax_delete_bytes (abfd, sec, addr, count)
2415      bfd *abfd;
2416      asection *sec;
2417      bfd_vma addr;
2418      int count;
2419 {
2420   Elf_Internal_Shdr *symtab_hdr;
2421   unsigned int sec_shndx;
2422   bfd_byte *contents;
2423   Elf_Internal_Rela *irel, *irelend;
2424   Elf_Internal_Rela *irelalign;
2425   bfd_vma toaddr;
2426   Elf_Internal_Sym *isymbuf, *isym, *isymend;
2427   struct elf_link_hash_entry **sym_hashes;
2428   struct elf_link_hash_entry **end_hashes;
2429   unsigned int symcount;
2430   asection *o;
2431
2432   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2433   isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
2434
2435   sec_shndx = _bfd_elf_section_from_bfd_section (abfd, sec);
2436
2437   contents = elf_section_data (sec)->this_hdr.contents;
2438
2439   /* The deletion must stop at the next ALIGN reloc for an aligment
2440      power larger than the number of bytes we are deleting.  */
2441
2442   irelalign = NULL;
2443   toaddr = sec->_cooked_size;
2444
2445   irel = elf_section_data (sec)->relocs;
2446   irelend = irel + sec->reloc_count;
2447   for (; irel < irelend; irel++)
2448     {
2449       if (ELF32_R_TYPE (irel->r_info) == (int) R_SH_ALIGN
2450           && irel->r_offset > addr
2451           && count < (1 << irel->r_addend))
2452         {
2453           irelalign = irel;
2454           toaddr = irel->r_offset;
2455           break;
2456         }
2457     }
2458
2459   /* Actually delete the bytes.  */
2460   memmove (contents + addr, contents + addr + count,
2461            (size_t) (toaddr - addr - count));
2462   if (irelalign == NULL)
2463     sec->_cooked_size -= count;
2464   else
2465     {
2466       int i;
2467
2468 #define NOP_OPCODE (0x0009)
2469
2470       BFD_ASSERT ((count & 1) == 0);
2471       for (i = 0; i < count; i += 2)
2472         bfd_put_16 (abfd, (bfd_vma) NOP_OPCODE, contents + toaddr - count + i);
2473     }
2474
2475   /* Adjust all the relocs.  */
2476   for (irel = elf_section_data (sec)->relocs; irel < irelend; irel++)
2477     {
2478       bfd_vma nraddr, stop;
2479       bfd_vma start = 0;
2480       int insn = 0;
2481       int off, adjust, oinsn;
2482       bfd_signed_vma voff = 0;
2483       bfd_boolean overflow;
2484
2485       /* Get the new reloc address.  */
2486       nraddr = irel->r_offset;
2487       if ((irel->r_offset > addr
2488            && irel->r_offset < toaddr)
2489           || (ELF32_R_TYPE (irel->r_info) == (int) R_SH_ALIGN
2490               && irel->r_offset == toaddr))
2491         nraddr -= count;
2492
2493       /* See if this reloc was for the bytes we have deleted, in which
2494          case we no longer care about it.  Don't delete relocs which
2495          represent addresses, though.  */
2496       if (irel->r_offset >= addr
2497           && irel->r_offset < addr + count
2498           && ELF32_R_TYPE (irel->r_info) != (int) R_SH_ALIGN
2499           && ELF32_R_TYPE (irel->r_info) != (int) R_SH_CODE
2500           && ELF32_R_TYPE (irel->r_info) != (int) R_SH_DATA
2501           && ELF32_R_TYPE (irel->r_info) != (int) R_SH_LABEL)
2502         irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
2503                                      (int) R_SH_NONE);
2504
2505       /* If this is a PC relative reloc, see if the range it covers
2506          includes the bytes we have deleted.  */
2507       switch ((enum elf_sh_reloc_type) ELF32_R_TYPE (irel->r_info))
2508         {
2509         default:
2510           break;
2511
2512         case R_SH_DIR8WPN:
2513         case R_SH_IND12W:
2514         case R_SH_DIR8WPZ:
2515         case R_SH_DIR8WPL:
2516           start = irel->r_offset;
2517           insn = bfd_get_16 (abfd, contents + nraddr);
2518           break;
2519         }
2520
2521       switch ((enum elf_sh_reloc_type) ELF32_R_TYPE (irel->r_info))
2522         {
2523         default:
2524           start = stop = addr;
2525           break;
2526
2527         case R_SH_DIR32:
2528           /* If this reloc is against a symbol defined in this
2529              section, and the symbol will not be adjusted below, we
2530              must check the addend to see it will put the value in
2531              range to be adjusted, and hence must be changed.  */
2532           if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
2533             {
2534               isym = isymbuf + ELF32_R_SYM (irel->r_info);
2535               if (isym->st_shndx == sec_shndx
2536                   && (isym->st_value <= addr
2537                       || isym->st_value >= toaddr))
2538                 {
2539                   bfd_vma val;
2540
2541                   val = bfd_get_32 (abfd, contents + nraddr);
2542                   val += isym->st_value;
2543                   if (val > addr && val < toaddr)
2544                     bfd_put_32 (abfd, val - count, contents + nraddr);
2545                 }
2546             }
2547           start = stop = addr;
2548           break;
2549
2550         case R_SH_DIR8WPN:
2551           off = insn & 0xff;
2552           if (off & 0x80)
2553             off -= 0x100;
2554           stop = (bfd_vma) ((bfd_signed_vma) start + 4 + off * 2);
2555           break;
2556
2557         case R_SH_IND12W:
2558           off = insn & 0xfff;
2559           if (! off)
2560             {
2561               /* This has been made by previous relaxation.  Since the
2562                  relocation will be against an external symbol, the
2563                  final relocation will just do the right thing.  */
2564               start = stop = addr;
2565             }
2566           else
2567             {
2568               if (off & 0x800)
2569                 off -= 0x1000;
2570               stop = (bfd_vma) ((bfd_signed_vma) start + 4 + off * 2);
2571
2572               /* The addend will be against the section symbol, thus
2573                  for adjusting the addend, the relevant start is the
2574                  start of the section.
2575                  N.B. If we want to abandom in-place changes here and
2576                  test directly using symbol + addend, we have to take into
2577                  account that the addend has already been adjusted by -4.  */
2578               if (stop > addr && stop < toaddr)
2579                 irel->r_addend -= count;
2580             }
2581           break;
2582
2583         case R_SH_DIR8WPZ:
2584           off = insn & 0xff;
2585           stop = start + 4 + off * 2;
2586           break;
2587
2588         case R_SH_DIR8WPL:
2589           off = insn & 0xff;
2590           stop = (start & ~(bfd_vma) 3) + 4 + off * 4;
2591           break;
2592
2593         case R_SH_SWITCH8:
2594         case R_SH_SWITCH16:
2595         case R_SH_SWITCH32:
2596           /* These relocs types represent
2597                .word L2-L1
2598              The r_addend field holds the difference between the reloc
2599              address and L1.  That is the start of the reloc, and
2600              adding in the contents gives us the top.  We must adjust
2601              both the r_offset field and the section contents.
2602              N.B. in gas / coff bfd, the elf bfd r_addend is called r_offset,
2603              and the elf bfd r_offset is called r_vaddr.  */
2604
2605           stop = irel->r_offset;
2606           start = (bfd_vma) ((bfd_signed_vma) stop - (long) irel->r_addend);
2607
2608           if (start > addr
2609               && start < toaddr
2610               && (stop <= addr || stop >= toaddr))
2611             irel->r_addend += count;
2612           else if (stop > addr
2613                    && stop < toaddr
2614                    && (start <= addr || start >= toaddr))
2615             irel->r_addend -= count;
2616
2617           if (ELF32_R_TYPE (irel->r_info) == (int) R_SH_SWITCH16)
2618             voff = bfd_get_signed_16 (abfd, contents + nraddr);
2619           else if (ELF32_R_TYPE (irel->r_info) == (int) R_SH_SWITCH8)
2620             voff = bfd_get_8 (abfd, contents + nraddr);
2621           else
2622             voff = bfd_get_signed_32 (abfd, contents + nraddr);
2623           stop = (bfd_vma) ((bfd_signed_vma) start + voff);
2624
2625           break;
2626
2627         case R_SH_USES:
2628           start = irel->r_offset;
2629           stop = (bfd_vma) ((bfd_signed_vma) start
2630                             + (long) irel->r_addend
2631                             + 4);
2632           break;
2633         }
2634
2635       if (start > addr
2636           && start < toaddr
2637           && (stop <= addr || stop >= toaddr))
2638         adjust = count;
2639       else if (stop > addr
2640                && stop < toaddr
2641                && (start <= addr || start >= toaddr))
2642         adjust = - count;
2643       else
2644         adjust = 0;
2645
2646       if (adjust != 0)
2647         {
2648           oinsn = insn;
2649           overflow = FALSE;
2650           switch ((enum elf_sh_reloc_type) ELF32_R_TYPE (irel->r_info))
2651             {
2652             default:
2653               abort ();
2654               break;
2655
2656             case R_SH_DIR8WPN:
2657             case R_SH_DIR8WPZ:
2658               insn += adjust / 2;
2659               if ((oinsn & 0xff00) != (insn & 0xff00))
2660                 overflow = TRUE;
2661               bfd_put_16 (abfd, (bfd_vma) insn, contents + nraddr);
2662               break;
2663
2664             case R_SH_IND12W:
2665               insn += adjust / 2;
2666               if ((oinsn & 0xf000) != (insn & 0xf000))
2667                 overflow = TRUE;
2668               bfd_put_16 (abfd, (bfd_vma) insn, contents + nraddr);
2669               break;
2670
2671             case R_SH_DIR8WPL:
2672               BFD_ASSERT (adjust == count || count >= 4);
2673               if (count >= 4)
2674                 insn += adjust / 4;
2675               else
2676                 {
2677                   if ((irel->r_offset & 3) == 0)
2678                     ++insn;
2679                 }
2680               if ((oinsn & 0xff00) != (insn & 0xff00))
2681                 overflow = TRUE;
2682               bfd_put_16 (abfd, (bfd_vma) insn, contents + nraddr);
2683               break;
2684
2685             case R_SH_SWITCH8:
2686               voff += adjust;
2687               if (voff < 0 || voff >= 0xff)
2688                 overflow = TRUE;
2689               bfd_put_8 (abfd, voff, contents + nraddr);
2690               break;
2691
2692             case R_SH_SWITCH16:
2693               voff += adjust;
2694               if (voff < - 0x8000 || voff >= 0x8000)
2695                 overflow = TRUE;
2696               bfd_put_signed_16 (abfd, (bfd_vma) voff, contents + nraddr);
2697               break;
2698
2699             case R_SH_SWITCH32:
2700               voff += adjust;
2701               bfd_put_signed_32 (abfd, (bfd_vma) voff, contents + nraddr);
2702               break;
2703
2704             case R_SH_USES:
2705               irel->r_addend += adjust;
2706               break;
2707             }
2708
2709           if (overflow)
2710             {
2711               ((*_bfd_error_handler)
2712                (_("%s: 0x%lx: fatal: reloc overflow while relaxing"),
2713                 bfd_archive_filename (abfd), (unsigned long) irel->r_offset));
2714               bfd_set_error (bfd_error_bad_value);
2715               return FALSE;
2716             }
2717         }
2718
2719       irel->r_offset = nraddr;
2720     }
2721
2722   /* Look through all the other sections.  If there contain any IMM32
2723      relocs against internal symbols which we are not going to adjust
2724      below, we may need to adjust the addends.  */
2725   for (o = abfd->sections; o != NULL; o = o->next)
2726     {
2727       Elf_Internal_Rela *internal_relocs;
2728       Elf_Internal_Rela *irelscan, *irelscanend;
2729       bfd_byte *ocontents;
2730
2731       if (o == sec
2732           || (o->flags & SEC_RELOC) == 0
2733           || o->reloc_count == 0)
2734         continue;
2735
2736       /* We always cache the relocs.  Perhaps, if info->keep_memory is
2737          FALSE, we should free them, if we are permitted to, when we
2738          leave sh_coff_relax_section.  */
2739       internal_relocs = (_bfd_elf_link_read_relocs
2740                          (abfd, o, (PTR) NULL, (Elf_Internal_Rela *) NULL,
2741                           TRUE));
2742       if (internal_relocs == NULL)
2743         return FALSE;
2744
2745       ocontents = NULL;
2746       irelscanend = internal_relocs + o->reloc_count;
2747       for (irelscan = internal_relocs; irelscan < irelscanend; irelscan++)
2748         {
2749           /* Dwarf line numbers use R_SH_SWITCH32 relocs.  */
2750           if (ELF32_R_TYPE (irelscan->r_info) == (int) R_SH_SWITCH32)
2751             {
2752               bfd_vma start, stop;
2753               bfd_signed_vma voff;
2754
2755               if (ocontents == NULL)
2756                 {
2757                   if (elf_section_data (o)->this_hdr.contents != NULL)
2758                     ocontents = elf_section_data (o)->this_hdr.contents;
2759                   else
2760                     {
2761                       /* We always cache the section contents.
2762                          Perhaps, if info->keep_memory is FALSE, we
2763                          should free them, if we are permitted to,
2764                          when we leave sh_coff_relax_section.  */
2765                       ocontents = (bfd_byte *) bfd_malloc (o->_raw_size);
2766                       if (ocontents == NULL)
2767                         return FALSE;
2768                       if (! bfd_get_section_contents (abfd, o, ocontents,
2769                                                       (file_ptr) 0,
2770                                                       o->_raw_size))
2771                         return FALSE;
2772                       elf_section_data (o)->this_hdr.contents = ocontents;
2773                     }
2774                 }
2775
2776               stop = irelscan->r_offset;
2777               start
2778                 = (bfd_vma) ((bfd_signed_vma) stop - (long) irelscan->r_addend);
2779
2780               /* STOP is in a different section, so it won't change.  */
2781               if (start > addr && start < toaddr)
2782                 irelscan->r_addend += count;
2783
2784               voff = bfd_get_signed_32 (abfd, ocontents + irelscan->r_offset);
2785               stop = (bfd_vma) ((bfd_signed_vma) start + voff);
2786
2787               if (start > addr
2788                   && start < toaddr
2789                   && (stop <= addr || stop >= toaddr))
2790                 bfd_put_signed_32 (abfd, (bfd_vma) voff + count,
2791                                    ocontents + irelscan->r_offset);
2792               else if (stop > addr
2793                        && stop < toaddr
2794                        && (start <= addr || start >= toaddr))
2795                 bfd_put_signed_32 (abfd, (bfd_vma) voff - count,
2796                                    ocontents + irelscan->r_offset);
2797             }
2798
2799           if (ELF32_R_TYPE (irelscan->r_info) != (int) R_SH_DIR32)
2800             continue;
2801
2802           if (ELF32_R_SYM (irelscan->r_info) >= symtab_hdr->sh_info)
2803             continue;
2804
2805
2806           isym = isymbuf + ELF32_R_SYM (irelscan->r_info);
2807           if (isym->st_shndx == sec_shndx
2808               && (isym->st_value <= addr
2809                   || isym->st_value >= toaddr))
2810             {
2811               bfd_vma val;
2812
2813               if (ocontents == NULL)
2814                 {
2815                   if (elf_section_data (o)->this_hdr.contents != NULL)
2816                     ocontents = elf_section_data (o)->this_hdr.contents;
2817                   else
2818                     {
2819                       /* We always cache the section contents.
2820                          Perhaps, if info->keep_memory is FALSE, we
2821                          should free them, if we are permitted to,
2822                          when we leave sh_coff_relax_section.  */
2823                       ocontents = (bfd_byte *) bfd_malloc (o->_raw_size);
2824                       if (ocontents == NULL)
2825                         return FALSE;
2826                       if (! bfd_get_section_contents (abfd, o, ocontents,
2827                                                       (file_ptr) 0,
2828                                                       o->_raw_size))
2829                         return FALSE;
2830                       elf_section_data (o)->this_hdr.contents = ocontents;
2831                     }
2832                 }
2833
2834               val = bfd_get_32 (abfd, ocontents + irelscan->r_offset);
2835               val += isym->st_value;
2836               if (val > addr && val < toaddr)
2837                 bfd_put_32 (abfd, val - count,
2838                             ocontents + irelscan->r_offset);
2839             }
2840         }
2841     }
2842
2843   /* Adjust the local symbols defined in this section.  */
2844   isymend = isymbuf + symtab_hdr->sh_info;
2845   for (isym = isymbuf; isym < isymend; isym++)
2846     {
2847       if (isym->st_shndx == sec_shndx
2848           && isym->st_value > addr
2849           && isym->st_value < toaddr)
2850         isym->st_value -= count;
2851     }
2852
2853   /* Now adjust the global symbols defined in this section.  */
2854   symcount = (symtab_hdr->sh_size / sizeof (Elf32_External_Sym)
2855               - symtab_hdr->sh_info);
2856   sym_hashes = elf_sym_hashes (abfd);
2857   end_hashes = sym_hashes + symcount;
2858   for (; sym_hashes < end_hashes; sym_hashes++)
2859     {
2860       struct elf_link_hash_entry *sym_hash = *sym_hashes;
2861       if ((sym_hash->root.type == bfd_link_hash_defined
2862            || sym_hash->root.type == bfd_link_hash_defweak)
2863           && sym_hash->root.u.def.section == sec
2864           && sym_hash->root.u.def.value > addr
2865           && sym_hash->root.u.def.value < toaddr)
2866         {
2867           sym_hash->root.u.def.value -= count;
2868         }
2869     }
2870
2871   /* See if we can move the ALIGN reloc forward.  We have adjusted
2872      r_offset for it already.  */
2873   if (irelalign != NULL)
2874     {
2875       bfd_vma alignto, alignaddr;
2876
2877       alignto = BFD_ALIGN (toaddr, 1 << irelalign->r_addend);
2878       alignaddr = BFD_ALIGN (irelalign->r_offset,
2879                              1 << irelalign->r_addend);
2880       if (alignto != alignaddr)
2881         {
2882           /* Tail recursion.  */
2883           return sh_elf_relax_delete_bytes (abfd, sec, alignaddr,
2884                                             (int) (alignto - alignaddr));
2885         }
2886     }
2887
2888   return TRUE;
2889 }
2890
2891 /* Look for loads and stores which we can align to four byte
2892    boundaries.  This is like sh_align_loads in coff-sh.c.  */
2893
2894 static bfd_boolean
2895 sh_elf_align_loads (abfd, sec, internal_relocs, contents, pswapped)
2896      bfd *abfd ATTRIBUTE_UNUSED;
2897      asection *sec;
2898      Elf_Internal_Rela *internal_relocs;
2899      bfd_byte *contents ATTRIBUTE_UNUSED;
2900      bfd_boolean *pswapped;
2901 {
2902   Elf_Internal_Rela *irel, *irelend;
2903   bfd_vma *labels = NULL;
2904   bfd_vma *label, *label_end;
2905   bfd_size_type amt;
2906
2907   *pswapped = FALSE;
2908
2909   irelend = internal_relocs + sec->reloc_count;
2910
2911   /* Get all the addresses with labels on them.  */
2912   amt = sec->reloc_count;
2913   amt *= sizeof (bfd_vma);
2914   labels = (bfd_vma *) bfd_malloc (amt);
2915   if (labels == NULL)
2916     goto error_return;
2917   label_end = labels;
2918   for (irel = internal_relocs; irel < irelend; irel++)
2919     {
2920       if (ELF32_R_TYPE (irel->r_info) == (int) R_SH_LABEL)
2921         {
2922           *label_end = irel->r_offset;
2923           ++label_end;
2924         }
2925     }
2926
2927   /* Note that the assembler currently always outputs relocs in
2928      address order.  If that ever changes, this code will need to sort
2929      the label values and the relocs.  */
2930
2931   label = labels;
2932
2933   for (irel = internal_relocs; irel < irelend; irel++)
2934     {
2935       bfd_vma start, stop;
2936
2937       if (ELF32_R_TYPE (irel->r_info) != (int) R_SH_CODE)
2938         continue;
2939
2940       start = irel->r_offset;
2941
2942       for (irel++; irel < irelend; irel++)
2943         if (ELF32_R_TYPE (irel->r_info) == (int) R_SH_DATA)
2944           break;
2945       if (irel < irelend)
2946         stop = irel->r_offset;
2947       else
2948         stop = sec->_cooked_size;
2949
2950       if (! _bfd_sh_align_load_span (abfd, sec, contents, sh_elf_swap_insns,
2951                                      (PTR) internal_relocs, &label,
2952                                      label_end, start, stop, pswapped))
2953         goto error_return;
2954     }
2955
2956   free (labels);
2957
2958   return TRUE;
2959
2960  error_return:
2961   if (labels != NULL)
2962     free (labels);
2963   return FALSE;
2964 }
2965
2966 /* Swap two SH instructions.  This is like sh_swap_insns in coff-sh.c.  */
2967
2968 static bfd_boolean
2969 sh_elf_swap_insns (abfd, sec, relocs, contents, addr)
2970      bfd *abfd;
2971      asection *sec;
2972      PTR relocs;
2973      bfd_byte *contents;
2974      bfd_vma addr;
2975 {
2976   Elf_Internal_Rela *internal_relocs = (Elf_Internal_Rela *) relocs;
2977   unsigned short i1, i2;
2978   Elf_Internal_Rela *irel, *irelend;
2979
2980   /* Swap the instructions themselves.  */
2981   i1 = bfd_get_16 (abfd, contents + addr);
2982   i2 = bfd_get_16 (abfd, contents + addr + 2);
2983   bfd_put_16 (abfd, (bfd_vma) i2, contents + addr);
2984   bfd_put_16 (abfd, (bfd_vma) i1, contents + addr + 2);
2985
2986   /* Adjust all reloc addresses.  */
2987   irelend = internal_relocs + sec->reloc_count;
2988   for (irel = internal_relocs; irel < irelend; irel++)
2989     {
2990       enum elf_sh_reloc_type type;
2991       int add;
2992
2993       /* There are a few special types of relocs that we don't want to
2994          adjust.  These relocs do not apply to the instruction itself,
2995          but are only associated with the address.  */
2996       type = (enum elf_sh_reloc_type) ELF32_R_TYPE (irel->r_info);
2997       if (type == R_SH_ALIGN
2998           || type == R_SH_CODE
2999           || type == R_SH_DATA
3000           || type == R_SH_LABEL)
3001         continue;
3002
3003       /* If an R_SH_USES reloc points to one of the addresses being
3004          swapped, we must adjust it.  It would be incorrect to do this
3005          for a jump, though, since we want to execute both
3006          instructions after the jump.  (We have avoided swapping
3007          around a label, so the jump will not wind up executing an
3008          instruction it shouldn't).  */
3009       if (type == R_SH_USES)
3010         {
3011           bfd_vma off;
3012
3013           off = irel->r_offset + 4 + irel->r_addend;
3014           if (off == addr)
3015             irel->r_offset += 2;
3016           else if (off == addr + 2)
3017             irel->r_offset -= 2;
3018         }
3019
3020       if (irel->r_offset == addr)
3021         {
3022           irel->r_offset += 2;
3023           add = -2;
3024         }
3025       else if (irel->r_offset == addr + 2)
3026         {
3027           irel->r_offset -= 2;
3028           add = 2;
3029         }
3030       else
3031         add = 0;
3032
3033       if (add != 0)
3034         {
3035           bfd_byte *loc;
3036           unsigned short insn, oinsn;
3037           bfd_boolean overflow;
3038
3039           loc = contents + irel->r_offset;
3040           overflow = FALSE;
3041           switch (type)
3042             {
3043             default:
3044               break;
3045
3046             case R_SH_DIR8WPN:
3047             case R_SH_DIR8WPZ:
3048               insn = bfd_get_16 (abfd, loc);
3049               oinsn = insn;
3050               insn += add / 2;
3051               if ((oinsn & 0xff00) != (insn & 0xff00))
3052                 overflow = TRUE;
3053               bfd_put_16 (abfd, (bfd_vma) insn, loc);
3054               break;
3055
3056             case R_SH_IND12W:
3057               insn = bfd_get_16 (abfd, loc);
3058               oinsn = insn;
3059               insn += add / 2;
3060               if ((oinsn & 0xf000) != (insn & 0xf000))
3061                 overflow = TRUE;
3062               bfd_put_16 (abfd, (bfd_vma) insn, loc);
3063               break;
3064
3065             case R_SH_DIR8WPL:
3066               /* This reloc ignores the least significant 3 bits of
3067                  the program counter before adding in the offset.
3068                  This means that if ADDR is at an even address, the
3069                  swap will not affect the offset.  If ADDR is an at an
3070                  odd address, then the instruction will be crossing a
3071                  four byte boundary, and must be adjusted.  */
3072               if ((addr & 3) != 0)
3073                 {
3074                   insn = bfd_get_16 (abfd, loc);
3075                   oinsn = insn;
3076                   insn += add / 2;
3077                   if ((oinsn & 0xff00) != (insn & 0xff00))
3078                     overflow = TRUE;
3079                   bfd_put_16 (abfd, (bfd_vma) insn, loc);
3080                 }
3081
3082               break;
3083             }
3084
3085           if (overflow)
3086             {
3087               ((*_bfd_error_handler)
3088                (_("%s: 0x%lx: fatal: reloc overflow while relaxing"),
3089                 bfd_archive_filename (abfd), (unsigned long) irel->r_offset));
3090               bfd_set_error (bfd_error_bad_value);
3091               return FALSE;
3092             }
3093         }
3094     }
3095
3096   return TRUE;
3097 }
3098 \f
3099 #ifdef INCLUDE_SHMEDIA
3100
3101 /* The size in bytes of an entry in the procedure linkage table.  */
3102
3103 #define PLT_ENTRY_SIZE 64
3104
3105 /* First entry in an absolute procedure linkage table look like this.  */
3106
3107 static const bfd_byte elf_sh_plt0_entry_be[PLT_ENTRY_SIZE] =
3108 {
3109   0xcc, 0x00, 0x01, 0x10, /* movi  .got.plt >> 16, r17 */
3110   0xc8, 0x00, 0x01, 0x10, /* shori .got.plt & 65535, r17 */
3111   0x89, 0x10, 0x09, 0x90, /* ld.l  r17, 8, r25 */
3112   0x6b, 0xf1, 0x66, 0x00, /* ptabs r25, tr0 */
3113   0x89, 0x10, 0x05, 0x10, /* ld.l  r17, 4, r17 */
3114   0x44, 0x01, 0xff, 0xf0, /* blink tr0, r63 */
3115   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3116   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3117   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3118   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3119   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3120   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3121   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3122   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3123   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3124   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3125 };
3126
3127 static const bfd_byte elf_sh_plt0_entry_le[PLT_ENTRY_SIZE] =
3128 {
3129   0x10, 0x01, 0x00, 0xcc, /* movi  .got.plt >> 16, r17 */
3130   0x10, 0x01, 0x00, 0xc8, /* shori .got.plt & 65535, r17 */
3131   0x90, 0x09, 0x10, 0x89, /* ld.l  r17, 8, r25 */
3132   0x00, 0x66, 0xf1, 0x6b, /* ptabs r25, tr0 */
3133   0x10, 0x05, 0x10, 0x89, /* ld.l  r17, 4, r17 */
3134   0xf0, 0xff, 0x01, 0x44, /* blink tr0, r63 */
3135   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3136   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3137   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3138   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3139   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3140   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3141   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3142   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3143   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3144   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3145 };
3146
3147 /* Sebsequent entries in an absolute procedure linkage table look like
3148    this.  */
3149
3150 static const bfd_byte elf_sh_plt_entry_be[PLT_ENTRY_SIZE] =
3151 {
3152   0xcc, 0x00, 0x01, 0x90, /* movi  nameN-in-GOT >> 16, r25 */
3153   0xc8, 0x00, 0x01, 0x90, /* shori nameN-in-GOT & 65535, r25 */
3154   0x89, 0x90, 0x01, 0x90, /* ld.l  r25, 0, r25 */
3155   0x6b, 0xf1, 0x66, 0x00, /* ptabs r25, tr0 */
3156   0x44, 0x01, 0xff, 0xf0, /* blink tr0, r63 */
3157   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3158   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3159   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3160   0xcc, 0x00, 0x01, 0x90, /* movi  .PLT0 >> 16, r25 */
3161   0xc8, 0x00, 0x01, 0x90, /* shori .PLT0 & 65535, r25 */
3162   0x6b, 0xf1, 0x66, 0x00, /* ptabs r25, tr0 */
3163   0xcc, 0x00, 0x01, 0x50, /* movi  reloc-offset >> 16, r21 */
3164   0xc8, 0x00, 0x01, 0x50, /* shori reloc-offset & 65535, r21 */
3165   0x44, 0x01, 0xff, 0xf0, /* blink tr0, r63 */
3166   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3167   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3168 };
3169
3170 static const bfd_byte elf_sh_plt_entry_le[PLT_ENTRY_SIZE] =
3171 {
3172   0x90, 0x01, 0x00, 0xcc, /* movi  nameN-in-GOT >> 16, r25 */
3173   0x90, 0x01, 0x00, 0xc8, /* shori nameN-in-GOT & 65535, r25 */
3174   0x90, 0x01, 0x90, 0x89, /* ld.l  r25, 0, r25 */
3175   0x00, 0x66, 0xf1, 0x6b, /* ptabs r25, tr0 */
3176   0xf0, 0xff, 0x01, 0x44, /* blink tr0, r63 */
3177   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3178   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3179   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3180   0x90, 0x01, 0x00, 0xcc, /* movi  .PLT0 >> 16, r25 */
3181   0x90, 0x01, 0x00, 0xc8, /* shori .PLT0 & 65535, r25 */
3182   0x00, 0x66, 0xf1, 0x6b, /* ptabs r25, tr0 */
3183   0x50, 0x01, 0x00, 0xcc, /* movi  reloc-offset >> 16, r21 */
3184   0x50, 0x01, 0x00, 0xc8, /* shori reloc-offset & 65535, r21 */
3185   0xf0, 0xff, 0x01, 0x44, /* blink tr0, r63 */
3186   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3187   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3188 };
3189
3190 /* Entries in a PIC procedure linkage table look like this.  */
3191
3192 static const bfd_byte elf_sh_pic_plt_entry_be[PLT_ENTRY_SIZE] =
3193 {
3194   0xcc, 0x00, 0x01, 0x90, /* movi  nameN@GOT >> 16, r25 */
3195   0xc8, 0x00, 0x01, 0x90, /* shori nameN@GOT & 65535, r25 */
3196   0x40, 0xc2, 0x65, 0x90, /* ldx.l r12, r25, r25 */
3197   0x6b, 0xf1, 0x66, 0x00, /* ptabs r25, tr0 */
3198   0x44, 0x01, 0xff, 0xf0, /* blink tr0, r63 */
3199   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3200   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3201   0x6f, 0xf0, 0xff, 0xf0, /* nop */
3202   0xce, 0x00, 0x01, 0x10, /* movi  -GOT_BIAS, r17 */
3203   0x00, 0xc8, 0x45, 0x10, /* add.l r12, r17, r17 */
3204   0x89, 0x10, 0x09, 0x90, /* ld.l  r17, 8, r25 */
3205   0x6b, 0xf1, 0x66, 0x00, /* ptabs r25, tr0 */
3206   0x89, 0x10, 0x05, 0x10, /* ld.l  r17, 4, r17 */
3207   0xcc, 0x00, 0x01, 0x50, /* movi  reloc-offset >> 16, r21 */
3208   0xc8, 0x00, 0x01, 0x50, /* shori reloc-offset & 65535, r21 */
3209   0x44, 0x01, 0xff, 0xf0, /* blink tr0, r63 */
3210 };
3211
3212 static const bfd_byte elf_sh_pic_plt_entry_le[PLT_ENTRY_SIZE] =
3213 {
3214   0x90, 0x01, 0x00, 0xcc, /* movi  nameN@GOT >> 16, r25 */
3215   0x90, 0x01, 0x00, 0xc8, /* shori nameN@GOT & 65535, r25 */
3216   0x90, 0x65, 0xc2, 0x40, /* ldx.l r12, r25, r25 */
3217   0x00, 0x66, 0xf1, 0x6b, /* ptabs r25, tr0 */
3218   0xf0, 0xff, 0x01, 0x44, /* blink tr0, r63 */
3219   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3220   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3221   0xf0, 0xff, 0xf0, 0x6f, /* nop */
3222   0x10, 0x01, 0x00, 0xce, /* movi  -GOT_BIAS, r17 */
3223   0x10, 0x45, 0xc8, 0x00, /* add.l r12, r17, r17 */
3224   0x90, 0x09, 0x10, 0x89, /* ld.l  r17, 8, r25 */
3225   0x00, 0x66, 0xf1, 0x6b, /* ptabs r25, tr0 */
3226   0x10, 0x05, 0x10, 0x89, /* ld.l  r17, 4, r17 */
3227   0x50, 0x01, 0x00, 0xcc, /* movi  reloc-offset >> 16, r21 */
3228   0x50, 0x01, 0x00, 0xc8, /* shori reloc-offset & 65535, r21 */
3229   0xf0, 0xff, 0x01, 0x44, /* blink tr0, r63 */
3230 };
3231
3232 static const bfd_byte *elf_sh_plt0_entry;
3233 static const bfd_byte *elf_sh_plt_entry;
3234 static const bfd_byte *elf_sh_pic_plt_entry;
3235
3236 /* Return size of a PLT entry.  */
3237 #define elf_sh_sizeof_plt(info) PLT_ENTRY_SIZE
3238
3239 /* Return offset of the PLT0 address in an absolute PLT entry.  */
3240 #define elf_sh_plt_plt0_offset(info) 32
3241
3242 /* Return offset of the linker in PLT0 entry.  */
3243 #define elf_sh_plt0_gotplt_offset(info) 0
3244
3245 /* Return offset of the trampoline in PLT entry */
3246 #define elf_sh_plt_temp_offset(info) 33 /* Add one because it's SHmedia.  */
3247
3248 /* Return offset of the symbol in PLT entry.  */
3249 #define elf_sh_plt_symbol_offset(info) 0
3250
3251 /* Return offset of the relocation in PLT entry.  */
3252 #define elf_sh_plt_reloc_offset(info) (info->shared ? 52 : 44)
3253
3254 inline static void
3255 movi_shori_putval (output_bfd, value, addr)
3256      bfd *output_bfd;
3257      unsigned long value;
3258      char *addr;
3259 {
3260   bfd_put_32 (output_bfd,
3261               bfd_get_32 (output_bfd, addr)
3262               | ((value >> 6) & 0x3fffc00),
3263               addr);
3264   bfd_put_32 (output_bfd,
3265               bfd_get_32 (output_bfd, addr + 4)
3266               | ((value << 10) & 0x3fffc00),
3267               addr + 4);
3268 }
3269
3270 #else
3271 /* The size in bytes of an entry in the procedure linkage table.  */
3272
3273 #define PLT_ENTRY_SIZE 28
3274
3275 /* First entry in an absolute procedure linkage table look like this.  */
3276
3277 #if 1
3278 /* Note - this code has been "optimised" not to use r2.  r2 is used by
3279    GCC to return the address of large strutcures, so it should not be
3280    corrupted here.  This does mean however, that this PLT does not conform
3281    to the SH PIC ABI.  That spec says that r0 contains the type of the PLT
3282    and r2 contains the GOT id.  This version stores the GOT id in r0 and
3283    ignores the type.  Loaders can easily detect this difference however,
3284    since the type will always be 0 or 8, and the GOT ids will always be
3285    greater than or equal to 12.  */
3286 static const bfd_byte elf_sh_plt0_entry_be[PLT_ENTRY_SIZE] =
3287 {
3288   0xd0, 0x05,   /* mov.l 2f,r0 */
3289   0x60, 0x02,   /* mov.l @r0,r0 */
3290   0x2f, 0x06,   /* mov.l r0,@-r15 */
3291   0xd0, 0x03,   /* mov.l 1f,r0 */
3292   0x60, 0x02,   /* mov.l @r0,r0 */
3293   0x40, 0x2b,   /* jmp @r0 */
3294   0x60, 0xf6,   /*  mov.l @r15+,r0 */
3295   0x00, 0x09,   /* nop */
3296   0x00, 0x09,   /* nop */
3297   0x00, 0x09,   /* nop */
3298   0, 0, 0, 0,   /* 1: replaced with address of .got.plt + 8.  */
3299   0, 0, 0, 0,   /* 2: replaced with address of .got.plt + 4.  */
3300 };
3301
3302 static const bfd_byte elf_sh_plt0_entry_le[PLT_ENTRY_SIZE] =
3303 {
3304   0x05, 0xd0,   /* mov.l 2f,r0 */
3305   0x02, 0x60,   /* mov.l @r0,r0 */
3306   0x06, 0x2f,   /* mov.l r0,@-r15 */
3307   0x03, 0xd0,   /* mov.l 1f,r0 */
3308   0x02, 0x60,   /* mov.l @r0,r0 */
3309   0x2b, 0x40,   /* jmp @r0 */
3310   0xf6, 0x60,   /*  mov.l @r15+,r0 */
3311   0x09, 0x00,   /* nop */
3312   0x09, 0x00,   /* nop */
3313   0x09, 0x00,   /* nop */
3314   0, 0, 0, 0,   /* 1: replaced with address of .got.plt + 8.  */
3315   0, 0, 0, 0,   /* 2: replaced with address of .got.plt + 4.  */
3316 };
3317
3318 /* Sebsequent entries in an absolute procedure linkage table look like
3319    this.  */
3320
3321 static const bfd_byte elf_sh_plt_entry_be[PLT_ENTRY_SIZE] =
3322 {
3323   0xd0, 0x04,   /* mov.l 1f,r0 */
3324   0x60, 0x02,   /* mov.l @r0,r0 */
3325   0xd1, 0x02,   /* mov.l 0f,r1 */
3326   0x40, 0x2b,   /* jmp @r0 */
3327   0x60, 0x13,   /*  mov r1,r0 */
3328   0xd1, 0x03,   /* mov.l 2f,r1 */
3329   0x40, 0x2b,   /* jmp @r0 */
3330   0x00, 0x09,   /* nop */
3331   0, 0, 0, 0,   /* 0: replaced with address of .PLT0.  */
3332   0, 0, 0, 0,   /* 1: replaced with address of this symbol in .got.  */
3333   0, 0, 0, 0,   /* 2: replaced with offset into relocation table.  */
3334 };
3335
3336 static const bfd_byte elf_sh_plt_entry_le[PLT_ENTRY_SIZE] =
3337 {
3338   0x04, 0xd0,   /* mov.l 1f,r0 */
3339   0x02, 0x60,   /* mov.l @r0,r0 */
3340   0x02, 0xd1,   /* mov.l 0f,r1 */
3341   0x2b, 0x40,   /* jmp @r0 */
3342   0x13, 0x60,   /*  mov r1,r0 */
3343   0x03, 0xd1,   /* mov.l 2f,r1 */
3344   0x2b, 0x40,   /* jmp @r0 */
3345   0x09, 0x00,   /*  nop */
3346   0, 0, 0, 0,   /* 0: replaced with address of .PLT0.  */
3347   0, 0, 0, 0,   /* 1: replaced with address of this symbol in .got.  */
3348   0, 0, 0, 0,   /* 2: replaced with offset into relocation table.  */
3349 };
3350
3351 /* Entries in a PIC procedure linkage table look like this.  */
3352
3353 static const bfd_byte elf_sh_pic_plt_entry_be[PLT_ENTRY_SIZE] =
3354 {
3355   0xd0, 0x04,   /* mov.l 1f,r0 */
3356   0x00, 0xce,   /* mov.l @(r0,r12),r0 */
3357   0x40, 0x2b,   /* jmp @r0 */
3358   0x00, 0x09,   /*  nop */
3359   0x50, 0xc2,   /* mov.l @(8,r12),r0 */
3360   0xd1, 0x03,   /* mov.l 2f,r1 */
3361   0x40, 0x2b,   /* jmp @r0 */
3362   0x50, 0xc1,   /*  mov.l @(4,r12),r0 */
3363   0x00, 0x09,   /* nop */
3364   0x00, 0x09,   /* nop */
3365   0, 0, 0, 0,   /* 1: replaced with address of this symbol in .got.  */
3366   0, 0, 0, 0    /* 2: replaced with offset into relocation table.  */
3367 };
3368
3369 static const bfd_byte elf_sh_pic_plt_entry_le[PLT_ENTRY_SIZE] =
3370 {
3371   0x04, 0xd0,   /* mov.l 1f,r0 */
3372   0xce, 0x00,   /* mov.l @(r0,r12),r0 */
3373   0x2b, 0x40,   /* jmp @r0 */
3374   0x09, 0x00,   /*  nop */
3375   0xc2, 0x50,   /* mov.l @(8,r12),r0 */
3376   0x03, 0xd1,   /* mov.l 2f,r1 */
3377   0x2b, 0x40,   /* jmp @r0 */
3378   0xc1, 0x50,   /*  mov.l @(4,r12),r0 */
3379   0x09, 0x00,   /*  nop */
3380   0x09, 0x00,   /* nop */
3381   0, 0, 0, 0,   /* 1: replaced with address of this symbol in .got.  */
3382   0, 0, 0, 0    /* 2: replaced with offset into relocation table.  */
3383 };
3384
3385 #else /* These are the old style PLT entries.  */
3386 static const bfd_byte elf_sh_plt0_entry_be[PLT_ENTRY_SIZE] =
3387 {
3388   0xd0, 0x04,   /* mov.l 1f,r0 */
3389   0xd2, 0x05,   /* mov.l 2f,r2 */
3390   0x60, 0x02,   /* mov.l @r0,r0 */
3391   0x62, 0x22,   /* mov.l @r2,r2 */
3392   0x40, 0x2b,   /* jmp @r0 */
3393   0xe0, 0x00,   /*  mov #0,r0 */
3394   0x00, 0x09,   /* nop */
3395   0x00, 0x09,   /* nop */
3396   0x00, 0x09,   /* nop */
3397   0x00, 0x09,   /* nop */
3398   0, 0, 0, 0,   /* 1: replaced with address of .got.plt + 8.  */
3399   0, 0, 0, 0,   /* 2: replaced with address of .got.plt + 4.  */
3400 };
3401
3402 static const bfd_byte elf_sh_plt0_entry_le[PLT_ENTRY_SIZE] =
3403 {
3404   0x04, 0xd0,   /* mov.l 1f,r0 */
3405   0x05, 0xd2,   /* mov.l 2f,r2 */
3406   0x02, 0x60,   /* mov.l @r0,r0 */
3407   0x22, 0x62,   /* mov.l @r2,r2 */
3408   0x2b, 0x40,   /* jmp @r0 */
3409   0x00, 0xe0,   /*  mov #0,r0 */
3410   0x09, 0x00,   /* nop */
3411   0x09, 0x00,   /* nop */
3412   0x09, 0x00,   /* nop */
3413   0x09, 0x00,   /* nop */
3414   0, 0, 0, 0,   /* 1: replaced with address of .got.plt + 8.  */
3415   0, 0, 0, 0,   /* 2: replaced with address of .got.plt + 4.  */
3416 };
3417
3418 /* Sebsequent entries in an absolute procedure linkage table look like
3419    this.  */
3420
3421 static const bfd_byte elf_sh_plt_entry_be[PLT_ENTRY_SIZE] =
3422 {
3423   0xd0, 0x04,   /* mov.l 1f,r0 */
3424   0x60, 0x02,   /* mov.l @r0,r0 */
3425   0xd2, 0x02,   /* mov.l 0f,r2 */
3426   0x40, 0x2b,   /* jmp @r0 */
3427   0x60, 0x23,   /*  mov r2,r0 */
3428   0xd1, 0x03,   /* mov.l 2f,r1 */
3429   0x40, 0x2b,   /* jmp @r0 */
3430   0x00, 0x09,   /* nop */
3431   0, 0, 0, 0,   /* 0: replaced with address of .PLT0.  */
3432   0, 0, 0, 0,   /* 1: replaced with address of this symbol in .got.  */
3433   0, 0, 0, 0,   /* 2: replaced with offset into relocation table.  */
3434 };
3435
3436 static const bfd_byte elf_sh_plt_entry_le[PLT_ENTRY_SIZE] =
3437 {
3438   0x04, 0xd0,   /* mov.l 1f,r0 */
3439   0x02, 0x60,   /* mov.l @r0,r0 */
3440   0x02, 0xd2,   /* mov.l 0f,r2 */
3441   0x2b, 0x40,   /* jmp @r0 */
3442   0x23, 0x60,   /*  mov r2,r0 */
3443   0x03, 0xd1,   /* mov.l 2f,r1 */
3444   0x2b, 0x40,   /* jmp @r0 */
3445   0x09, 0x00,   /*  nop */
3446   0, 0, 0, 0,   /* 0: replaced with address of .PLT.  */
3447   0, 0, 0, 0,   /* 1: replaced with address of this symbol in .got.  */
3448   0, 0, 0, 0,   /* 2: replaced with offset into relocation table.  */
3449 };
3450
3451 /* Entries in a PIC procedure linkage table look like this.  */
3452
3453 static const bfd_byte elf_sh_pic_plt_entry_be[PLT_ENTRY_SIZE] =
3454 {
3455   0xd0, 0x04,   /* mov.l 1f,r0 */
3456   0x00, 0xce,   /* mov.l @(r0,r12),r0 */
3457   0x40, 0x2b,   /* jmp @r0 */
3458   0x00, 0x09,   /*  nop */
3459   0x50, 0xc2,   /* 0: mov.l @(8,r12),r0 */
3460   0x52, 0xc1,   /* 1: mov.l @(4,r12),r2 */
3461   0xd1, 0x02,   /* mov.l 2f,r1 */
3462   0x40, 0x2b,   /* jmp @r0 */
3463   0xe0, 0x00,   /*  mov #0,r0 ! shows the type of PLT.  */
3464   0x00, 0x09,   /* nop */
3465   0, 0, 0, 0,   /* 1: replaced with address of this symbol in .got.  */
3466   0, 0, 0, 0    /* 2: replaced with offset into relocation table.  */
3467 };
3468
3469 static const bfd_byte elf_sh_pic_plt_entry_le[PLT_ENTRY_SIZE] =
3470 {
3471   0x04, 0xd0,   /* mov.l 1f,r0 */
3472   0xce, 0x00,   /* mov.l @(r0,r12),r0 */
3473   0x2b, 0x40,   /* jmp @r0 */
3474   0x09, 0x00,   /*  nop */
3475   0xc2, 0x50,   /* 0: mov.l @(8,r12),r0 */
3476   0xc1, 0x52,   /* 1: mov.l @(4,r12),r2 */
3477   0x02, 0xd1,   /* mov.l 2f,r1 */
3478   0x2b, 0x40,   /* jmp @r0 */
3479   0x00, 0xe0,   /*  mov #0,r0 ! shows the type of PLT.  */
3480   0x09, 0x00,   /* nop */
3481   0, 0, 0, 0,   /* 1: replaced with address of this symbol in .got.  */
3482   0, 0, 0, 0    /* 2: replaced with offset into relocation table.  */
3483 };
3484 #endif /* old style PLT entries.  */
3485
3486 static const bfd_byte *elf_sh_plt0_entry;
3487 static const bfd_byte *elf_sh_plt_entry;
3488 static const bfd_byte *elf_sh_pic_plt_entry;
3489
3490 /* Return size of a PLT entry.  */
3491 #define elf_sh_sizeof_plt(info) PLT_ENTRY_SIZE
3492
3493 /* Return offset of the PLT0 address in an absolute PLT entry.  */
3494 #define elf_sh_plt_plt0_offset(info) 16
3495
3496 /* Return offset of the linker in PLT0 entry.  */
3497 #define elf_sh_plt0_linker_offset(info) 20
3498
3499 /* Return offset of the GOT id in PLT0 entry.  */
3500 #define elf_sh_plt0_gotid_offset(info) 24
3501
3502 /* Return offset of the tempoline in PLT entry */
3503 #define elf_sh_plt_temp_offset(info) 8
3504
3505 /* Return offset of the symbol in PLT entry.  */
3506 #define elf_sh_plt_symbol_offset(info) 20
3507
3508 /* Return offset of the relocation in PLT entry.  */
3509 #define elf_sh_plt_reloc_offset(info) 24
3510 #endif
3511
3512 /* The sh linker needs to keep track of the number of relocs that it
3513    decides to copy as dynamic relocs in check_relocs for each symbol.
3514    This is so that it can later discard them if they are found to be
3515    unnecessary.  We store the information in a field extending the
3516    regular ELF linker hash table.  */
3517
3518 struct elf_sh_dyn_relocs
3519 {
3520   struct elf_sh_dyn_relocs *next;
3521
3522   /* The input section of the reloc.  */
3523   asection *sec;
3524
3525   /* Total number of relocs copied for the input section.  */
3526   bfd_size_type count;
3527
3528   /* Number of pc-relative relocs copied for the input section.  */
3529   bfd_size_type pc_count;
3530 };
3531
3532 /* sh ELF linker hash entry.  */
3533
3534 struct elf_sh_link_hash_entry
3535 {
3536   struct elf_link_hash_entry root;
3537
3538 #ifdef INCLUDE_SHMEDIA
3539   union
3540   {
3541     bfd_signed_vma refcount;
3542     bfd_vma offset;
3543   } datalabel_got;
3544 #endif
3545
3546   /* Track dynamic relocs copied for this symbol.  */
3547   struct elf_sh_dyn_relocs *dyn_relocs;
3548
3549   bfd_signed_vma gotplt_refcount;
3550
3551   enum {
3552     GOT_UNKNOWN = 0, GOT_NORMAL, GOT_TLS_GD, GOT_TLS_IE
3553   } tls_type;
3554 };
3555
3556 #define sh_elf_hash_entry(ent) ((struct elf_sh_link_hash_entry *)(ent))
3557
3558 struct sh_elf_obj_tdata
3559 {
3560   struct elf_obj_tdata root;
3561
3562   /* tls_type for each local got entry.  */
3563   char *local_got_tls_type;
3564 };
3565
3566 #define sh_elf_tdata(abfd) \
3567   ((struct sh_elf_obj_tdata *) (abfd)->tdata.any)
3568
3569 #define sh_elf_local_got_tls_type(abfd) \
3570   (sh_elf_tdata (abfd)->local_got_tls_type)
3571
3572 /* Override the generic function because we need to store sh_elf_obj_tdata
3573    as the specific tdata.  */
3574
3575 static bfd_boolean
3576 sh_elf_mkobject (abfd)
3577      bfd *abfd;
3578 {
3579   bfd_size_type amt = sizeof (struct sh_elf_obj_tdata);
3580   abfd->tdata.any = bfd_zalloc (abfd, amt);
3581   if (abfd->tdata.any == NULL)
3582     return FALSE;
3583   return TRUE;
3584 }
3585
3586 /* sh ELF linker hash table.  */
3587
3588 struct elf_sh_link_hash_table
3589 {
3590   struct elf_link_hash_table root;
3591
3592   /* Short-cuts to get to dynamic linker sections.  */
3593   asection *sgot;
3594   asection *sgotplt;
3595   asection *srelgot;
3596   asection *splt;
3597   asection *srelplt;
3598   asection *sdynbss;
3599   asection *srelbss;
3600
3601   /* Small local sym to section mapping cache.  */
3602   struct sym_sec_cache sym_sec;
3603
3604   /* A counter or offset to track a TLS got entry.  */
3605   union
3606     {
3607       bfd_signed_vma refcount;
3608       bfd_vma offset;
3609     } tls_ldm_got;
3610 };
3611
3612 /* Traverse an sh ELF linker hash table.  */
3613
3614 #define sh_elf_link_hash_traverse(table, func, info)                    \
3615   (elf_link_hash_traverse                                               \
3616    (&(table)->root,                                                     \
3617     (bfd_boolean (*) PARAMS ((struct elf_link_hash_entry *, PTR))) (func), \
3618     (info)))
3619
3620 /* Get the sh ELF linker hash table from a link_info structure.  */
3621
3622 #define sh_elf_hash_table(p) \
3623   ((struct elf_sh_link_hash_table *) ((p)->hash))
3624
3625 /* Create an entry in an sh ELF linker hash table.  */
3626
3627 static struct bfd_hash_entry *
3628 sh_elf_link_hash_newfunc (entry, table, string)
3629      struct bfd_hash_entry *entry;
3630      struct bfd_hash_table *table;
3631      const char *string;
3632 {
3633   struct elf_sh_link_hash_entry *ret =
3634     (struct elf_sh_link_hash_entry *) entry;
3635
3636   /* Allocate the structure if it has not already been allocated by a
3637      subclass.  */
3638   if (ret == (struct elf_sh_link_hash_entry *) NULL)
3639     ret = ((struct elf_sh_link_hash_entry *)
3640            bfd_hash_allocate (table,
3641                               sizeof (struct elf_sh_link_hash_entry)));
3642   if (ret == (struct elf_sh_link_hash_entry *) NULL)
3643     return (struct bfd_hash_entry *) ret;
3644
3645   /* Call the allocation method of the superclass.  */
3646   ret = ((struct elf_sh_link_hash_entry *)
3647          _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
3648                                      table, string));
3649   if (ret != (struct elf_sh_link_hash_entry *) NULL)
3650     {
3651       ret->dyn_relocs = NULL;
3652       ret->gotplt_refcount = 0;
3653 #ifdef INCLUDE_SHMEDIA
3654       ret->datalabel_got.refcount = ret->root.got.refcount;
3655 #endif
3656       ret->tls_type = GOT_UNKNOWN;
3657     }
3658
3659   return (struct bfd_hash_entry *) ret;
3660 }
3661
3662 /* Create an sh ELF linker hash table.  */
3663
3664 static struct bfd_link_hash_table *
3665 sh_elf_link_hash_table_create (abfd)
3666      bfd *abfd;
3667 {
3668   struct elf_sh_link_hash_table *ret;
3669   bfd_size_type amt = sizeof (struct elf_sh_link_hash_table);
3670
3671   ret = (struct elf_sh_link_hash_table *) bfd_malloc (amt);
3672   if (ret == (struct elf_sh_link_hash_table *) NULL)
3673     return NULL;
3674
3675   if (! _bfd_elf_link_hash_table_init (&ret->root, abfd,
3676                                        sh_elf_link_hash_newfunc))
3677     {
3678       free (ret);
3679       return NULL;
3680     }
3681
3682   ret->sgot = NULL;
3683   ret->sgotplt = NULL;
3684   ret->srelgot = NULL;
3685   ret->splt = NULL;
3686   ret->srelplt = NULL;
3687   ret->sdynbss = NULL;
3688   ret->srelbss = NULL;
3689   ret->sym_sec.abfd = NULL;
3690   ret->tls_ldm_got.refcount = 0;
3691
3692   return &ret->root.root;
3693 }
3694
3695 /* Create .got, .gotplt, and .rela.got sections in DYNOBJ, and set up
3696    shortcuts to them in our hash table.  */
3697
3698 static bfd_boolean
3699 create_got_section (dynobj, info)
3700      bfd *dynobj;
3701      struct bfd_link_info *info;
3702 {
3703   struct elf_sh_link_hash_table *htab;
3704
3705   if (! _bfd_elf_create_got_section (dynobj, info))
3706     return FALSE;
3707
3708   htab = sh_elf_hash_table (info);
3709   htab->sgot = bfd_get_section_by_name (dynobj, ".got");
3710   htab->sgotplt = bfd_get_section_by_name (dynobj, ".got.plt");
3711   if (! htab->sgot || ! htab->sgotplt)
3712     abort ();
3713
3714   htab->srelgot = bfd_make_section (dynobj, ".rela.got");
3715   if (htab->srelgot == NULL
3716       || ! bfd_set_section_flags (dynobj, htab->srelgot,
3717                                   (SEC_ALLOC
3718                                    | SEC_LOAD
3719                                    | SEC_HAS_CONTENTS
3720                                    | SEC_IN_MEMORY
3721                                    | SEC_LINKER_CREATED
3722                                    | SEC_READONLY))
3723       || ! bfd_set_section_alignment (dynobj, htab->srelgot, 2))
3724     return FALSE;
3725   return TRUE;
3726 }
3727
3728 /* Create dynamic sections when linking against a dynamic object.  */
3729
3730 static bfd_boolean
3731 sh_elf_create_dynamic_sections (abfd, info)
3732      bfd *abfd;
3733      struct bfd_link_info *info;
3734 {
3735   struct elf_sh_link_hash_table *htab;
3736   flagword flags, pltflags;
3737   register asection *s;
3738   struct elf_backend_data *bed = get_elf_backend_data (abfd);
3739   int ptralign = 0;
3740
3741   switch (bed->s->arch_size)
3742     {
3743     case 32:
3744       ptralign = 2;
3745       break;
3746
3747     case 64:
3748       ptralign = 3;
3749       break;
3750
3751     default:
3752       bfd_set_error (bfd_error_bad_value);
3753       return FALSE;
3754     }
3755
3756   htab = sh_elf_hash_table (info);
3757
3758   /* We need to create .plt, .rel[a].plt, .got, .got.plt, .dynbss, and
3759      .rel[a].bss sections.  */
3760
3761   flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
3762            | SEC_LINKER_CREATED);
3763
3764   pltflags = flags;
3765   pltflags |= SEC_CODE;
3766   if (bed->plt_not_loaded)
3767     pltflags &= ~ (SEC_LOAD | SEC_HAS_CONTENTS);
3768   if (bed->plt_readonly)
3769     pltflags |= SEC_READONLY;
3770
3771   s = bfd_make_section (abfd, ".plt");
3772   htab->splt = s;
3773   if (s == NULL
3774       || ! bfd_set_section_flags (abfd, s, pltflags)
3775       || ! bfd_set_section_alignment (abfd, s, bed->plt_alignment))
3776     return FALSE;
3777
3778   if (bed->want_plt_sym)
3779     {
3780       /* Define the symbol _PROCEDURE_LINKAGE_TABLE_ at the start of the
3781          .plt section.  */
3782       struct elf_link_hash_entry *h;
3783       struct bfd_link_hash_entry *bh = NULL;
3784
3785       if (! (_bfd_generic_link_add_one_symbol
3786              (info, abfd, "_PROCEDURE_LINKAGE_TABLE_", BSF_GLOBAL, s,
3787               (bfd_vma) 0, (const char *) NULL, FALSE,
3788               get_elf_backend_data (abfd)->collect, &bh)))
3789         return FALSE;
3790
3791       h = (struct elf_link_hash_entry *) bh;
3792       h->elf_link_hash_flags |= ELF_LINK_HASH_DEF_REGULAR;
3793       h->type = STT_OBJECT;
3794
3795       if (info->shared
3796           && ! _bfd_elf_link_record_dynamic_symbol (info, h))
3797         return FALSE;
3798     }
3799
3800   s = bfd_make_section (abfd,
3801                         bed->default_use_rela_p ? ".rela.plt" : ".rel.plt");
3802   htab->srelplt = s;
3803   if (s == NULL
3804       || ! bfd_set_section_flags (abfd, s, flags | SEC_READONLY)
3805       || ! bfd_set_section_alignment (abfd, s, ptralign))
3806     return FALSE;
3807
3808   if (! create_got_section (abfd, info))
3809     return FALSE;
3810
3811   {
3812     const char *secname;
3813     char *relname;
3814     flagword secflags;
3815     asection *sec;
3816
3817     for (sec = abfd->sections; sec; sec = sec->next)
3818       {
3819         secflags = bfd_get_section_flags (abfd, sec);
3820         if ((secflags & (SEC_DATA | SEC_LINKER_CREATED))
3821             || ((secflags & SEC_HAS_CONTENTS) != SEC_HAS_CONTENTS))
3822           continue;
3823         secname = bfd_get_section_name (abfd, sec);
3824         relname = (char *) bfd_malloc ((bfd_size_type) strlen (secname) + 6);
3825         strcpy (relname, ".rela");
3826         strcat (relname, secname);
3827         s = bfd_make_section (abfd, relname);
3828         if (s == NULL
3829             || ! bfd_set_section_flags (abfd, s, flags | SEC_READONLY)
3830             || ! bfd_set_section_alignment (abfd, s, ptralign))
3831           return FALSE;
3832       }
3833   }
3834
3835   if (bed->want_dynbss)
3836     {
3837       /* The .dynbss section is a place to put symbols which are defined
3838          by dynamic objects, are referenced by regular objects, and are
3839          not functions.  We must allocate space for them in the process
3840          image and use a R_*_COPY reloc to tell the dynamic linker to
3841          initialize them at run time.  The linker script puts the .dynbss
3842          section into the .bss section of the final image.  */
3843       s = bfd_make_section (abfd, ".dynbss");
3844       htab->sdynbss = s;
3845       if (s == NULL
3846           || ! bfd_set_section_flags (abfd, s, SEC_ALLOC))
3847         return FALSE;
3848
3849       /* The .rel[a].bss section holds copy relocs.  This section is not
3850          normally needed.  We need to create it here, though, so that the
3851          linker will map it to an output section.  We can't just create it
3852          only if we need it, because we will not know whether we need it
3853          until we have seen all the input files, and the first time the
3854          main linker code calls BFD after examining all the input files
3855          (size_dynamic_sections) the input sections have already been
3856          mapped to the output sections.  If the section turns out not to
3857          be needed, we can discard it later.  We will never need this
3858          section when generating a shared object, since they do not use
3859          copy relocs.  */
3860       if (! info->shared)
3861         {
3862           s = bfd_make_section (abfd,
3863                                 (bed->default_use_rela_p
3864                                  ? ".rela.bss" : ".rel.bss"));
3865           htab->srelbss = s;
3866           if (s == NULL
3867               || ! bfd_set_section_flags (abfd, s, flags | SEC_READONLY)
3868               || ! bfd_set_section_alignment (abfd, s, ptralign))
3869             return FALSE;
3870         }
3871     }
3872
3873   return TRUE;
3874 }
3875 \f
3876 /* Adjust a symbol defined by a dynamic object and referenced by a
3877    regular object.  The current definition is in some section of the
3878    dynamic object, but we're not including those sections.  We have to
3879    change the definition to something the rest of the link can
3880    understand.  */
3881
3882 static bfd_boolean
3883 sh_elf_adjust_dynamic_symbol (info, h)
3884      struct bfd_link_info *info;
3885      struct elf_link_hash_entry *h;
3886 {
3887   struct elf_sh_link_hash_table *htab;
3888   struct elf_sh_link_hash_entry *eh;
3889   struct elf_sh_dyn_relocs *p;
3890   bfd *dynobj;
3891   asection *s;
3892   unsigned int power_of_two;
3893
3894   dynobj = elf_hash_table (info)->dynobj;
3895
3896   /* Make sure we know what is going on here.  */
3897   BFD_ASSERT (dynobj != NULL
3898               && ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT)
3899                   || h->weakdef != NULL
3900                   || ((h->elf_link_hash_flags
3901                        & ELF_LINK_HASH_DEF_DYNAMIC) != 0
3902                       && (h->elf_link_hash_flags
3903                           & ELF_LINK_HASH_REF_REGULAR) != 0
3904                       && (h->elf_link_hash_flags
3905                           & ELF_LINK_HASH_DEF_REGULAR) == 0)));
3906
3907   /* If this is a function, put it in the procedure linkage table.  We
3908      will fill in the contents of the procedure linkage table later,
3909      when we know the address of the .got section.  */
3910   if (h->type == STT_FUNC
3911       || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
3912     {
3913       if (h->plt.refcount <= 0
3914           || (! info->shared
3915               && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0
3916               && (h->elf_link_hash_flags & ELF_LINK_HASH_REF_DYNAMIC) == 0
3917               && h->root.type != bfd_link_hash_undefweak
3918               && h->root.type != bfd_link_hash_undefined))
3919         {
3920           /* This case can occur if we saw a PLT reloc in an input
3921              file, but the symbol was never referred to by a dynamic
3922              object.  In such a case, we don't actually need to build
3923              a procedure linkage table, and we can just do a REL32
3924              reloc instead.  */
3925           h->plt.offset = (bfd_vma) -1;
3926           h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
3927         }
3928
3929       return TRUE;
3930     }
3931   else
3932     h->plt.offset = (bfd_vma) -1;
3933
3934   /* If this is a weak symbol, and there is a real definition, the
3935      processor independent code will have arranged for us to see the
3936      real definition first, and we can just use the same value.  */
3937   if (h->weakdef != NULL)
3938     {
3939       BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
3940                   || h->weakdef->root.type == bfd_link_hash_defweak);
3941       h->root.u.def.section = h->weakdef->root.u.def.section;
3942       h->root.u.def.value = h->weakdef->root.u.def.value;
3943       if (info->nocopyreloc)
3944         h->elf_link_hash_flags
3945           = ((h->elf_link_hash_flags & ~ELF_LINK_NON_GOT_REF)
3946              | (h->weakdef->elf_link_hash_flags & ELF_LINK_NON_GOT_REF));
3947       return TRUE;
3948     }
3949
3950   /* This is a reference to a symbol defined by a dynamic object which
3951      is not a function.  */
3952
3953   /* If we are creating a shared library, we must presume that the
3954      only references to the symbol are via the global offset table.
3955      For such cases we need not do anything here; the relocations will
3956      be handled correctly by relocate_section.  */
3957   if (info->shared)
3958     return TRUE;
3959
3960   /* If there are no references to this symbol that do not use the
3961      GOT, we don't need to generate a copy reloc.  */
3962   if ((h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0)
3963     return TRUE;
3964
3965   /* If -z nocopyreloc was given, we won't generate them either.  */
3966   if (info->nocopyreloc)
3967     {
3968       h->elf_link_hash_flags &= ~ELF_LINK_NON_GOT_REF;
3969       return TRUE;
3970     }
3971
3972   eh = (struct elf_sh_link_hash_entry *) h;
3973   for (p = eh->dyn_relocs; p != NULL; p = p->next)
3974     {
3975       s = p->sec->output_section;
3976       if (s != NULL && (s->flags & (SEC_READONLY | SEC_HAS_CONTENTS)) != 0)
3977         break;
3978     }
3979
3980   /* If we didn't find any dynamic relocs in sections which needs the
3981      copy reloc, then we'll be keeping the dynamic relocs and avoiding
3982      the copy reloc.  */
3983   if (p == NULL)
3984     {
3985       h->elf_link_hash_flags &= ~ELF_LINK_NON_GOT_REF;
3986       return TRUE;
3987     }
3988
3989   /* We must allocate the symbol in our .dynbss section, which will
3990      become part of the .bss section of the executable.  There will be
3991      an entry for this symbol in the .dynsym section.  The dynamic
3992      object will contain position independent code, so all references
3993      from the dynamic object to this symbol will go through the global
3994      offset table.  The dynamic linker will use the .dynsym entry to
3995      determine the address it must put in the global offset table, so
3996      both the dynamic object and the regular object will refer to the
3997      same memory location for the variable.  */
3998
3999   htab = sh_elf_hash_table (info);
4000   s = htab->sdynbss;
4001   BFD_ASSERT (s != NULL);
4002
4003   /* We must generate a R_SH_COPY reloc to tell the dynamic linker to
4004      copy the initial value out of the dynamic object and into the
4005      runtime process image.  We need to remember the offset into the
4006      .rela.bss section we are going to use.  */
4007   if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
4008     {
4009       asection *srel;
4010
4011       srel = htab->srelbss;
4012       BFD_ASSERT (srel != NULL);
4013       srel->_raw_size += sizeof (Elf32_External_Rela);
4014       h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
4015     }
4016
4017   /* We need to figure out the alignment required for this symbol.  I
4018      have no idea how ELF linkers handle this.  */
4019   power_of_two = bfd_log2 (h->size);
4020   if (power_of_two > 3)
4021     power_of_two = 3;
4022
4023   /* Apply the required alignment.  */
4024   s->_raw_size = BFD_ALIGN (s->_raw_size, (bfd_size_type) (1 << power_of_two));
4025   if (power_of_two > bfd_get_section_alignment (dynobj, s))
4026     {
4027       if (! bfd_set_section_alignment (dynobj, s, power_of_two))
4028         return FALSE;
4029     }
4030
4031   /* Define the symbol as being at this point in the section.  */
4032   h->root.u.def.section = s;
4033   h->root.u.def.value = s->_raw_size;
4034
4035   /* Increment the section size to make room for the symbol.  */
4036   s->_raw_size += h->size;
4037
4038   return TRUE;
4039 }
4040
4041 /* This is the condition under which sh_elf_finish_dynamic_symbol
4042    will be called from elflink.h.  If elflink.h doesn't call our
4043    finish_dynamic_symbol routine, we'll need to do something about
4044    initializing any .plt and .got entries in sh_elf_relocate_section.  */
4045 #define WILL_CALL_FINISH_DYNAMIC_SYMBOL(DYN, SHARED, H) \
4046   ((DYN)                                                                \
4047    && ((SHARED)                                                         \
4048        || ((H)->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)      \
4049    && ((H)->dynindx != -1                                               \
4050        || ((H)->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) != 0))
4051
4052 /* Allocate space in .plt, .got and associated reloc sections for
4053    dynamic relocs.  */
4054
4055 static bfd_boolean
4056 allocate_dynrelocs (h, inf)
4057      struct elf_link_hash_entry *h;
4058      PTR inf;
4059 {
4060   struct bfd_link_info *info;
4061   struct elf_sh_link_hash_table *htab;
4062   struct elf_sh_link_hash_entry *eh;
4063   struct elf_sh_dyn_relocs *p;
4064
4065   if (h->root.type == bfd_link_hash_indirect)
4066     return TRUE;
4067
4068   if (h->root.type == bfd_link_hash_warning)
4069     /* When warning symbols are created, they **replace** the "real"
4070        entry in the hash table, thus we never get to see the real
4071        symbol in a hash traversal.  So look at it now.  */
4072     h = (struct elf_link_hash_entry *) h->root.u.i.link;
4073
4074   info = (struct bfd_link_info *) inf;
4075   htab = sh_elf_hash_table (info);
4076
4077   eh = (struct elf_sh_link_hash_entry *) h;
4078   if ((h->got.refcount > 0
4079       || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL))
4080       && eh->gotplt_refcount > 0)
4081     {
4082       /* The symbol has been forced local, or we have some direct got refs,
4083          so treat all the gotplt refs as got refs. */
4084       h->got.refcount += eh->gotplt_refcount;
4085       if (h->plt.refcount >= eh->gotplt_refcount)
4086         h->plt.refcount -= eh->gotplt_refcount;
4087     }
4088
4089   if (htab->root.dynamic_sections_created
4090       && h->plt.refcount > 0
4091       && (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4092           || h->root.type != bfd_link_hash_undefweak))
4093     {
4094       /* Make sure this symbol is output as a dynamic symbol.
4095          Undefined weak syms won't yet be marked as dynamic.  */
4096       if (h->dynindx == -1
4097           && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
4098         {
4099           if (! bfd_elf32_link_record_dynamic_symbol (info, h))
4100             return FALSE;
4101         }
4102
4103       if (info->shared
4104           || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
4105         {
4106           asection *s = htab->splt;
4107
4108           /* If this is the first .plt entry, make room for the special
4109              first entry.  */
4110           if (s->_raw_size == 0)
4111             s->_raw_size += PLT_ENTRY_SIZE;
4112
4113           h->plt.offset = s->_raw_size;
4114
4115           /* If this symbol is not defined in a regular file, and we are
4116              not generating a shared library, then set the symbol to this
4117              location in the .plt.  This is required to make function
4118              pointers compare as equal between the normal executable and
4119              the shared library.  */
4120           if (! info->shared
4121               && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
4122             {
4123               h->root.u.def.section = s;
4124               h->root.u.def.value = h->plt.offset;
4125             }
4126
4127           /* Make room for this entry.  */
4128           s->_raw_size += PLT_ENTRY_SIZE;
4129
4130           /* We also need to make an entry in the .got.plt section, which
4131              will be placed in the .got section by the linker script.  */
4132           htab->sgotplt->_raw_size += 4;
4133
4134           /* We also need to make an entry in the .rel.plt section.  */
4135           htab->srelplt->_raw_size += sizeof (Elf32_External_Rela);
4136         }
4137       else
4138         {
4139           h->plt.offset = (bfd_vma) -1;
4140           h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
4141         }
4142     }
4143   else
4144     {
4145       h->plt.offset = (bfd_vma) -1;
4146       h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
4147     }
4148
4149   if (h->got.refcount > 0)
4150     {
4151       asection *s;
4152       bfd_boolean dyn;
4153       int tls_type = sh_elf_hash_entry (h)->tls_type;
4154
4155       /* Make sure this symbol is output as a dynamic symbol.
4156          Undefined weak syms won't yet be marked as dynamic.  */
4157       if (h->dynindx == -1
4158           && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
4159         {
4160           if (! bfd_elf32_link_record_dynamic_symbol (info, h))
4161             return FALSE;
4162         }
4163
4164       s = htab->sgot;
4165       h->got.offset = s->_raw_size;
4166       s->_raw_size += 4;
4167       /* R_SH_TLS_GD needs 2 consecutive GOT slots.  */
4168       if (tls_type == GOT_TLS_GD)
4169         s->_raw_size += 4;
4170       dyn = htab->root.dynamic_sections_created;
4171       /* R_SH_TLS_IE_32 needs one dynamic relocation if dynamic,
4172          R_SH_TLS_GD needs one if local symbol and two if global.  */
4173       if ((tls_type == GOT_TLS_GD && h->dynindx == -1)
4174           || (tls_type == GOT_TLS_IE && dyn))
4175         htab->srelgot->_raw_size += sizeof (Elf32_External_Rela);
4176       else if (tls_type == GOT_TLS_GD)
4177         htab->srelgot->_raw_size += 2 * sizeof (Elf32_External_Rela);
4178       else if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4179                 || h->root.type != bfd_link_hash_undefweak)
4180                && (info->shared
4181                    || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
4182         htab->srelgot->_raw_size += sizeof (Elf32_External_Rela);
4183     }
4184   else
4185     h->got.offset = (bfd_vma) -1;
4186
4187 #ifdef INCLUDE_SHMEDIA
4188   if (eh->datalabel_got.refcount > 0)
4189     {
4190       asection *s;
4191       bfd_boolean dyn;
4192
4193       /* Make sure this symbol is output as a dynamic symbol.
4194          Undefined weak syms won't yet be marked as dynamic.  */
4195       if (h->dynindx == -1
4196           && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
4197         {
4198           if (! bfd_elf32_link_record_dynamic_symbol (info, h))
4199             return FALSE;
4200         }
4201
4202       s = htab->sgot;
4203       eh->datalabel_got.offset = s->_raw_size;
4204       s->_raw_size += 4;
4205       dyn = htab->root.dynamic_sections_created;
4206       if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h))
4207         htab->srelgot->_raw_size += sizeof (Elf32_External_Rela);
4208     }
4209   else
4210     eh->datalabel_got.offset = (bfd_vma) -1;
4211 #endif
4212
4213   if (eh->dyn_relocs == NULL)
4214     return TRUE;
4215
4216   /* In the shared -Bsymbolic case, discard space allocated for
4217      dynamic pc-relative relocs against symbols which turn out to be
4218      defined in regular objects.  For the normal shared case, discard
4219      space for pc-relative relocs that have become local due to symbol
4220      visibility changes.  */
4221
4222   if (info->shared)
4223     {
4224       if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) != 0
4225           && ((h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) != 0
4226               || info->symbolic))
4227         {
4228           struct elf_sh_dyn_relocs **pp;
4229
4230           for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
4231             {
4232               p->count -= p->pc_count;
4233               p->pc_count = 0;
4234               if (p->count == 0)
4235                 *pp = p->next;
4236               else
4237                 pp = &p->next;
4238             }
4239         }
4240
4241       /* Also discard relocs on undefined weak syms with non-default
4242          visibility.  */
4243       if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
4244           && h->root.type == bfd_link_hash_undefweak)
4245         eh->dyn_relocs = NULL;
4246     }
4247   else
4248     {
4249       /* For the non-shared case, discard space for relocs against
4250          symbols which turn out to need copy relocs or are not
4251          dynamic.  */
4252
4253       if ((h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0
4254           && (((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) != 0
4255                && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
4256               || (htab->root.dynamic_sections_created
4257                   && (h->root.type == bfd_link_hash_undefweak
4258                       || h->root.type == bfd_link_hash_undefined))))
4259         {
4260           /* Make sure this symbol is output as a dynamic symbol.
4261              Undefined weak syms won't yet be marked as dynamic.  */
4262           if (h->dynindx == -1
4263               && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
4264             {
4265               if (! bfd_elf32_link_record_dynamic_symbol (info, h))
4266                 return FALSE;
4267             }
4268
4269           /* If that succeeded, we know we'll be keeping all the
4270              relocs.  */
4271           if (h->dynindx != -1)
4272             goto keep;
4273         }
4274
4275       eh->dyn_relocs = NULL;
4276
4277     keep: ;
4278     }
4279
4280   /* Finally, allocate space.  */
4281   for (p = eh->dyn_relocs; p != NULL; p = p->next)
4282     {
4283       asection *sreloc = elf_section_data (p->sec)->sreloc;
4284       sreloc->_raw_size += p->count * sizeof (Elf32_External_Rela);
4285     }
4286
4287   return TRUE;
4288 }
4289
4290 /* Find any dynamic relocs that apply to read-only sections.  */
4291
4292 static bfd_boolean
4293 readonly_dynrelocs (h, inf)
4294      struct elf_link_hash_entry *h;
4295      PTR inf;
4296 {
4297   struct elf_sh_link_hash_entry *eh;
4298   struct elf_sh_dyn_relocs *p;
4299
4300   if (h->root.type == bfd_link_hash_warning)
4301     h = (struct elf_link_hash_entry *) h->root.u.i.link;
4302
4303   eh = (struct elf_sh_link_hash_entry *) h;
4304   for (p = eh->dyn_relocs; p != NULL; p = p->next)
4305     {
4306       asection *s = p->sec->output_section;
4307
4308       if (s != NULL && (s->flags & SEC_READONLY) != 0)
4309         {
4310           struct bfd_link_info *info = (struct bfd_link_info *) inf;
4311
4312           info->flags |= DF_TEXTREL;
4313
4314           /* Not an error, just cut short the traversal.  */
4315           return FALSE;
4316         }
4317     }
4318   return TRUE;
4319 }
4320
4321 /* Set the sizes of the dynamic sections.  */
4322
4323 static bfd_boolean
4324 sh_elf_size_dynamic_sections (output_bfd, info)
4325      bfd *output_bfd ATTRIBUTE_UNUSED;
4326      struct bfd_link_info *info;
4327 {
4328   struct elf_sh_link_hash_table *htab;
4329   bfd *dynobj;
4330   asection *s;
4331   bfd_boolean relocs;
4332   bfd *ibfd;
4333
4334   htab = sh_elf_hash_table (info);
4335   dynobj = htab->root.dynobj;
4336   BFD_ASSERT (dynobj != NULL);
4337
4338   if (htab->root.dynamic_sections_created)
4339     {
4340       /* Set the contents of the .interp section to the interpreter.  */
4341       if (info->executable)
4342         {
4343           s = bfd_get_section_by_name (dynobj, ".interp");
4344           BFD_ASSERT (s != NULL);
4345           s->_raw_size = sizeof ELF_DYNAMIC_INTERPRETER;
4346           s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
4347         }
4348     }
4349
4350   /* Set up .got offsets for local syms, and space for local dynamic
4351      relocs.  */
4352   for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
4353     {
4354       bfd_signed_vma *local_got;
4355       bfd_signed_vma *end_local_got;
4356       char *local_tls_type;
4357       bfd_size_type locsymcount;
4358       Elf_Internal_Shdr *symtab_hdr;
4359       asection *srel;
4360
4361       if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour)
4362         continue;
4363
4364       for (s = ibfd->sections; s != NULL; s = s->next)
4365         {
4366           struct elf_sh_dyn_relocs *p;
4367
4368           for (p = ((struct elf_sh_dyn_relocs *)
4369                     elf_section_data (s)->local_dynrel);
4370                p != NULL;
4371                p = p->next)
4372             {
4373               if (! bfd_is_abs_section (p->sec)
4374                   && bfd_is_abs_section (p->sec->output_section))
4375                 {
4376                   /* Input section has been discarded, either because
4377                      it is a copy of a linkonce section or due to
4378                      linker script /DISCARD/, so we'll be discarding
4379                      the relocs too.  */
4380                 }
4381               else if (p->count != 0)
4382                 {
4383                   srel = elf_section_data (p->sec)->sreloc;
4384                   srel->_raw_size += p->count * sizeof (Elf32_External_Rela);
4385                   if ((p->sec->output_section->flags & SEC_READONLY) != 0)
4386                     info->flags |= DF_TEXTREL;
4387                 }
4388             }
4389         }
4390
4391       local_got = elf_local_got_refcounts (ibfd);
4392       if (!local_got)
4393         continue;
4394
4395       symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
4396       locsymcount = symtab_hdr->sh_info;
4397 #ifdef INCLUDE_SHMEDIA
4398       /* Count datalabel local GOT.  */
4399       locsymcount *= 2;
4400 #endif
4401       end_local_got = local_got + locsymcount;
4402       local_tls_type = sh_elf_local_got_tls_type (ibfd);
4403       s = htab->sgot;
4404       srel = htab->srelgot;
4405       for (; local_got < end_local_got; ++local_got)
4406         {
4407           if (*local_got > 0)
4408             {
4409               *local_got = s->_raw_size;
4410               s->_raw_size += 4;
4411               if (*local_tls_type == GOT_TLS_GD)
4412                 s->_raw_size += 4;
4413               if (info->shared)
4414                 srel->_raw_size += sizeof (Elf32_External_Rela);
4415             }
4416           else
4417             *local_got = (bfd_vma) -1;
4418           ++local_tls_type;
4419         }
4420     }
4421
4422   if (htab->tls_ldm_got.refcount > 0)
4423     {
4424       /* Allocate 2 got entries and 1 dynamic reloc for R_SH_TLS_LD_32
4425          relocs.  */
4426       htab->tls_ldm_got.offset = htab->sgot->_raw_size;
4427       htab->sgot->_raw_size += 8;
4428       htab->srelgot->_raw_size += sizeof (Elf32_External_Rela);
4429     }
4430   else
4431     htab->tls_ldm_got.offset = -1;
4432
4433   /* Allocate global sym .plt and .got entries, and space for global
4434      sym dynamic relocs.  */
4435   elf_link_hash_traverse (&htab->root, allocate_dynrelocs, (PTR) info);
4436
4437   /* We now have determined the sizes of the various dynamic sections.
4438      Allocate memory for them.  */
4439   relocs = FALSE;
4440   for (s = dynobj->sections; s != NULL; s = s->next)
4441     {
4442       if ((s->flags & SEC_LINKER_CREATED) == 0)
4443         continue;
4444
4445       if (s == htab->splt
4446           || s == htab->sgot
4447           || s == htab->sgotplt)
4448         {
4449           /* Strip this section if we don't need it; see the
4450              comment below.  */
4451         }
4452       else if (strncmp (bfd_get_section_name (dynobj, s), ".rela", 5) == 0)
4453         {
4454           if (s->_raw_size != 0 && s != htab->srelplt)
4455             relocs = TRUE;
4456
4457           /* We use the reloc_count field as a counter if we need
4458              to copy relocs into the output file.  */
4459           s->reloc_count = 0;
4460         }
4461       else
4462         {
4463           /* It's not one of our sections, so don't allocate space.  */
4464           continue;
4465         }
4466
4467       if (s->_raw_size == 0)
4468         {
4469           /* If we don't need this section, strip it from the
4470              output file.  This is mostly to handle .rela.bss and
4471              .rela.plt.  We must create both sections in
4472              create_dynamic_sections, because they must be created
4473              before the linker maps input sections to output
4474              sections.  The linker does that before
4475              adjust_dynamic_symbol is called, and it is that
4476              function which decides whether anything needs to go
4477              into these sections.  */
4478
4479           _bfd_strip_section_from_output (info, s);
4480           continue;
4481         }
4482
4483       /* Allocate memory for the section contents.  We use bfd_zalloc
4484          here in case unused entries are not reclaimed before the
4485          section's contents are written out.  This should not happen,
4486          but this way if it does, we get a R_SH_NONE reloc instead
4487          of garbage.  */
4488       s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->_raw_size);
4489       if (s->contents == NULL)
4490         return FALSE;
4491     }
4492
4493   if (htab->root.dynamic_sections_created)
4494     {
4495       /* Add some entries to the .dynamic section.  We fill in the
4496          values later, in sh_elf_finish_dynamic_sections, but we
4497          must add the entries now so that we get the correct size for
4498          the .dynamic section.  The DT_DEBUG entry is filled in by the
4499          dynamic linker and used by the debugger.  */
4500 #define add_dynamic_entry(TAG, VAL) \
4501   bfd_elf32_add_dynamic_entry (info, (bfd_vma) (TAG), (bfd_vma) (VAL))
4502
4503       if (info->executable)
4504         {
4505           if (! add_dynamic_entry (DT_DEBUG, 0))
4506             return FALSE;
4507         }
4508
4509       if (htab->splt->_raw_size != 0)
4510         {
4511           if (! add_dynamic_entry (DT_PLTGOT, 0)
4512               || ! add_dynamic_entry (DT_PLTRELSZ, 0)
4513               || ! add_dynamic_entry (DT_PLTREL, DT_RELA)
4514               || ! add_dynamic_entry (DT_JMPREL, 0))
4515             return FALSE;
4516         }
4517
4518       if (relocs)
4519         {
4520           if (! add_dynamic_entry (DT_RELA, 0)
4521               || ! add_dynamic_entry (DT_RELASZ, 0)
4522               || ! add_dynamic_entry (DT_RELAENT,
4523                                       sizeof (Elf32_External_Rela)))
4524             return FALSE;
4525
4526           /* If any dynamic relocs apply to a read-only section,
4527              then we need a DT_TEXTREL entry.  */
4528           if ((info->flags & DF_TEXTREL) == 0)
4529             elf_link_hash_traverse (&htab->root, readonly_dynrelocs,
4530                                     (PTR) info);
4531
4532           if ((info->flags & DF_TEXTREL) != 0)
4533             {
4534               if (! add_dynamic_entry (DT_TEXTREL, 0))
4535                 return FALSE;
4536             }
4537         }
4538     }
4539 #undef add_dynamic_entry
4540
4541   return TRUE;
4542 }
4543 \f
4544 /* Relocate an SH ELF section.  */
4545
4546 static bfd_boolean
4547 sh_elf_relocate_section (output_bfd, info, input_bfd, input_section,
4548                          contents, relocs, local_syms, local_sections)
4549      bfd *output_bfd;
4550      struct bfd_link_info *info;
4551      bfd *input_bfd;
4552      asection *input_section;
4553      bfd_byte *contents;
4554      Elf_Internal_Rela *relocs;
4555      Elf_Internal_Sym *local_syms;
4556      asection **local_sections;
4557 {
4558   struct elf_sh_link_hash_table *htab;
4559   Elf_Internal_Shdr *symtab_hdr;
4560   struct elf_link_hash_entry **sym_hashes;
4561   Elf_Internal_Rela *rel, *relend;
4562   bfd *dynobj;
4563   bfd_vma *local_got_offsets;
4564   asection *sgot;
4565   asection *sgotplt;
4566   asection *splt;
4567   asection *sreloc;
4568   asection *srelgot;
4569
4570   htab = sh_elf_hash_table (info);
4571   symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
4572   sym_hashes = elf_sym_hashes (input_bfd);
4573   dynobj = htab->root.dynobj;
4574   local_got_offsets = elf_local_got_offsets (input_bfd);
4575
4576   sgot = htab->sgot;
4577   sgotplt = htab->sgotplt;
4578   splt = htab->splt;
4579   sreloc = NULL;
4580   srelgot = NULL;
4581
4582   rel = relocs;
4583   relend = relocs + input_section->reloc_count;
4584   for (; rel < relend; rel++)
4585     {
4586       int r_type;
4587       reloc_howto_type *howto;
4588       unsigned long r_symndx;
4589       Elf_Internal_Sym *sym;
4590       asection *sec;
4591       struct elf_link_hash_entry *h;
4592       bfd_vma relocation;
4593       bfd_vma addend = (bfd_vma) 0;
4594       bfd_reloc_status_type r;
4595       int seen_stt_datalabel = 0;
4596       bfd_vma off;
4597       int tls_type;
4598
4599       r_symndx = ELF32_R_SYM (rel->r_info);
4600
4601       r_type = ELF32_R_TYPE (rel->r_info);
4602
4603       /* Many of the relocs are only used for relaxing, and are
4604          handled entirely by the relaxation code.  */
4605       if (r_type > (int) R_SH_LAST_INVALID_RELOC
4606           && r_type < (int) R_SH_LOOP_START)
4607         continue;
4608       if (r_type == (int) R_SH_NONE)
4609         continue;
4610
4611       if (r_type < 0
4612           || r_type >= R_SH_max
4613           || (r_type >= (int) R_SH_FIRST_INVALID_RELOC
4614               && r_type <= (int) R_SH_LAST_INVALID_RELOC)
4615           || (   r_type >= (int) R_SH_FIRST_INVALID_RELOC_3
4616               && r_type <= (int) R_SH_LAST_INVALID_RELOC_3)
4617           || (   r_type >= (int) R_SH_FIRST_INVALID_RELOC_4
4618               && r_type <= (int) R_SH_LAST_INVALID_RELOC_4)
4619           || (   r_type >= (int) R_SH_FIRST_INVALID_RELOC_5
4620               && r_type <= (int) R_SH_LAST_INVALID_RELOC_5)
4621           || (r_type >= (int) R_SH_FIRST_INVALID_RELOC_2
4622               && r_type <= (int) R_SH_LAST_INVALID_RELOC_2))
4623         {
4624           bfd_set_error (bfd_error_bad_value);
4625           return FALSE;
4626         }
4627
4628       howto = sh_elf_howto_table + r_type;
4629
4630       /* For relocs that aren't partial_inplace, we get the addend from
4631          the relocation.  */
4632       if (! howto->partial_inplace)
4633         addend = rel->r_addend;
4634
4635       h = NULL;
4636       sym = NULL;
4637       sec = NULL;
4638       if (r_symndx < symtab_hdr->sh_info)
4639         {
4640           sym = local_syms + r_symndx;
4641           sec = local_sections[r_symndx];
4642           relocation = (sec->output_section->vma
4643                         + sec->output_offset
4644                         + sym->st_value);
4645           /* A local symbol never has STO_SH5_ISA32, so we don't need
4646              datalabel processing here.  Make sure this does not change
4647              without notice.  */
4648           if ((sym->st_other & STO_SH5_ISA32) != 0)
4649             ((*info->callbacks->reloc_dangerous)
4650              (info,
4651               _("Unexpected STO_SH5_ISA32 on local symbol is not handled"),
4652               input_bfd, input_section, rel->r_offset));
4653           if (info->relocateable)
4654             {
4655               /* This is a relocateable link.  We don't have to change
4656                  anything, unless the reloc is against a section symbol,
4657                  in which case we have to adjust according to where the
4658                  section symbol winds up in the output section.  */
4659               sym = local_syms + r_symndx;
4660               if (ELF_ST_TYPE (sym->st_info) == STT_SECTION)
4661                 {
4662                   if (! howto->partial_inplace)
4663                     {
4664                       /* For relocations with the addend in the
4665                          relocation, we need just to update the addend.
4666                          All real relocs are of type partial_inplace; this
4667                          code is mostly for completeness.  */
4668                       rel->r_addend += sec->output_offset + sym->st_value;
4669
4670                       continue;
4671                     }
4672
4673                   /* Relocs of type partial_inplace need to pick up the
4674                      contents in the contents and add the offset resulting
4675                      from the changed location of the section symbol.
4676                      Using _bfd_final_link_relocate (e.g. goto
4677                      final_link_relocate) here would be wrong, because
4678                      relocations marked pc_relative would get the current
4679                      location subtracted, and we must only do that at the
4680                      final link.  */
4681                   r = _bfd_relocate_contents (howto, input_bfd,
4682                                               sec->output_offset
4683                                               + sym->st_value,
4684                                               contents + rel->r_offset);
4685                   goto relocation_done;
4686                 }
4687
4688               continue;
4689             }
4690           else if (! howto->partial_inplace)
4691             {
4692               relocation = _bfd_elf_rela_local_sym (output_bfd, sym, sec, rel);
4693               addend = rel->r_addend;
4694             }
4695           else if ((sec->flags & SEC_MERGE)
4696                    && ELF_ST_TYPE (sym->st_info) == STT_SECTION)
4697             {
4698               asection *msec;
4699
4700               if (howto->rightshift || howto->src_mask != 0xffffffff)
4701                 {
4702                   (*_bfd_error_handler)
4703                     (_("%s(%s+0x%lx): %s relocation against SEC_MERGE section"),
4704                      bfd_archive_filename (input_bfd),
4705                      bfd_get_section_name (input_bfd, input_section),
4706                      (long) rel->r_offset, howto->name);
4707                   return FALSE;
4708                 }
4709
4710               addend = bfd_get_32 (input_bfd, contents + rel->r_offset);
4711               msec = sec;
4712               addend =
4713                 _bfd_elf_rel_local_sym (output_bfd, sym, &msec, addend)
4714                 - relocation;
4715               addend += msec->output_section->vma + msec->output_offset;
4716               bfd_put_32 (input_bfd, addend, contents + rel->r_offset);
4717               addend = 0;
4718             }
4719         }
4720       else
4721         {
4722           /* Section symbol are never (?) placed in the hash table, so
4723              we can just ignore hash relocations when creating a
4724              relocateable object file.  */
4725           if (info->relocateable)
4726             continue;
4727
4728           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
4729           while (h->root.type == bfd_link_hash_indirect
4730                  || h->root.type == bfd_link_hash_warning)
4731             {
4732 #ifdef INCLUDE_SHMEDIA
4733               /* If the reference passes a symbol marked with
4734                  STT_DATALABEL, then any STO_SH5_ISA32 on the final value
4735                  doesn't count.  */
4736               seen_stt_datalabel |= h->type == STT_DATALABEL;
4737 #endif
4738               h = (struct elf_link_hash_entry *) h->root.u.i.link;
4739             }
4740           if (h->root.type == bfd_link_hash_defined
4741               || h->root.type == bfd_link_hash_defweak)
4742             {
4743               bfd_boolean dyn;
4744
4745               dyn = htab->root.dynamic_sections_created;
4746               sec = h->root.u.def.section;
4747               /* In these cases, we don't need the relocation value.
4748                  We check specially because in some obscure cases
4749                  sec->output_section will be NULL.  */
4750               if (r_type == R_SH_GOTPC
4751                   || r_type == R_SH_GOTPC_LOW16
4752                   || r_type == R_SH_GOTPC_MEDLOW16
4753                   || r_type == R_SH_GOTPC_MEDHI16
4754                   || r_type == R_SH_GOTPC_HI16
4755                   || ((r_type == R_SH_PLT32
4756                        || r_type == R_SH_PLT_LOW16
4757                        || r_type == R_SH_PLT_MEDLOW16
4758                        || r_type == R_SH_PLT_MEDHI16
4759                        || r_type == R_SH_PLT_HI16)
4760                       && h->plt.offset != (bfd_vma) -1)
4761                   || ((r_type == R_SH_GOT32
4762                        || r_type == R_SH_GOT_LOW16
4763                        || r_type == R_SH_GOT_MEDLOW16
4764                        || r_type == R_SH_GOT_MEDHI16
4765                        || r_type == R_SH_GOT_HI16)
4766                       && WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
4767                       && (! info->shared
4768                           || (! info->symbolic && h->dynindx != -1)
4769                           || (h->elf_link_hash_flags
4770                               & ELF_LINK_HASH_DEF_REGULAR) == 0))
4771                   /* The cases above are those in which relocation is
4772                      overwritten in the switch block below.  The cases
4773                      below are those in which we must defer relocation
4774                      to run-time, because we can't resolve absolute
4775                      addresses when creating a shared library.  */
4776                   || (info->shared
4777                       && ((! info->symbolic && h->dynindx != -1)
4778                           || (h->elf_link_hash_flags
4779                               & ELF_LINK_HASH_DEF_REGULAR) == 0)
4780                       && ((r_type == R_SH_DIR32
4781                            && (h->elf_link_hash_flags
4782                                & ELF_LINK_FORCED_LOCAL) == 0)
4783                           || r_type == R_SH_REL32)
4784                       && ((input_section->flags & SEC_ALLOC) != 0
4785                           /* DWARF will emit R_SH_DIR32 relocations in its
4786                              sections against symbols defined externally
4787                              in shared libraries.  We can't do anything
4788                              with them here.  */
4789                           || ((input_section->flags & SEC_DEBUGGING) != 0
4790                               && (h->elf_link_hash_flags
4791                                   & ELF_LINK_HASH_DEF_DYNAMIC) != 0)))
4792                   /* Dynamic relocs are not propagated for SEC_DEBUGGING
4793                      sections because such sections are not SEC_ALLOC and
4794                      thus ld.so will not process them.  */
4795                   || (sec->output_section == NULL
4796                       && ((input_section->flags & SEC_DEBUGGING) != 0
4797                           && (h->elf_link_hash_flags
4798                               & ELF_LINK_HASH_DEF_DYNAMIC) != 0))
4799                   || (sec->output_section == NULL
4800                       && (sh_elf_hash_entry (h)->tls_type == GOT_TLS_IE
4801                           || sh_elf_hash_entry (h)->tls_type == GOT_TLS_GD)))
4802                 relocation = 0;
4803               else if (sec->output_section == NULL)
4804                 {
4805                   (*_bfd_error_handler)
4806                     (_("%s: unresolvable relocation against symbol `%s' from %s section"),
4807                      bfd_archive_filename (input_bfd), h->root.root.string,
4808                      bfd_get_section_name (input_bfd, input_section));
4809                   return FALSE;
4810                 }
4811               else
4812                 relocation = ((h->root.u.def.value
4813                               + sec->output_section->vma
4814                               + sec->output_offset)
4815                               /* A STO_SH5_ISA32 causes a "bitor 1" to the
4816                                  symbol value, unless we've seen
4817                                  STT_DATALABEL on the way to it.  */
4818                               | ((h->other & STO_SH5_ISA32) != 0
4819                                  && ! seen_stt_datalabel));
4820             }
4821           else if (h->root.type == bfd_link_hash_undefweak)
4822             relocation = 0;
4823           else if (info->shared
4824                    && ! info->no_undefined
4825                    && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
4826             relocation = 0;
4827           else
4828             {
4829               if (! ((*info->callbacks->undefined_symbol)
4830                      (info, h->root.root.string, input_bfd,
4831                       input_section, rel->r_offset,
4832                       (!info->shared || info->no_undefined
4833                        || ELF_ST_VISIBILITY (h->other)))))
4834                 return FALSE;
4835               relocation = 0;
4836             }
4837         }
4838
4839       switch ((int) r_type)
4840         {
4841         final_link_relocate:
4842           /* COFF relocs don't use the addend. The addend is used for
4843              R_SH_DIR32 to be compatible with other compilers.  */
4844           r = _bfd_final_link_relocate (howto, input_bfd, input_section,
4845                                         contents, rel->r_offset,
4846                                         relocation, addend);
4847           break;
4848
4849         case R_SH_IND12W:
4850           goto final_link_relocate;
4851
4852         case R_SH_DIR8WPN:
4853         case R_SH_DIR8WPZ:
4854         case R_SH_DIR8WPL:
4855           /* If the reloc is against the start of this section, then
4856              the assembler has already taken care of it and the reloc
4857              is here only to assist in relaxing.  If the reloc is not
4858              against the start of this section, then it's against an
4859              external symbol and we must deal with it ourselves.  */
4860           if (input_section->output_section->vma + input_section->output_offset
4861               != relocation)
4862             {
4863               int disp = (relocation
4864                           - input_section->output_section->vma
4865                           - input_section->output_offset
4866                           - rel->r_offset);
4867               int mask = 0;
4868               switch (r_type)
4869                 {
4870                 case R_SH_DIR8WPN:
4871                 case R_SH_DIR8WPZ: mask = 1; break;
4872                 case R_SH_DIR8WPL: mask = 3; break;
4873                 default: mask = 0; break;
4874                 }
4875               if (disp & mask)
4876                 {
4877                   ((*_bfd_error_handler)
4878                    (_("%s: 0x%lx: fatal: unaligned branch target for relax-support relocation"),
4879                     bfd_archive_filename (input_section->owner),
4880                     (unsigned long) rel->r_offset));
4881                   bfd_set_error (bfd_error_bad_value);
4882                   return FALSE;
4883                 }
4884               relocation -= 4;
4885               goto final_link_relocate;
4886             }
4887           r = bfd_reloc_ok;
4888           break;
4889
4890         default:
4891 #ifdef INCLUDE_SHMEDIA
4892           if (shmedia_prepare_reloc (info, input_bfd, input_section,
4893                                      contents, rel, &relocation))
4894             goto final_link_relocate;
4895 #endif
4896           bfd_set_error (bfd_error_bad_value);
4897           return FALSE;
4898
4899         case R_SH_DIR32:
4900         case R_SH_REL32:
4901           if (info->shared
4902               && (h == NULL
4903                   || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4904                   || h->root.type != bfd_link_hash_undefweak)
4905               && r_symndx != 0
4906               && (input_section->flags & SEC_ALLOC) != 0
4907               && (r_type != R_SH_REL32
4908                   || (h != NULL
4909                       && h->dynindx != -1
4910                       && (! info->symbolic
4911                           || (h->elf_link_hash_flags
4912                               & ELF_LINK_HASH_DEF_REGULAR) == 0))))
4913             {
4914               Elf_Internal_Rela outrel;
4915               bfd_byte *loc;
4916               bfd_boolean skip, relocate;
4917
4918               /* When generating a shared object, these relocations
4919                  are copied into the output file to be resolved at run
4920                  time.  */
4921
4922               if (sreloc == NULL)
4923                 {
4924                   const char *name;
4925
4926                   name = (bfd_elf_string_from_elf_section
4927                           (input_bfd,
4928                            elf_elfheader (input_bfd)->e_shstrndx,
4929                            elf_section_data (input_section)->rel_hdr.sh_name));
4930                   if (name == NULL)
4931                     return FALSE;
4932
4933                   BFD_ASSERT (strncmp (name, ".rela", 5) == 0
4934                               && strcmp (bfd_get_section_name (input_bfd,
4935                                                                input_section),
4936                                          name + 5) == 0);
4937
4938                   sreloc = bfd_get_section_by_name (dynobj, name);
4939                   BFD_ASSERT (sreloc != NULL);
4940                 }
4941
4942               skip = FALSE;
4943               relocate = FALSE;
4944
4945               outrel.r_offset =
4946                 _bfd_elf_section_offset (output_bfd, info, input_section,
4947                                          rel->r_offset);
4948               if (outrel.r_offset == (bfd_vma) -1)
4949                 skip = TRUE;
4950               else if (outrel.r_offset == (bfd_vma) -2)
4951                 skip = TRUE, relocate = TRUE;
4952               outrel.r_offset += (input_section->output_section->vma
4953                                   + input_section->output_offset);
4954
4955               if (skip)
4956                 memset (&outrel, 0, sizeof outrel);
4957               else if (r_type == R_SH_REL32)
4958                 {
4959                   BFD_ASSERT (h != NULL && h->dynindx != -1);
4960                   outrel.r_info = ELF32_R_INFO (h->dynindx, R_SH_REL32);
4961                   outrel.r_addend
4962                     = bfd_get_32 (input_bfd, contents + rel->r_offset);
4963                 }
4964               else
4965                 {
4966                   /* h->dynindx may be -1 if this symbol was marked to
4967                      become local.  */
4968                   if (h == NULL
4969                       || ((info->symbolic || h->dynindx == -1)
4970                           && (h->elf_link_hash_flags
4971                               & ELF_LINK_HASH_DEF_REGULAR) != 0))
4972                     {
4973                       relocate = TRUE;
4974                       outrel.r_info = ELF32_R_INFO (0, R_SH_RELATIVE);
4975                       outrel.r_addend
4976                         = relocation + bfd_get_32 (input_bfd,
4977                                                    contents + rel->r_offset);
4978                     }
4979                   else
4980                     {
4981                       BFD_ASSERT (h->dynindx != -1);
4982                       outrel.r_info = ELF32_R_INFO (h->dynindx, R_SH_DIR32);
4983                       outrel.r_addend
4984                         = relocation + bfd_get_32 (input_bfd,
4985                                                    contents + rel->r_offset);
4986                     }
4987                 }
4988
4989               loc = sreloc->contents;
4990               loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela);
4991               bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
4992
4993               /* If this reloc is against an external symbol, we do
4994                  not want to fiddle with the addend.  Otherwise, we
4995                  need to include the symbol value so that it becomes
4996                  an addend for the dynamic reloc.  */
4997               if (! relocate)
4998                 continue;
4999             }
5000           goto final_link_relocate;
5001
5002         case R_SH_GOTPLT32:
5003 #ifdef INCLUDE_SHMEDIA
5004         case R_SH_GOTPLT_LOW16:
5005         case R_SH_GOTPLT_MEDLOW16:
5006         case R_SH_GOTPLT_MEDHI16:
5007         case R_SH_GOTPLT_HI16:
5008         case R_SH_GOTPLT10BY4:
5009         case R_SH_GOTPLT10BY8:
5010 #endif
5011           /* Relocation is to the entry for this symbol in the
5012              procedure linkage table.  */
5013
5014           if (h == NULL
5015               || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL)
5016               || ! info->shared
5017               || info->symbolic
5018               || h->dynindx == -1
5019               || h->plt.offset == (bfd_vma) -1
5020               || h->got.offset != (bfd_vma) -1)
5021             goto force_got;
5022
5023           /* Relocation is to the entry for this symbol in the global
5024              offset table extension for the procedure linkage table.  */
5025
5026           BFD_ASSERT (sgotplt != NULL);
5027           relocation = (sgotplt->output_offset
5028                         + ((h->plt.offset / elf_sh_sizeof_plt (info)
5029                             - 1 + 3) * 4));
5030
5031 #ifdef GOT_BIAS
5032           relocation -= GOT_BIAS;
5033 #endif
5034
5035           goto final_link_relocate;
5036
5037         force_got:
5038         case R_SH_GOT32:
5039 #ifdef INCLUDE_SHMEDIA
5040         case R_SH_GOT_LOW16:
5041         case R_SH_GOT_MEDLOW16:
5042         case R_SH_GOT_MEDHI16:
5043         case R_SH_GOT_HI16:
5044         case R_SH_GOT10BY4:
5045         case R_SH_GOT10BY8:
5046 #endif
5047           /* Relocation is to the entry for this symbol in the global
5048              offset table.  */
5049
5050           BFD_ASSERT (sgot != NULL);
5051
5052           if (h != NULL)
5053             {
5054               bfd_boolean dyn;
5055
5056               off = h->got.offset;
5057 #ifdef INCLUDE_SHMEDIA
5058               if (seen_stt_datalabel)
5059                 {
5060                   struct elf_sh_link_hash_entry *hsh;
5061
5062                   hsh = (struct elf_sh_link_hash_entry *)h;
5063                   off = hsh->datalabel_got.offset;
5064                 }
5065 #endif
5066               BFD_ASSERT (off != (bfd_vma) -1);
5067
5068               dyn = htab->root.dynamic_sections_created;
5069               if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
5070                   || (info->shared
5071                       && (info->symbolic || h->dynindx == -1
5072                           || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL))
5073                       && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
5074                   || (ELF_ST_VISIBILITY (h->other)
5075                       && h->root.type == bfd_link_hash_undefweak))
5076                 {
5077                   /* This is actually a static link, or it is a
5078                      -Bsymbolic link and the symbol is defined
5079                      locally, or the symbol was forced to be local
5080                      because of a version file.  We must initialize
5081                      this entry in the global offset table.  Since the
5082                      offset must always be a multiple of 4, we use the
5083                      least significant bit to record whether we have
5084                      initialized it already.
5085
5086                      When doing a dynamic link, we create a .rela.got
5087                      relocation entry to initialize the value.  This
5088                      is done in the finish_dynamic_symbol routine.  */
5089                   if ((off & 1) != 0)
5090                     off &= ~1;
5091                   else
5092                     {
5093                       bfd_put_32 (output_bfd, relocation,
5094                                   sgot->contents + off);
5095 #ifdef INCLUDE_SHMEDIA
5096                       if (seen_stt_datalabel)
5097                         {
5098                           struct elf_sh_link_hash_entry *hsh;
5099
5100                           hsh = (struct elf_sh_link_hash_entry *)h;
5101                           hsh->datalabel_got.offset |= 1;
5102                         }
5103                       else
5104 #endif
5105                         h->got.offset |= 1;
5106                     }
5107                 }
5108
5109               relocation = sgot->output_offset + off;
5110             }
5111           else
5112             {
5113 #ifdef INCLUDE_SHMEDIA
5114               if (rel->r_addend)
5115                 {
5116                   BFD_ASSERT (local_got_offsets != NULL
5117                               && (local_got_offsets[symtab_hdr->sh_info
5118                                                     + r_symndx]
5119                                   != (bfd_vma) -1));
5120
5121                   off = local_got_offsets[symtab_hdr->sh_info
5122                                           + r_symndx];
5123                 }
5124               else
5125                 {
5126 #endif
5127               BFD_ASSERT (local_got_offsets != NULL
5128                           && local_got_offsets[r_symndx] != (bfd_vma) -1);
5129
5130               off = local_got_offsets[r_symndx];
5131 #ifdef INCLUDE_SHMEDIA
5132                 }
5133 #endif
5134
5135               /* The offset must always be a multiple of 4.  We use
5136                  the least significant bit to record whether we have
5137                  already generated the necessary reloc.  */
5138               if ((off & 1) != 0)
5139                 off &= ~1;
5140               else
5141                 {
5142                   bfd_put_32 (output_bfd, relocation, sgot->contents + off);
5143
5144                   if (info->shared)
5145                     {
5146                       Elf_Internal_Rela outrel;
5147                       bfd_byte *loc;
5148
5149                       if (srelgot == NULL)
5150                         {
5151                           srelgot = bfd_get_section_by_name (dynobj,
5152                                                              ".rela.got");
5153                           BFD_ASSERT (srelgot != NULL);
5154                         }
5155
5156                       outrel.r_offset = (sgot->output_section->vma
5157                                          + sgot->output_offset
5158                                          + off);
5159                       outrel.r_info = ELF32_R_INFO (0, R_SH_RELATIVE);
5160                       outrel.r_addend = relocation;
5161                       loc = srelgot->contents;
5162                       loc += srelgot->reloc_count++ * sizeof (Elf32_External_Rela);
5163                       bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5164                     }
5165
5166 #ifdef INCLUDE_SHMEDIA
5167                   if (rel->r_addend)
5168                     local_got_offsets[symtab_hdr->sh_info + r_symndx] |= 1;
5169                   else
5170 #endif
5171                     local_got_offsets[r_symndx] |= 1;
5172                 }
5173
5174               relocation = sgot->output_offset + off;
5175             }
5176
5177 #ifdef GOT_BIAS
5178           relocation -= GOT_BIAS;
5179 #endif
5180
5181           goto final_link_relocate;
5182
5183         case R_SH_GOTOFF:
5184 #ifdef INCLUDE_SHMEDIA
5185         case R_SH_GOTOFF_LOW16:
5186         case R_SH_GOTOFF_MEDLOW16:
5187         case R_SH_GOTOFF_MEDHI16:
5188         case R_SH_GOTOFF_HI16:
5189 #endif
5190           /* Relocation is relative to the start of the global offset
5191              table.  */
5192
5193           BFD_ASSERT (sgot != NULL);
5194
5195           /* Note that sgot->output_offset is not involved in this
5196              calculation.  We always want the start of .got.  If we
5197              defined _GLOBAL_OFFSET_TABLE in a different way, as is
5198              permitted by the ABI, we might have to change this
5199              calculation.  */
5200           relocation -= sgot->output_section->vma;
5201
5202 #ifdef GOT_BIAS
5203           relocation -= GOT_BIAS;
5204 #endif
5205
5206           addend = rel->r_addend;
5207
5208           goto final_link_relocate;
5209
5210         case R_SH_GOTPC:
5211 #ifdef INCLUDE_SHMEDIA
5212         case R_SH_GOTPC_LOW16:
5213         case R_SH_GOTPC_MEDLOW16:
5214         case R_SH_GOTPC_MEDHI16:
5215         case R_SH_GOTPC_HI16:
5216 #endif
5217           /* Use global offset table as symbol value.  */
5218
5219           BFD_ASSERT (sgot != NULL);
5220           relocation = sgot->output_section->vma;
5221
5222 #ifdef GOT_BIAS
5223           relocation += GOT_BIAS;
5224 #endif
5225
5226           addend = rel->r_addend;
5227
5228           goto final_link_relocate;
5229
5230         case R_SH_PLT32:
5231 #ifdef INCLUDE_SHMEDIA
5232         case R_SH_PLT_LOW16:
5233         case R_SH_PLT_MEDLOW16:
5234         case R_SH_PLT_MEDHI16:
5235         case R_SH_PLT_HI16:
5236 #endif
5237           /* Relocation is to the entry for this symbol in the
5238              procedure linkage table.  */
5239
5240           /* Resolve a PLT reloc against a local symbol directly,
5241              without using the procedure linkage table.  */
5242           if (h == NULL)
5243             goto final_link_relocate;
5244
5245           if (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL)
5246             goto final_link_relocate;
5247
5248           if (h->plt.offset == (bfd_vma) -1)
5249             {
5250               /* We didn't make a PLT entry for this symbol.  This
5251                  happens when statically linking PIC code, or when
5252                  using -Bsymbolic.  */
5253               goto final_link_relocate;
5254             }
5255
5256           BFD_ASSERT (splt != NULL);
5257           relocation = (splt->output_section->vma
5258                         + splt->output_offset
5259                         + h->plt.offset);
5260
5261 #ifdef INCLUDE_SHMEDIA
5262           relocation++;
5263 #endif
5264
5265           addend = rel->r_addend;
5266
5267           goto final_link_relocate;
5268
5269         case R_SH_LOOP_START:
5270           {
5271             static bfd_vma start, end;
5272
5273             start = (relocation + rel->r_addend
5274                      - (sec->output_section->vma + sec->output_offset));
5275             r = sh_elf_reloc_loop (r_type, input_bfd, input_section, contents,
5276                                    rel->r_offset, sec, start, end);
5277             break;
5278
5279         case R_SH_LOOP_END:
5280             end = (relocation + rel->r_addend
5281                    - (sec->output_section->vma + sec->output_offset));
5282             r = sh_elf_reloc_loop (r_type, input_bfd, input_section, contents,
5283                                    rel->r_offset, sec, start, end);
5284             break;
5285           }
5286
5287         case R_SH_TLS_GD_32:
5288         case R_SH_TLS_IE_32:
5289           r_type = sh_elf_optimized_tls_reloc (info, r_type, h == NULL);
5290           tls_type = GOT_UNKNOWN;
5291           if (h == NULL && local_got_offsets)
5292             tls_type = sh_elf_local_got_tls_type (input_bfd) [r_symndx];
5293           else if (h != NULL)
5294             {
5295               tls_type = sh_elf_hash_entry (h)->tls_type;
5296               if (! info->shared
5297                   && (h->dynindx == -1
5298                       || (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
5299                 r_type = R_SH_TLS_LE_32;
5300             }
5301
5302           if (r_type == R_SH_TLS_GD_32 && tls_type == GOT_TLS_IE)
5303             r_type = R_SH_TLS_IE_32;
5304
5305           if (r_type == R_SH_TLS_LE_32)
5306             {
5307               bfd_vma offset;
5308               unsigned short insn;
5309
5310               if (ELF32_R_TYPE (rel->r_info) == R_SH_TLS_GD_32)
5311                 {
5312                   /* GD->LE transition:
5313                        mov.l 1f,r4; mova 2f,r0; mov.l 2f,r1; add r0,r1;
5314                        jsr @r1; add r12,r4; bra 3f; nop; .align 2;
5315                        1: .long x$TLSGD; 2: .long __tls_get_addr@PLT; 3:
5316                      We change it into:
5317                        mov.l 1f,r4; stc gbr,r0; add r4,r0; nop;
5318                        nop; nop; ...
5319                        1: .long x@TPOFF; 2: .long __tls_get_addr@PLT; 3:.  */
5320
5321                   offset = rel->r_offset;
5322                   BFD_ASSERT (offset >= 16);
5323                   /* Size of GD instructions is 16 or 18.  */
5324                   offset -= 16;
5325                   insn = bfd_get_16 (input_bfd, contents + offset + 0);
5326                   if ((insn & 0xff00) == 0xc700)
5327                     {
5328                       BFD_ASSERT (offset >= 2);
5329                       offset -= 2;
5330                       insn = bfd_get_16 (input_bfd, contents + offset + 0);
5331                     }
5332
5333                   BFD_ASSERT ((insn & 0xff00) == 0xd400);
5334                   insn = bfd_get_16 (input_bfd, contents + offset + 2);
5335                   BFD_ASSERT ((insn & 0xff00) == 0xc700);
5336                   insn = bfd_get_16 (input_bfd, contents + offset + 4);
5337                   BFD_ASSERT ((insn & 0xff00) == 0xd100);
5338                   insn = bfd_get_16 (input_bfd, contents + offset + 6);
5339                   BFD_ASSERT (insn == 0x310c);
5340                   insn = bfd_get_16 (input_bfd, contents + offset + 8);
5341                   BFD_ASSERT (insn == 0x410b);
5342                   insn = bfd_get_16 (input_bfd, contents + offset + 10);
5343                   BFD_ASSERT (insn == 0x34cc);
5344
5345                   bfd_put_16 (output_bfd, 0x0012, contents + offset + 2);
5346                   bfd_put_16 (output_bfd, 0x304c, contents + offset + 4);
5347                   bfd_put_16 (output_bfd, 0x0009, contents + offset + 6);
5348                   bfd_put_16 (output_bfd, 0x0009, contents + offset + 8);
5349                   bfd_put_16 (output_bfd, 0x0009, contents + offset + 10);
5350                 }
5351               else
5352                 {
5353                   int index;
5354
5355                   /* IE->LE transition:
5356                      mov.l 1f,r0; stc gbr,rN; mov.l @(r0,r12),rM;
5357                      bra 2f; add ...; .align 2; 1: x@GOTTPOFF; 2:
5358                      We change it into:
5359                      mov.l .Ln,rM; stc gbr,rN; nop; ...;
5360                      1: x@TPOFF; 2:.  */
5361
5362                   offset = rel->r_offset;
5363                   BFD_ASSERT (offset >= 16);
5364                   /* Size of IE instructions is 10 or 12.  */
5365                   offset -= 10;
5366                   insn = bfd_get_16 (input_bfd, contents + offset + 0);
5367                   if ((insn & 0xf0ff) == 0x0012)
5368                     {
5369                       BFD_ASSERT (offset >= 2);
5370                       offset -= 2;
5371                       insn = bfd_get_16 (input_bfd, contents + offset + 0);
5372                     }
5373
5374                   BFD_ASSERT ((insn & 0xff00) == 0xd000);
5375                   index = insn & 0x00ff;
5376                   insn = bfd_get_16 (input_bfd, contents + offset + 2);
5377                   BFD_ASSERT ((insn & 0xf0ff) == 0x0012);
5378                   insn = bfd_get_16 (input_bfd, contents + offset + 4);
5379                   BFD_ASSERT ((insn & 0xf0ff) == 0x00ce);
5380                   insn = 0xd000 | (insn & 0x0f00) | index;
5381                   bfd_put_16 (output_bfd, insn, contents + offset + 0);
5382                   bfd_put_16 (output_bfd, 0x0009, contents + offset + 4);
5383                 }
5384
5385               bfd_put_32 (output_bfd, tpoff (info, relocation),
5386                           contents + rel->r_offset);
5387               continue;
5388             }
5389
5390           sgot = htab->sgot;
5391           if (sgot == NULL)
5392             abort ();
5393
5394           if (h != NULL)
5395             off = h->got.offset;
5396           else
5397             {
5398               if (local_got_offsets == NULL)
5399                 abort ();
5400
5401               off = local_got_offsets[r_symndx];
5402             }
5403
5404           /* Relocate R_SH_TLS_IE_32 directly when statically linking.  */
5405           if (r_type == R_SH_TLS_IE_32
5406               && ! htab->root.dynamic_sections_created)
5407             {
5408               off &= ~1;
5409               bfd_put_32 (output_bfd, tpoff (info, relocation),
5410                           sgot->contents + off);
5411               bfd_put_32 (output_bfd, sgot->output_offset + off,
5412                           contents + rel->r_offset);
5413               continue;
5414             }
5415
5416           if ((off & 1) != 0)
5417             off &= ~1;
5418           else
5419             {
5420               Elf_Internal_Rela outrel;
5421               bfd_byte *loc;
5422               int dr_type, indx;
5423
5424               if (srelgot == NULL)
5425                 {
5426                   srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
5427                   BFD_ASSERT (srelgot != NULL);
5428                 }
5429
5430               outrel.r_offset = (sgot->output_section->vma
5431                                  + sgot->output_offset + off);
5432
5433               if (h == NULL || h->dynindx == -1)
5434                 indx = 0;
5435               else
5436                 indx = h->dynindx;
5437
5438               dr_type = (r_type == R_SH_TLS_GD_32 ? R_SH_TLS_DTPMOD32 :
5439                          R_SH_TLS_TPOFF32);
5440               if (dr_type == R_SH_TLS_TPOFF32 && indx == 0)
5441                 outrel.r_addend = relocation - dtpoff_base (info);
5442               else
5443                 outrel.r_addend = 0;
5444               outrel.r_info = ELF32_R_INFO (indx, dr_type);
5445               loc = srelgot->contents;
5446               loc += srelgot->reloc_count++ * sizeof (Elf32_External_Rela);
5447               bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5448
5449               if (r_type == R_SH_TLS_GD_32)
5450                 {
5451                   if (indx == 0)
5452                     {
5453                       bfd_put_32 (output_bfd,
5454                                   relocation - dtpoff_base (info),
5455                                   sgot->contents + off + 4);
5456                     }
5457                   else
5458                     {
5459                       outrel.r_info = ELF32_R_INFO (indx,
5460                                                     R_SH_TLS_DTPOFF32);
5461                       outrel.r_offset += 4;
5462                       outrel.r_addend = 0;
5463                       srelgot->reloc_count++;
5464                       loc += sizeof (Elf32_External_Rela);
5465                       bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5466                     }
5467                 }
5468
5469               if (h != NULL)
5470                 h->got.offset |= 1;
5471               else
5472                 local_got_offsets[r_symndx] |= 1;
5473             }
5474
5475           if (off >= (bfd_vma) -2)
5476             abort ();
5477
5478           if (r_type == (int) ELF32_R_TYPE (rel->r_info))
5479             relocation = sgot->output_offset + off;
5480           else
5481             {
5482               bfd_vma offset;
5483               unsigned short insn;
5484
5485               /* GD->IE transition:
5486                    mov.l 1f,r4; mova 2f,r0; mov.l 2f,r1; add r0,r1;
5487                    jsr @r1; add r12,r4; bra 3f; nop; .align 2;
5488                    1: .long x$TLSGD; 2: .long __tls_get_addr@PLT; 3:
5489                  We change it into:
5490                    mov.l 1f,r0; stc gbr,r4; mov.l @(r0,r12),r0; add r4,r0;
5491                    nop; nop; bra 3f; nop; .align 2;
5492                    1: .long x@TPOFF; 2:...; 3:.  */
5493
5494               offset = rel->r_offset;
5495               BFD_ASSERT (offset >= 16);
5496               /* Size of GD instructions is 16 or 18.  */
5497               offset -= 16;
5498               insn = bfd_get_16 (input_bfd, contents + offset + 0);
5499               if ((insn & 0xff00) == 0xc700)
5500                 {
5501                   BFD_ASSERT (offset >= 2);
5502                   offset -= 2;
5503                   insn = bfd_get_16 (input_bfd, contents + offset + 0);
5504                 }
5505
5506               BFD_ASSERT ((insn & 0xff00) == 0xd400);
5507
5508               /* Replace mov.l 1f,R4 with mov.l 1f,r0.  */
5509               bfd_put_16 (output_bfd, insn & 0xf0ff, contents + offset);
5510
5511               insn = bfd_get_16 (input_bfd, contents + offset + 2);
5512               BFD_ASSERT ((insn & 0xff00) == 0xc700);
5513               insn = bfd_get_16 (input_bfd, contents + offset + 4);
5514               BFD_ASSERT ((insn & 0xff00) == 0xd100);
5515               insn = bfd_get_16 (input_bfd, contents + offset + 6);
5516               BFD_ASSERT (insn == 0x310c);
5517               insn = bfd_get_16 (input_bfd, contents + offset + 8);
5518               BFD_ASSERT (insn == 0x410b);
5519               insn = bfd_get_16 (input_bfd, contents + offset + 10);
5520               BFD_ASSERT (insn == 0x34cc);
5521
5522               bfd_put_16 (output_bfd, 0x0412, contents + offset + 2);
5523               bfd_put_16 (output_bfd, 0x00ce, contents + offset + 4);
5524               bfd_put_16 (output_bfd, 0x304c, contents + offset + 6);
5525               bfd_put_16 (output_bfd, 0x0009, contents + offset + 8);
5526               bfd_put_16 (output_bfd, 0x0009, contents + offset + 10);
5527
5528               bfd_put_32 (output_bfd, sgot->output_offset + off,
5529                           contents + rel->r_offset);
5530
5531               continue;
5532           }
5533
5534           addend = rel->r_addend;
5535
5536           goto final_link_relocate;
5537
5538         case R_SH_TLS_LD_32:
5539           if (! info->shared)
5540             {
5541               bfd_vma offset;
5542               unsigned short insn;
5543
5544               /* LD->LE transition:
5545                    mov.l 1f,r4; mova 2f,r0; mov.l 2f,r1; add r0,r1;
5546                    jsr @r1; add r12,r4; bra 3f; nop; .align 2;
5547                    1: .long x$TLSLD; 2: .long __tls_get_addr@PLT; 3:
5548                  We change it into:
5549                    stc gbr,r0; nop; nop; nop;
5550                    nop; nop; bra 3f; ...; 3:.  */
5551
5552               offset = rel->r_offset;
5553               BFD_ASSERT (offset >= 16);
5554               /* Size of LD instructions is 16 or 18.  */
5555               offset -= 16;
5556               insn = bfd_get_16 (input_bfd, contents + offset + 0);
5557               if ((insn & 0xff00) == 0xc700)
5558                 {
5559                   BFD_ASSERT (offset >= 2);
5560                   offset -= 2;
5561                   insn = bfd_get_16 (input_bfd, contents + offset + 0);
5562                 }
5563
5564               BFD_ASSERT ((insn & 0xff00) == 0xd400);
5565               insn = bfd_get_16 (input_bfd, contents + offset + 2);
5566               BFD_ASSERT ((insn & 0xff00) == 0xc700);
5567               insn = bfd_get_16 (input_bfd, contents + offset + 4);
5568               BFD_ASSERT ((insn & 0xff00) == 0xd100);
5569               insn = bfd_get_16 (input_bfd, contents + offset + 6);
5570               BFD_ASSERT (insn == 0x310c);
5571               insn = bfd_get_16 (input_bfd, contents + offset + 8);
5572               BFD_ASSERT (insn == 0x410b);
5573               insn = bfd_get_16 (input_bfd, contents + offset + 10);
5574               BFD_ASSERT (insn == 0x34cc);
5575
5576               bfd_put_16 (output_bfd, 0x0012, contents + offset + 0);
5577               bfd_put_16 (output_bfd, 0x0009, contents + offset + 2);
5578               bfd_put_16 (output_bfd, 0x0009, contents + offset + 4);
5579               bfd_put_16 (output_bfd, 0x0009, contents + offset + 6);
5580               bfd_put_16 (output_bfd, 0x0009, contents + offset + 8);
5581               bfd_put_16 (output_bfd, 0x0009, contents + offset + 10);
5582
5583               continue;
5584             }
5585
5586           sgot = htab->sgot;
5587           if (sgot == NULL)
5588             abort ();
5589
5590           off = htab->tls_ldm_got.offset;
5591           if (off & 1)
5592             off &= ~1;
5593           else
5594             {
5595               Elf_Internal_Rela outrel;
5596               bfd_byte *loc;
5597
5598               srelgot = htab->srelgot;
5599               if (srelgot == NULL)
5600                 abort ();
5601
5602               outrel.r_offset = (sgot->output_section->vma
5603                                  + sgot->output_offset + off);
5604               outrel.r_addend = 0;
5605               outrel.r_info = ELF32_R_INFO (0, R_SH_TLS_DTPMOD32);
5606               loc = srelgot->contents;
5607               loc += srelgot->reloc_count++ * sizeof (Elf32_External_Rela);
5608               bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5609               htab->tls_ldm_got.offset |= 1;
5610             }
5611
5612           relocation = sgot->output_offset + off;
5613           addend = rel->r_addend;
5614
5615           goto final_link_relocate;
5616
5617         case R_SH_TLS_LDO_32:
5618           if (! info->shared)
5619             relocation = tpoff (info, relocation);
5620           else
5621             relocation -= dtpoff_base (info);
5622
5623           addend = rel->r_addend;
5624           goto final_link_relocate;
5625
5626         case R_SH_TLS_LE_32:
5627           {
5628             int indx;
5629             Elf_Internal_Rela outrel;
5630             bfd_byte *loc;
5631
5632             if (! info->shared)
5633               {
5634                 relocation = tpoff (info, relocation);
5635                 addend = rel->r_addend;
5636                 goto final_link_relocate;
5637               }
5638
5639             if (sreloc == NULL)
5640               {
5641                 const char *name;
5642
5643                 name = (bfd_elf_string_from_elf_section
5644                         (input_bfd,
5645                          elf_elfheader (input_bfd)->e_shstrndx,
5646                          elf_section_data (input_section)->rel_hdr.sh_name));
5647                 if (name == NULL)
5648                   return FALSE;
5649
5650                 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
5651                             && strcmp (bfd_get_section_name (input_bfd,
5652                                                              input_section),
5653                                        name + 5) == 0);
5654
5655                 sreloc = bfd_get_section_by_name (dynobj, name);
5656                 BFD_ASSERT (sreloc != NULL);
5657               }
5658
5659             if (h == NULL || h->dynindx == -1)
5660               indx = 0;
5661             else
5662               indx = h->dynindx;
5663
5664             outrel.r_offset = (input_section->output_section->vma
5665                                + input_section->output_offset
5666                                + rel->r_offset);
5667             outrel.r_info = ELF32_R_INFO (indx, R_SH_TLS_TPOFF32);
5668             if (indx == 0)
5669               outrel.r_addend = relocation - dtpoff_base (info);
5670             else
5671               outrel.r_addend = 0;
5672
5673             loc = sreloc->contents;
5674             loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela);
5675             bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5676             continue;
5677           }
5678         }
5679
5680     relocation_done:
5681       if (r != bfd_reloc_ok)
5682         {
5683           switch (r)
5684             {
5685             default:
5686             case bfd_reloc_outofrange:
5687               abort ();
5688             case bfd_reloc_overflow:
5689               {
5690                 const char *name;
5691
5692                 if (h != NULL)
5693                   name = h->root.root.string;
5694                 else
5695                   {
5696                     name = (bfd_elf_string_from_elf_section
5697                             (input_bfd, symtab_hdr->sh_link, sym->st_name));
5698                     if (name == NULL)
5699                       return FALSE;
5700                     if (*name == '\0')
5701                       name = bfd_section_name (input_bfd, sec);
5702                   }
5703                 if (! ((*info->callbacks->reloc_overflow)
5704                        (info, name, howto->name, (bfd_vma) 0,
5705                         input_bfd, input_section, rel->r_offset)))
5706                   return FALSE;
5707               }
5708               break;
5709             }
5710         }
5711     }
5712
5713   return TRUE;
5714 }
5715
5716 /* This is a version of bfd_generic_get_relocated_section_contents
5717    which uses sh_elf_relocate_section.  */
5718
5719 static bfd_byte *
5720 sh_elf_get_relocated_section_contents (output_bfd, link_info, link_order,
5721                                        data, relocateable, symbols)
5722      bfd *output_bfd;
5723      struct bfd_link_info *link_info;
5724      struct bfd_link_order *link_order;
5725      bfd_byte *data;
5726      bfd_boolean relocateable;
5727      asymbol **symbols;
5728 {
5729   Elf_Internal_Shdr *symtab_hdr;
5730   asection *input_section = link_order->u.indirect.section;
5731   bfd *input_bfd = input_section->owner;
5732   asection **sections = NULL;
5733   Elf_Internal_Rela *internal_relocs = NULL;
5734   Elf_Internal_Sym *isymbuf = NULL;
5735
5736   /* We only need to handle the case of relaxing, or of having a
5737      particular set of section contents, specially.  */
5738   if (relocateable
5739       || elf_section_data (input_section)->this_hdr.contents == NULL)
5740     return bfd_generic_get_relocated_section_contents (output_bfd, link_info,
5741                                                        link_order, data,
5742                                                        relocateable,
5743                                                        symbols);
5744
5745   symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
5746
5747   memcpy (data, elf_section_data (input_section)->this_hdr.contents,
5748           (size_t) input_section->_raw_size);
5749
5750   if ((input_section->flags & SEC_RELOC) != 0
5751       && input_section->reloc_count > 0)
5752     {
5753       asection **secpp;
5754       Elf_Internal_Sym *isym, *isymend;
5755       bfd_size_type amt;
5756
5757       internal_relocs = (_bfd_elf_link_read_relocs
5758                          (input_bfd, input_section, (PTR) NULL,
5759                           (Elf_Internal_Rela *) NULL, FALSE));
5760       if (internal_relocs == NULL)
5761         goto error_return;
5762
5763       if (symtab_hdr->sh_info != 0)
5764         {
5765           isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
5766           if (isymbuf == NULL)
5767             isymbuf = bfd_elf_get_elf_syms (input_bfd, symtab_hdr,
5768                                             symtab_hdr->sh_info, 0,
5769                                             NULL, NULL, NULL);
5770           if (isymbuf == NULL)
5771             goto error_return;
5772         }
5773
5774       amt = symtab_hdr->sh_info;
5775       amt *= sizeof (asection *);
5776       sections = (asection **) bfd_malloc (amt);
5777       if (sections == NULL && amt != 0)
5778         goto error_return;
5779
5780       isymend = isymbuf + symtab_hdr->sh_info;
5781       for (isym = isymbuf, secpp = sections; isym < isymend; ++isym, ++secpp)
5782         {
5783           asection *isec;
5784
5785           if (isym->st_shndx == SHN_UNDEF)
5786             isec = bfd_und_section_ptr;
5787           else if (isym->st_shndx == SHN_ABS)
5788             isec = bfd_abs_section_ptr;
5789           else if (isym->st_shndx == SHN_COMMON)
5790             isec = bfd_com_section_ptr;
5791           else
5792             isec = bfd_section_from_elf_index (input_bfd, isym->st_shndx);
5793
5794           *secpp = isec;
5795         }
5796
5797       if (! sh_elf_relocate_section (output_bfd, link_info, input_bfd,
5798                                      input_section, data, internal_relocs,
5799                                      isymbuf, sections))
5800         goto error_return;
5801
5802       if (sections != NULL)
5803         free (sections);
5804       if (isymbuf != NULL
5805           && symtab_hdr->contents != (unsigned char *) isymbuf)
5806         free (isymbuf);
5807       if (elf_section_data (input_section)->relocs != internal_relocs)
5808         free (internal_relocs);
5809     }
5810
5811   return data;
5812
5813  error_return:
5814   if (sections != NULL)
5815     free (sections);
5816   if (isymbuf != NULL
5817       && symtab_hdr->contents != (unsigned char *) isymbuf)
5818     free (isymbuf);
5819   if (internal_relocs != NULL
5820       && elf_section_data (input_section)->relocs != internal_relocs)
5821     free (internal_relocs);
5822   return NULL;
5823 }
5824
5825 /* Return the base VMA address which should be subtracted from real addresses
5826    when resolving @dtpoff relocation.
5827    This is PT_TLS segment p_vaddr.  */
5828
5829 static bfd_vma
5830 dtpoff_base (info)
5831      struct bfd_link_info *info;
5832 {
5833   /* If tls_segment is NULL, we should have signalled an error already.  */
5834   if (elf_hash_table (info)->tls_segment == NULL)
5835     return 0;
5836   return elf_hash_table (info)->tls_segment->start;
5837 }
5838
5839 /* Return the relocation value for R_SH_TLS_TPOFF32..  */
5840
5841 static bfd_vma
5842 tpoff (info, address)
5843      struct bfd_link_info *info;
5844      bfd_vma address;
5845 {
5846   /* If tls_segment is NULL, we should have signalled an error already.  */
5847   if (elf_hash_table (info)->tls_segment == NULL)
5848     return 0;
5849   /* SH TLS ABI is variant I and static TLS block start just after tcbhead
5850      structure which has 2 pointer fields.  */
5851   return (address - dtpoff_base (info) + 8);
5852 }
5853
5854 static asection *
5855 sh_elf_gc_mark_hook (sec, info, rel, h, sym)
5856      asection *sec;
5857      struct bfd_link_info *info ATTRIBUTE_UNUSED;
5858      Elf_Internal_Rela *rel;
5859      struct elf_link_hash_entry *h;
5860      Elf_Internal_Sym *sym;
5861 {
5862   if (h != NULL)
5863     {
5864       switch (ELF32_R_TYPE (rel->r_info))
5865         {
5866         case R_SH_GNU_VTINHERIT:
5867         case R_SH_GNU_VTENTRY:
5868           break;
5869
5870         default:
5871 #ifdef INCLUDE_SHMEDIA
5872           while (h->root.type == bfd_link_hash_indirect
5873                  && h->root.u.i.link)
5874             h = (struct elf_link_hash_entry *) h->root.u.i.link;
5875 #endif
5876           switch (h->root.type)
5877             {
5878             case bfd_link_hash_defined:
5879             case bfd_link_hash_defweak:
5880               return h->root.u.def.section;
5881
5882             case bfd_link_hash_common:
5883               return h->root.u.c.p->section;
5884
5885             default:
5886               break;
5887             }
5888         }
5889     }
5890   else
5891     return bfd_section_from_elf_index (sec->owner, sym->st_shndx);
5892
5893   return NULL;
5894 }
5895
5896 /* Update the got entry reference counts for the section being removed.  */
5897
5898 static bfd_boolean
5899 sh_elf_gc_sweep_hook (abfd, info, sec, relocs)
5900      bfd *abfd;
5901      struct bfd_link_info *info;
5902      asection *sec;
5903      const Elf_Internal_Rela *relocs;
5904 {
5905   Elf_Internal_Shdr *symtab_hdr;
5906   struct elf_link_hash_entry **sym_hashes;
5907   bfd_signed_vma *local_got_refcounts;
5908   const Elf_Internal_Rela *rel, *relend;
5909
5910   elf_section_data (sec)->local_dynrel = NULL;
5911
5912   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
5913   sym_hashes = elf_sym_hashes (abfd);
5914   local_got_refcounts = elf_local_got_refcounts (abfd);
5915
5916   relend = relocs + sec->reloc_count;
5917   for (rel = relocs; rel < relend; rel++)
5918     {
5919       unsigned long r_symndx;
5920       unsigned int r_type;
5921       struct elf_link_hash_entry *h = NULL;
5922 #ifdef INCLUDE_SHMEDIA
5923       int seen_stt_datalabel = 0;
5924 #endif
5925
5926       r_symndx = ELF32_R_SYM (rel->r_info);
5927       if (r_symndx >= symtab_hdr->sh_info)
5928         {
5929           struct elf_sh_link_hash_entry *eh;
5930           struct elf_sh_dyn_relocs **pp;
5931           struct elf_sh_dyn_relocs *p;
5932
5933           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
5934 #ifdef INCLUDE_SHMEDIA
5935           while (h->root.type == bfd_link_hash_indirect
5936                  || h->root.type == bfd_link_hash_warning)
5937             {
5938               seen_stt_datalabel |= h->type == STT_DATALABEL;
5939               h = (struct elf_link_hash_entry *) h->root.u.i.link;
5940             }
5941 #endif
5942           eh = (struct elf_sh_link_hash_entry *) h;
5943           for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
5944             if (p->sec == sec)
5945               {
5946                 /* Everything must go for SEC.  */
5947                 *pp = p->next;
5948                 break;
5949               }
5950         }
5951
5952       r_type = ELF32_R_TYPE (rel->r_info);
5953       switch (sh_elf_optimized_tls_reloc (info, r_type, h != NULL))
5954         {
5955         case R_SH_TLS_LD_32:
5956           if (sh_elf_hash_table (info)->tls_ldm_got.refcount > 0)
5957             sh_elf_hash_table (info)->tls_ldm_got.refcount -= 1;
5958           break;
5959
5960         case R_SH_GOT32:
5961         case R_SH_GOTOFF:
5962         case R_SH_GOTPC:
5963 #ifdef INCLUDE_SHMEDIA
5964         case R_SH_GOT_LOW16:
5965         case R_SH_GOT_MEDLOW16:
5966         case R_SH_GOT_MEDHI16:
5967         case R_SH_GOT_HI16:
5968         case R_SH_GOT10BY4:
5969         case R_SH_GOT10BY8:
5970         case R_SH_GOTOFF_LOW16:
5971         case R_SH_GOTOFF_MEDLOW16:
5972         case R_SH_GOTOFF_MEDHI16:
5973         case R_SH_GOTOFF_HI16:
5974         case R_SH_GOTPC_LOW16:
5975         case R_SH_GOTPC_MEDLOW16:
5976         case R_SH_GOTPC_MEDHI16:
5977         case R_SH_GOTPC_HI16:
5978 #endif
5979         case R_SH_TLS_GD_32:
5980         case R_SH_TLS_IE_32:
5981           if (h != NULL)
5982             {
5983 #ifdef INCLUDE_SHMEDIA
5984               if (seen_stt_datalabel)
5985                 {
5986                   struct elf_sh_link_hash_entry *eh;
5987                   eh = (struct elf_sh_link_hash_entry *) h;
5988                   if (eh->datalabel_got.refcount > 0)
5989                     eh->datalabel_got.refcount -= 1;
5990                 }
5991               else
5992 #endif
5993                 if (h->got.refcount > 0)
5994                   h->got.refcount -= 1;
5995             }
5996           else if (local_got_refcounts != NULL)
5997             {
5998 #ifdef INCLUDE_SHMEDIA
5999               if (rel->r_addend & 1)
6000                 {
6001                   if (local_got_refcounts[symtab_hdr->sh_info + r_symndx] > 0)
6002                     local_got_refcounts[symtab_hdr->sh_info + r_symndx] -= 1;
6003                 }
6004               else
6005 #endif
6006                 if (local_got_refcounts[r_symndx] > 0)
6007                   local_got_refcounts[r_symndx] -= 1;
6008             }
6009           break;
6010
6011         case R_SH_DIR32:
6012         case R_SH_REL32:
6013           if (info->shared)
6014             break;
6015           /* Fall thru */
6016
6017         case R_SH_PLT32:
6018 #ifdef INCLUDE_SHMEDIA
6019         case R_SH_PLT_LOW16:
6020         case R_SH_PLT_MEDLOW16:
6021         case R_SH_PLT_MEDHI16:
6022         case R_SH_PLT_HI16:
6023 #endif
6024           if (h != NULL)
6025             {
6026               if (h->plt.refcount > 0)
6027                 h->plt.refcount -= 1;
6028             }
6029           break;
6030
6031         case R_SH_GOTPLT32:
6032 #ifdef INCLUDE_SHMEDIA
6033         case R_SH_GOTPLT_LOW16:
6034         case R_SH_GOTPLT_MEDLOW16:
6035         case R_SH_GOTPLT_MEDHI16:
6036         case R_SH_GOTPLT_HI16:
6037         case R_SH_GOTPLT10BY4:
6038         case R_SH_GOTPLT10BY8:
6039 #endif
6040           if (h != NULL)
6041             {
6042               struct elf_sh_link_hash_entry *eh;
6043               eh = (struct elf_sh_link_hash_entry *) h;
6044               if (eh->gotplt_refcount > 0)
6045                 {
6046                   eh->gotplt_refcount -= 1;
6047                   if (h->plt.refcount > 0)
6048                     h->plt.refcount -= 1;
6049                 }
6050 #ifdef INCLUDE_SHMEDIA
6051               else if (seen_stt_datalabel)
6052                 {
6053                   if (eh->datalabel_got.refcount > 0)
6054                     eh->datalabel_got.refcount -= 1;
6055                 }
6056 #endif
6057               else if (h->got.refcount > 0)
6058                 h->got.refcount -= 1;
6059             }
6060           else if (local_got_refcounts != NULL)
6061             {
6062 #ifdef INCLUDE_SHMEDIA
6063               if (rel->r_addend & 1)
6064                 {
6065                   if (local_got_refcounts[symtab_hdr->sh_info + r_symndx] > 0)
6066                     local_got_refcounts[symtab_hdr->sh_info + r_symndx] -= 1;
6067                 }
6068               else
6069 #endif
6070                 if (local_got_refcounts[r_symndx] > 0)
6071                   local_got_refcounts[r_symndx] -= 1;
6072             }
6073           break;
6074
6075         default:
6076           break;
6077         }
6078     }
6079
6080   return TRUE;
6081 }
6082
6083 /* Copy the extra info we tack onto an elf_link_hash_entry.  */
6084
6085 static void
6086 sh_elf_copy_indirect_symbol (bed, dir, ind)
6087      struct elf_backend_data *bed;
6088      struct elf_link_hash_entry *dir, *ind;
6089 {
6090   struct elf_sh_link_hash_entry *edir, *eind;
6091 #ifdef INCLUDE_SHMEDIA
6092   bfd_signed_vma tmp;
6093 #endif
6094
6095   edir = (struct elf_sh_link_hash_entry *) dir;
6096   eind = (struct elf_sh_link_hash_entry *) ind;
6097
6098   if (eind->dyn_relocs != NULL)
6099     {
6100       if (edir->dyn_relocs != NULL)
6101         {
6102           struct elf_sh_dyn_relocs **pp;
6103           struct elf_sh_dyn_relocs *p;
6104
6105           BFD_ASSERT (ind->root.type != bfd_link_hash_indirect);
6106
6107           /* Add reloc counts against the weak sym to the strong sym
6108              list.  Merge any entries against the same section.  */
6109           for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
6110             {
6111               struct elf_sh_dyn_relocs *q;
6112
6113               for (q = edir->dyn_relocs; q != NULL; q = q->next)
6114                 if (q->sec == p->sec)
6115                   {
6116                     q->pc_count += p->pc_count;
6117                     q->count += p->count;
6118                     *pp = p->next;
6119                     break;
6120                   }
6121               if (q == NULL)
6122                 pp = &p->next;
6123             }
6124           *pp = edir->dyn_relocs;
6125         }
6126
6127       edir->dyn_relocs = eind->dyn_relocs;
6128       eind->dyn_relocs = NULL;
6129     }
6130   edir->gotplt_refcount = eind->gotplt_refcount;
6131   eind->gotplt_refcount = 0;
6132 #ifdef INCLUDE_SHMEDIA
6133   tmp = edir->datalabel_got.refcount;
6134   if (tmp < 1)
6135     {
6136       edir->datalabel_got.refcount = eind->datalabel_got.refcount;
6137       eind->datalabel_got.refcount = tmp;
6138     }
6139   else
6140     BFD_ASSERT (eind->datalabel_got.refcount < 1);
6141 #endif
6142
6143   if (ind->root.type == bfd_link_hash_indirect
6144       && dir->got.refcount <= 0)
6145     {
6146       edir->tls_type = eind->tls_type;
6147       eind->tls_type = GOT_UNKNOWN;
6148     }
6149
6150   if (ind->root.type != bfd_link_hash_indirect
6151       && (dir->elf_link_hash_flags & ELF_LINK_HASH_DYNAMIC_ADJUSTED) != 0)
6152     /* If called to transfer flags for a weakdef during processing
6153        of elf_adjust_dynamic_symbol, don't copy ELF_LINK_NON_GOT_REF.
6154        We clear it ourselves for ELIMINATE_COPY_RELOCS.  */
6155     dir->elf_link_hash_flags |=
6156       (ind->elf_link_hash_flags & (ELF_LINK_HASH_REF_DYNAMIC
6157                                    | ELF_LINK_HASH_REF_REGULAR
6158                                    | ELF_LINK_HASH_REF_REGULAR_NONWEAK));
6159   else
6160     _bfd_elf_link_hash_copy_indirect (bed, dir, ind);
6161 }
6162
6163 static int
6164 sh_elf_optimized_tls_reloc (info, r_type, is_local)
6165      struct bfd_link_info *info;
6166      int r_type;
6167      int is_local;
6168 {
6169   if (info->shared)
6170     return r_type;
6171
6172   switch (r_type)
6173     {
6174     case R_SH_TLS_GD_32:
6175     case R_SH_TLS_IE_32:
6176       if (is_local)
6177         return R_SH_TLS_LE_32;
6178       return R_SH_TLS_IE_32;
6179     case R_SH_TLS_LD_32:
6180       return R_SH_TLS_LE_32;
6181     }
6182
6183   return r_type;
6184 }
6185
6186 /* Look through the relocs for a section during the first phase.
6187    Since we don't do .gots or .plts, we just need to consider the
6188    virtual table relocs for gc.  */
6189
6190 static bfd_boolean
6191 sh_elf_check_relocs (abfd, info, sec, relocs)
6192      bfd *abfd;
6193      struct bfd_link_info *info;
6194      asection *sec;
6195      const Elf_Internal_Rela *relocs;
6196 {
6197   Elf_Internal_Shdr *symtab_hdr;
6198   struct elf_link_hash_entry **sym_hashes, **sym_hashes_end;
6199   struct elf_sh_link_hash_table *htab;
6200   const Elf_Internal_Rela *rel;
6201   const Elf_Internal_Rela *rel_end;
6202   bfd *dynobj;
6203   bfd_vma *local_got_offsets;
6204   asection *sgot;
6205   asection *srelgot;
6206   asection *sreloc;
6207   unsigned int r_type;
6208   int tls_type, old_tls_type;
6209
6210   sgot = NULL;
6211   srelgot = NULL;
6212   sreloc = NULL;
6213
6214   if (info->relocateable)
6215     return TRUE;
6216
6217   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
6218   sym_hashes = elf_sym_hashes (abfd);
6219   sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof (Elf32_External_Sym);
6220   if (!elf_bad_symtab (abfd))
6221     sym_hashes_end -= symtab_hdr->sh_info;
6222
6223   htab = sh_elf_hash_table (info);
6224   dynobj = htab->root.dynobj;
6225   local_got_offsets = elf_local_got_offsets (abfd);
6226
6227   rel_end = relocs + sec->reloc_count;
6228   for (rel = relocs; rel < rel_end; rel++)
6229     {
6230       struct elf_link_hash_entry *h;
6231       unsigned long r_symndx;
6232 #ifdef INCLUDE_SHMEDIA
6233       int seen_stt_datalabel = 0;
6234 #endif
6235
6236       r_symndx = ELF32_R_SYM (rel->r_info);
6237       r_type = ELF32_R_TYPE (rel->r_info);
6238
6239       if (r_symndx < symtab_hdr->sh_info)
6240         h = NULL;
6241       else
6242         {
6243           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
6244 #ifdef INCLUDE_SHMEDIA
6245           while (h->root.type == bfd_link_hash_indirect
6246                  || h->root.type == bfd_link_hash_warning)
6247             {
6248               seen_stt_datalabel |= h->type == STT_DATALABEL;
6249               h = (struct elf_link_hash_entry *) h->root.u.i.link;
6250             }
6251 #endif
6252         }
6253
6254       r_type = sh_elf_optimized_tls_reloc (info, r_type, h == NULL);
6255       if (! info->shared
6256           && r_type == R_SH_TLS_IE_32
6257           && h != NULL
6258           && h->root.type != bfd_link_hash_undefined
6259           && h->root.type != bfd_link_hash_undefweak
6260           && (h->dynindx == -1
6261               || (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
6262         r_type = R_SH_TLS_LE_32;
6263
6264       /* Some relocs require a global offset table.  */
6265       if (htab->sgot == NULL)
6266         {
6267           switch (r_type)
6268             {
6269             case R_SH_GOTPLT32:
6270             case R_SH_GOT32:
6271             case R_SH_GOTOFF:
6272             case R_SH_GOTPC:
6273 #ifdef INCLUDE_SHMEDIA
6274             case R_SH_GOTPLT_LOW16:
6275             case R_SH_GOTPLT_MEDLOW16:
6276             case R_SH_GOTPLT_MEDHI16:
6277             case R_SH_GOTPLT_HI16:
6278             case R_SH_GOTPLT10BY4:
6279             case R_SH_GOTPLT10BY8:
6280             case R_SH_GOT_LOW16:
6281             case R_SH_GOT_MEDLOW16:
6282             case R_SH_GOT_MEDHI16:
6283             case R_SH_GOT_HI16:
6284             case R_SH_GOT10BY4:
6285             case R_SH_GOT10BY8:
6286             case R_SH_GOTOFF_LOW16:
6287             case R_SH_GOTOFF_MEDLOW16:
6288             case R_SH_GOTOFF_MEDHI16:
6289             case R_SH_GOTOFF_HI16:
6290             case R_SH_GOTPC_LOW16:
6291             case R_SH_GOTPC_MEDLOW16:
6292             case R_SH_GOTPC_MEDHI16:
6293             case R_SH_GOTPC_HI16:
6294 #endif
6295             case R_SH_TLS_GD_32:
6296             case R_SH_TLS_LD_32:
6297             case R_SH_TLS_IE_32:
6298               if (dynobj == NULL)
6299                 htab->root.dynobj = dynobj = abfd;
6300               if (! create_got_section (dynobj, info))
6301                 return FALSE;
6302               break;
6303
6304             default:
6305               break;
6306             }
6307         }
6308
6309       switch (r_type)
6310         {
6311           /* This relocation describes the C++ object vtable hierarchy.
6312              Reconstruct it for later use during GC.  */
6313         case R_SH_GNU_VTINHERIT:
6314           if (!_bfd_elf32_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
6315             return FALSE;
6316           break;
6317
6318           /* This relocation describes which C++ vtable entries are actually
6319              used.  Record for later use during GC.  */
6320         case R_SH_GNU_VTENTRY:
6321           if (!_bfd_elf32_gc_record_vtentry (abfd, sec, h, rel->r_addend))
6322             return FALSE;
6323           break;
6324
6325         case R_SH_TLS_IE_32:
6326           if (info->shared)
6327             info->flags |= DF_STATIC_TLS;
6328
6329           /* FALLTHROUGH */
6330         force_got:
6331         case R_SH_TLS_GD_32:
6332         case R_SH_GOT32:
6333 #ifdef INCLUDE_SHMEDIA
6334         case R_SH_GOT_LOW16:
6335         case R_SH_GOT_MEDLOW16:
6336         case R_SH_GOT_MEDHI16:
6337         case R_SH_GOT_HI16:
6338         case R_SH_GOT10BY4:
6339         case R_SH_GOT10BY8:
6340 #endif
6341           switch (r_type)
6342             {
6343             default:
6344               tls_type = GOT_NORMAL;
6345               break;
6346             case R_SH_TLS_GD_32:
6347               tls_type = GOT_TLS_GD;
6348               break;
6349             case R_SH_TLS_IE_32:
6350               tls_type = GOT_TLS_IE;
6351               break;
6352             }
6353
6354           if (h != NULL)
6355             {
6356 #ifdef INCLUDE_SHMEDIA
6357               if (seen_stt_datalabel)
6358                 {
6359                   struct elf_sh_link_hash_entry *eh
6360                     = (struct elf_sh_link_hash_entry *) h;
6361
6362                   eh->datalabel_got.refcount += 1;
6363                 }
6364               else
6365 #endif
6366                 h->got.refcount += 1;
6367               old_tls_type = sh_elf_hash_entry (h)->tls_type;
6368             }
6369           else
6370             {
6371               bfd_signed_vma *local_got_refcounts;
6372
6373               /* This is a global offset table entry for a local
6374                  symbol.  */
6375               local_got_refcounts = elf_local_got_refcounts (abfd);
6376               if (local_got_refcounts == NULL)
6377                 {
6378                   bfd_size_type size;
6379
6380                   size = symtab_hdr->sh_info;
6381                   size *= sizeof (bfd_signed_vma);
6382 #ifdef INCLUDE_SHMEDIA
6383                   /* Reserve space for both the datalabel and
6384                      codelabel local GOT offsets.  */
6385                   size *= 2;
6386 #endif
6387                   size += symtab_hdr->sh_info;
6388                   local_got_refcounts = ((bfd_signed_vma *)
6389                                          bfd_zalloc (abfd, size));
6390                   if (local_got_refcounts == NULL)
6391                     return FALSE;
6392                   elf_local_got_refcounts (abfd) = local_got_refcounts;
6393 #ifdef  INCLUDE_SHMEDIA
6394                   /* Take care of both the datalabel and codelabel local
6395                      GOT offsets.  */
6396                   sh_elf_local_got_tls_type (abfd)
6397                     = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
6398 #else
6399                   sh_elf_local_got_tls_type (abfd)
6400                     = (char *) (local_got_refcounts + symtab_hdr->sh_info);
6401 #endif
6402                 }
6403 #ifdef INCLUDE_SHMEDIA
6404               if (rel->r_addend & 1)
6405                 local_got_refcounts[symtab_hdr->sh_info + r_symndx] += 1;
6406               else
6407 #endif
6408                 local_got_refcounts[r_symndx] += 1;
6409               old_tls_type = sh_elf_local_got_tls_type (abfd) [r_symndx];
6410             }
6411
6412           /* If a TLS symbol is accessed using IE at least once,
6413              there is no point to use dynamic model for it.  */
6414           if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
6415               && (old_tls_type != GOT_TLS_GD || tls_type != GOT_TLS_IE))
6416             {
6417               if (old_tls_type == GOT_TLS_IE && tls_type == GOT_TLS_GD)
6418                 tls_type = GOT_TLS_IE;
6419               else
6420                 {
6421                   (*_bfd_error_handler)
6422                     (_("%s: `%s' accessed both as normal and thread local symbol"),
6423                      bfd_archive_filename (abfd), h->root.root.string);
6424                   return FALSE;
6425                 }
6426             }
6427
6428           if (old_tls_type != tls_type)
6429             {
6430               if (h != NULL)
6431                 sh_elf_hash_entry (h)->tls_type = tls_type;
6432               else
6433                 sh_elf_local_got_tls_type (abfd) [r_symndx] = tls_type;
6434             }
6435
6436           break;
6437
6438         case R_SH_TLS_LD_32:
6439           sh_elf_hash_table(info)->tls_ldm_got.refcount += 1;
6440           break;
6441
6442         case R_SH_GOTPLT32:
6443 #ifdef INCLUDE_SHMEDIA
6444         case R_SH_GOTPLT_LOW16:
6445         case R_SH_GOTPLT_MEDLOW16:
6446         case R_SH_GOTPLT_MEDHI16:
6447         case R_SH_GOTPLT_HI16:
6448         case R_SH_GOTPLT10BY4:
6449         case R_SH_GOTPLT10BY8:
6450 #endif
6451           /* If this is a local symbol, we resolve it directly without
6452              creating a procedure linkage table entry.  */
6453
6454           if (h == NULL
6455               || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL)
6456               || ! info->shared
6457               || info->symbolic
6458               || h->dynindx == -1)
6459             goto force_got;
6460
6461           h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
6462           h->plt.refcount += 1;
6463           ((struct elf_sh_link_hash_entry *) h)->gotplt_refcount += 1;
6464
6465           break;
6466
6467         case R_SH_PLT32:
6468 #ifdef INCLUDE_SHMEDIA
6469         case R_SH_PLT_LOW16:
6470         case R_SH_PLT_MEDLOW16:
6471         case R_SH_PLT_MEDHI16:
6472         case R_SH_PLT_HI16:
6473 #endif
6474           /* This symbol requires a procedure linkage table entry.  We
6475              actually build the entry in adjust_dynamic_symbol,
6476              because this might be a case of linking PIC code which is
6477              never referenced by a dynamic object, in which case we
6478              don't need to generate a procedure linkage table entry
6479              after all.  */
6480
6481           /* If this is a local symbol, we resolve it directly without
6482              creating a procedure linkage table entry.  */
6483           if (h == NULL)
6484             continue;
6485
6486           if (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL)
6487             break;
6488
6489           h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
6490           h->plt.refcount += 1;
6491           break;
6492
6493         case R_SH_DIR32:
6494         case R_SH_REL32:
6495           if (h != NULL && ! info->shared)
6496             {
6497               h->elf_link_hash_flags |= ELF_LINK_NON_GOT_REF;
6498               h->plt.refcount += 1;
6499             }
6500
6501           /* If we are creating a shared library, and this is a reloc
6502              against a global symbol, or a non PC relative reloc
6503              against a local symbol, then we need to copy the reloc
6504              into the shared library.  However, if we are linking with
6505              -Bsymbolic, we do not need to copy a reloc against a
6506              global symbol which is defined in an object we are
6507              including in the link (i.e., DEF_REGULAR is set).  At
6508              this point we have not seen all the input files, so it is
6509              possible that DEF_REGULAR is not set now but will be set
6510              later (it is never cleared).  We account for that
6511              possibility below by storing information in the
6512              dyn_relocs field of the hash table entry. A similar
6513              situation occurs when creating shared libraries and symbol
6514              visibility changes render the symbol local.
6515
6516              If on the other hand, we are creating an executable, we
6517              may need to keep relocations for symbols satisfied by a
6518              dynamic library if we manage to avoid copy relocs for the
6519              symbol.  */
6520           if ((info->shared
6521                && (sec->flags & SEC_ALLOC) != 0
6522                && (r_type != R_SH_REL32
6523                    || (h != NULL
6524                        && (! info->symbolic
6525                            || h->root.type == bfd_link_hash_defweak
6526                            || (h->elf_link_hash_flags
6527                                & ELF_LINK_HASH_DEF_REGULAR) == 0))))
6528               || (! info->shared
6529                   && (sec->flags & SEC_ALLOC) != 0
6530                   && h != NULL
6531                   && (h->root.type == bfd_link_hash_defweak
6532                       || (h->elf_link_hash_flags
6533                           & ELF_LINK_HASH_DEF_REGULAR) == 0)))
6534             {
6535               struct elf_sh_dyn_relocs *p;
6536               struct elf_sh_dyn_relocs **head;
6537
6538               if (dynobj == NULL)
6539                 htab->root.dynobj = dynobj = abfd;
6540
6541               /* When creating a shared object, we must copy these
6542                  reloc types into the output file.  We create a reloc
6543                  section in dynobj and make room for this reloc.  */
6544               if (sreloc == NULL)
6545                 {
6546                   const char *name;
6547
6548                   name = (bfd_elf_string_from_elf_section
6549                           (abfd,
6550                            elf_elfheader (abfd)->e_shstrndx,
6551                            elf_section_data (sec)->rel_hdr.sh_name));
6552                   if (name == NULL)
6553                     return FALSE;
6554
6555                   BFD_ASSERT (strncmp (name, ".rela", 5) == 0
6556                               && strcmp (bfd_get_section_name (abfd, sec),
6557                                          name + 5) == 0);
6558
6559                   sreloc = bfd_get_section_by_name (dynobj, name);
6560                   if (sreloc == NULL)
6561                     {
6562                       flagword flags;
6563
6564                       sreloc = bfd_make_section (dynobj, name);
6565                       flags = (SEC_HAS_CONTENTS | SEC_READONLY
6566                                | SEC_IN_MEMORY | SEC_LINKER_CREATED);
6567                       if ((sec->flags & SEC_ALLOC) != 0)
6568                         flags |= SEC_ALLOC | SEC_LOAD;
6569                       if (sreloc == NULL
6570                           || ! bfd_set_section_flags (dynobj, sreloc, flags)
6571                           || ! bfd_set_section_alignment (dynobj, sreloc, 2))
6572                         return FALSE;
6573                     }
6574                   if (sec->flags & SEC_READONLY)
6575                     info->flags |= DF_TEXTREL;
6576                   elf_section_data (sec)->sreloc = sreloc;
6577                 }
6578
6579               /* If this is a global symbol, we count the number of
6580                  relocations we need for this symbol.  */
6581               if (h != NULL)
6582                 head = &((struct elf_sh_link_hash_entry *) h)->dyn_relocs;
6583               else
6584                 {
6585                   asection *s;
6586
6587                   /* Track dynamic relocs needed for local syms too.  */
6588                   s = bfd_section_from_r_symndx (abfd, &htab->sym_sec,
6589                                                  sec, r_symndx);
6590                   if (s == NULL)
6591                     return FALSE;
6592
6593                   head = ((struct elf_sh_dyn_relocs **)
6594                           &elf_section_data (s)->local_dynrel);
6595                 }
6596
6597               p = *head;
6598               if (p == NULL || p->sec != sec)
6599                 {
6600                   bfd_size_type amt = sizeof (*p);
6601                   p = ((struct elf_sh_dyn_relocs *) bfd_alloc (dynobj, amt));
6602                   if (p == NULL)
6603                     return FALSE;
6604                   p->next = *head;
6605                   *head = p;
6606                   p->sec = sec;
6607                   p->count = 0;
6608                   p->pc_count = 0;
6609                 }
6610
6611               p->count += 1;
6612               if (r_type == R_SH_REL32)
6613                 p->pc_count += 1;
6614             }
6615
6616           break;
6617
6618         case R_SH_TLS_LE_32:
6619           if (info->shared)
6620             {
6621               (*_bfd_error_handler) (_("%s: TLS local exec code cannot be linked into shared objects"),
6622                                      bfd_archive_filename (abfd));
6623               return FALSE;
6624             }
6625
6626           break;
6627
6628         case R_SH_TLS_LDO_32:
6629           /* Nothing to do.  */
6630           break;
6631
6632         default:
6633           break;
6634         }
6635     }
6636
6637   return TRUE;
6638 }
6639
6640 #ifndef sh_elf_set_mach_from_flags
6641 static bfd_boolean
6642 sh_elf_set_mach_from_flags (abfd)
6643      bfd *abfd;
6644 {
6645   flagword flags = elf_elfheader (abfd)->e_flags;
6646
6647   switch (flags & EF_SH_MACH_MASK)
6648     {
6649     case EF_SH1:
6650       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh);
6651       break;
6652     case EF_SH2:
6653       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh2);
6654       break;
6655     case EF_SH2E:
6656       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh2e);
6657       break;
6658     case EF_SH_DSP:
6659       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh_dsp);
6660       break;
6661     case EF_SH3:
6662       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh3);
6663       break;
6664     case EF_SH3_DSP:
6665       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh3_dsp);
6666       break;
6667     case EF_SH3E:
6668       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh3e);
6669       break;
6670     case EF_SH_UNKNOWN:
6671     case EF_SH4:
6672       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh4);
6673       break;
6674     default:
6675       return FALSE;
6676     }
6677   return TRUE;
6678 }
6679 #endif /* not sh_elf_set_mach_from_flags */
6680
6681 #ifndef sh_elf_set_private_flags
6682 /* Function to keep SH specific file flags.  */
6683
6684 static bfd_boolean
6685 sh_elf_set_private_flags (abfd, flags)
6686      bfd *abfd;
6687      flagword flags;
6688 {
6689   BFD_ASSERT (! elf_flags_init (abfd)
6690               || elf_elfheader (abfd)->e_flags == flags);
6691
6692   elf_elfheader (abfd)->e_flags = flags;
6693   elf_flags_init (abfd) = TRUE;
6694   return sh_elf_set_mach_from_flags (abfd);
6695 }
6696 #endif /* not sh_elf_set_private_flags */
6697
6698 #ifndef sh_elf_copy_private_data
6699 /* Copy backend specific data from one object module to another */
6700
6701 static bfd_boolean
6702 sh_elf_copy_private_data (ibfd, obfd)
6703      bfd * ibfd;
6704      bfd * obfd;
6705 {
6706   if (   bfd_get_flavour (ibfd) != bfd_target_elf_flavour
6707       || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
6708     return TRUE;
6709
6710   return sh_elf_set_private_flags (obfd, elf_elfheader (ibfd)->e_flags);
6711 }
6712 #endif /* not sh_elf_copy_private_data */
6713
6714 #ifndef sh_elf_merge_private_data
6715 /* This routine checks for linking big and little endian objects
6716    together, and for linking sh-dsp with sh3e / sh4 objects.  */
6717
6718 static bfd_boolean
6719 sh_elf_merge_private_data (ibfd, obfd)
6720      bfd *ibfd;
6721      bfd *obfd;
6722 {
6723   flagword old_flags, new_flags;
6724
6725   if (! _bfd_generic_verify_endian_match (ibfd, obfd))
6726     return FALSE;
6727
6728   if (   bfd_get_flavour (ibfd) != bfd_target_elf_flavour
6729       || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
6730     return TRUE;
6731
6732   if (! elf_flags_init (obfd))
6733     {
6734       /* This happens when ld starts out with a 'blank' output file.  */
6735       elf_flags_init (obfd) = TRUE;
6736       elf_elfheader (obfd)->e_flags = EF_SH1;
6737     }
6738   old_flags = elf_elfheader (obfd)->e_flags;
6739   new_flags = elf_elfheader (ibfd)->e_flags;
6740   if ((EF_SH_HAS_DSP (old_flags) && EF_SH_HAS_FP (new_flags))
6741       || (EF_SH_HAS_DSP (new_flags) && EF_SH_HAS_FP (old_flags)))
6742     {
6743       (*_bfd_error_handler)
6744         ("%s: uses %s instructions while previous modules use %s instructions",
6745          bfd_archive_filename (ibfd),
6746          EF_SH_HAS_DSP (new_flags) ? "dsp" : "floating point",
6747          EF_SH_HAS_DSP (new_flags) ? "floating point" : "dsp");
6748       bfd_set_error (bfd_error_bad_value);
6749       return FALSE;
6750     }
6751   elf_elfheader (obfd)->e_flags = EF_SH_MERGE_MACH (old_flags, new_flags);
6752
6753   return sh_elf_set_mach_from_flags (obfd);
6754 }
6755 #endif /* not sh_elf_merge_private_data */
6756
6757 /* Override the generic function because we need to store sh_elf_obj_tdata
6758    as the specific tdata.  We set also the machine architecture from flags
6759    here.  */
6760
6761 static bfd_boolean
6762 sh_elf_object_p (abfd)
6763   bfd *abfd;
6764 {
6765   struct sh_elf_obj_tdata *new_tdata;
6766   bfd_size_type amt = sizeof (struct sh_elf_obj_tdata);
6767
6768   if (!sh_elf_set_mach_from_flags (abfd))
6769     return FALSE;
6770
6771   /* Allocate our special target data.  */
6772   new_tdata = bfd_zalloc (abfd, amt);
6773   if (new_tdata == NULL)
6774     return FALSE;
6775   new_tdata->root = *abfd->tdata.elf_obj_data;
6776   abfd->tdata.any = new_tdata;
6777   return TRUE;
6778 }
6779
6780 /* Finish up dynamic symbol handling.  We set the contents of various
6781    dynamic sections here.  */
6782
6783 static bfd_boolean
6784 sh_elf_finish_dynamic_symbol (output_bfd, info, h, sym)
6785      bfd *output_bfd;
6786      struct bfd_link_info *info;
6787      struct elf_link_hash_entry *h;
6788      Elf_Internal_Sym *sym;
6789 {
6790   struct elf_sh_link_hash_table *htab;
6791   bfd *dynobj;
6792
6793   htab = sh_elf_hash_table (info);
6794   dynobj = htab->root.dynobj;
6795
6796   if (h->plt.offset != (bfd_vma) -1)
6797     {
6798       asection *splt;
6799       asection *sgot;
6800       asection *srel;
6801
6802       bfd_vma plt_index;
6803       bfd_vma got_offset;
6804       Elf_Internal_Rela rel;
6805       bfd_byte *loc;
6806
6807       /* This symbol has an entry in the procedure linkage table.  Set
6808          it up.  */
6809
6810       BFD_ASSERT (h->dynindx != -1);
6811
6812       splt = htab->splt;
6813       sgot = htab->sgotplt;
6814       srel = htab->srelplt;
6815       BFD_ASSERT (splt != NULL && sgot != NULL && srel != NULL);
6816
6817       /* Get the index in the procedure linkage table which
6818          corresponds to this symbol.  This is the index of this symbol
6819          in all the symbols for which we are making plt entries.  The
6820          first entry in the procedure linkage table is reserved.  */
6821       plt_index = h->plt.offset / elf_sh_sizeof_plt (info) - 1;
6822
6823       /* Get the offset into the .got table of the entry that
6824          corresponds to this function.  Each .got entry is 4 bytes.
6825          The first three are reserved.  */
6826       got_offset = (plt_index + 3) * 4;
6827
6828 #ifdef GOT_BIAS
6829       if (info->shared)
6830         got_offset -= GOT_BIAS;
6831 #endif
6832
6833       /* Fill in the entry in the procedure linkage table.  */
6834       if (! info->shared)
6835         {
6836           if (elf_sh_plt_entry == NULL)
6837             {
6838               elf_sh_plt_entry = (bfd_big_endian (output_bfd) ?
6839                                   elf_sh_plt_entry_be : elf_sh_plt_entry_le);
6840             }
6841           memcpy (splt->contents + h->plt.offset, elf_sh_plt_entry,
6842                   elf_sh_sizeof_plt (info));
6843 #ifdef INCLUDE_SHMEDIA
6844           movi_shori_putval (output_bfd,
6845                              (sgot->output_section->vma
6846                               + sgot->output_offset
6847                               + got_offset),
6848                              (splt->contents + h->plt.offset
6849                               + elf_sh_plt_symbol_offset (info)));
6850
6851           /* Set bottom bit because its for a branch to SHmedia */
6852           movi_shori_putval (output_bfd,
6853                              (splt->output_section->vma + splt->output_offset)
6854                              | 1,
6855                              (splt->contents + h->plt.offset
6856                               + elf_sh_plt_plt0_offset (info)));
6857 #else
6858           bfd_put_32 (output_bfd,
6859                       (sgot->output_section->vma
6860                        + sgot->output_offset
6861                        + got_offset),
6862                       (splt->contents + h->plt.offset
6863                        + elf_sh_plt_symbol_offset (info)));
6864
6865           bfd_put_32 (output_bfd,
6866                       (splt->output_section->vma + splt->output_offset),
6867                       (splt->contents + h->plt.offset
6868                        + elf_sh_plt_plt0_offset (info)));
6869 #endif
6870         }
6871       else
6872         {
6873           if (elf_sh_pic_plt_entry == NULL)
6874             {
6875               elf_sh_pic_plt_entry = (bfd_big_endian (output_bfd) ?
6876                                       elf_sh_pic_plt_entry_be :
6877                                       elf_sh_pic_plt_entry_le);
6878             }
6879           memcpy (splt->contents + h->plt.offset, elf_sh_pic_plt_entry,
6880                   elf_sh_sizeof_plt (info));
6881 #ifdef INCLUDE_SHMEDIA
6882           movi_shori_putval (output_bfd, got_offset,
6883                              (splt->contents + h->plt.offset
6884                               + elf_sh_plt_symbol_offset (info)));
6885 #else
6886           bfd_put_32 (output_bfd, got_offset,
6887                       (splt->contents + h->plt.offset
6888                        + elf_sh_plt_symbol_offset (info)));
6889 #endif
6890         }
6891
6892 #ifdef GOT_BIAS
6893       if (info->shared)
6894         got_offset += GOT_BIAS;
6895 #endif
6896
6897 #ifdef INCLUDE_SHMEDIA
6898       movi_shori_putval (output_bfd,
6899                          plt_index * sizeof (Elf32_External_Rela),
6900                          (splt->contents + h->plt.offset
6901                           + elf_sh_plt_reloc_offset (info)));
6902 #else
6903       bfd_put_32 (output_bfd, plt_index * sizeof (Elf32_External_Rela),
6904                   (splt->contents + h->plt.offset
6905                    + elf_sh_plt_reloc_offset (info)));
6906 #endif
6907
6908       /* Fill in the entry in the global offset table.  */
6909       bfd_put_32 (output_bfd,
6910                   (splt->output_section->vma
6911                    + splt->output_offset
6912                    + h->plt.offset
6913                    + elf_sh_plt_temp_offset (info)),
6914                   sgot->contents + got_offset);
6915
6916       /* Fill in the entry in the .rela.plt section.  */
6917       rel.r_offset = (sgot->output_section->vma
6918                       + sgot->output_offset
6919                       + got_offset);
6920       rel.r_info = ELF32_R_INFO (h->dynindx, R_SH_JMP_SLOT);
6921       rel.r_addend = 0;
6922 #ifdef GOT_BIAS
6923       rel.r_addend = GOT_BIAS;
6924 #endif
6925       loc = srel->contents + plt_index * sizeof (Elf32_External_Rela);
6926       bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
6927
6928       if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
6929         {
6930           /* Mark the symbol as undefined, rather than as defined in
6931              the .plt section.  Leave the value alone.  */
6932           sym->st_shndx = SHN_UNDEF;
6933         }
6934     }
6935
6936   if (h->got.offset != (bfd_vma) -1
6937       && sh_elf_hash_entry (h)->tls_type != GOT_TLS_GD
6938       && sh_elf_hash_entry (h)->tls_type != GOT_TLS_IE)
6939     {
6940       asection *sgot;
6941       asection *srel;
6942       Elf_Internal_Rela rel;
6943       bfd_byte *loc;
6944
6945       /* This symbol has an entry in the global offset table.  Set it
6946          up.  */
6947
6948       sgot = htab->sgot;
6949       srel = htab->srelgot;
6950       BFD_ASSERT (sgot != NULL && srel != NULL);
6951
6952       rel.r_offset = (sgot->output_section->vma
6953                       + sgot->output_offset
6954                       + (h->got.offset &~ (bfd_vma) 1));
6955
6956       /* If this is a static link, or it is a -Bsymbolic link and the
6957          symbol is defined locally or was forced to be local because
6958          of a version file, we just want to emit a RELATIVE reloc.
6959          The entry in the global offset table will already have been
6960          initialized in the relocate_section function.  */
6961       if (info->shared
6962           && (info->symbolic
6963               || h->dynindx == -1
6964               || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL))
6965           && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
6966         {
6967           rel.r_info = ELF32_R_INFO (0, R_SH_RELATIVE);
6968           rel.r_addend = (h->root.u.def.value
6969                           + h->root.u.def.section->output_section->vma
6970                           + h->root.u.def.section->output_offset);
6971         }
6972       else
6973         {
6974           bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got.offset);
6975           rel.r_info = ELF32_R_INFO (h->dynindx, R_SH_GLOB_DAT);
6976           rel.r_addend = 0;
6977         }
6978
6979       loc = srel->contents;
6980       loc += srel->reloc_count++ * sizeof (Elf32_External_Rela);
6981       bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
6982     }
6983
6984 #ifdef INCLUDE_SHMEDIA
6985   {
6986     struct elf_sh_link_hash_entry *eh;
6987
6988     eh = (struct elf_sh_link_hash_entry *) h;
6989     if (eh->datalabel_got.offset != (bfd_vma) -1)
6990       {
6991         asection *sgot;
6992         asection *srel;
6993         Elf_Internal_Rela rel;
6994         bfd_byte *loc;
6995
6996         /* This symbol has a datalabel entry in the global offset table.
6997            Set it up.  */
6998
6999         sgot = htab->sgot;
7000         srel = htab->srelgot;
7001         BFD_ASSERT (sgot != NULL && srel != NULL);
7002
7003         rel.r_offset = (sgot->output_section->vma
7004                         + sgot->output_offset
7005                         + (eh->datalabel_got.offset &~ (bfd_vma) 1));
7006
7007         /* If this is a static link, or it is a -Bsymbolic link and the
7008            symbol is defined locally or was forced to be local because
7009            of a version file, we just want to emit a RELATIVE reloc.
7010            The entry in the global offset table will already have been
7011            initialized in the relocate_section function.  */
7012         if (info->shared
7013             && (info->symbolic
7014                 || h->dynindx == -1
7015                 || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL))
7016             && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
7017           {
7018             rel.r_info = ELF32_R_INFO (0, R_SH_RELATIVE);
7019             rel.r_addend = (h->root.u.def.value
7020                             + h->root.u.def.section->output_section->vma
7021                             + h->root.u.def.section->output_offset);
7022           }
7023         else
7024           {
7025             bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents
7026                         + eh->datalabel_got.offset);
7027             rel.r_info = ELF32_R_INFO (h->dynindx, R_SH_GLOB_DAT);
7028             rel.r_addend = 0;
7029           }
7030
7031         loc = srel->contents;
7032         loc += srel->reloc_count++ * sizeof (Elf32_External_Rela);
7033         bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
7034       }
7035   }
7036 #endif
7037
7038   if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
7039     {
7040       asection *s;
7041       Elf_Internal_Rela rel;
7042       bfd_byte *loc;
7043
7044       /* This symbol needs a copy reloc.  Set it up.  */
7045
7046       BFD_ASSERT (h->dynindx != -1
7047                   && (h->root.type == bfd_link_hash_defined
7048                       || h->root.type == bfd_link_hash_defweak));
7049
7050       s = bfd_get_section_by_name (h->root.u.def.section->owner,
7051                                    ".rela.bss");
7052       BFD_ASSERT (s != NULL);
7053
7054       rel.r_offset = (h->root.u.def.value
7055                       + h->root.u.def.section->output_section->vma
7056                       + h->root.u.def.section->output_offset);
7057       rel.r_info = ELF32_R_INFO (h->dynindx, R_SH_COPY);
7058       rel.r_addend = 0;
7059       loc = s->contents + s->reloc_count++ * sizeof (Elf32_External_Rela);
7060       bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
7061     }
7062
7063   /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute.  */
7064   if (strcmp (h->root.root.string, "_DYNAMIC") == 0
7065       || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
7066     sym->st_shndx = SHN_ABS;
7067
7068   return TRUE;
7069 }
7070
7071 /* Finish up the dynamic sections.  */
7072
7073 static bfd_boolean
7074 sh_elf_finish_dynamic_sections (output_bfd, info)
7075      bfd *output_bfd;
7076      struct bfd_link_info *info;
7077 {
7078   struct elf_sh_link_hash_table *htab;
7079   bfd *dynobj;
7080   asection *sgot;
7081   asection *sdyn;
7082
7083   htab = sh_elf_hash_table (info);
7084   dynobj = htab->root.dynobj;
7085
7086   sgot = htab->sgotplt;
7087   sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
7088
7089   if (htab->root.dynamic_sections_created)
7090     {
7091       asection *splt;
7092       Elf32_External_Dyn *dyncon, *dynconend;
7093
7094       BFD_ASSERT (sgot != NULL && sdyn != NULL);
7095
7096       dyncon = (Elf32_External_Dyn *) sdyn->contents;
7097       dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
7098       for (; dyncon < dynconend; dyncon++)
7099         {
7100           Elf_Internal_Dyn dyn;
7101           asection *s;
7102 #ifdef INCLUDE_SHMEDIA
7103           const char *name;
7104 #endif
7105
7106           bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
7107
7108           switch (dyn.d_tag)
7109             {
7110             default:
7111               break;
7112
7113 #ifdef INCLUDE_SHMEDIA
7114             case DT_INIT:
7115               name = info->init_function;
7116               goto get_sym;
7117
7118             case DT_FINI:
7119               name = info->fini_function;
7120             get_sym:
7121               if (dyn.d_un.d_val != 0)
7122                 {
7123                   struct elf_link_hash_entry *h;
7124
7125                   h = elf_link_hash_lookup (&htab->root, name,
7126                                             FALSE, FALSE, TRUE);
7127                   if (h != NULL && (h->other & STO_SH5_ISA32))
7128                     {
7129                       dyn.d_un.d_val |= 1;
7130                       bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
7131                     }
7132                 }
7133               break;
7134 #endif
7135
7136             case DT_PLTGOT:
7137               s = htab->sgot->output_section;
7138               goto get_vma;
7139
7140             case DT_JMPREL:
7141               s = htab->srelplt->output_section;
7142             get_vma:
7143               BFD_ASSERT (s != NULL);
7144               dyn.d_un.d_ptr = s->vma;
7145               bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
7146               break;
7147
7148             case DT_PLTRELSZ:
7149               s = htab->srelplt->output_section;
7150               BFD_ASSERT (s != NULL);
7151               if (s->_cooked_size != 0)
7152                 dyn.d_un.d_val = s->_cooked_size;
7153               else
7154                 dyn.d_un.d_val = s->_raw_size;
7155               bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
7156               break;
7157
7158             case DT_RELASZ:
7159               /* My reading of the SVR4 ABI indicates that the
7160                  procedure linkage table relocs (DT_JMPREL) should be
7161                  included in the overall relocs (DT_RELA).  This is
7162                  what Solaris does.  However, UnixWare can not handle
7163                  that case.  Therefore, we override the DT_RELASZ entry
7164                  here to make it not include the JMPREL relocs.  Since
7165                  the linker script arranges for .rela.plt to follow all
7166                  other relocation sections, we don't have to worry
7167                  about changing the DT_RELA entry.  */
7168               if (htab->srelplt != NULL)
7169                 {
7170                   s = htab->srelplt->output_section;
7171                   if (s->_cooked_size != 0)
7172                     dyn.d_un.d_val -= s->_cooked_size;
7173                   else
7174                     dyn.d_un.d_val -= s->_raw_size;
7175                 }
7176               bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
7177               break;
7178             }
7179         }
7180
7181       /* Fill in the first entry in the procedure linkage table.  */
7182       splt = htab->splt;
7183       if (splt && splt->_raw_size > 0)
7184         {
7185           if (info->shared)
7186             {
7187               if (elf_sh_pic_plt_entry == NULL)
7188                 {
7189                   elf_sh_pic_plt_entry = (bfd_big_endian (output_bfd) ?
7190                                           elf_sh_pic_plt_entry_be :
7191                                           elf_sh_pic_plt_entry_le);
7192                 }
7193               memcpy (splt->contents, elf_sh_pic_plt_entry,
7194                       elf_sh_sizeof_plt (info));
7195             }
7196           else
7197             {
7198               if (elf_sh_plt0_entry == NULL)
7199                 {
7200                   elf_sh_plt0_entry = (bfd_big_endian (output_bfd) ?
7201                                        elf_sh_plt0_entry_be :
7202                                        elf_sh_plt0_entry_le);
7203                 }
7204               memcpy (splt->contents, elf_sh_plt0_entry, PLT_ENTRY_SIZE);
7205 #ifdef INCLUDE_SHMEDIA
7206               movi_shori_putval (output_bfd,
7207                                  sgot->output_section->vma
7208                                  + sgot->output_offset,
7209                                  splt->contents
7210                                  + elf_sh_plt0_gotplt_offset (info));
7211 #else
7212               bfd_put_32 (output_bfd,
7213                           sgot->output_section->vma + sgot->output_offset + 4,
7214                           splt->contents + elf_sh_plt0_gotid_offset (info));
7215               bfd_put_32 (output_bfd,
7216                           sgot->output_section->vma + sgot->output_offset + 8,
7217                           splt->contents + elf_sh_plt0_linker_offset (info));
7218 #endif
7219             }
7220
7221           /* UnixWare sets the entsize of .plt to 4, although that doesn't
7222              really seem like the right value.  */
7223           elf_section_data (splt->output_section)->this_hdr.sh_entsize = 4;
7224         }
7225     }
7226
7227   /* Fill in the first three entries in the global offset table.  */
7228   if (sgot && sgot->_raw_size > 0)
7229     {
7230       if (sdyn == NULL)
7231         bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
7232       else
7233         bfd_put_32 (output_bfd,
7234                     sdyn->output_section->vma + sdyn->output_offset,
7235                     sgot->contents);
7236       bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
7237       bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
7238
7239       elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
7240     }
7241
7242   return TRUE;
7243 }
7244
7245 static enum elf_reloc_type_class
7246 sh_elf_reloc_type_class (rela)
7247      const Elf_Internal_Rela *rela;
7248 {
7249   switch ((int) ELF32_R_TYPE (rela->r_info))
7250     {
7251     case R_SH_RELATIVE:
7252       return reloc_class_relative;
7253     case R_SH_JMP_SLOT:
7254       return reloc_class_plt;
7255     case R_SH_COPY:
7256       return reloc_class_copy;
7257     default:
7258       return reloc_class_normal;
7259     }
7260 }
7261
7262 /* Support for Linux core dump NOTE sections.  */
7263 static bfd_boolean
7264 elf32_shlin_grok_prstatus (abfd, note)
7265      bfd *abfd;
7266      Elf_Internal_Note *note;
7267 {
7268   int offset;
7269   unsigned int raw_size;
7270
7271   switch (note->descsz)
7272     {
7273       default:
7274         return FALSE;
7275
7276       case 168:         /* Linux/SH */
7277         /* pr_cursig */
7278         elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
7279
7280         /* pr_pid */
7281         elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 24);
7282
7283         /* pr_reg */
7284         offset = 72;
7285         raw_size = 92;
7286
7287         break;
7288     }
7289
7290   /* Make a ".reg/999" section.  */
7291   return _bfd_elfcore_make_pseudosection (abfd, ".reg",
7292                                           raw_size, note->descpos + offset);
7293 }
7294
7295 static bfd_boolean
7296 elf32_shlin_grok_psinfo (abfd, note)
7297      bfd *abfd;
7298      Elf_Internal_Note *note;
7299 {
7300   switch (note->descsz)
7301     {
7302       default:
7303         return FALSE;
7304
7305       case 124:         /* Linux/SH elf_prpsinfo */
7306         elf_tdata (abfd)->core_program
7307          = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
7308         elf_tdata (abfd)->core_command
7309          = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
7310     }
7311
7312   /* Note that for some reason, a spurious space is tacked
7313      onto the end of the args in some (at least one anyway)
7314      implementations, so strip it off if it exists.  */
7315
7316   {
7317     char *command = elf_tdata (abfd)->core_command;
7318     int n = strlen (command);
7319
7320     if (0 < n && command[n - 1] == ' ')
7321       command[n - 1] = '\0';
7322   }
7323
7324   return TRUE;
7325 }
7326
7327 #define TARGET_BIG_SYM          bfd_elf32_sh_vec
7328 #define TARGET_BIG_NAME         "elf32-sh"
7329 #define TARGET_LITTLE_SYM       bfd_elf32_shl_vec
7330 #define TARGET_LITTLE_NAME      "elf32-shl"
7331 #define ELF_ARCH                bfd_arch_sh
7332 #define ELF_MACHINE_CODE        EM_SH
7333 #define ELF_MAXPAGESIZE         128
7334
7335 #define elf_symbol_leading_char '_'
7336
7337 #define bfd_elf32_bfd_reloc_type_lookup sh_elf_reloc_type_lookup
7338 #define elf_info_to_howto               sh_elf_info_to_howto
7339 #define bfd_elf32_bfd_relax_section     sh_elf_relax_section
7340 #define elf_backend_relocate_section    sh_elf_relocate_section
7341 #define bfd_elf32_bfd_get_relocated_section_contents \
7342                                         sh_elf_get_relocated_section_contents
7343 #define bfd_elf32_mkobject              sh_elf_mkobject
7344 #define elf_backend_object_p            sh_elf_object_p
7345 #define bfd_elf32_bfd_set_private_bfd_flags \
7346                                         sh_elf_set_private_flags
7347 #define bfd_elf32_bfd_copy_private_bfd_data \
7348                                         sh_elf_copy_private_data
7349 #define bfd_elf32_bfd_merge_private_bfd_data \
7350                                         sh_elf_merge_private_data
7351
7352 #define elf_backend_gc_mark_hook        sh_elf_gc_mark_hook
7353 #define elf_backend_gc_sweep_hook       sh_elf_gc_sweep_hook
7354 #define elf_backend_check_relocs        sh_elf_check_relocs
7355 #define elf_backend_copy_indirect_symbol \
7356                                         sh_elf_copy_indirect_symbol
7357 #define elf_backend_create_dynamic_sections \
7358                                         sh_elf_create_dynamic_sections
7359 #define bfd_elf32_bfd_link_hash_table_create \
7360                                         sh_elf_link_hash_table_create
7361 #define elf_backend_adjust_dynamic_symbol \
7362                                         sh_elf_adjust_dynamic_symbol
7363 #define elf_backend_size_dynamic_sections \
7364                                         sh_elf_size_dynamic_sections
7365 #define elf_backend_finish_dynamic_symbol \
7366                                         sh_elf_finish_dynamic_symbol
7367 #define elf_backend_finish_dynamic_sections \
7368                                         sh_elf_finish_dynamic_sections
7369 #define elf_backend_reloc_type_class    sh_elf_reloc_type_class
7370
7371 #define elf_backend_can_gc_sections     1
7372 #define elf_backend_can_refcount        1
7373 #define elf_backend_want_got_plt        1
7374 #define elf_backend_plt_readonly        1
7375 #define elf_backend_want_plt_sym        0
7376 #define elf_backend_got_header_size     12
7377 #define elf_backend_plt_header_size     PLT_ENTRY_SIZE
7378
7379 #ifndef INCLUDE_SHMEDIA
7380
7381 #include "elf32-target.h"
7382
7383 /* NetBSD support.  */
7384 #undef  TARGET_BIG_SYM
7385 #define TARGET_BIG_SYM                  bfd_elf32_shnbsd_vec
7386 #undef  TARGET_BIG_NAME
7387 #define TARGET_BIG_NAME                 "elf32-sh-nbsd"
7388 #undef  TARGET_LITTLE_SYM
7389 #define TARGET_LITTLE_SYM               bfd_elf32_shlnbsd_vec
7390 #undef  TARGET_LITTLE_NAME
7391 #define TARGET_LITTLE_NAME              "elf32-shl-nbsd"
7392 #undef  ELF_MAXPAGESIZE
7393 #define ELF_MAXPAGESIZE                 0x10000
7394 #undef  elf_symbol_leading_char
7395 #define elf_symbol_leading_char         0
7396 #undef  elf32_bed
7397 #define elf32_bed                       elf32_sh_nbsd_bed
7398
7399 #include "elf32-target.h"
7400
7401
7402 /* Linux support.  */
7403 #undef  TARGET_BIG_SYM
7404 #define TARGET_BIG_SYM                  bfd_elf32_shblin_vec
7405 #undef  TARGET_BIG_NAME
7406 #define TARGET_BIG_NAME                 "elf32-shbig-linux"
7407 #undef  TARGET_LITTLE_SYM
7408 #define TARGET_LITTLE_SYM               bfd_elf32_shlin_vec
7409 #undef  TARGET_LITTLE_NAME
7410 #define TARGET_LITTLE_NAME              "elf32-sh-linux"
7411
7412 #undef  elf_backend_grok_prstatus
7413 #define elf_backend_grok_prstatus       elf32_shlin_grok_prstatus
7414 #undef  elf_backend_grok_psinfo
7415 #define elf_backend_grok_psinfo         elf32_shlin_grok_psinfo
7416 #undef  elf32_bed
7417 #define elf32_bed                       elf32_sh_lin_bed
7418
7419 #include "elf32-target.h"
7420
7421 #endif /* INCLUDE_SHMEDIA */