OSDN Git Service

Set maxpagesize for NTO targets to 4k
[pf3gnuchains/pf3gnuchains3x.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->relocatable
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   if (htab->root.dynamic_sections_created)
3758     return TRUE;
3759
3760   /* We need to create .plt, .rel[a].plt, .got, .got.plt, .dynbss, and
3761      .rel[a].bss sections.  */
3762
3763   flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
3764            | SEC_LINKER_CREATED);
3765
3766   pltflags = flags;
3767   pltflags |= SEC_CODE;
3768   if (bed->plt_not_loaded)
3769     pltflags &= ~ (SEC_LOAD | SEC_HAS_CONTENTS);
3770   if (bed->plt_readonly)
3771     pltflags |= SEC_READONLY;
3772
3773   s = bfd_make_section (abfd, ".plt");
3774   htab->splt = s;
3775   if (s == NULL
3776       || ! bfd_set_section_flags (abfd, s, pltflags)
3777       || ! bfd_set_section_alignment (abfd, s, bed->plt_alignment))
3778     return FALSE;
3779
3780   if (bed->want_plt_sym)
3781     {
3782       /* Define the symbol _PROCEDURE_LINKAGE_TABLE_ at the start of the
3783          .plt section.  */
3784       struct elf_link_hash_entry *h;
3785       struct bfd_link_hash_entry *bh = NULL;
3786
3787       if (! (_bfd_generic_link_add_one_symbol
3788              (info, abfd, "_PROCEDURE_LINKAGE_TABLE_", BSF_GLOBAL, s,
3789               (bfd_vma) 0, (const char *) NULL, FALSE,
3790               get_elf_backend_data (abfd)->collect, &bh)))
3791         return FALSE;
3792
3793       h = (struct elf_link_hash_entry *) bh;
3794       h->elf_link_hash_flags |= ELF_LINK_HASH_DEF_REGULAR;
3795       h->type = STT_OBJECT;
3796
3797       if (info->shared
3798           && ! _bfd_elf_link_record_dynamic_symbol (info, h))
3799         return FALSE;
3800     }
3801
3802   s = bfd_make_section (abfd,
3803                         bed->default_use_rela_p ? ".rela.plt" : ".rel.plt");
3804   htab->srelplt = s;
3805   if (s == NULL
3806       || ! bfd_set_section_flags (abfd, s, flags | SEC_READONLY)
3807       || ! bfd_set_section_alignment (abfd, s, ptralign))
3808     return FALSE;
3809
3810   if (htab->sgot == NULL
3811       && !create_got_section (abfd, info))
3812     return FALSE;
3813
3814   {
3815     const char *secname;
3816     char *relname;
3817     flagword secflags;
3818     asection *sec;
3819
3820     for (sec = abfd->sections; sec; sec = sec->next)
3821       {
3822         secflags = bfd_get_section_flags (abfd, sec);
3823         if ((secflags & (SEC_DATA | SEC_LINKER_CREATED))
3824             || ((secflags & SEC_HAS_CONTENTS) != SEC_HAS_CONTENTS))
3825           continue;
3826         secname = bfd_get_section_name (abfd, sec);
3827         relname = (char *) bfd_malloc ((bfd_size_type) strlen (secname) + 6);
3828         strcpy (relname, ".rela");
3829         strcat (relname, secname);
3830         if (bfd_get_section_by_name (abfd, secname))
3831           continue;
3832         s = bfd_make_section (abfd, relname);
3833         if (s == NULL
3834             || ! bfd_set_section_flags (abfd, s, flags | SEC_READONLY)
3835             || ! bfd_set_section_alignment (abfd, s, ptralign))
3836           return FALSE;
3837       }
3838   }
3839
3840   if (bed->want_dynbss)
3841     {
3842       /* The .dynbss section is a place to put symbols which are defined
3843          by dynamic objects, are referenced by regular objects, and are
3844          not functions.  We must allocate space for them in the process
3845          image and use a R_*_COPY reloc to tell the dynamic linker to
3846          initialize them at run time.  The linker script puts the .dynbss
3847          section into the .bss section of the final image.  */
3848       s = bfd_make_section (abfd, ".dynbss");
3849       htab->sdynbss = s;
3850       if (s == NULL
3851           || ! bfd_set_section_flags (abfd, s, SEC_ALLOC))
3852         return FALSE;
3853
3854       /* The .rel[a].bss section holds copy relocs.  This section is not
3855          normally needed.  We need to create it here, though, so that the
3856          linker will map it to an output section.  We can't just create it
3857          only if we need it, because we will not know whether we need it
3858          until we have seen all the input files, and the first time the
3859          main linker code calls BFD after examining all the input files
3860          (size_dynamic_sections) the input sections have already been
3861          mapped to the output sections.  If the section turns out not to
3862          be needed, we can discard it later.  We will never need this
3863          section when generating a shared object, since they do not use
3864          copy relocs.  */
3865       if (! info->shared)
3866         {
3867           s = bfd_make_section (abfd,
3868                                 (bed->default_use_rela_p
3869                                  ? ".rela.bss" : ".rel.bss"));
3870           htab->srelbss = s;
3871           if (s == NULL
3872               || ! bfd_set_section_flags (abfd, s, flags | SEC_READONLY)
3873               || ! bfd_set_section_alignment (abfd, s, ptralign))
3874             return FALSE;
3875         }
3876     }
3877
3878   return TRUE;
3879 }
3880 \f
3881 /* Adjust a symbol defined by a dynamic object and referenced by a
3882    regular object.  The current definition is in some section of the
3883    dynamic object, but we're not including those sections.  We have to
3884    change the definition to something the rest of the link can
3885    understand.  */
3886
3887 static bfd_boolean
3888 sh_elf_adjust_dynamic_symbol (info, h)
3889      struct bfd_link_info *info;
3890      struct elf_link_hash_entry *h;
3891 {
3892   struct elf_sh_link_hash_table *htab;
3893   struct elf_sh_link_hash_entry *eh;
3894   struct elf_sh_dyn_relocs *p;
3895   asection *s;
3896   unsigned int power_of_two;
3897
3898   htab = sh_elf_hash_table (info);
3899
3900   /* Make sure we know what is going on here.  */
3901   BFD_ASSERT (htab->root.dynobj != NULL
3902               && ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT)
3903                   || h->weakdef != NULL
3904                   || ((h->elf_link_hash_flags
3905                        & ELF_LINK_HASH_DEF_DYNAMIC) != 0
3906                       && (h->elf_link_hash_flags
3907                           & ELF_LINK_HASH_REF_REGULAR) != 0
3908                       && (h->elf_link_hash_flags
3909                           & ELF_LINK_HASH_DEF_REGULAR) == 0)));
3910
3911   /* If this is a function, put it in the procedure linkage table.  We
3912      will fill in the contents of the procedure linkage table later,
3913      when we know the address of the .got section.  */
3914   if (h->type == STT_FUNC
3915       || (h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_PLT) != 0)
3916     {
3917       if (h->plt.refcount <= 0
3918           || (! info->shared
3919               && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) == 0
3920               && (h->elf_link_hash_flags & ELF_LINK_HASH_REF_DYNAMIC) == 0
3921               && h->root.type != bfd_link_hash_undefweak
3922               && h->root.type != bfd_link_hash_undefined))
3923         {
3924           /* This case can occur if we saw a PLT reloc in an input
3925              file, but the symbol was never referred to by a dynamic
3926              object.  In such a case, we don't actually need to build
3927              a procedure linkage table, and we can just do a REL32
3928              reloc instead.  */
3929           h->plt.offset = (bfd_vma) -1;
3930           h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
3931         }
3932
3933       return TRUE;
3934     }
3935   else
3936     h->plt.offset = (bfd_vma) -1;
3937
3938   /* If this is a weak symbol, and there is a real definition, the
3939      processor independent code will have arranged for us to see the
3940      real definition first, and we can just use the same value.  */
3941   if (h->weakdef != NULL)
3942     {
3943       BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
3944                   || h->weakdef->root.type == bfd_link_hash_defweak);
3945       h->root.u.def.section = h->weakdef->root.u.def.section;
3946       h->root.u.def.value = h->weakdef->root.u.def.value;
3947       if (info->nocopyreloc)
3948         h->elf_link_hash_flags
3949           = ((h->elf_link_hash_flags & ~ELF_LINK_NON_GOT_REF)
3950              | (h->weakdef->elf_link_hash_flags & ELF_LINK_NON_GOT_REF));
3951       return TRUE;
3952     }
3953
3954   /* This is a reference to a symbol defined by a dynamic object which
3955      is not a function.  */
3956
3957   /* If we are creating a shared library, we must presume that the
3958      only references to the symbol are via the global offset table.
3959      For such cases we need not do anything here; the relocations will
3960      be handled correctly by relocate_section.  */
3961   if (info->shared)
3962     return TRUE;
3963
3964   /* If there are no references to this symbol that do not use the
3965      GOT, we don't need to generate a copy reloc.  */
3966   if ((h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0)
3967     return TRUE;
3968
3969   /* If -z nocopyreloc was given, we won't generate them either.  */
3970   if (info->nocopyreloc)
3971     {
3972       h->elf_link_hash_flags &= ~ELF_LINK_NON_GOT_REF;
3973       return TRUE;
3974     }
3975
3976   eh = (struct elf_sh_link_hash_entry *) h;
3977   for (p = eh->dyn_relocs; p != NULL; p = p->next)
3978     {
3979       s = p->sec->output_section;
3980       if (s != NULL && (s->flags & (SEC_READONLY | SEC_HAS_CONTENTS)) != 0)
3981         break;
3982     }
3983
3984   /* If we didn't find any dynamic relocs in sections which needs the
3985      copy reloc, then we'll be keeping the dynamic relocs and avoiding
3986      the copy reloc.  */
3987   if (p == NULL)
3988     {
3989       h->elf_link_hash_flags &= ~ELF_LINK_NON_GOT_REF;
3990       return TRUE;
3991     }
3992
3993   /* We must allocate the symbol in our .dynbss section, which will
3994      become part of the .bss section of the executable.  There will be
3995      an entry for this symbol in the .dynsym section.  The dynamic
3996      object will contain position independent code, so all references
3997      from the dynamic object to this symbol will go through the global
3998      offset table.  The dynamic linker will use the .dynsym entry to
3999      determine the address it must put in the global offset table, so
4000      both the dynamic object and the regular object will refer to the
4001      same memory location for the variable.  */
4002
4003   s = htab->sdynbss;
4004   BFD_ASSERT (s != NULL);
4005
4006   /* We must generate a R_SH_COPY reloc to tell the dynamic linker to
4007      copy the initial value out of the dynamic object and into the
4008      runtime process image.  We need to remember the offset into the
4009      .rela.bss section we are going to use.  */
4010   if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
4011     {
4012       asection *srel;
4013
4014       srel = htab->srelbss;
4015       BFD_ASSERT (srel != NULL);
4016       srel->_raw_size += sizeof (Elf32_External_Rela);
4017       h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_COPY;
4018     }
4019
4020   /* We need to figure out the alignment required for this symbol.  I
4021      have no idea how ELF linkers handle this.  */
4022   power_of_two = bfd_log2 (h->size);
4023   if (power_of_two > 3)
4024     power_of_two = 3;
4025
4026   /* Apply the required alignment.  */
4027   s->_raw_size = BFD_ALIGN (s->_raw_size, (bfd_size_type) (1 << power_of_two));
4028   if (power_of_two > bfd_get_section_alignment (htab->root.dynobj, s))
4029     {
4030       if (! bfd_set_section_alignment (htab->root.dynobj, s, power_of_two))
4031         return FALSE;
4032     }
4033
4034   /* Define the symbol as being at this point in the section.  */
4035   h->root.u.def.section = s;
4036   h->root.u.def.value = s->_raw_size;
4037
4038   /* Increment the section size to make room for the symbol.  */
4039   s->_raw_size += h->size;
4040
4041   return TRUE;
4042 }
4043
4044 /* This is the condition under which sh_elf_finish_dynamic_symbol
4045    will be called from elflink.h.  If elflink.h doesn't call our
4046    finish_dynamic_symbol routine, we'll need to do something about
4047    initializing any .plt and .got entries in sh_elf_relocate_section.  */
4048 #define WILL_CALL_FINISH_DYNAMIC_SYMBOL(DYN, SHARED, H) \
4049   ((DYN)                                                                \
4050    && ((SHARED)                                                         \
4051        || ((H)->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)      \
4052    && ((H)->dynindx != -1                                               \
4053        || ((H)->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) != 0))
4054
4055 /* Allocate space in .plt, .got and associated reloc sections for
4056    dynamic relocs.  */
4057
4058 static bfd_boolean
4059 allocate_dynrelocs (h, inf)
4060      struct elf_link_hash_entry *h;
4061      PTR inf;
4062 {
4063   struct bfd_link_info *info;
4064   struct elf_sh_link_hash_table *htab;
4065   struct elf_sh_link_hash_entry *eh;
4066   struct elf_sh_dyn_relocs *p;
4067
4068   if (h->root.type == bfd_link_hash_indirect)
4069     return TRUE;
4070
4071   if (h->root.type == bfd_link_hash_warning)
4072     /* When warning symbols are created, they **replace** the "real"
4073        entry in the hash table, thus we never get to see the real
4074        symbol in a hash traversal.  So look at it now.  */
4075     h = (struct elf_link_hash_entry *) h->root.u.i.link;
4076
4077   info = (struct bfd_link_info *) inf;
4078   htab = sh_elf_hash_table (info);
4079
4080   eh = (struct elf_sh_link_hash_entry *) h;
4081   if ((h->got.refcount > 0
4082       || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL))
4083       && eh->gotplt_refcount > 0)
4084     {
4085       /* The symbol has been forced local, or we have some direct got refs,
4086          so treat all the gotplt refs as got refs. */
4087       h->got.refcount += eh->gotplt_refcount;
4088       if (h->plt.refcount >= eh->gotplt_refcount)
4089         h->plt.refcount -= eh->gotplt_refcount;
4090     }
4091
4092   if (htab->root.dynamic_sections_created
4093       && h->plt.refcount > 0
4094       && (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4095           || h->root.type != bfd_link_hash_undefweak))
4096     {
4097       /* Make sure this symbol is output as a dynamic symbol.
4098          Undefined weak syms won't yet be marked as dynamic.  */
4099       if (h->dynindx == -1
4100           && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
4101         {
4102           if (! bfd_elf32_link_record_dynamic_symbol (info, h))
4103             return FALSE;
4104         }
4105
4106       if (info->shared
4107           || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
4108         {
4109           asection *s = htab->splt;
4110
4111           /* If this is the first .plt entry, make room for the special
4112              first entry.  */
4113           if (s->_raw_size == 0)
4114             s->_raw_size += PLT_ENTRY_SIZE;
4115
4116           h->plt.offset = s->_raw_size;
4117
4118           /* If this symbol is not defined in a regular file, and we are
4119              not generating a shared library, then set the symbol to this
4120              location in the .plt.  This is required to make function
4121              pointers compare as equal between the normal executable and
4122              the shared library.  */
4123           if (! info->shared
4124               && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
4125             {
4126               h->root.u.def.section = s;
4127               h->root.u.def.value = h->plt.offset;
4128             }
4129
4130           /* Make room for this entry.  */
4131           s->_raw_size += PLT_ENTRY_SIZE;
4132
4133           /* We also need to make an entry in the .got.plt section, which
4134              will be placed in the .got section by the linker script.  */
4135           htab->sgotplt->_raw_size += 4;
4136
4137           /* We also need to make an entry in the .rel.plt section.  */
4138           htab->srelplt->_raw_size += sizeof (Elf32_External_Rela);
4139         }
4140       else
4141         {
4142           h->plt.offset = (bfd_vma) -1;
4143           h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
4144         }
4145     }
4146   else
4147     {
4148       h->plt.offset = (bfd_vma) -1;
4149       h->elf_link_hash_flags &= ~ELF_LINK_HASH_NEEDS_PLT;
4150     }
4151
4152   if (h->got.refcount > 0)
4153     {
4154       asection *s;
4155       bfd_boolean dyn;
4156       int tls_type = sh_elf_hash_entry (h)->tls_type;
4157
4158       /* Make sure this symbol is output as a dynamic symbol.
4159          Undefined weak syms won't yet be marked as dynamic.  */
4160       if (h->dynindx == -1
4161           && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
4162         {
4163           if (! bfd_elf32_link_record_dynamic_symbol (info, h))
4164             return FALSE;
4165         }
4166
4167       s = htab->sgot;
4168       h->got.offset = s->_raw_size;
4169       s->_raw_size += 4;
4170       /* R_SH_TLS_GD needs 2 consecutive GOT slots.  */
4171       if (tls_type == GOT_TLS_GD)
4172         s->_raw_size += 4;
4173       dyn = htab->root.dynamic_sections_created;
4174       /* R_SH_TLS_IE_32 needs one dynamic relocation if dynamic,
4175          R_SH_TLS_GD needs one if local symbol and two if global.  */
4176       if ((tls_type == GOT_TLS_GD && h->dynindx == -1)
4177           || (tls_type == GOT_TLS_IE && dyn))
4178         htab->srelgot->_raw_size += sizeof (Elf32_External_Rela);
4179       else if (tls_type == GOT_TLS_GD)
4180         htab->srelgot->_raw_size += 2 * sizeof (Elf32_External_Rela);
4181       else if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4182                 || h->root.type != bfd_link_hash_undefweak)
4183                && (info->shared
4184                    || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
4185         htab->srelgot->_raw_size += sizeof (Elf32_External_Rela);
4186     }
4187   else
4188     h->got.offset = (bfd_vma) -1;
4189
4190 #ifdef INCLUDE_SHMEDIA
4191   if (eh->datalabel_got.refcount > 0)
4192     {
4193       asection *s;
4194       bfd_boolean dyn;
4195
4196       /* Make sure this symbol is output as a dynamic symbol.
4197          Undefined weak syms won't yet be marked as dynamic.  */
4198       if (h->dynindx == -1
4199           && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
4200         {
4201           if (! bfd_elf32_link_record_dynamic_symbol (info, h))
4202             return FALSE;
4203         }
4204
4205       s = htab->sgot;
4206       eh->datalabel_got.offset = s->_raw_size;
4207       s->_raw_size += 4;
4208       dyn = htab->root.dynamic_sections_created;
4209       if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h))
4210         htab->srelgot->_raw_size += sizeof (Elf32_External_Rela);
4211     }
4212   else
4213     eh->datalabel_got.offset = (bfd_vma) -1;
4214 #endif
4215
4216   if (eh->dyn_relocs == NULL)
4217     return TRUE;
4218
4219   /* In the shared -Bsymbolic case, discard space allocated for
4220      dynamic pc-relative relocs against symbols which turn out to be
4221      defined in regular objects.  For the normal shared case, discard
4222      space for pc-relative relocs that have become local due to symbol
4223      visibility changes.  */
4224
4225   if (info->shared)
4226     {
4227       if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) != 0
4228           && ((h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) != 0
4229               || info->symbolic))
4230         {
4231           struct elf_sh_dyn_relocs **pp;
4232
4233           for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
4234             {
4235               p->count -= p->pc_count;
4236               p->pc_count = 0;
4237               if (p->count == 0)
4238                 *pp = p->next;
4239               else
4240                 pp = &p->next;
4241             }
4242         }
4243
4244       /* Also discard relocs on undefined weak syms with non-default
4245          visibility.  */
4246       if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
4247           && h->root.type == bfd_link_hash_undefweak)
4248         eh->dyn_relocs = NULL;
4249     }
4250   else
4251     {
4252       /* For the non-shared case, discard space for relocs against
4253          symbols which turn out to need copy relocs or are not
4254          dynamic.  */
4255
4256       if ((h->elf_link_hash_flags & ELF_LINK_NON_GOT_REF) == 0
4257           && (((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_DYNAMIC) != 0
4258                && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
4259               || (htab->root.dynamic_sections_created
4260                   && (h->root.type == bfd_link_hash_undefweak
4261                       || h->root.type == bfd_link_hash_undefined))))
4262         {
4263           /* Make sure this symbol is output as a dynamic symbol.
4264              Undefined weak syms won't yet be marked as dynamic.  */
4265           if (h->dynindx == -1
4266               && (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL) == 0)
4267             {
4268               if (! bfd_elf32_link_record_dynamic_symbol (info, h))
4269                 return FALSE;
4270             }
4271
4272           /* If that succeeded, we know we'll be keeping all the
4273              relocs.  */
4274           if (h->dynindx != -1)
4275             goto keep;
4276         }
4277
4278       eh->dyn_relocs = NULL;
4279
4280     keep: ;
4281     }
4282
4283   /* Finally, allocate space.  */
4284   for (p = eh->dyn_relocs; p != NULL; p = p->next)
4285     {
4286       asection *sreloc = elf_section_data (p->sec)->sreloc;
4287       sreloc->_raw_size += p->count * sizeof (Elf32_External_Rela);
4288     }
4289
4290   return TRUE;
4291 }
4292
4293 /* Find any dynamic relocs that apply to read-only sections.  */
4294
4295 static bfd_boolean
4296 readonly_dynrelocs (h, inf)
4297      struct elf_link_hash_entry *h;
4298      PTR inf;
4299 {
4300   struct elf_sh_link_hash_entry *eh;
4301   struct elf_sh_dyn_relocs *p;
4302
4303   if (h->root.type == bfd_link_hash_warning)
4304     h = (struct elf_link_hash_entry *) h->root.u.i.link;
4305
4306   eh = (struct elf_sh_link_hash_entry *) h;
4307   for (p = eh->dyn_relocs; p != NULL; p = p->next)
4308     {
4309       asection *s = p->sec->output_section;
4310
4311       if (s != NULL && (s->flags & SEC_READONLY) != 0)
4312         {
4313           struct bfd_link_info *info = (struct bfd_link_info *) inf;
4314
4315           info->flags |= DF_TEXTREL;
4316
4317           /* Not an error, just cut short the traversal.  */
4318           return FALSE;
4319         }
4320     }
4321   return TRUE;
4322 }
4323
4324 /* Set the sizes of the dynamic sections.  */
4325
4326 static bfd_boolean
4327 sh_elf_size_dynamic_sections (output_bfd, info)
4328      bfd *output_bfd ATTRIBUTE_UNUSED;
4329      struct bfd_link_info *info;
4330 {
4331   struct elf_sh_link_hash_table *htab;
4332   bfd *dynobj;
4333   asection *s;
4334   bfd_boolean relocs;
4335   bfd *ibfd;
4336
4337   htab = sh_elf_hash_table (info);
4338   dynobj = htab->root.dynobj;
4339   BFD_ASSERT (dynobj != NULL);
4340
4341   if (htab->root.dynamic_sections_created)
4342     {
4343       /* Set the contents of the .interp section to the interpreter.  */
4344       if (info->executable)
4345         {
4346           s = bfd_get_section_by_name (dynobj, ".interp");
4347           BFD_ASSERT (s != NULL);
4348           s->_raw_size = sizeof ELF_DYNAMIC_INTERPRETER;
4349           s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
4350         }
4351     }
4352
4353   /* Set up .got offsets for local syms, and space for local dynamic
4354      relocs.  */
4355   for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link_next)
4356     {
4357       bfd_signed_vma *local_got;
4358       bfd_signed_vma *end_local_got;
4359       char *local_tls_type;
4360       bfd_size_type locsymcount;
4361       Elf_Internal_Shdr *symtab_hdr;
4362       asection *srel;
4363
4364       if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour)
4365         continue;
4366
4367       for (s = ibfd->sections; s != NULL; s = s->next)
4368         {
4369           struct elf_sh_dyn_relocs *p;
4370
4371           for (p = ((struct elf_sh_dyn_relocs *)
4372                     elf_section_data (s)->local_dynrel);
4373                p != NULL;
4374                p = p->next)
4375             {
4376               if (! bfd_is_abs_section (p->sec)
4377                   && bfd_is_abs_section (p->sec->output_section))
4378                 {
4379                   /* Input section has been discarded, either because
4380                      it is a copy of a linkonce section or due to
4381                      linker script /DISCARD/, so we'll be discarding
4382                      the relocs too.  */
4383                 }
4384               else if (p->count != 0)
4385                 {
4386                   srel = elf_section_data (p->sec)->sreloc;
4387                   srel->_raw_size += p->count * sizeof (Elf32_External_Rela);
4388                   if ((p->sec->output_section->flags & SEC_READONLY) != 0)
4389                     info->flags |= DF_TEXTREL;
4390                 }
4391             }
4392         }
4393
4394       local_got = elf_local_got_refcounts (ibfd);
4395       if (!local_got)
4396         continue;
4397
4398       symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
4399       locsymcount = symtab_hdr->sh_info;
4400 #ifdef INCLUDE_SHMEDIA
4401       /* Count datalabel local GOT.  */
4402       locsymcount *= 2;
4403 #endif
4404       end_local_got = local_got + locsymcount;
4405       local_tls_type = sh_elf_local_got_tls_type (ibfd);
4406       s = htab->sgot;
4407       srel = htab->srelgot;
4408       for (; local_got < end_local_got; ++local_got)
4409         {
4410           if (*local_got > 0)
4411             {
4412               *local_got = s->_raw_size;
4413               s->_raw_size += 4;
4414               if (*local_tls_type == GOT_TLS_GD)
4415                 s->_raw_size += 4;
4416               if (info->shared)
4417                 srel->_raw_size += sizeof (Elf32_External_Rela);
4418             }
4419           else
4420             *local_got = (bfd_vma) -1;
4421           ++local_tls_type;
4422         }
4423     }
4424
4425   if (htab->tls_ldm_got.refcount > 0)
4426     {
4427       /* Allocate 2 got entries and 1 dynamic reloc for R_SH_TLS_LD_32
4428          relocs.  */
4429       htab->tls_ldm_got.offset = htab->sgot->_raw_size;
4430       htab->sgot->_raw_size += 8;
4431       htab->srelgot->_raw_size += sizeof (Elf32_External_Rela);
4432     }
4433   else
4434     htab->tls_ldm_got.offset = -1;
4435
4436   /* Allocate global sym .plt and .got entries, and space for global
4437      sym dynamic relocs.  */
4438   elf_link_hash_traverse (&htab->root, allocate_dynrelocs, (PTR) info);
4439
4440   /* We now have determined the sizes of the various dynamic sections.
4441      Allocate memory for them.  */
4442   relocs = FALSE;
4443   for (s = dynobj->sections; s != NULL; s = s->next)
4444     {
4445       if ((s->flags & SEC_LINKER_CREATED) == 0)
4446         continue;
4447
4448       if (s == htab->splt
4449           || s == htab->sgot
4450           || s == htab->sgotplt)
4451         {
4452           /* Strip this section if we don't need it; see the
4453              comment below.  */
4454         }
4455       else if (strncmp (bfd_get_section_name (dynobj, s), ".rela", 5) == 0)
4456         {
4457           if (s->_raw_size != 0 && s != htab->srelplt)
4458             relocs = TRUE;
4459
4460           /* We use the reloc_count field as a counter if we need
4461              to copy relocs into the output file.  */
4462           s->reloc_count = 0;
4463         }
4464       else
4465         {
4466           /* It's not one of our sections, so don't allocate space.  */
4467           continue;
4468         }
4469
4470       if (s->_raw_size == 0)
4471         {
4472           /* If we don't need this section, strip it from the
4473              output file.  This is mostly to handle .rela.bss and
4474              .rela.plt.  We must create both sections in
4475              create_dynamic_sections, because they must be created
4476              before the linker maps input sections to output
4477              sections.  The linker does that before
4478              adjust_dynamic_symbol is called, and it is that
4479              function which decides whether anything needs to go
4480              into these sections.  */
4481
4482           _bfd_strip_section_from_output (info, s);
4483           continue;
4484         }
4485
4486       /* Allocate memory for the section contents.  We use bfd_zalloc
4487          here in case unused entries are not reclaimed before the
4488          section's contents are written out.  This should not happen,
4489          but this way if it does, we get a R_SH_NONE reloc instead
4490          of garbage.  */
4491       s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->_raw_size);
4492       if (s->contents == NULL)
4493         return FALSE;
4494     }
4495
4496   if (htab->root.dynamic_sections_created)
4497     {
4498       /* Add some entries to the .dynamic section.  We fill in the
4499          values later, in sh_elf_finish_dynamic_sections, but we
4500          must add the entries now so that we get the correct size for
4501          the .dynamic section.  The DT_DEBUG entry is filled in by the
4502          dynamic linker and used by the debugger.  */
4503 #define add_dynamic_entry(TAG, VAL) \
4504   bfd_elf32_add_dynamic_entry (info, (bfd_vma) (TAG), (bfd_vma) (VAL))
4505
4506       if (info->executable)
4507         {
4508           if (! add_dynamic_entry (DT_DEBUG, 0))
4509             return FALSE;
4510         }
4511
4512       if (htab->splt->_raw_size != 0)
4513         {
4514           if (! add_dynamic_entry (DT_PLTGOT, 0)
4515               || ! add_dynamic_entry (DT_PLTRELSZ, 0)
4516               || ! add_dynamic_entry (DT_PLTREL, DT_RELA)
4517               || ! add_dynamic_entry (DT_JMPREL, 0))
4518             return FALSE;
4519         }
4520
4521       if (relocs)
4522         {
4523           if (! add_dynamic_entry (DT_RELA, 0)
4524               || ! add_dynamic_entry (DT_RELASZ, 0)
4525               || ! add_dynamic_entry (DT_RELAENT,
4526                                       sizeof (Elf32_External_Rela)))
4527             return FALSE;
4528
4529           /* If any dynamic relocs apply to a read-only section,
4530              then we need a DT_TEXTREL entry.  */
4531           if ((info->flags & DF_TEXTREL) == 0)
4532             elf_link_hash_traverse (&htab->root, readonly_dynrelocs,
4533                                     (PTR) info);
4534
4535           if ((info->flags & DF_TEXTREL) != 0)
4536             {
4537               if (! add_dynamic_entry (DT_TEXTREL, 0))
4538                 return FALSE;
4539             }
4540         }
4541     }
4542 #undef add_dynamic_entry
4543
4544   return TRUE;
4545 }
4546 \f
4547 /* Relocate an SH ELF section.  */
4548
4549 static bfd_boolean
4550 sh_elf_relocate_section (output_bfd, info, input_bfd, input_section,
4551                          contents, relocs, local_syms, local_sections)
4552      bfd *output_bfd;
4553      struct bfd_link_info *info;
4554      bfd *input_bfd;
4555      asection *input_section;
4556      bfd_byte *contents;
4557      Elf_Internal_Rela *relocs;
4558      Elf_Internal_Sym *local_syms;
4559      asection **local_sections;
4560 {
4561   struct elf_sh_link_hash_table *htab;
4562   Elf_Internal_Shdr *symtab_hdr;
4563   struct elf_link_hash_entry **sym_hashes;
4564   Elf_Internal_Rela *rel, *relend;
4565   bfd *dynobj;
4566   bfd_vma *local_got_offsets;
4567   asection *sgot;
4568   asection *sgotplt;
4569   asection *splt;
4570   asection *sreloc;
4571   asection *srelgot;
4572
4573   htab = sh_elf_hash_table (info);
4574   symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
4575   sym_hashes = elf_sym_hashes (input_bfd);
4576   dynobj = htab->root.dynobj;
4577   local_got_offsets = elf_local_got_offsets (input_bfd);
4578
4579   sgot = htab->sgot;
4580   sgotplt = htab->sgotplt;
4581   splt = htab->splt;
4582   sreloc = NULL;
4583   srelgot = NULL;
4584
4585   rel = relocs;
4586   relend = relocs + input_section->reloc_count;
4587   for (; rel < relend; rel++)
4588     {
4589       int r_type;
4590       reloc_howto_type *howto;
4591       unsigned long r_symndx;
4592       Elf_Internal_Sym *sym;
4593       asection *sec;
4594       struct elf_link_hash_entry *h;
4595       bfd_vma relocation;
4596       bfd_vma addend = (bfd_vma) 0;
4597       bfd_reloc_status_type r;
4598       int seen_stt_datalabel = 0;
4599       bfd_vma off;
4600       int tls_type;
4601
4602       r_symndx = ELF32_R_SYM (rel->r_info);
4603
4604       r_type = ELF32_R_TYPE (rel->r_info);
4605
4606       /* Many of the relocs are only used for relaxing, and are
4607          handled entirely by the relaxation code.  */
4608       if (r_type > (int) R_SH_LAST_INVALID_RELOC
4609           && r_type < (int) R_SH_LOOP_START)
4610         continue;
4611       if (r_type == (int) R_SH_NONE)
4612         continue;
4613
4614       if (r_type < 0
4615           || r_type >= R_SH_max
4616           || (r_type >= (int) R_SH_FIRST_INVALID_RELOC
4617               && r_type <= (int) R_SH_LAST_INVALID_RELOC)
4618           || (   r_type >= (int) R_SH_FIRST_INVALID_RELOC_3
4619               && r_type <= (int) R_SH_LAST_INVALID_RELOC_3)
4620           || (   r_type >= (int) R_SH_FIRST_INVALID_RELOC_4
4621               && r_type <= (int) R_SH_LAST_INVALID_RELOC_4)
4622           || (   r_type >= (int) R_SH_FIRST_INVALID_RELOC_5
4623               && r_type <= (int) R_SH_LAST_INVALID_RELOC_5)
4624           || (r_type >= (int) R_SH_FIRST_INVALID_RELOC_2
4625               && r_type <= (int) R_SH_LAST_INVALID_RELOC_2))
4626         {
4627           bfd_set_error (bfd_error_bad_value);
4628           return FALSE;
4629         }
4630
4631       howto = sh_elf_howto_table + r_type;
4632
4633       /* For relocs that aren't partial_inplace, we get the addend from
4634          the relocation.  */
4635       if (! howto->partial_inplace)
4636         addend = rel->r_addend;
4637
4638       h = NULL;
4639       sym = NULL;
4640       sec = NULL;
4641       if (r_symndx < symtab_hdr->sh_info)
4642         {
4643           sym = local_syms + r_symndx;
4644           sec = local_sections[r_symndx];
4645           relocation = (sec->output_section->vma
4646                         + sec->output_offset
4647                         + sym->st_value);
4648           /* A local symbol never has STO_SH5_ISA32, so we don't need
4649              datalabel processing here.  Make sure this does not change
4650              without notice.  */
4651           if ((sym->st_other & STO_SH5_ISA32) != 0)
4652             ((*info->callbacks->reloc_dangerous)
4653              (info,
4654               _("Unexpected STO_SH5_ISA32 on local symbol is not handled"),
4655               input_bfd, input_section, rel->r_offset));
4656           if (info->relocatable)
4657             {
4658               /* This is a relocatable link.  We don't have to change
4659                  anything, unless the reloc is against a section symbol,
4660                  in which case we have to adjust according to where the
4661                  section symbol winds up in the output section.  */
4662               sym = local_syms + r_symndx;
4663               if (ELF_ST_TYPE (sym->st_info) == STT_SECTION)
4664                 {
4665                   if (! howto->partial_inplace)
4666                     {
4667                       /* For relocations with the addend in the
4668                          relocation, we need just to update the addend.
4669                          All real relocs are of type partial_inplace; this
4670                          code is mostly for completeness.  */
4671                       rel->r_addend += sec->output_offset + sym->st_value;
4672
4673                       continue;
4674                     }
4675
4676                   /* Relocs of type partial_inplace need to pick up the
4677                      contents in the contents and add the offset resulting
4678                      from the changed location of the section symbol.
4679                      Using _bfd_final_link_relocate (e.g. goto
4680                      final_link_relocate) here would be wrong, because
4681                      relocations marked pc_relative would get the current
4682                      location subtracted, and we must only do that at the
4683                      final link.  */
4684                   r = _bfd_relocate_contents (howto, input_bfd,
4685                                               sec->output_offset
4686                                               + sym->st_value,
4687                                               contents + rel->r_offset);
4688                   goto relocation_done;
4689                 }
4690
4691               continue;
4692             }
4693           else if (! howto->partial_inplace)
4694             {
4695               relocation = _bfd_elf_rela_local_sym (output_bfd, sym, sec, rel);
4696               addend = rel->r_addend;
4697             }
4698           else if ((sec->flags & SEC_MERGE)
4699                    && ELF_ST_TYPE (sym->st_info) == STT_SECTION)
4700             {
4701               asection *msec;
4702
4703               if (howto->rightshift || howto->src_mask != 0xffffffff)
4704                 {
4705                   (*_bfd_error_handler)
4706                     (_("%s(%s+0x%lx): %s relocation against SEC_MERGE section"),
4707                      bfd_archive_filename (input_bfd),
4708                      bfd_get_section_name (input_bfd, input_section),
4709                      (long) rel->r_offset, howto->name);
4710                   return FALSE;
4711                 }
4712
4713               addend = bfd_get_32 (input_bfd, contents + rel->r_offset);
4714               msec = sec;
4715               addend =
4716                 _bfd_elf_rel_local_sym (output_bfd, sym, &msec, addend)
4717                 - relocation;
4718               addend += msec->output_section->vma + msec->output_offset;
4719               bfd_put_32 (input_bfd, addend, contents + rel->r_offset);
4720               addend = 0;
4721             }
4722         }
4723       else
4724         {
4725           /* Section symbol are never (?) placed in the hash table, so
4726              we can just ignore hash relocations when creating a
4727              relocatable object file.  */
4728           if (info->relocatable)
4729             continue;
4730
4731           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
4732           while (h->root.type == bfd_link_hash_indirect
4733                  || h->root.type == bfd_link_hash_warning)
4734             {
4735 #ifdef INCLUDE_SHMEDIA
4736               /* If the reference passes a symbol marked with
4737                  STT_DATALABEL, then any STO_SH5_ISA32 on the final value
4738                  doesn't count.  */
4739               seen_stt_datalabel |= h->type == STT_DATALABEL;
4740 #endif
4741               h = (struct elf_link_hash_entry *) h->root.u.i.link;
4742             }
4743           if (h->root.type == bfd_link_hash_defined
4744               || h->root.type == bfd_link_hash_defweak)
4745             {
4746               bfd_boolean dyn;
4747
4748               dyn = htab->root.dynamic_sections_created;
4749               sec = h->root.u.def.section;
4750               /* In these cases, we don't need the relocation value.
4751                  We check specially because in some obscure cases
4752                  sec->output_section will be NULL.  */
4753               if (r_type == R_SH_GOTPC
4754                   || r_type == R_SH_GOTPC_LOW16
4755                   || r_type == R_SH_GOTPC_MEDLOW16
4756                   || r_type == R_SH_GOTPC_MEDHI16
4757                   || r_type == R_SH_GOTPC_HI16
4758                   || ((r_type == R_SH_PLT32
4759                        || r_type == R_SH_PLT_LOW16
4760                        || r_type == R_SH_PLT_MEDLOW16
4761                        || r_type == R_SH_PLT_MEDHI16
4762                        || r_type == R_SH_PLT_HI16)
4763                       && h->plt.offset != (bfd_vma) -1)
4764                   || ((r_type == R_SH_GOT32
4765                        || r_type == R_SH_GOT_LOW16
4766                        || r_type == R_SH_GOT_MEDLOW16
4767                        || r_type == R_SH_GOT_MEDHI16
4768                        || r_type == R_SH_GOT_HI16)
4769                       && WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
4770                       && (! info->shared
4771                           || (! info->symbolic && h->dynindx != -1)
4772                           || (h->elf_link_hash_flags
4773                               & ELF_LINK_HASH_DEF_REGULAR) == 0))
4774                   /* The cases above are those in which relocation is
4775                      overwritten in the switch block below.  The cases
4776                      below are those in which we must defer relocation
4777                      to run-time, because we can't resolve absolute
4778                      addresses when creating a shared library.  */
4779                   || (info->shared
4780                       && ((! info->symbolic && h->dynindx != -1)
4781                           || (h->elf_link_hash_flags
4782                               & ELF_LINK_HASH_DEF_REGULAR) == 0)
4783                       && ((r_type == R_SH_DIR32
4784                            && (h->elf_link_hash_flags
4785                                & ELF_LINK_FORCED_LOCAL) == 0)
4786                           || r_type == R_SH_REL32)
4787                       && ((input_section->flags & SEC_ALLOC) != 0
4788                           /* DWARF will emit R_SH_DIR32 relocations in its
4789                              sections against symbols defined externally
4790                              in shared libraries.  We can't do anything
4791                              with them here.  */
4792                           || ((input_section->flags & SEC_DEBUGGING) != 0
4793                               && (h->elf_link_hash_flags
4794                                   & ELF_LINK_HASH_DEF_DYNAMIC) != 0)))
4795                   /* Dynamic relocs are not propagated for SEC_DEBUGGING
4796                      sections because such sections are not SEC_ALLOC and
4797                      thus ld.so will not process them.  */
4798                   || (sec->output_section == NULL
4799                       && ((input_section->flags & SEC_DEBUGGING) != 0
4800                           && (h->elf_link_hash_flags
4801                               & ELF_LINK_HASH_DEF_DYNAMIC) != 0))
4802                   || (sec->output_section == NULL
4803                       && (sh_elf_hash_entry (h)->tls_type == GOT_TLS_IE
4804                           || sh_elf_hash_entry (h)->tls_type == GOT_TLS_GD)))
4805                 relocation = 0;
4806               else if (sec->output_section == NULL)
4807                 {
4808                   (*_bfd_error_handler)
4809                     (_("%s: unresolvable relocation against symbol `%s' from %s section"),
4810                      bfd_archive_filename (input_bfd), h->root.root.string,
4811                      bfd_get_section_name (input_bfd, input_section));
4812                   return FALSE;
4813                 }
4814               else
4815                 relocation = ((h->root.u.def.value
4816                               + sec->output_section->vma
4817                               + sec->output_offset)
4818                               /* A STO_SH5_ISA32 causes a "bitor 1" to the
4819                                  symbol value, unless we've seen
4820                                  STT_DATALABEL on the way to it.  */
4821                               | ((h->other & STO_SH5_ISA32) != 0
4822                                  && ! seen_stt_datalabel));
4823             }
4824           else if (h->root.type == bfd_link_hash_undefweak)
4825             relocation = 0;
4826           else if (info->shared
4827                    && ! info->no_undefined
4828                    && ELF_ST_VISIBILITY (h->other) == STV_DEFAULT)
4829             relocation = 0;
4830           else
4831             {
4832               if (! ((*info->callbacks->undefined_symbol)
4833                      (info, h->root.root.string, input_bfd,
4834                       input_section, rel->r_offset,
4835                       (!info->shared || info->no_undefined
4836                        || ELF_ST_VISIBILITY (h->other)))))
4837                 return FALSE;
4838               relocation = 0;
4839             }
4840         }
4841
4842       switch ((int) r_type)
4843         {
4844         final_link_relocate:
4845           /* COFF relocs don't use the addend. The addend is used for
4846              R_SH_DIR32 to be compatible with other compilers.  */
4847           r = _bfd_final_link_relocate (howto, input_bfd, input_section,
4848                                         contents, rel->r_offset,
4849                                         relocation, addend);
4850           break;
4851
4852         case R_SH_IND12W:
4853           goto final_link_relocate;
4854
4855         case R_SH_DIR8WPN:
4856         case R_SH_DIR8WPZ:
4857         case R_SH_DIR8WPL:
4858           /* If the reloc is against the start of this section, then
4859              the assembler has already taken care of it and the reloc
4860              is here only to assist in relaxing.  If the reloc is not
4861              against the start of this section, then it's against an
4862              external symbol and we must deal with it ourselves.  */
4863           if (input_section->output_section->vma + input_section->output_offset
4864               != relocation)
4865             {
4866               int disp = (relocation
4867                           - input_section->output_section->vma
4868                           - input_section->output_offset
4869                           - rel->r_offset);
4870               int mask = 0;
4871               switch (r_type)
4872                 {
4873                 case R_SH_DIR8WPN:
4874                 case R_SH_DIR8WPZ: mask = 1; break;
4875                 case R_SH_DIR8WPL: mask = 3; break;
4876                 default: mask = 0; break;
4877                 }
4878               if (disp & mask)
4879                 {
4880                   ((*_bfd_error_handler)
4881                    (_("%s: 0x%lx: fatal: unaligned branch target for relax-support relocation"),
4882                     bfd_archive_filename (input_section->owner),
4883                     (unsigned long) rel->r_offset));
4884                   bfd_set_error (bfd_error_bad_value);
4885                   return FALSE;
4886                 }
4887               relocation -= 4;
4888               goto final_link_relocate;
4889             }
4890           r = bfd_reloc_ok;
4891           break;
4892
4893         default:
4894 #ifdef INCLUDE_SHMEDIA
4895           if (shmedia_prepare_reloc (info, input_bfd, input_section,
4896                                      contents, rel, &relocation))
4897             goto final_link_relocate;
4898 #endif
4899           bfd_set_error (bfd_error_bad_value);
4900           return FALSE;
4901
4902         case R_SH_DIR32:
4903         case R_SH_REL32:
4904           if (info->shared
4905               && (h == NULL
4906                   || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4907                   || h->root.type != bfd_link_hash_undefweak)
4908               && r_symndx != 0
4909               && (input_section->flags & SEC_ALLOC) != 0
4910               && (r_type != R_SH_REL32
4911                   || (h != NULL
4912                       && h->dynindx != -1
4913                       && (! info->symbolic
4914                           || (h->elf_link_hash_flags
4915                               & ELF_LINK_HASH_DEF_REGULAR) == 0))))
4916             {
4917               Elf_Internal_Rela outrel;
4918               bfd_byte *loc;
4919               bfd_boolean skip, relocate;
4920
4921               /* When generating a shared object, these relocations
4922                  are copied into the output file to be resolved at run
4923                  time.  */
4924
4925               if (sreloc == NULL)
4926                 {
4927                   const char *name;
4928
4929                   name = (bfd_elf_string_from_elf_section
4930                           (input_bfd,
4931                            elf_elfheader (input_bfd)->e_shstrndx,
4932                            elf_section_data (input_section)->rel_hdr.sh_name));
4933                   if (name == NULL)
4934                     return FALSE;
4935
4936                   BFD_ASSERT (strncmp (name, ".rela", 5) == 0
4937                               && strcmp (bfd_get_section_name (input_bfd,
4938                                                                input_section),
4939                                          name + 5) == 0);
4940
4941                   sreloc = bfd_get_section_by_name (dynobj, name);
4942                   BFD_ASSERT (sreloc != NULL);
4943                 }
4944
4945               skip = FALSE;
4946               relocate = FALSE;
4947
4948               outrel.r_offset =
4949                 _bfd_elf_section_offset (output_bfd, info, input_section,
4950                                          rel->r_offset);
4951               if (outrel.r_offset == (bfd_vma) -1)
4952                 skip = TRUE;
4953               else if (outrel.r_offset == (bfd_vma) -2)
4954                 skip = TRUE, relocate = TRUE;
4955               outrel.r_offset += (input_section->output_section->vma
4956                                   + input_section->output_offset);
4957
4958               if (skip)
4959                 memset (&outrel, 0, sizeof outrel);
4960               else if (r_type == R_SH_REL32)
4961                 {
4962                   BFD_ASSERT (h != NULL && h->dynindx != -1);
4963                   outrel.r_info = ELF32_R_INFO (h->dynindx, R_SH_REL32);
4964                   outrel.r_addend
4965                     = bfd_get_32 (input_bfd, contents + rel->r_offset);
4966                 }
4967               else
4968                 {
4969                   /* h->dynindx may be -1 if this symbol was marked to
4970                      become local.  */
4971                   if (h == NULL
4972                       || ((info->symbolic || h->dynindx == -1)
4973                           && (h->elf_link_hash_flags
4974                               & ELF_LINK_HASH_DEF_REGULAR) != 0))
4975                     {
4976                       relocate = TRUE;
4977                       outrel.r_info = ELF32_R_INFO (0, R_SH_RELATIVE);
4978                       outrel.r_addend
4979                         = relocation + bfd_get_32 (input_bfd,
4980                                                    contents + rel->r_offset);
4981                     }
4982                   else
4983                     {
4984                       BFD_ASSERT (h->dynindx != -1);
4985                       outrel.r_info = ELF32_R_INFO (h->dynindx, R_SH_DIR32);
4986                       outrel.r_addend
4987                         = relocation + bfd_get_32 (input_bfd,
4988                                                    contents + rel->r_offset);
4989                     }
4990                 }
4991
4992               loc = sreloc->contents;
4993               loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela);
4994               bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
4995
4996               /* If this reloc is against an external symbol, we do
4997                  not want to fiddle with the addend.  Otherwise, we
4998                  need to include the symbol value so that it becomes
4999                  an addend for the dynamic reloc.  */
5000               if (! relocate)
5001                 continue;
5002             }
5003           goto final_link_relocate;
5004
5005         case R_SH_GOTPLT32:
5006 #ifdef INCLUDE_SHMEDIA
5007         case R_SH_GOTPLT_LOW16:
5008         case R_SH_GOTPLT_MEDLOW16:
5009         case R_SH_GOTPLT_MEDHI16:
5010         case R_SH_GOTPLT_HI16:
5011         case R_SH_GOTPLT10BY4:
5012         case R_SH_GOTPLT10BY8:
5013 #endif
5014           /* Relocation is to the entry for this symbol in the
5015              procedure linkage table.  */
5016
5017           if (h == NULL
5018               || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL)
5019               || ! info->shared
5020               || info->symbolic
5021               || h->dynindx == -1
5022               || h->plt.offset == (bfd_vma) -1
5023               || h->got.offset != (bfd_vma) -1)
5024             goto force_got;
5025
5026           /* Relocation is to the entry for this symbol in the global
5027              offset table extension for the procedure linkage table.  */
5028
5029           BFD_ASSERT (sgotplt != NULL);
5030           relocation = (sgotplt->output_offset
5031                         + ((h->plt.offset / elf_sh_sizeof_plt (info)
5032                             - 1 + 3) * 4));
5033
5034 #ifdef GOT_BIAS
5035           relocation -= GOT_BIAS;
5036 #endif
5037
5038           goto final_link_relocate;
5039
5040         force_got:
5041         case R_SH_GOT32:
5042 #ifdef INCLUDE_SHMEDIA
5043         case R_SH_GOT_LOW16:
5044         case R_SH_GOT_MEDLOW16:
5045         case R_SH_GOT_MEDHI16:
5046         case R_SH_GOT_HI16:
5047         case R_SH_GOT10BY4:
5048         case R_SH_GOT10BY8:
5049 #endif
5050           /* Relocation is to the entry for this symbol in the global
5051              offset table.  */
5052
5053           BFD_ASSERT (sgot != NULL);
5054
5055           if (h != NULL)
5056             {
5057               bfd_boolean dyn;
5058
5059               off = h->got.offset;
5060 #ifdef INCLUDE_SHMEDIA
5061               if (seen_stt_datalabel)
5062                 {
5063                   struct elf_sh_link_hash_entry *hsh;
5064
5065                   hsh = (struct elf_sh_link_hash_entry *)h;
5066                   off = hsh->datalabel_got.offset;
5067                 }
5068 #endif
5069               BFD_ASSERT (off != (bfd_vma) -1);
5070
5071               dyn = htab->root.dynamic_sections_created;
5072               if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
5073                   || (info->shared
5074                       && (info->symbolic || h->dynindx == -1
5075                           || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL))
5076                       && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
5077                   || (ELF_ST_VISIBILITY (h->other)
5078                       && h->root.type == bfd_link_hash_undefweak))
5079                 {
5080                   /* This is actually a static link, or it is a
5081                      -Bsymbolic link and the symbol is defined
5082                      locally, or the symbol was forced to be local
5083                      because of a version file.  We must initialize
5084                      this entry in the global offset table.  Since the
5085                      offset must always be a multiple of 4, we use the
5086                      least significant bit to record whether we have
5087                      initialized it already.
5088
5089                      When doing a dynamic link, we create a .rela.got
5090                      relocation entry to initialize the value.  This
5091                      is done in the finish_dynamic_symbol routine.  */
5092                   if ((off & 1) != 0)
5093                     off &= ~1;
5094                   else
5095                     {
5096                       bfd_put_32 (output_bfd, relocation,
5097                                   sgot->contents + off);
5098 #ifdef INCLUDE_SHMEDIA
5099                       if (seen_stt_datalabel)
5100                         {
5101                           struct elf_sh_link_hash_entry *hsh;
5102
5103                           hsh = (struct elf_sh_link_hash_entry *)h;
5104                           hsh->datalabel_got.offset |= 1;
5105                         }
5106                       else
5107 #endif
5108                         h->got.offset |= 1;
5109                     }
5110                 }
5111
5112               relocation = sgot->output_offset + off;
5113             }
5114           else
5115             {
5116 #ifdef INCLUDE_SHMEDIA
5117               if (rel->r_addend)
5118                 {
5119                   BFD_ASSERT (local_got_offsets != NULL
5120                               && (local_got_offsets[symtab_hdr->sh_info
5121                                                     + r_symndx]
5122                                   != (bfd_vma) -1));
5123
5124                   off = local_got_offsets[symtab_hdr->sh_info
5125                                           + r_symndx];
5126                 }
5127               else
5128                 {
5129 #endif
5130               BFD_ASSERT (local_got_offsets != NULL
5131                           && local_got_offsets[r_symndx] != (bfd_vma) -1);
5132
5133               off = local_got_offsets[r_symndx];
5134 #ifdef INCLUDE_SHMEDIA
5135                 }
5136 #endif
5137
5138               /* The offset must always be a multiple of 4.  We use
5139                  the least significant bit to record whether we have
5140                  already generated the necessary reloc.  */
5141               if ((off & 1) != 0)
5142                 off &= ~1;
5143               else
5144                 {
5145                   bfd_put_32 (output_bfd, relocation, sgot->contents + off);
5146
5147                   if (info->shared)
5148                     {
5149                       Elf_Internal_Rela outrel;
5150                       bfd_byte *loc;
5151
5152                       if (srelgot == NULL)
5153                         {
5154                           srelgot = bfd_get_section_by_name (dynobj,
5155                                                              ".rela.got");
5156                           BFD_ASSERT (srelgot != NULL);
5157                         }
5158
5159                       outrel.r_offset = (sgot->output_section->vma
5160                                          + sgot->output_offset
5161                                          + off);
5162                       outrel.r_info = ELF32_R_INFO (0, R_SH_RELATIVE);
5163                       outrel.r_addend = relocation;
5164                       loc = srelgot->contents;
5165                       loc += srelgot->reloc_count++ * sizeof (Elf32_External_Rela);
5166                       bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5167                     }
5168
5169 #ifdef INCLUDE_SHMEDIA
5170                   if (rel->r_addend)
5171                     local_got_offsets[symtab_hdr->sh_info + r_symndx] |= 1;
5172                   else
5173 #endif
5174                     local_got_offsets[r_symndx] |= 1;
5175                 }
5176
5177               relocation = sgot->output_offset + off;
5178             }
5179
5180 #ifdef GOT_BIAS
5181           relocation -= GOT_BIAS;
5182 #endif
5183
5184           goto final_link_relocate;
5185
5186         case R_SH_GOTOFF:
5187 #ifdef INCLUDE_SHMEDIA
5188         case R_SH_GOTOFF_LOW16:
5189         case R_SH_GOTOFF_MEDLOW16:
5190         case R_SH_GOTOFF_MEDHI16:
5191         case R_SH_GOTOFF_HI16:
5192 #endif
5193           /* Relocation is relative to the start of the global offset
5194              table.  */
5195
5196           BFD_ASSERT (sgot != NULL);
5197
5198           /* Note that sgot->output_offset is not involved in this
5199              calculation.  We always want the start of .got.  If we
5200              defined _GLOBAL_OFFSET_TABLE in a different way, as is
5201              permitted by the ABI, we might have to change this
5202              calculation.  */
5203           relocation -= sgot->output_section->vma;
5204
5205 #ifdef GOT_BIAS
5206           relocation -= GOT_BIAS;
5207 #endif
5208
5209           addend = rel->r_addend;
5210
5211           goto final_link_relocate;
5212
5213         case R_SH_GOTPC:
5214 #ifdef INCLUDE_SHMEDIA
5215         case R_SH_GOTPC_LOW16:
5216         case R_SH_GOTPC_MEDLOW16:
5217         case R_SH_GOTPC_MEDHI16:
5218         case R_SH_GOTPC_HI16:
5219 #endif
5220           /* Use global offset table as symbol value.  */
5221
5222           BFD_ASSERT (sgot != NULL);
5223           relocation = sgot->output_section->vma;
5224
5225 #ifdef GOT_BIAS
5226           relocation += GOT_BIAS;
5227 #endif
5228
5229           addend = rel->r_addend;
5230
5231           goto final_link_relocate;
5232
5233         case R_SH_PLT32:
5234 #ifdef INCLUDE_SHMEDIA
5235         case R_SH_PLT_LOW16:
5236         case R_SH_PLT_MEDLOW16:
5237         case R_SH_PLT_MEDHI16:
5238         case R_SH_PLT_HI16:
5239 #endif
5240           /* Relocation is to the entry for this symbol in the
5241              procedure linkage table.  */
5242
5243           /* Resolve a PLT reloc against a local symbol directly,
5244              without using the procedure linkage table.  */
5245           if (h == NULL)
5246             goto final_link_relocate;
5247
5248           if (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL)
5249             goto final_link_relocate;
5250
5251           if (h->plt.offset == (bfd_vma) -1)
5252             {
5253               /* We didn't make a PLT entry for this symbol.  This
5254                  happens when statically linking PIC code, or when
5255                  using -Bsymbolic.  */
5256               goto final_link_relocate;
5257             }
5258
5259           BFD_ASSERT (splt != NULL);
5260           relocation = (splt->output_section->vma
5261                         + splt->output_offset
5262                         + h->plt.offset);
5263
5264 #ifdef INCLUDE_SHMEDIA
5265           relocation++;
5266 #endif
5267
5268           addend = rel->r_addend;
5269
5270           goto final_link_relocate;
5271
5272         case R_SH_LOOP_START:
5273           {
5274             static bfd_vma start, end;
5275
5276             start = (relocation + rel->r_addend
5277                      - (sec->output_section->vma + sec->output_offset));
5278             r = sh_elf_reloc_loop (r_type, input_bfd, input_section, contents,
5279                                    rel->r_offset, sec, start, end);
5280             break;
5281
5282         case R_SH_LOOP_END:
5283             end = (relocation + rel->r_addend
5284                    - (sec->output_section->vma + sec->output_offset));
5285             r = sh_elf_reloc_loop (r_type, input_bfd, input_section, contents,
5286                                    rel->r_offset, sec, start, end);
5287             break;
5288           }
5289
5290         case R_SH_TLS_GD_32:
5291         case R_SH_TLS_IE_32:
5292           r_type = sh_elf_optimized_tls_reloc (info, r_type, h == NULL);
5293           tls_type = GOT_UNKNOWN;
5294           if (h == NULL && local_got_offsets)
5295             tls_type = sh_elf_local_got_tls_type (input_bfd) [r_symndx];
5296           else if (h != NULL)
5297             {
5298               tls_type = sh_elf_hash_entry (h)->tls_type;
5299               if (! info->shared
5300                   && (h->dynindx == -1
5301                       || (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
5302                 r_type = R_SH_TLS_LE_32;
5303             }
5304
5305           if (r_type == R_SH_TLS_GD_32 && tls_type == GOT_TLS_IE)
5306             r_type = R_SH_TLS_IE_32;
5307
5308           if (r_type == R_SH_TLS_LE_32)
5309             {
5310               bfd_vma offset;
5311               unsigned short insn;
5312
5313               if (ELF32_R_TYPE (rel->r_info) == R_SH_TLS_GD_32)
5314                 {
5315                   /* GD->LE transition:
5316                        mov.l 1f,r4; mova 2f,r0; mov.l 2f,r1; add r0,r1;
5317                        jsr @r1; add r12,r4; bra 3f; nop; .align 2;
5318                        1: .long x$TLSGD; 2: .long __tls_get_addr@PLT; 3:
5319                      We change it into:
5320                        mov.l 1f,r4; stc gbr,r0; add r4,r0; nop;
5321                        nop; nop; ...
5322                        1: .long x@TPOFF; 2: .long __tls_get_addr@PLT; 3:.  */
5323
5324                   offset = rel->r_offset;
5325                   BFD_ASSERT (offset >= 16);
5326                   /* Size of GD instructions is 16 or 18.  */
5327                   offset -= 16;
5328                   insn = bfd_get_16 (input_bfd, contents + offset + 0);
5329                   if ((insn & 0xff00) == 0xc700)
5330                     {
5331                       BFD_ASSERT (offset >= 2);
5332                       offset -= 2;
5333                       insn = bfd_get_16 (input_bfd, contents + offset + 0);
5334                     }
5335
5336                   BFD_ASSERT ((insn & 0xff00) == 0xd400);
5337                   insn = bfd_get_16 (input_bfd, contents + offset + 2);
5338                   BFD_ASSERT ((insn & 0xff00) == 0xc700);
5339                   insn = bfd_get_16 (input_bfd, contents + offset + 4);
5340                   BFD_ASSERT ((insn & 0xff00) == 0xd100);
5341                   insn = bfd_get_16 (input_bfd, contents + offset + 6);
5342                   BFD_ASSERT (insn == 0x310c);
5343                   insn = bfd_get_16 (input_bfd, contents + offset + 8);
5344                   BFD_ASSERT (insn == 0x410b);
5345                   insn = bfd_get_16 (input_bfd, contents + offset + 10);
5346                   BFD_ASSERT (insn == 0x34cc);
5347
5348                   bfd_put_16 (output_bfd, 0x0012, contents + offset + 2);
5349                   bfd_put_16 (output_bfd, 0x304c, contents + offset + 4);
5350                   bfd_put_16 (output_bfd, 0x0009, contents + offset + 6);
5351                   bfd_put_16 (output_bfd, 0x0009, contents + offset + 8);
5352                   bfd_put_16 (output_bfd, 0x0009, contents + offset + 10);
5353                 }
5354               else
5355                 {
5356                   int index;
5357
5358                   /* IE->LE transition:
5359                      mov.l 1f,r0; stc gbr,rN; mov.l @(r0,r12),rM;
5360                      bra 2f; add ...; .align 2; 1: x@GOTTPOFF; 2:
5361                      We change it into:
5362                      mov.l .Ln,rM; stc gbr,rN; nop; ...;
5363                      1: x@TPOFF; 2:.  */
5364
5365                   offset = rel->r_offset;
5366                   BFD_ASSERT (offset >= 16);
5367                   /* Size of IE instructions is 10 or 12.  */
5368                   offset -= 10;
5369                   insn = bfd_get_16 (input_bfd, contents + offset + 0);
5370                   if ((insn & 0xf0ff) == 0x0012)
5371                     {
5372                       BFD_ASSERT (offset >= 2);
5373                       offset -= 2;
5374                       insn = bfd_get_16 (input_bfd, contents + offset + 0);
5375                     }
5376
5377                   BFD_ASSERT ((insn & 0xff00) == 0xd000);
5378                   index = insn & 0x00ff;
5379                   insn = bfd_get_16 (input_bfd, contents + offset + 2);
5380                   BFD_ASSERT ((insn & 0xf0ff) == 0x0012);
5381                   insn = bfd_get_16 (input_bfd, contents + offset + 4);
5382                   BFD_ASSERT ((insn & 0xf0ff) == 0x00ce);
5383                   insn = 0xd000 | (insn & 0x0f00) | index;
5384                   bfd_put_16 (output_bfd, insn, contents + offset + 0);
5385                   bfd_put_16 (output_bfd, 0x0009, contents + offset + 4);
5386                 }
5387
5388               bfd_put_32 (output_bfd, tpoff (info, relocation),
5389                           contents + rel->r_offset);
5390               continue;
5391             }
5392
5393           sgot = htab->sgot;
5394           if (sgot == NULL)
5395             abort ();
5396
5397           if (h != NULL)
5398             off = h->got.offset;
5399           else
5400             {
5401               if (local_got_offsets == NULL)
5402                 abort ();
5403
5404               off = local_got_offsets[r_symndx];
5405             }
5406
5407           /* Relocate R_SH_TLS_IE_32 directly when statically linking.  */
5408           if (r_type == R_SH_TLS_IE_32
5409               && ! htab->root.dynamic_sections_created)
5410             {
5411               off &= ~1;
5412               bfd_put_32 (output_bfd, tpoff (info, relocation),
5413                           sgot->contents + off);
5414               bfd_put_32 (output_bfd, sgot->output_offset + off,
5415                           contents + rel->r_offset);
5416               continue;
5417             }
5418
5419           if ((off & 1) != 0)
5420             off &= ~1;
5421           else
5422             {
5423               Elf_Internal_Rela outrel;
5424               bfd_byte *loc;
5425               int dr_type, indx;
5426
5427               if (srelgot == NULL)
5428                 {
5429                   srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
5430                   BFD_ASSERT (srelgot != NULL);
5431                 }
5432
5433               outrel.r_offset = (sgot->output_section->vma
5434                                  + sgot->output_offset + off);
5435
5436               if (h == NULL || h->dynindx == -1)
5437                 indx = 0;
5438               else
5439                 indx = h->dynindx;
5440
5441               dr_type = (r_type == R_SH_TLS_GD_32 ? R_SH_TLS_DTPMOD32 :
5442                          R_SH_TLS_TPOFF32);
5443               if (dr_type == R_SH_TLS_TPOFF32 && indx == 0)
5444                 outrel.r_addend = relocation - dtpoff_base (info);
5445               else
5446                 outrel.r_addend = 0;
5447               outrel.r_info = ELF32_R_INFO (indx, dr_type);
5448               loc = srelgot->contents;
5449               loc += srelgot->reloc_count++ * sizeof (Elf32_External_Rela);
5450               bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5451
5452               if (r_type == R_SH_TLS_GD_32)
5453                 {
5454                   if (indx == 0)
5455                     {
5456                       bfd_put_32 (output_bfd,
5457                                   relocation - dtpoff_base (info),
5458                                   sgot->contents + off + 4);
5459                     }
5460                   else
5461                     {
5462                       outrel.r_info = ELF32_R_INFO (indx,
5463                                                     R_SH_TLS_DTPOFF32);
5464                       outrel.r_offset += 4;
5465                       outrel.r_addend = 0;
5466                       srelgot->reloc_count++;
5467                       loc += sizeof (Elf32_External_Rela);
5468                       bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5469                     }
5470                 }
5471
5472               if (h != NULL)
5473                 h->got.offset |= 1;
5474               else
5475                 local_got_offsets[r_symndx] |= 1;
5476             }
5477
5478           if (off >= (bfd_vma) -2)
5479             abort ();
5480
5481           if (r_type == (int) ELF32_R_TYPE (rel->r_info))
5482             relocation = sgot->output_offset + off;
5483           else
5484             {
5485               bfd_vma offset;
5486               unsigned short insn;
5487
5488               /* GD->IE transition:
5489                    mov.l 1f,r4; mova 2f,r0; mov.l 2f,r1; add r0,r1;
5490                    jsr @r1; add r12,r4; bra 3f; nop; .align 2;
5491                    1: .long x$TLSGD; 2: .long __tls_get_addr@PLT; 3:
5492                  We change it into:
5493                    mov.l 1f,r0; stc gbr,r4; mov.l @(r0,r12),r0; add r4,r0;
5494                    nop; nop; bra 3f; nop; .align 2;
5495                    1: .long x@TPOFF; 2:...; 3:.  */
5496
5497               offset = rel->r_offset;
5498               BFD_ASSERT (offset >= 16);
5499               /* Size of GD instructions is 16 or 18.  */
5500               offset -= 16;
5501               insn = bfd_get_16 (input_bfd, contents + offset + 0);
5502               if ((insn & 0xff00) == 0xc700)
5503                 {
5504                   BFD_ASSERT (offset >= 2);
5505                   offset -= 2;
5506                   insn = bfd_get_16 (input_bfd, contents + offset + 0);
5507                 }
5508
5509               BFD_ASSERT ((insn & 0xff00) == 0xd400);
5510
5511               /* Replace mov.l 1f,R4 with mov.l 1f,r0.  */
5512               bfd_put_16 (output_bfd, insn & 0xf0ff, contents + offset);
5513
5514               insn = bfd_get_16 (input_bfd, contents + offset + 2);
5515               BFD_ASSERT ((insn & 0xff00) == 0xc700);
5516               insn = bfd_get_16 (input_bfd, contents + offset + 4);
5517               BFD_ASSERT ((insn & 0xff00) == 0xd100);
5518               insn = bfd_get_16 (input_bfd, contents + offset + 6);
5519               BFD_ASSERT (insn == 0x310c);
5520               insn = bfd_get_16 (input_bfd, contents + offset + 8);
5521               BFD_ASSERT (insn == 0x410b);
5522               insn = bfd_get_16 (input_bfd, contents + offset + 10);
5523               BFD_ASSERT (insn == 0x34cc);
5524
5525               bfd_put_16 (output_bfd, 0x0412, contents + offset + 2);
5526               bfd_put_16 (output_bfd, 0x00ce, contents + offset + 4);
5527               bfd_put_16 (output_bfd, 0x304c, contents + offset + 6);
5528               bfd_put_16 (output_bfd, 0x0009, contents + offset + 8);
5529               bfd_put_16 (output_bfd, 0x0009, contents + offset + 10);
5530
5531               bfd_put_32 (output_bfd, sgot->output_offset + off,
5532                           contents + rel->r_offset);
5533
5534               continue;
5535           }
5536
5537           addend = rel->r_addend;
5538
5539           goto final_link_relocate;
5540
5541         case R_SH_TLS_LD_32:
5542           if (! info->shared)
5543             {
5544               bfd_vma offset;
5545               unsigned short insn;
5546
5547               /* LD->LE transition:
5548                    mov.l 1f,r4; mova 2f,r0; mov.l 2f,r1; add r0,r1;
5549                    jsr @r1; add r12,r4; bra 3f; nop; .align 2;
5550                    1: .long x$TLSLD; 2: .long __tls_get_addr@PLT; 3:
5551                  We change it into:
5552                    stc gbr,r0; nop; nop; nop;
5553                    nop; nop; bra 3f; ...; 3:.  */
5554
5555               offset = rel->r_offset;
5556               BFD_ASSERT (offset >= 16);
5557               /* Size of LD instructions is 16 or 18.  */
5558               offset -= 16;
5559               insn = bfd_get_16 (input_bfd, contents + offset + 0);
5560               if ((insn & 0xff00) == 0xc700)
5561                 {
5562                   BFD_ASSERT (offset >= 2);
5563                   offset -= 2;
5564                   insn = bfd_get_16 (input_bfd, contents + offset + 0);
5565                 }
5566
5567               BFD_ASSERT ((insn & 0xff00) == 0xd400);
5568               insn = bfd_get_16 (input_bfd, contents + offset + 2);
5569               BFD_ASSERT ((insn & 0xff00) == 0xc700);
5570               insn = bfd_get_16 (input_bfd, contents + offset + 4);
5571               BFD_ASSERT ((insn & 0xff00) == 0xd100);
5572               insn = bfd_get_16 (input_bfd, contents + offset + 6);
5573               BFD_ASSERT (insn == 0x310c);
5574               insn = bfd_get_16 (input_bfd, contents + offset + 8);
5575               BFD_ASSERT (insn == 0x410b);
5576               insn = bfd_get_16 (input_bfd, contents + offset + 10);
5577               BFD_ASSERT (insn == 0x34cc);
5578
5579               bfd_put_16 (output_bfd, 0x0012, contents + offset + 0);
5580               bfd_put_16 (output_bfd, 0x0009, contents + offset + 2);
5581               bfd_put_16 (output_bfd, 0x0009, contents + offset + 4);
5582               bfd_put_16 (output_bfd, 0x0009, contents + offset + 6);
5583               bfd_put_16 (output_bfd, 0x0009, contents + offset + 8);
5584               bfd_put_16 (output_bfd, 0x0009, contents + offset + 10);
5585
5586               continue;
5587             }
5588
5589           sgot = htab->sgot;
5590           if (sgot == NULL)
5591             abort ();
5592
5593           off = htab->tls_ldm_got.offset;
5594           if (off & 1)
5595             off &= ~1;
5596           else
5597             {
5598               Elf_Internal_Rela outrel;
5599               bfd_byte *loc;
5600
5601               srelgot = htab->srelgot;
5602               if (srelgot == NULL)
5603                 abort ();
5604
5605               outrel.r_offset = (sgot->output_section->vma
5606                                  + sgot->output_offset + off);
5607               outrel.r_addend = 0;
5608               outrel.r_info = ELF32_R_INFO (0, R_SH_TLS_DTPMOD32);
5609               loc = srelgot->contents;
5610               loc += srelgot->reloc_count++ * sizeof (Elf32_External_Rela);
5611               bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5612               htab->tls_ldm_got.offset |= 1;
5613             }
5614
5615           relocation = sgot->output_offset + off;
5616           addend = rel->r_addend;
5617
5618           goto final_link_relocate;
5619
5620         case R_SH_TLS_LDO_32:
5621           if (! info->shared)
5622             relocation = tpoff (info, relocation);
5623           else
5624             relocation -= dtpoff_base (info);
5625
5626           addend = rel->r_addend;
5627           goto final_link_relocate;
5628
5629         case R_SH_TLS_LE_32:
5630           {
5631             int indx;
5632             Elf_Internal_Rela outrel;
5633             bfd_byte *loc;
5634
5635             if (! info->shared)
5636               {
5637                 relocation = tpoff (info, relocation);
5638                 addend = rel->r_addend;
5639                 goto final_link_relocate;
5640               }
5641
5642             if (sreloc == NULL)
5643               {
5644                 const char *name;
5645
5646                 name = (bfd_elf_string_from_elf_section
5647                         (input_bfd,
5648                          elf_elfheader (input_bfd)->e_shstrndx,
5649                          elf_section_data (input_section)->rel_hdr.sh_name));
5650                 if (name == NULL)
5651                   return FALSE;
5652
5653                 BFD_ASSERT (strncmp (name, ".rela", 5) == 0
5654                             && strcmp (bfd_get_section_name (input_bfd,
5655                                                              input_section),
5656                                        name + 5) == 0);
5657
5658                 sreloc = bfd_get_section_by_name (dynobj, name);
5659                 BFD_ASSERT (sreloc != NULL);
5660               }
5661
5662             if (h == NULL || h->dynindx == -1)
5663               indx = 0;
5664             else
5665               indx = h->dynindx;
5666
5667             outrel.r_offset = (input_section->output_section->vma
5668                                + input_section->output_offset
5669                                + rel->r_offset);
5670             outrel.r_info = ELF32_R_INFO (indx, R_SH_TLS_TPOFF32);
5671             if (indx == 0)
5672               outrel.r_addend = relocation - dtpoff_base (info);
5673             else
5674               outrel.r_addend = 0;
5675
5676             loc = sreloc->contents;
5677             loc += sreloc->reloc_count++ * sizeof (Elf32_External_Rela);
5678             bfd_elf32_swap_reloca_out (output_bfd, &outrel, loc);
5679             continue;
5680           }
5681         }
5682
5683     relocation_done:
5684       if (r != bfd_reloc_ok)
5685         {
5686           switch (r)
5687             {
5688             default:
5689             case bfd_reloc_outofrange:
5690               abort ();
5691             case bfd_reloc_overflow:
5692               {
5693                 const char *name;
5694
5695                 if (h != NULL)
5696                   name = h->root.root.string;
5697                 else
5698                   {
5699                     name = (bfd_elf_string_from_elf_section
5700                             (input_bfd, symtab_hdr->sh_link, sym->st_name));
5701                     if (name == NULL)
5702                       return FALSE;
5703                     if (*name == '\0')
5704                       name = bfd_section_name (input_bfd, sec);
5705                   }
5706                 if (! ((*info->callbacks->reloc_overflow)
5707                        (info, name, howto->name, (bfd_vma) 0,
5708                         input_bfd, input_section, rel->r_offset)))
5709                   return FALSE;
5710               }
5711               break;
5712             }
5713         }
5714     }
5715
5716   return TRUE;
5717 }
5718
5719 /* This is a version of bfd_generic_get_relocated_section_contents
5720    which uses sh_elf_relocate_section.  */
5721
5722 static bfd_byte *
5723 sh_elf_get_relocated_section_contents (output_bfd, link_info, link_order,
5724                                        data, relocatable, symbols)
5725      bfd *output_bfd;
5726      struct bfd_link_info *link_info;
5727      struct bfd_link_order *link_order;
5728      bfd_byte *data;
5729      bfd_boolean relocatable;
5730      asymbol **symbols;
5731 {
5732   Elf_Internal_Shdr *symtab_hdr;
5733   asection *input_section = link_order->u.indirect.section;
5734   bfd *input_bfd = input_section->owner;
5735   asection **sections = NULL;
5736   Elf_Internal_Rela *internal_relocs = NULL;
5737   Elf_Internal_Sym *isymbuf = NULL;
5738
5739   /* We only need to handle the case of relaxing, or of having a
5740      particular set of section contents, specially.  */
5741   if (relocatable
5742       || elf_section_data (input_section)->this_hdr.contents == NULL)
5743     return bfd_generic_get_relocated_section_contents (output_bfd, link_info,
5744                                                        link_order, data,
5745                                                        relocatable,
5746                                                        symbols);
5747
5748   symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
5749
5750   memcpy (data, elf_section_data (input_section)->this_hdr.contents,
5751           (size_t) input_section->_raw_size);
5752
5753   if ((input_section->flags & SEC_RELOC) != 0
5754       && input_section->reloc_count > 0)
5755     {
5756       asection **secpp;
5757       Elf_Internal_Sym *isym, *isymend;
5758       bfd_size_type amt;
5759
5760       internal_relocs = (_bfd_elf_link_read_relocs
5761                          (input_bfd, input_section, (PTR) NULL,
5762                           (Elf_Internal_Rela *) NULL, FALSE));
5763       if (internal_relocs == NULL)
5764         goto error_return;
5765
5766       if (symtab_hdr->sh_info != 0)
5767         {
5768           isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
5769           if (isymbuf == NULL)
5770             isymbuf = bfd_elf_get_elf_syms (input_bfd, symtab_hdr,
5771                                             symtab_hdr->sh_info, 0,
5772                                             NULL, NULL, NULL);
5773           if (isymbuf == NULL)
5774             goto error_return;
5775         }
5776
5777       amt = symtab_hdr->sh_info;
5778       amt *= sizeof (asection *);
5779       sections = (asection **) bfd_malloc (amt);
5780       if (sections == NULL && amt != 0)
5781         goto error_return;
5782
5783       isymend = isymbuf + symtab_hdr->sh_info;
5784       for (isym = isymbuf, secpp = sections; isym < isymend; ++isym, ++secpp)
5785         {
5786           asection *isec;
5787
5788           if (isym->st_shndx == SHN_UNDEF)
5789             isec = bfd_und_section_ptr;
5790           else if (isym->st_shndx == SHN_ABS)
5791             isec = bfd_abs_section_ptr;
5792           else if (isym->st_shndx == SHN_COMMON)
5793             isec = bfd_com_section_ptr;
5794           else
5795             isec = bfd_section_from_elf_index (input_bfd, isym->st_shndx);
5796
5797           *secpp = isec;
5798         }
5799
5800       if (! sh_elf_relocate_section (output_bfd, link_info, input_bfd,
5801                                      input_section, data, internal_relocs,
5802                                      isymbuf, sections))
5803         goto error_return;
5804
5805       if (sections != NULL)
5806         free (sections);
5807       if (isymbuf != NULL
5808           && symtab_hdr->contents != (unsigned char *) isymbuf)
5809         free (isymbuf);
5810       if (elf_section_data (input_section)->relocs != internal_relocs)
5811         free (internal_relocs);
5812     }
5813
5814   return data;
5815
5816  error_return:
5817   if (sections != NULL)
5818     free (sections);
5819   if (isymbuf != NULL
5820       && symtab_hdr->contents != (unsigned char *) isymbuf)
5821     free (isymbuf);
5822   if (internal_relocs != NULL
5823       && elf_section_data (input_section)->relocs != internal_relocs)
5824     free (internal_relocs);
5825   return NULL;
5826 }
5827
5828 /* Return the base VMA address which should be subtracted from real addresses
5829    when resolving @dtpoff relocation.
5830    This is PT_TLS segment p_vaddr.  */
5831
5832 static bfd_vma
5833 dtpoff_base (info)
5834      struct bfd_link_info *info;
5835 {
5836   /* If tls_segment is NULL, we should have signalled an error already.  */
5837   if (elf_hash_table (info)->tls_segment == NULL)
5838     return 0;
5839   return elf_hash_table (info)->tls_segment->start;
5840 }
5841
5842 /* Return the relocation value for R_SH_TLS_TPOFF32..  */
5843
5844 static bfd_vma
5845 tpoff (info, address)
5846      struct bfd_link_info *info;
5847      bfd_vma address;
5848 {
5849   /* If tls_segment is NULL, we should have signalled an error already.  */
5850   if (elf_hash_table (info)->tls_segment == NULL)
5851     return 0;
5852   /* SH TLS ABI is variant I and static TLS block start just after tcbhead
5853      structure which has 2 pointer fields.  */
5854   return (address - dtpoff_base (info) + 8);
5855 }
5856
5857 static asection *
5858 sh_elf_gc_mark_hook (sec, info, rel, h, sym)
5859      asection *sec;
5860      struct bfd_link_info *info ATTRIBUTE_UNUSED;
5861      Elf_Internal_Rela *rel;
5862      struct elf_link_hash_entry *h;
5863      Elf_Internal_Sym *sym;
5864 {
5865   if (h != NULL)
5866     {
5867       switch (ELF32_R_TYPE (rel->r_info))
5868         {
5869         case R_SH_GNU_VTINHERIT:
5870         case R_SH_GNU_VTENTRY:
5871           break;
5872
5873         default:
5874 #ifdef INCLUDE_SHMEDIA
5875           while (h->root.type == bfd_link_hash_indirect
5876                  && h->root.u.i.link)
5877             h = (struct elf_link_hash_entry *) h->root.u.i.link;
5878 #endif
5879           switch (h->root.type)
5880             {
5881             case bfd_link_hash_defined:
5882             case bfd_link_hash_defweak:
5883               return h->root.u.def.section;
5884
5885             case bfd_link_hash_common:
5886               return h->root.u.c.p->section;
5887
5888             default:
5889               break;
5890             }
5891         }
5892     }
5893   else
5894     return bfd_section_from_elf_index (sec->owner, sym->st_shndx);
5895
5896   return NULL;
5897 }
5898
5899 /* Update the got entry reference counts for the section being removed.  */
5900
5901 static bfd_boolean
5902 sh_elf_gc_sweep_hook (abfd, info, sec, relocs)
5903      bfd *abfd;
5904      struct bfd_link_info *info;
5905      asection *sec;
5906      const Elf_Internal_Rela *relocs;
5907 {
5908   Elf_Internal_Shdr *symtab_hdr;
5909   struct elf_link_hash_entry **sym_hashes;
5910   bfd_signed_vma *local_got_refcounts;
5911   const Elf_Internal_Rela *rel, *relend;
5912
5913   elf_section_data (sec)->local_dynrel = NULL;
5914
5915   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
5916   sym_hashes = elf_sym_hashes (abfd);
5917   local_got_refcounts = elf_local_got_refcounts (abfd);
5918
5919   relend = relocs + sec->reloc_count;
5920   for (rel = relocs; rel < relend; rel++)
5921     {
5922       unsigned long r_symndx;
5923       unsigned int r_type;
5924       struct elf_link_hash_entry *h = NULL;
5925 #ifdef INCLUDE_SHMEDIA
5926       int seen_stt_datalabel = 0;
5927 #endif
5928
5929       r_symndx = ELF32_R_SYM (rel->r_info);
5930       if (r_symndx >= symtab_hdr->sh_info)
5931         {
5932           struct elf_sh_link_hash_entry *eh;
5933           struct elf_sh_dyn_relocs **pp;
5934           struct elf_sh_dyn_relocs *p;
5935
5936           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
5937 #ifdef INCLUDE_SHMEDIA
5938           while (h->root.type == bfd_link_hash_indirect
5939                  || h->root.type == bfd_link_hash_warning)
5940             {
5941               seen_stt_datalabel |= h->type == STT_DATALABEL;
5942               h = (struct elf_link_hash_entry *) h->root.u.i.link;
5943             }
5944 #endif
5945           eh = (struct elf_sh_link_hash_entry *) h;
5946           for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
5947             if (p->sec == sec)
5948               {
5949                 /* Everything must go for SEC.  */
5950                 *pp = p->next;
5951                 break;
5952               }
5953         }
5954
5955       r_type = ELF32_R_TYPE (rel->r_info);
5956       switch (sh_elf_optimized_tls_reloc (info, r_type, h != NULL))
5957         {
5958         case R_SH_TLS_LD_32:
5959           if (sh_elf_hash_table (info)->tls_ldm_got.refcount > 0)
5960             sh_elf_hash_table (info)->tls_ldm_got.refcount -= 1;
5961           break;
5962
5963         case R_SH_GOT32:
5964         case R_SH_GOTOFF:
5965         case R_SH_GOTPC:
5966 #ifdef INCLUDE_SHMEDIA
5967         case R_SH_GOT_LOW16:
5968         case R_SH_GOT_MEDLOW16:
5969         case R_SH_GOT_MEDHI16:
5970         case R_SH_GOT_HI16:
5971         case R_SH_GOT10BY4:
5972         case R_SH_GOT10BY8:
5973         case R_SH_GOTOFF_LOW16:
5974         case R_SH_GOTOFF_MEDLOW16:
5975         case R_SH_GOTOFF_MEDHI16:
5976         case R_SH_GOTOFF_HI16:
5977         case R_SH_GOTPC_LOW16:
5978         case R_SH_GOTPC_MEDLOW16:
5979         case R_SH_GOTPC_MEDHI16:
5980         case R_SH_GOTPC_HI16:
5981 #endif
5982         case R_SH_TLS_GD_32:
5983         case R_SH_TLS_IE_32:
5984           if (h != NULL)
5985             {
5986 #ifdef INCLUDE_SHMEDIA
5987               if (seen_stt_datalabel)
5988                 {
5989                   struct elf_sh_link_hash_entry *eh;
5990                   eh = (struct elf_sh_link_hash_entry *) h;
5991                   if (eh->datalabel_got.refcount > 0)
5992                     eh->datalabel_got.refcount -= 1;
5993                 }
5994               else
5995 #endif
5996                 if (h->got.refcount > 0)
5997                   h->got.refcount -= 1;
5998             }
5999           else if (local_got_refcounts != NULL)
6000             {
6001 #ifdef INCLUDE_SHMEDIA
6002               if (rel->r_addend & 1)
6003                 {
6004                   if (local_got_refcounts[symtab_hdr->sh_info + r_symndx] > 0)
6005                     local_got_refcounts[symtab_hdr->sh_info + r_symndx] -= 1;
6006                 }
6007               else
6008 #endif
6009                 if (local_got_refcounts[r_symndx] > 0)
6010                   local_got_refcounts[r_symndx] -= 1;
6011             }
6012           break;
6013
6014         case R_SH_DIR32:
6015         case R_SH_REL32:
6016           if (info->shared)
6017             break;
6018           /* Fall thru */
6019
6020         case R_SH_PLT32:
6021 #ifdef INCLUDE_SHMEDIA
6022         case R_SH_PLT_LOW16:
6023         case R_SH_PLT_MEDLOW16:
6024         case R_SH_PLT_MEDHI16:
6025         case R_SH_PLT_HI16:
6026 #endif
6027           if (h != NULL)
6028             {
6029               if (h->plt.refcount > 0)
6030                 h->plt.refcount -= 1;
6031             }
6032           break;
6033
6034         case R_SH_GOTPLT32:
6035 #ifdef INCLUDE_SHMEDIA
6036         case R_SH_GOTPLT_LOW16:
6037         case R_SH_GOTPLT_MEDLOW16:
6038         case R_SH_GOTPLT_MEDHI16:
6039         case R_SH_GOTPLT_HI16:
6040         case R_SH_GOTPLT10BY4:
6041         case R_SH_GOTPLT10BY8:
6042 #endif
6043           if (h != NULL)
6044             {
6045               struct elf_sh_link_hash_entry *eh;
6046               eh = (struct elf_sh_link_hash_entry *) h;
6047               if (eh->gotplt_refcount > 0)
6048                 {
6049                   eh->gotplt_refcount -= 1;
6050                   if (h->plt.refcount > 0)
6051                     h->plt.refcount -= 1;
6052                 }
6053 #ifdef INCLUDE_SHMEDIA
6054               else if (seen_stt_datalabel)
6055                 {
6056                   if (eh->datalabel_got.refcount > 0)
6057                     eh->datalabel_got.refcount -= 1;
6058                 }
6059 #endif
6060               else if (h->got.refcount > 0)
6061                 h->got.refcount -= 1;
6062             }
6063           else if (local_got_refcounts != NULL)
6064             {
6065 #ifdef INCLUDE_SHMEDIA
6066               if (rel->r_addend & 1)
6067                 {
6068                   if (local_got_refcounts[symtab_hdr->sh_info + r_symndx] > 0)
6069                     local_got_refcounts[symtab_hdr->sh_info + r_symndx] -= 1;
6070                 }
6071               else
6072 #endif
6073                 if (local_got_refcounts[r_symndx] > 0)
6074                   local_got_refcounts[r_symndx] -= 1;
6075             }
6076           break;
6077
6078         default:
6079           break;
6080         }
6081     }
6082
6083   return TRUE;
6084 }
6085
6086 /* Copy the extra info we tack onto an elf_link_hash_entry.  */
6087
6088 static void
6089 sh_elf_copy_indirect_symbol (bed, dir, ind)
6090      struct elf_backend_data *bed;
6091      struct elf_link_hash_entry *dir, *ind;
6092 {
6093   struct elf_sh_link_hash_entry *edir, *eind;
6094 #ifdef INCLUDE_SHMEDIA
6095   bfd_signed_vma tmp;
6096 #endif
6097
6098   edir = (struct elf_sh_link_hash_entry *) dir;
6099   eind = (struct elf_sh_link_hash_entry *) ind;
6100
6101   if (eind->dyn_relocs != NULL)
6102     {
6103       if (edir->dyn_relocs != NULL)
6104         {
6105           struct elf_sh_dyn_relocs **pp;
6106           struct elf_sh_dyn_relocs *p;
6107
6108           BFD_ASSERT (ind->root.type != bfd_link_hash_indirect);
6109
6110           /* Add reloc counts against the weak sym to the strong sym
6111              list.  Merge any entries against the same section.  */
6112           for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
6113             {
6114               struct elf_sh_dyn_relocs *q;
6115
6116               for (q = edir->dyn_relocs; q != NULL; q = q->next)
6117                 if (q->sec == p->sec)
6118                   {
6119                     q->pc_count += p->pc_count;
6120                     q->count += p->count;
6121                     *pp = p->next;
6122                     break;
6123                   }
6124               if (q == NULL)
6125                 pp = &p->next;
6126             }
6127           *pp = edir->dyn_relocs;
6128         }
6129
6130       edir->dyn_relocs = eind->dyn_relocs;
6131       eind->dyn_relocs = NULL;
6132     }
6133   edir->gotplt_refcount = eind->gotplt_refcount;
6134   eind->gotplt_refcount = 0;
6135 #ifdef INCLUDE_SHMEDIA
6136   tmp = edir->datalabel_got.refcount;
6137   if (tmp < 1)
6138     {
6139       edir->datalabel_got.refcount = eind->datalabel_got.refcount;
6140       eind->datalabel_got.refcount = tmp;
6141     }
6142   else
6143     BFD_ASSERT (eind->datalabel_got.refcount < 1);
6144 #endif
6145
6146   if (ind->root.type == bfd_link_hash_indirect
6147       && dir->got.refcount <= 0)
6148     {
6149       edir->tls_type = eind->tls_type;
6150       eind->tls_type = GOT_UNKNOWN;
6151     }
6152
6153   if (ind->root.type != bfd_link_hash_indirect
6154       && (dir->elf_link_hash_flags & ELF_LINK_HASH_DYNAMIC_ADJUSTED) != 0)
6155     /* If called to transfer flags for a weakdef during processing
6156        of elf_adjust_dynamic_symbol, don't copy ELF_LINK_NON_GOT_REF.
6157        We clear it ourselves for ELIMINATE_COPY_RELOCS.  */
6158     dir->elf_link_hash_flags |=
6159       (ind->elf_link_hash_flags & (ELF_LINK_HASH_REF_DYNAMIC
6160                                    | ELF_LINK_HASH_REF_REGULAR
6161                                    | ELF_LINK_HASH_REF_REGULAR_NONWEAK));
6162   else
6163     _bfd_elf_link_hash_copy_indirect (bed, dir, ind);
6164 }
6165
6166 static int
6167 sh_elf_optimized_tls_reloc (info, r_type, is_local)
6168      struct bfd_link_info *info;
6169      int r_type;
6170      int is_local;
6171 {
6172   if (info->shared)
6173     return r_type;
6174
6175   switch (r_type)
6176     {
6177     case R_SH_TLS_GD_32:
6178     case R_SH_TLS_IE_32:
6179       if (is_local)
6180         return R_SH_TLS_LE_32;
6181       return R_SH_TLS_IE_32;
6182     case R_SH_TLS_LD_32:
6183       return R_SH_TLS_LE_32;
6184     }
6185
6186   return r_type;
6187 }
6188
6189 /* Look through the relocs for a section during the first phase.
6190    Since we don't do .gots or .plts, we just need to consider the
6191    virtual table relocs for gc.  */
6192
6193 static bfd_boolean
6194 sh_elf_check_relocs (abfd, info, sec, relocs)
6195      bfd *abfd;
6196      struct bfd_link_info *info;
6197      asection *sec;
6198      const Elf_Internal_Rela *relocs;
6199 {
6200   Elf_Internal_Shdr *symtab_hdr;
6201   struct elf_link_hash_entry **sym_hashes, **sym_hashes_end;
6202   struct elf_sh_link_hash_table *htab;
6203   const Elf_Internal_Rela *rel;
6204   const Elf_Internal_Rela *rel_end;
6205   bfd_vma *local_got_offsets;
6206   asection *sgot;
6207   asection *srelgot;
6208   asection *sreloc;
6209   unsigned int r_type;
6210   int tls_type, old_tls_type;
6211
6212   sgot = NULL;
6213   srelgot = NULL;
6214   sreloc = NULL;
6215
6216   if (info->relocatable)
6217     return TRUE;
6218
6219   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
6220   sym_hashes = elf_sym_hashes (abfd);
6221   sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof (Elf32_External_Sym);
6222   if (!elf_bad_symtab (abfd))
6223     sym_hashes_end -= symtab_hdr->sh_info;
6224
6225   htab = sh_elf_hash_table (info);
6226   local_got_offsets = elf_local_got_offsets (abfd);
6227
6228   rel_end = relocs + sec->reloc_count;
6229   for (rel = relocs; rel < rel_end; rel++)
6230     {
6231       struct elf_link_hash_entry *h;
6232       unsigned long r_symndx;
6233 #ifdef INCLUDE_SHMEDIA
6234       int seen_stt_datalabel = 0;
6235 #endif
6236
6237       r_symndx = ELF32_R_SYM (rel->r_info);
6238       r_type = ELF32_R_TYPE (rel->r_info);
6239
6240       if (r_symndx < symtab_hdr->sh_info)
6241         h = NULL;
6242       else
6243         {
6244           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
6245 #ifdef INCLUDE_SHMEDIA
6246           while (h->root.type == bfd_link_hash_indirect
6247                  || h->root.type == bfd_link_hash_warning)
6248             {
6249               seen_stt_datalabel |= h->type == STT_DATALABEL;
6250               h = (struct elf_link_hash_entry *) h->root.u.i.link;
6251             }
6252 #endif
6253         }
6254
6255       r_type = sh_elf_optimized_tls_reloc (info, r_type, h == NULL);
6256       if (! info->shared
6257           && r_type == R_SH_TLS_IE_32
6258           && h != NULL
6259           && h->root.type != bfd_link_hash_undefined
6260           && h->root.type != bfd_link_hash_undefweak
6261           && (h->dynindx == -1
6262               || (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)))
6263         r_type = R_SH_TLS_LE_32;
6264
6265       /* Some relocs require a global offset table.  */
6266       if (htab->sgot == NULL)
6267         {
6268           switch (r_type)
6269             {
6270             case R_SH_GOTPLT32:
6271             case R_SH_GOT32:
6272             case R_SH_GOTOFF:
6273             case R_SH_GOTPC:
6274 #ifdef INCLUDE_SHMEDIA
6275             case R_SH_GOTPLT_LOW16:
6276             case R_SH_GOTPLT_MEDLOW16:
6277             case R_SH_GOTPLT_MEDHI16:
6278             case R_SH_GOTPLT_HI16:
6279             case R_SH_GOTPLT10BY4:
6280             case R_SH_GOTPLT10BY8:
6281             case R_SH_GOT_LOW16:
6282             case R_SH_GOT_MEDLOW16:
6283             case R_SH_GOT_MEDHI16:
6284             case R_SH_GOT_HI16:
6285             case R_SH_GOT10BY4:
6286             case R_SH_GOT10BY8:
6287             case R_SH_GOTOFF_LOW16:
6288             case R_SH_GOTOFF_MEDLOW16:
6289             case R_SH_GOTOFF_MEDHI16:
6290             case R_SH_GOTOFF_HI16:
6291             case R_SH_GOTPC_LOW16:
6292             case R_SH_GOTPC_MEDLOW16:
6293             case R_SH_GOTPC_MEDHI16:
6294             case R_SH_GOTPC_HI16:
6295 #endif
6296             case R_SH_TLS_GD_32:
6297             case R_SH_TLS_LD_32:
6298             case R_SH_TLS_IE_32:
6299               if (htab->sgot == NULL)
6300                 {
6301                   if (htab->root.dynobj == NULL)
6302                     htab->root.dynobj = abfd;
6303                   if (!create_got_section (htab->root.dynobj, info))
6304                     return FALSE;
6305                 }
6306               break;
6307
6308             default:
6309               break;
6310             }
6311         }
6312
6313       switch (r_type)
6314         {
6315           /* This relocation describes the C++ object vtable hierarchy.
6316              Reconstruct it for later use during GC.  */
6317         case R_SH_GNU_VTINHERIT:
6318           if (!_bfd_elf32_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
6319             return FALSE;
6320           break;
6321
6322           /* This relocation describes which C++ vtable entries are actually
6323              used.  Record for later use during GC.  */
6324         case R_SH_GNU_VTENTRY:
6325           if (!_bfd_elf32_gc_record_vtentry (abfd, sec, h, rel->r_addend))
6326             return FALSE;
6327           break;
6328
6329         case R_SH_TLS_IE_32:
6330           if (info->shared)
6331             info->flags |= DF_STATIC_TLS;
6332
6333           /* FALLTHROUGH */
6334         force_got:
6335         case R_SH_TLS_GD_32:
6336         case R_SH_GOT32:
6337 #ifdef INCLUDE_SHMEDIA
6338         case R_SH_GOT_LOW16:
6339         case R_SH_GOT_MEDLOW16:
6340         case R_SH_GOT_MEDHI16:
6341         case R_SH_GOT_HI16:
6342         case R_SH_GOT10BY4:
6343         case R_SH_GOT10BY8:
6344 #endif
6345           switch (r_type)
6346             {
6347             default:
6348               tls_type = GOT_NORMAL;
6349               break;
6350             case R_SH_TLS_GD_32:
6351               tls_type = GOT_TLS_GD;
6352               break;
6353             case R_SH_TLS_IE_32:
6354               tls_type = GOT_TLS_IE;
6355               break;
6356             }
6357
6358           if (h != NULL)
6359             {
6360 #ifdef INCLUDE_SHMEDIA
6361               if (seen_stt_datalabel)
6362                 {
6363                   struct elf_sh_link_hash_entry *eh
6364                     = (struct elf_sh_link_hash_entry *) h;
6365
6366                   eh->datalabel_got.refcount += 1;
6367                 }
6368               else
6369 #endif
6370                 h->got.refcount += 1;
6371               old_tls_type = sh_elf_hash_entry (h)->tls_type;
6372             }
6373           else
6374             {
6375               bfd_signed_vma *local_got_refcounts;
6376
6377               /* This is a global offset table entry for a local
6378                  symbol.  */
6379               local_got_refcounts = elf_local_got_refcounts (abfd);
6380               if (local_got_refcounts == NULL)
6381                 {
6382                   bfd_size_type size;
6383
6384                   size = symtab_hdr->sh_info;
6385                   size *= sizeof (bfd_signed_vma);
6386 #ifdef INCLUDE_SHMEDIA
6387                   /* Reserve space for both the datalabel and
6388                      codelabel local GOT offsets.  */
6389                   size *= 2;
6390 #endif
6391                   size += symtab_hdr->sh_info;
6392                   local_got_refcounts = ((bfd_signed_vma *)
6393                                          bfd_zalloc (abfd, size));
6394                   if (local_got_refcounts == NULL)
6395                     return FALSE;
6396                   elf_local_got_refcounts (abfd) = local_got_refcounts;
6397 #ifdef  INCLUDE_SHMEDIA
6398                   /* Take care of both the datalabel and codelabel local
6399                      GOT offsets.  */
6400                   sh_elf_local_got_tls_type (abfd)
6401                     = (char *) (local_got_refcounts + 2 * symtab_hdr->sh_info);
6402 #else
6403                   sh_elf_local_got_tls_type (abfd)
6404                     = (char *) (local_got_refcounts + symtab_hdr->sh_info);
6405 #endif
6406                 }
6407 #ifdef INCLUDE_SHMEDIA
6408               if (rel->r_addend & 1)
6409                 local_got_refcounts[symtab_hdr->sh_info + r_symndx] += 1;
6410               else
6411 #endif
6412                 local_got_refcounts[r_symndx] += 1;
6413               old_tls_type = sh_elf_local_got_tls_type (abfd) [r_symndx];
6414             }
6415
6416           /* If a TLS symbol is accessed using IE at least once,
6417              there is no point to use dynamic model for it.  */
6418           if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
6419               && (old_tls_type != GOT_TLS_GD || tls_type != GOT_TLS_IE))
6420             {
6421               if (old_tls_type == GOT_TLS_IE && tls_type == GOT_TLS_GD)
6422                 tls_type = GOT_TLS_IE;
6423               else
6424                 {
6425                   (*_bfd_error_handler)
6426                     (_("%s: `%s' accessed both as normal and thread local symbol"),
6427                      bfd_archive_filename (abfd), h->root.root.string);
6428                   return FALSE;
6429                 }
6430             }
6431
6432           if (old_tls_type != tls_type)
6433             {
6434               if (h != NULL)
6435                 sh_elf_hash_entry (h)->tls_type = tls_type;
6436               else
6437                 sh_elf_local_got_tls_type (abfd) [r_symndx] = tls_type;
6438             }
6439
6440           break;
6441
6442         case R_SH_TLS_LD_32:
6443           sh_elf_hash_table(info)->tls_ldm_got.refcount += 1;
6444           break;
6445
6446         case R_SH_GOTPLT32:
6447 #ifdef INCLUDE_SHMEDIA
6448         case R_SH_GOTPLT_LOW16:
6449         case R_SH_GOTPLT_MEDLOW16:
6450         case R_SH_GOTPLT_MEDHI16:
6451         case R_SH_GOTPLT_HI16:
6452         case R_SH_GOTPLT10BY4:
6453         case R_SH_GOTPLT10BY8:
6454 #endif
6455           /* If this is a local symbol, we resolve it directly without
6456              creating a procedure linkage table entry.  */
6457
6458           if (h == NULL
6459               || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL)
6460               || ! info->shared
6461               || info->symbolic
6462               || h->dynindx == -1)
6463             goto force_got;
6464
6465           h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
6466           h->plt.refcount += 1;
6467           ((struct elf_sh_link_hash_entry *) h)->gotplt_refcount += 1;
6468
6469           break;
6470
6471         case R_SH_PLT32:
6472 #ifdef INCLUDE_SHMEDIA
6473         case R_SH_PLT_LOW16:
6474         case R_SH_PLT_MEDLOW16:
6475         case R_SH_PLT_MEDHI16:
6476         case R_SH_PLT_HI16:
6477 #endif
6478           /* This symbol requires a procedure linkage table entry.  We
6479              actually build the entry in adjust_dynamic_symbol,
6480              because this might be a case of linking PIC code which is
6481              never referenced by a dynamic object, in which case we
6482              don't need to generate a procedure linkage table entry
6483              after all.  */
6484
6485           /* If this is a local symbol, we resolve it directly without
6486              creating a procedure linkage table entry.  */
6487           if (h == NULL)
6488             continue;
6489
6490           if (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL)
6491             break;
6492
6493           h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
6494           h->plt.refcount += 1;
6495           break;
6496
6497         case R_SH_DIR32:
6498         case R_SH_REL32:
6499           if (h != NULL && ! info->shared)
6500             {
6501               h->elf_link_hash_flags |= ELF_LINK_NON_GOT_REF;
6502               h->plt.refcount += 1;
6503             }
6504
6505           /* If we are creating a shared library, and this is a reloc
6506              against a global symbol, or a non PC relative reloc
6507              against a local symbol, then we need to copy the reloc
6508              into the shared library.  However, if we are linking with
6509              -Bsymbolic, we do not need to copy a reloc against a
6510              global symbol which is defined in an object we are
6511              including in the link (i.e., DEF_REGULAR is set).  At
6512              this point we have not seen all the input files, so it is
6513              possible that DEF_REGULAR is not set now but will be set
6514              later (it is never cleared).  We account for that
6515              possibility below by storing information in the
6516              dyn_relocs field of the hash table entry. A similar
6517              situation occurs when creating shared libraries and symbol
6518              visibility changes render the symbol local.
6519
6520              If on the other hand, we are creating an executable, we
6521              may need to keep relocations for symbols satisfied by a
6522              dynamic library if we manage to avoid copy relocs for the
6523              symbol.  */
6524           if ((info->shared
6525                && (sec->flags & SEC_ALLOC) != 0
6526                && (r_type != R_SH_REL32
6527                    || (h != NULL
6528                        && (! info->symbolic
6529                            || h->root.type == bfd_link_hash_defweak
6530                            || (h->elf_link_hash_flags
6531                                & ELF_LINK_HASH_DEF_REGULAR) == 0))))
6532               || (! info->shared
6533                   && (sec->flags & SEC_ALLOC) != 0
6534                   && h != NULL
6535                   && (h->root.type == bfd_link_hash_defweak
6536                       || (h->elf_link_hash_flags
6537                           & ELF_LINK_HASH_DEF_REGULAR) == 0)))
6538             {
6539               struct elf_sh_dyn_relocs *p;
6540               struct elf_sh_dyn_relocs **head;
6541
6542               if (htab->root.dynobj == NULL)
6543                 htab->root.dynobj = abfd;
6544
6545               /* When creating a shared object, we must copy these
6546                  reloc types into the output file.  We create a reloc
6547                  section in dynobj and make room for this reloc.  */
6548               if (sreloc == NULL)
6549                 {
6550                   const char *name;
6551
6552                   name = (bfd_elf_string_from_elf_section
6553                           (abfd,
6554                            elf_elfheader (abfd)->e_shstrndx,
6555                            elf_section_data (sec)->rel_hdr.sh_name));
6556                   if (name == NULL)
6557                     return FALSE;
6558
6559                   BFD_ASSERT (strncmp (name, ".rela", 5) == 0
6560                               && strcmp (bfd_get_section_name (abfd, sec),
6561                                          name + 5) == 0);
6562
6563                   sreloc = bfd_get_section_by_name (htab->root.dynobj, name);
6564                   if (sreloc == NULL)
6565                     {
6566                       flagword flags;
6567
6568                       sreloc = bfd_make_section (htab->root.dynobj, name);
6569                       flags = (SEC_HAS_CONTENTS | SEC_READONLY
6570                                | SEC_IN_MEMORY | SEC_LINKER_CREATED);
6571                       if ((sec->flags & SEC_ALLOC) != 0)
6572                         flags |= SEC_ALLOC | SEC_LOAD;
6573                       if (sreloc == NULL
6574                           || ! bfd_set_section_flags (htab->root.dynobj,
6575                                                       sreloc, flags)
6576                           || ! bfd_set_section_alignment (htab->root.dynobj,
6577                                                           sreloc, 2))
6578                         return FALSE;
6579                     }
6580                   if (sec->flags & SEC_READONLY)
6581                     info->flags |= DF_TEXTREL;
6582                   elf_section_data (sec)->sreloc = sreloc;
6583                 }
6584
6585               /* If this is a global symbol, we count the number of
6586                  relocations we need for this symbol.  */
6587               if (h != NULL)
6588                 head = &((struct elf_sh_link_hash_entry *) h)->dyn_relocs;
6589               else
6590                 {
6591                   asection *s;
6592
6593                   /* Track dynamic relocs needed for local syms too.  */
6594                   s = bfd_section_from_r_symndx (abfd, &htab->sym_sec,
6595                                                  sec, r_symndx);
6596                   if (s == NULL)
6597                     return FALSE;
6598
6599                   head = ((struct elf_sh_dyn_relocs **)
6600                           &elf_section_data (s)->local_dynrel);
6601                 }
6602
6603               p = *head;
6604               if (p == NULL || p->sec != sec)
6605                 {
6606                   bfd_size_type amt = sizeof (*p);
6607                   p = bfd_alloc (htab->root.dynobj, amt);
6608                   if (p == NULL)
6609                     return FALSE;
6610                   p->next = *head;
6611                   *head = p;
6612                   p->sec = sec;
6613                   p->count = 0;
6614                   p->pc_count = 0;
6615                 }
6616
6617               p->count += 1;
6618               if (r_type == R_SH_REL32)
6619                 p->pc_count += 1;
6620             }
6621
6622           break;
6623
6624         case R_SH_TLS_LE_32:
6625           if (info->shared)
6626             {
6627               (*_bfd_error_handler) (_("%s: TLS local exec code cannot be linked into shared objects"),
6628                                      bfd_archive_filename (abfd));
6629               return FALSE;
6630             }
6631
6632           break;
6633
6634         case R_SH_TLS_LDO_32:
6635           /* Nothing to do.  */
6636           break;
6637
6638         default:
6639           break;
6640         }
6641     }
6642
6643   return TRUE;
6644 }
6645
6646 #ifndef sh_elf_set_mach_from_flags
6647 static bfd_boolean
6648 sh_elf_set_mach_from_flags (abfd)
6649      bfd *abfd;
6650 {
6651   flagword flags = elf_elfheader (abfd)->e_flags;
6652
6653   switch (flags & EF_SH_MACH_MASK)
6654     {
6655     case EF_SH1:
6656       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh);
6657       break;
6658     case EF_SH2:
6659       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh2);
6660       break;
6661     case EF_SH2E:
6662       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh2e);
6663       break;
6664     case EF_SH_DSP:
6665       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh_dsp);
6666       break;
6667     case EF_SH3:
6668       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh3);
6669       break;
6670     case EF_SH3_DSP:
6671       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh3_dsp);
6672       break;
6673     case EF_SH3E:
6674       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh3e);
6675       break;
6676     case EF_SH_UNKNOWN:
6677     case EF_SH4:
6678       bfd_default_set_arch_mach (abfd, bfd_arch_sh, bfd_mach_sh4);
6679       break;
6680     default:
6681       return FALSE;
6682     }
6683   return TRUE;
6684 }
6685 #endif /* not sh_elf_set_mach_from_flags */
6686
6687 #ifndef sh_elf_set_private_flags
6688 /* Function to keep SH specific file flags.  */
6689
6690 static bfd_boolean
6691 sh_elf_set_private_flags (abfd, flags)
6692      bfd *abfd;
6693      flagword flags;
6694 {
6695   BFD_ASSERT (! elf_flags_init (abfd)
6696               || elf_elfheader (abfd)->e_flags == flags);
6697
6698   elf_elfheader (abfd)->e_flags = flags;
6699   elf_flags_init (abfd) = TRUE;
6700   return sh_elf_set_mach_from_flags (abfd);
6701 }
6702 #endif /* not sh_elf_set_private_flags */
6703
6704 #ifndef sh_elf_copy_private_data
6705 /* Copy backend specific data from one object module to another */
6706
6707 static bfd_boolean
6708 sh_elf_copy_private_data (ibfd, obfd)
6709      bfd * ibfd;
6710      bfd * obfd;
6711 {
6712   if (   bfd_get_flavour (ibfd) != bfd_target_elf_flavour
6713       || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
6714     return TRUE;
6715
6716   return sh_elf_set_private_flags (obfd, elf_elfheader (ibfd)->e_flags);
6717 }
6718 #endif /* not sh_elf_copy_private_data */
6719
6720 #ifndef sh_elf_merge_private_data
6721 /* This routine checks for linking big and little endian objects
6722    together, and for linking sh-dsp with sh3e / sh4 objects.  */
6723
6724 static bfd_boolean
6725 sh_elf_merge_private_data (ibfd, obfd)
6726      bfd *ibfd;
6727      bfd *obfd;
6728 {
6729   flagword old_flags, new_flags;
6730
6731   if (! _bfd_generic_verify_endian_match (ibfd, obfd))
6732     return FALSE;
6733
6734   if (   bfd_get_flavour (ibfd) != bfd_target_elf_flavour
6735       || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
6736     return TRUE;
6737
6738   if (! elf_flags_init (obfd))
6739     {
6740       /* This happens when ld starts out with a 'blank' output file.  */
6741       elf_flags_init (obfd) = TRUE;
6742       elf_elfheader (obfd)->e_flags = EF_SH1;
6743     }
6744   old_flags = elf_elfheader (obfd)->e_flags;
6745   new_flags = elf_elfheader (ibfd)->e_flags;
6746   if ((EF_SH_HAS_DSP (old_flags) && EF_SH_HAS_FP (new_flags))
6747       || (EF_SH_HAS_DSP (new_flags) && EF_SH_HAS_FP (old_flags)))
6748     {
6749       (*_bfd_error_handler)
6750         ("%s: uses %s instructions while previous modules use %s instructions",
6751          bfd_archive_filename (ibfd),
6752          EF_SH_HAS_DSP (new_flags) ? "dsp" : "floating point",
6753          EF_SH_HAS_DSP (new_flags) ? "floating point" : "dsp");
6754       bfd_set_error (bfd_error_bad_value);
6755       return FALSE;
6756     }
6757   elf_elfheader (obfd)->e_flags = EF_SH_MERGE_MACH (old_flags, new_flags);
6758
6759   return sh_elf_set_mach_from_flags (obfd);
6760 }
6761 #endif /* not sh_elf_merge_private_data */
6762
6763 /* Override the generic function because we need to store sh_elf_obj_tdata
6764    as the specific tdata.  We set also the machine architecture from flags
6765    here.  */
6766
6767 static bfd_boolean
6768 sh_elf_object_p (abfd)
6769   bfd *abfd;
6770 {
6771   struct sh_elf_obj_tdata *new_tdata;
6772   bfd_size_type amt = sizeof (struct sh_elf_obj_tdata);
6773
6774   if (!sh_elf_set_mach_from_flags (abfd))
6775     return FALSE;
6776
6777   /* Allocate our special target data.  */
6778   new_tdata = bfd_zalloc (abfd, amt);
6779   if (new_tdata == NULL)
6780     return FALSE;
6781   new_tdata->root = *abfd->tdata.elf_obj_data;
6782   abfd->tdata.any = new_tdata;
6783   return TRUE;
6784 }
6785
6786 /* Finish up dynamic symbol handling.  We set the contents of various
6787    dynamic sections here.  */
6788
6789 static bfd_boolean
6790 sh_elf_finish_dynamic_symbol (output_bfd, info, h, sym)
6791      bfd *output_bfd;
6792      struct bfd_link_info *info;
6793      struct elf_link_hash_entry *h;
6794      Elf_Internal_Sym *sym;
6795 {
6796   struct elf_sh_link_hash_table *htab;
6797
6798   htab = sh_elf_hash_table (info);
6799
6800   if (h->plt.offset != (bfd_vma) -1)
6801     {
6802       asection *splt;
6803       asection *sgot;
6804       asection *srel;
6805
6806       bfd_vma plt_index;
6807       bfd_vma got_offset;
6808       Elf_Internal_Rela rel;
6809       bfd_byte *loc;
6810
6811       /* This symbol has an entry in the procedure linkage table.  Set
6812          it up.  */
6813
6814       BFD_ASSERT (h->dynindx != -1);
6815
6816       splt = htab->splt;
6817       sgot = htab->sgotplt;
6818       srel = htab->srelplt;
6819       BFD_ASSERT (splt != NULL && sgot != NULL && srel != NULL);
6820
6821       /* Get the index in the procedure linkage table which
6822          corresponds to this symbol.  This is the index of this symbol
6823          in all the symbols for which we are making plt entries.  The
6824          first entry in the procedure linkage table is reserved.  */
6825       plt_index = h->plt.offset / elf_sh_sizeof_plt (info) - 1;
6826
6827       /* Get the offset into the .got table of the entry that
6828          corresponds to this function.  Each .got entry is 4 bytes.
6829          The first three are reserved.  */
6830       got_offset = (plt_index + 3) * 4;
6831
6832 #ifdef GOT_BIAS
6833       if (info->shared)
6834         got_offset -= GOT_BIAS;
6835 #endif
6836
6837       /* Fill in the entry in the procedure linkage table.  */
6838       if (! info->shared)
6839         {
6840           if (elf_sh_plt_entry == NULL)
6841             {
6842               elf_sh_plt_entry = (bfd_big_endian (output_bfd) ?
6843                                   elf_sh_plt_entry_be : elf_sh_plt_entry_le);
6844             }
6845           memcpy (splt->contents + h->plt.offset, elf_sh_plt_entry,
6846                   elf_sh_sizeof_plt (info));
6847 #ifdef INCLUDE_SHMEDIA
6848           movi_shori_putval (output_bfd,
6849                              (sgot->output_section->vma
6850                               + sgot->output_offset
6851                               + got_offset),
6852                              (splt->contents + h->plt.offset
6853                               + elf_sh_plt_symbol_offset (info)));
6854
6855           /* Set bottom bit because its for a branch to SHmedia */
6856           movi_shori_putval (output_bfd,
6857                              (splt->output_section->vma + splt->output_offset)
6858                              | 1,
6859                              (splt->contents + h->plt.offset
6860                               + elf_sh_plt_plt0_offset (info)));
6861 #else
6862           bfd_put_32 (output_bfd,
6863                       (sgot->output_section->vma
6864                        + sgot->output_offset
6865                        + got_offset),
6866                       (splt->contents + h->plt.offset
6867                        + elf_sh_plt_symbol_offset (info)));
6868
6869           bfd_put_32 (output_bfd,
6870                       (splt->output_section->vma + splt->output_offset),
6871                       (splt->contents + h->plt.offset
6872                        + elf_sh_plt_plt0_offset (info)));
6873 #endif
6874         }
6875       else
6876         {
6877           if (elf_sh_pic_plt_entry == NULL)
6878             {
6879               elf_sh_pic_plt_entry = (bfd_big_endian (output_bfd) ?
6880                                       elf_sh_pic_plt_entry_be :
6881                                       elf_sh_pic_plt_entry_le);
6882             }
6883           memcpy (splt->contents + h->plt.offset, elf_sh_pic_plt_entry,
6884                   elf_sh_sizeof_plt (info));
6885 #ifdef INCLUDE_SHMEDIA
6886           movi_shori_putval (output_bfd, got_offset,
6887                              (splt->contents + h->plt.offset
6888                               + elf_sh_plt_symbol_offset (info)));
6889 #else
6890           bfd_put_32 (output_bfd, got_offset,
6891                       (splt->contents + h->plt.offset
6892                        + elf_sh_plt_symbol_offset (info)));
6893 #endif
6894         }
6895
6896 #ifdef GOT_BIAS
6897       if (info->shared)
6898         got_offset += GOT_BIAS;
6899 #endif
6900
6901 #ifdef INCLUDE_SHMEDIA
6902       movi_shori_putval (output_bfd,
6903                          plt_index * sizeof (Elf32_External_Rela),
6904                          (splt->contents + h->plt.offset
6905                           + elf_sh_plt_reloc_offset (info)));
6906 #else
6907       bfd_put_32 (output_bfd, plt_index * sizeof (Elf32_External_Rela),
6908                   (splt->contents + h->plt.offset
6909                    + elf_sh_plt_reloc_offset (info)));
6910 #endif
6911
6912       /* Fill in the entry in the global offset table.  */
6913       bfd_put_32 (output_bfd,
6914                   (splt->output_section->vma
6915                    + splt->output_offset
6916                    + h->plt.offset
6917                    + elf_sh_plt_temp_offset (info)),
6918                   sgot->contents + got_offset);
6919
6920       /* Fill in the entry in the .rela.plt section.  */
6921       rel.r_offset = (sgot->output_section->vma
6922                       + sgot->output_offset
6923                       + got_offset);
6924       rel.r_info = ELF32_R_INFO (h->dynindx, R_SH_JMP_SLOT);
6925       rel.r_addend = 0;
6926 #ifdef GOT_BIAS
6927       rel.r_addend = GOT_BIAS;
6928 #endif
6929       loc = srel->contents + plt_index * sizeof (Elf32_External_Rela);
6930       bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
6931
6932       if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
6933         {
6934           /* Mark the symbol as undefined, rather than as defined in
6935              the .plt section.  Leave the value alone.  */
6936           sym->st_shndx = SHN_UNDEF;
6937         }
6938     }
6939
6940   if (h->got.offset != (bfd_vma) -1
6941       && sh_elf_hash_entry (h)->tls_type != GOT_TLS_GD
6942       && sh_elf_hash_entry (h)->tls_type != GOT_TLS_IE)
6943     {
6944       asection *sgot;
6945       asection *srel;
6946       Elf_Internal_Rela rel;
6947       bfd_byte *loc;
6948
6949       /* This symbol has an entry in the global offset table.  Set it
6950          up.  */
6951
6952       sgot = htab->sgot;
6953       srel = htab->srelgot;
6954       BFD_ASSERT (sgot != NULL && srel != NULL);
6955
6956       rel.r_offset = (sgot->output_section->vma
6957                       + sgot->output_offset
6958                       + (h->got.offset &~ (bfd_vma) 1));
6959
6960       /* If this is a static link, or it is a -Bsymbolic link and the
6961          symbol is defined locally or was forced to be local because
6962          of a version file, we just want to emit a RELATIVE reloc.
6963          The entry in the global offset table will already have been
6964          initialized in the relocate_section function.  */
6965       if (info->shared
6966           && (info->symbolic
6967               || h->dynindx == -1
6968               || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL))
6969           && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
6970         {
6971           rel.r_info = ELF32_R_INFO (0, R_SH_RELATIVE);
6972           rel.r_addend = (h->root.u.def.value
6973                           + h->root.u.def.section->output_section->vma
6974                           + h->root.u.def.section->output_offset);
6975         }
6976       else
6977         {
6978           bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got.offset);
6979           rel.r_info = ELF32_R_INFO (h->dynindx, R_SH_GLOB_DAT);
6980           rel.r_addend = 0;
6981         }
6982
6983       loc = srel->contents;
6984       loc += srel->reloc_count++ * sizeof (Elf32_External_Rela);
6985       bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
6986     }
6987
6988 #ifdef INCLUDE_SHMEDIA
6989   {
6990     struct elf_sh_link_hash_entry *eh;
6991
6992     eh = (struct elf_sh_link_hash_entry *) h;
6993     if (eh->datalabel_got.offset != (bfd_vma) -1)
6994       {
6995         asection *sgot;
6996         asection *srel;
6997         Elf_Internal_Rela rel;
6998         bfd_byte *loc;
6999
7000         /* This symbol has a datalabel entry in the global offset table.
7001            Set it up.  */
7002
7003         sgot = htab->sgot;
7004         srel = htab->srelgot;
7005         BFD_ASSERT (sgot != NULL && srel != NULL);
7006
7007         rel.r_offset = (sgot->output_section->vma
7008                         + sgot->output_offset
7009                         + (eh->datalabel_got.offset &~ (bfd_vma) 1));
7010
7011         /* If this is a static link, or it is a -Bsymbolic link and the
7012            symbol is defined locally or was forced to be local because
7013            of a version file, we just want to emit a RELATIVE reloc.
7014            The entry in the global offset table will already have been
7015            initialized in the relocate_section function.  */
7016         if (info->shared
7017             && (info->symbolic
7018                 || h->dynindx == -1
7019                 || (h->elf_link_hash_flags & ELF_LINK_FORCED_LOCAL))
7020             && (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR))
7021           {
7022             rel.r_info = ELF32_R_INFO (0, R_SH_RELATIVE);
7023             rel.r_addend = (h->root.u.def.value
7024                             + h->root.u.def.section->output_section->vma
7025                             + h->root.u.def.section->output_offset);
7026           }
7027         else
7028           {
7029             bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents
7030                         + eh->datalabel_got.offset);
7031             rel.r_info = ELF32_R_INFO (h->dynindx, R_SH_GLOB_DAT);
7032             rel.r_addend = 0;
7033           }
7034
7035         loc = srel->contents;
7036         loc += srel->reloc_count++ * sizeof (Elf32_External_Rela);
7037         bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
7038       }
7039   }
7040 #endif
7041
7042   if ((h->elf_link_hash_flags & ELF_LINK_HASH_NEEDS_COPY) != 0)
7043     {
7044       asection *s;
7045       Elf_Internal_Rela rel;
7046       bfd_byte *loc;
7047
7048       /* This symbol needs a copy reloc.  Set it up.  */
7049
7050       BFD_ASSERT (h->dynindx != -1
7051                   && (h->root.type == bfd_link_hash_defined
7052                       || h->root.type == bfd_link_hash_defweak));
7053
7054       s = bfd_get_section_by_name (h->root.u.def.section->owner,
7055                                    ".rela.bss");
7056       BFD_ASSERT (s != NULL);
7057
7058       rel.r_offset = (h->root.u.def.value
7059                       + h->root.u.def.section->output_section->vma
7060                       + h->root.u.def.section->output_offset);
7061       rel.r_info = ELF32_R_INFO (h->dynindx, R_SH_COPY);
7062       rel.r_addend = 0;
7063       loc = s->contents + s->reloc_count++ * sizeof (Elf32_External_Rela);
7064       bfd_elf32_swap_reloca_out (output_bfd, &rel, loc);
7065     }
7066
7067   /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute.  */
7068   if (strcmp (h->root.root.string, "_DYNAMIC") == 0
7069       || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
7070     sym->st_shndx = SHN_ABS;
7071
7072   return TRUE;
7073 }
7074
7075 /* Finish up the dynamic sections.  */
7076
7077 static bfd_boolean
7078 sh_elf_finish_dynamic_sections (output_bfd, info)
7079      bfd *output_bfd;
7080      struct bfd_link_info *info;
7081 {
7082   struct elf_sh_link_hash_table *htab;
7083   asection *sgot;
7084   asection *sdyn;
7085
7086   htab = sh_elf_hash_table (info);
7087   sgot = htab->sgotplt;
7088   sdyn = bfd_get_section_by_name (htab->root.dynobj, ".dynamic");
7089
7090   if (htab->root.dynamic_sections_created)
7091     {
7092       asection *splt;
7093       Elf32_External_Dyn *dyncon, *dynconend;
7094
7095       BFD_ASSERT (sgot != NULL && sdyn != NULL);
7096
7097       dyncon = (Elf32_External_Dyn *) sdyn->contents;
7098       dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
7099       for (; dyncon < dynconend; dyncon++)
7100         {
7101           Elf_Internal_Dyn dyn;
7102           asection *s;
7103 #ifdef INCLUDE_SHMEDIA
7104           const char *name;
7105 #endif
7106
7107           bfd_elf32_swap_dyn_in (htab->root.dynobj, dyncon, &dyn);
7108
7109           switch (dyn.d_tag)
7110             {
7111             default:
7112               break;
7113
7114 #ifdef INCLUDE_SHMEDIA
7115             case DT_INIT:
7116               name = info->init_function;
7117               goto get_sym;
7118
7119             case DT_FINI:
7120               name = info->fini_function;
7121             get_sym:
7122               if (dyn.d_un.d_val != 0)
7123                 {
7124                   struct elf_link_hash_entry *h;
7125
7126                   h = elf_link_hash_lookup (&htab->root, name,
7127                                             FALSE, FALSE, TRUE);
7128                   if (h != NULL && (h->other & STO_SH5_ISA32))
7129                     {
7130                       dyn.d_un.d_val |= 1;
7131                       bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
7132                     }
7133                 }
7134               break;
7135 #endif
7136
7137             case DT_PLTGOT:
7138               s = htab->sgot->output_section;
7139               goto get_vma;
7140
7141             case DT_JMPREL:
7142               s = htab->srelplt->output_section;
7143             get_vma:
7144               BFD_ASSERT (s != NULL);
7145               dyn.d_un.d_ptr = s->vma;
7146               bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
7147               break;
7148
7149             case DT_PLTRELSZ:
7150               s = htab->srelplt->output_section;
7151               BFD_ASSERT (s != NULL);
7152               if (s->_cooked_size != 0)
7153                 dyn.d_un.d_val = s->_cooked_size;
7154               else
7155                 dyn.d_un.d_val = s->_raw_size;
7156               bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
7157               break;
7158
7159             case DT_RELASZ:
7160               /* My reading of the SVR4 ABI indicates that the
7161                  procedure linkage table relocs (DT_JMPREL) should be
7162                  included in the overall relocs (DT_RELA).  This is
7163                  what Solaris does.  However, UnixWare can not handle
7164                  that case.  Therefore, we override the DT_RELASZ entry
7165                  here to make it not include the JMPREL relocs.  Since
7166                  the linker script arranges for .rela.plt to follow all
7167                  other relocation sections, we don't have to worry
7168                  about changing the DT_RELA entry.  */
7169               if (htab->srelplt != NULL)
7170                 {
7171                   s = htab->srelplt->output_section;
7172                   if (s->_cooked_size != 0)
7173                     dyn.d_un.d_val -= s->_cooked_size;
7174                   else
7175                     dyn.d_un.d_val -= s->_raw_size;
7176                 }
7177               bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
7178               break;
7179             }
7180         }
7181
7182       /* Fill in the first entry in the procedure linkage table.  */
7183       splt = htab->splt;
7184       if (splt && splt->_raw_size > 0)
7185         {
7186           if (info->shared)
7187             {
7188               if (elf_sh_pic_plt_entry == NULL)
7189                 {
7190                   elf_sh_pic_plt_entry = (bfd_big_endian (output_bfd) ?
7191                                           elf_sh_pic_plt_entry_be :
7192                                           elf_sh_pic_plt_entry_le);
7193                 }
7194               memcpy (splt->contents, elf_sh_pic_plt_entry,
7195                       elf_sh_sizeof_plt (info));
7196             }
7197           else
7198             {
7199               if (elf_sh_plt0_entry == NULL)
7200                 {
7201                   elf_sh_plt0_entry = (bfd_big_endian (output_bfd) ?
7202                                        elf_sh_plt0_entry_be :
7203                                        elf_sh_plt0_entry_le);
7204                 }
7205               memcpy (splt->contents, elf_sh_plt0_entry, PLT_ENTRY_SIZE);
7206 #ifdef INCLUDE_SHMEDIA
7207               movi_shori_putval (output_bfd,
7208                                  sgot->output_section->vma
7209                                  + sgot->output_offset,
7210                                  splt->contents
7211                                  + elf_sh_plt0_gotplt_offset (info));
7212 #else
7213               bfd_put_32 (output_bfd,
7214                           sgot->output_section->vma + sgot->output_offset + 4,
7215                           splt->contents + elf_sh_plt0_gotid_offset (info));
7216               bfd_put_32 (output_bfd,
7217                           sgot->output_section->vma + sgot->output_offset + 8,
7218                           splt->contents + elf_sh_plt0_linker_offset (info));
7219 #endif
7220             }
7221
7222           /* UnixWare sets the entsize of .plt to 4, although that doesn't
7223              really seem like the right value.  */
7224           elf_section_data (splt->output_section)->this_hdr.sh_entsize = 4;
7225         }
7226     }
7227
7228   /* Fill in the first three entries in the global offset table.  */
7229   if (sgot && sgot->_raw_size > 0)
7230     {
7231       if (sdyn == NULL)
7232         bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
7233       else
7234         bfd_put_32 (output_bfd,
7235                     sdyn->output_section->vma + sdyn->output_offset,
7236                     sgot->contents);
7237       bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
7238       bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
7239
7240       elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
7241     }
7242
7243   return TRUE;
7244 }
7245
7246 static enum elf_reloc_type_class
7247 sh_elf_reloc_type_class (rela)
7248      const Elf_Internal_Rela *rela;
7249 {
7250   switch ((int) ELF32_R_TYPE (rela->r_info))
7251     {
7252     case R_SH_RELATIVE:
7253       return reloc_class_relative;
7254     case R_SH_JMP_SLOT:
7255       return reloc_class_plt;
7256     case R_SH_COPY:
7257       return reloc_class_copy;
7258     default:
7259       return reloc_class_normal;
7260     }
7261 }
7262
7263 /* Support for Linux core dump NOTE sections.  */
7264 static bfd_boolean
7265 elf32_shlin_grok_prstatus (abfd, note)
7266      bfd *abfd;
7267      Elf_Internal_Note *note;
7268 {
7269   int offset;
7270   unsigned int raw_size;
7271
7272   switch (note->descsz)
7273     {
7274       default:
7275         return FALSE;
7276
7277       case 168:         /* Linux/SH */
7278         /* pr_cursig */
7279         elf_tdata (abfd)->core_signal = bfd_get_16 (abfd, note->descdata + 12);
7280
7281         /* pr_pid */
7282         elf_tdata (abfd)->core_pid = bfd_get_32 (abfd, note->descdata + 24);
7283
7284         /* pr_reg */
7285         offset = 72;
7286         raw_size = 92;
7287
7288         break;
7289     }
7290
7291   /* Make a ".reg/999" section.  */
7292   return _bfd_elfcore_make_pseudosection (abfd, ".reg",
7293                                           raw_size, note->descpos + offset);
7294 }
7295
7296 static bfd_boolean
7297 elf32_shlin_grok_psinfo (abfd, note)
7298      bfd *abfd;
7299      Elf_Internal_Note *note;
7300 {
7301   switch (note->descsz)
7302     {
7303       default:
7304         return FALSE;
7305
7306       case 124:         /* Linux/SH elf_prpsinfo */
7307         elf_tdata (abfd)->core_program
7308          = _bfd_elfcore_strndup (abfd, note->descdata + 28, 16);
7309         elf_tdata (abfd)->core_command
7310          = _bfd_elfcore_strndup (abfd, note->descdata + 44, 80);
7311     }
7312
7313   /* Note that for some reason, a spurious space is tacked
7314      onto the end of the args in some (at least one anyway)
7315      implementations, so strip it off if it exists.  */
7316
7317   {
7318     char *command = elf_tdata (abfd)->core_command;
7319     int n = strlen (command);
7320
7321     if (0 < n && command[n - 1] == ' ')
7322       command[n - 1] = '\0';
7323   }
7324
7325   return TRUE;
7326 }
7327
7328 #define TARGET_BIG_SYM          bfd_elf32_sh_vec
7329 #define TARGET_BIG_NAME         "elf32-sh"
7330 #define TARGET_LITTLE_SYM       bfd_elf32_shl_vec
7331 #define TARGET_LITTLE_NAME      "elf32-shl"
7332 #define ELF_ARCH                bfd_arch_sh
7333 #define ELF_MACHINE_CODE        EM_SH
7334 #ifdef __QNXTARGET__
7335 #define ELF_MAXPAGESIZE         0x1000
7336 #else
7337 #define ELF_MAXPAGESIZE         0x80
7338 #endif
7339
7340 #define elf_symbol_leading_char '_'
7341
7342 #define bfd_elf32_bfd_reloc_type_lookup sh_elf_reloc_type_lookup
7343 #define elf_info_to_howto               sh_elf_info_to_howto
7344 #define bfd_elf32_bfd_relax_section     sh_elf_relax_section
7345 #define elf_backend_relocate_section    sh_elf_relocate_section
7346 #define bfd_elf32_bfd_get_relocated_section_contents \
7347                                         sh_elf_get_relocated_section_contents
7348 #define bfd_elf32_mkobject              sh_elf_mkobject
7349 #define elf_backend_object_p            sh_elf_object_p
7350 #define bfd_elf32_bfd_set_private_bfd_flags \
7351                                         sh_elf_set_private_flags
7352 #define bfd_elf32_bfd_copy_private_bfd_data \
7353                                         sh_elf_copy_private_data
7354 #define bfd_elf32_bfd_merge_private_bfd_data \
7355                                         sh_elf_merge_private_data
7356
7357 #define elf_backend_gc_mark_hook        sh_elf_gc_mark_hook
7358 #define elf_backend_gc_sweep_hook       sh_elf_gc_sweep_hook
7359 #define elf_backend_check_relocs        sh_elf_check_relocs
7360 #define elf_backend_copy_indirect_symbol \
7361                                         sh_elf_copy_indirect_symbol
7362 #define elf_backend_create_dynamic_sections \
7363                                         sh_elf_create_dynamic_sections
7364 #define bfd_elf32_bfd_link_hash_table_create \
7365                                         sh_elf_link_hash_table_create
7366 #define elf_backend_adjust_dynamic_symbol \
7367                                         sh_elf_adjust_dynamic_symbol
7368 #define elf_backend_size_dynamic_sections \
7369                                         sh_elf_size_dynamic_sections
7370 #define elf_backend_finish_dynamic_symbol \
7371                                         sh_elf_finish_dynamic_symbol
7372 #define elf_backend_finish_dynamic_sections \
7373                                         sh_elf_finish_dynamic_sections
7374 #define elf_backend_reloc_type_class    sh_elf_reloc_type_class
7375
7376 #define elf_backend_can_gc_sections     1
7377 #define elf_backend_can_refcount        1
7378 #define elf_backend_want_got_plt        1
7379 #define elf_backend_plt_readonly        1
7380 #define elf_backend_want_plt_sym        0
7381 #define elf_backend_got_header_size     12
7382 #define elf_backend_plt_header_size     PLT_ENTRY_SIZE
7383
7384 #ifndef INCLUDE_SHMEDIA
7385
7386 #include "elf32-target.h"
7387
7388 /* NetBSD support.  */
7389 #undef  TARGET_BIG_SYM
7390 #define TARGET_BIG_SYM                  bfd_elf32_shnbsd_vec
7391 #undef  TARGET_BIG_NAME
7392 #define TARGET_BIG_NAME                 "elf32-sh-nbsd"
7393 #undef  TARGET_LITTLE_SYM
7394 #define TARGET_LITTLE_SYM               bfd_elf32_shlnbsd_vec
7395 #undef  TARGET_LITTLE_NAME
7396 #define TARGET_LITTLE_NAME              "elf32-shl-nbsd"
7397 #undef  ELF_MAXPAGESIZE
7398 #define ELF_MAXPAGESIZE                 0x10000
7399 #undef  elf_symbol_leading_char
7400 #define elf_symbol_leading_char         0
7401 #undef  elf32_bed
7402 #define elf32_bed                       elf32_sh_nbsd_bed
7403
7404 #include "elf32-target.h"
7405
7406
7407 /* Linux support.  */
7408 #undef  TARGET_BIG_SYM
7409 #define TARGET_BIG_SYM                  bfd_elf32_shblin_vec
7410 #undef  TARGET_BIG_NAME
7411 #define TARGET_BIG_NAME                 "elf32-shbig-linux"
7412 #undef  TARGET_LITTLE_SYM
7413 #define TARGET_LITTLE_SYM               bfd_elf32_shlin_vec
7414 #undef  TARGET_LITTLE_NAME
7415 #define TARGET_LITTLE_NAME              "elf32-sh-linux"
7416
7417 #undef  elf_backend_grok_prstatus
7418 #define elf_backend_grok_prstatus       elf32_shlin_grok_prstatus
7419 #undef  elf_backend_grok_psinfo
7420 #define elf_backend_grok_psinfo         elf32_shlin_grok_psinfo
7421 #undef  elf32_bed
7422 #define elf32_bed                       elf32_sh_lin_bed
7423
7424 #include "elf32-target.h"
7425
7426 #endif /* INCLUDE_SHMEDIA */