~ubuntu-branches/ubuntu/utopic/binutils-arm64-cross/utopic

« back to all changes in this revision

Viewing changes to binutils-2.23.52.20130611/bfd/elf32-sh.c

  • Committer: Package Import Robot
  • Author(s): Matthias Klose
  • Date: 2013-06-20 17:38:09 UTC
  • Revision ID: package-import@ubuntu.com-20130620173809-app8lzgvymy5fg6c
Tags: 0.7
Build-depend on binutils-source (>= 2.23.52.20130620-1~).

Show diffs side-by-side

added added

removed removed

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