bfd/elf32-lm32.c

   1 /* Lattice Mico32-specific support for 32-bit ELF
   2    Copyright (C) 2008-2018 Free Software Foundation, Inc.
   3    Contributed by Jon Beniston <jon@beniston.com>
   4
   5    This file is part of BFD, the Binary File Descriptor library.
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 3 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program; if not, write to the Free Software
  19    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
  20    MA 02110-1301, USA.  */
  21
  22 #include "sysdep.h"
  23 #include "bfd.h"
  24 #include "libbfd.h"
  25 #include "elf-bfd.h"
  26 #include "elf/lm32.h"
  27
  28 #define DEFAULT_STACK_SIZE 0x20000
  29
  30 #define PLT_ENTRY_SIZE 20
  31
  32 #define PLT0_ENTRY_WORD0  0
  33 #define PLT0_ENTRY_WORD1  0
  34 #define PLT0_ENTRY_WORD2  0
  35 #define PLT0_ENTRY_WORD3  0
  36 #define PLT0_ENTRY_WORD4  0
  37
  38 #define PLT0_PIC_ENTRY_WORD0  0
  39 #define PLT0_PIC_ENTRY_WORD1  0
  40 #define PLT0_PIC_ENTRY_WORD2  0
  41 #define PLT0_PIC_ENTRY_WORD3  0
  42 #define PLT0_PIC_ENTRY_WORD4  0
  43
  44 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/libc.so.1"
  45
  46 extern const bfd_target lm32_elf32_fdpic_vec;
  47
  48 #define IS_FDPIC(bfd) ((bfd)->xvec == &lm32_elf32_fdpic_vec)
  49
  50 static bfd_reloc_status_type lm32_elf_gprel_reloc
  51   (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
  52
  53 /* lm32 ELF linker hash entry.  */
  54
  55 struct elf_lm32_link_hash_entry
  56 {
  57   struct elf_link_hash_entry root;
  58
  59   /* Track dynamic relocs copied for this symbol.  */
  60   struct elf_dyn_relocs *dyn_relocs;
  61 };
  62
  63 /* lm32 ELF linker hash table.  */
  64
  65 struct elf_lm32_link_hash_table
  66 {
  67   struct elf_link_hash_table root;
  68
  69   /* Short-cuts to get to dynamic linker sections.  */
  70   asection *sfixup32;
  71   asection *sdynbss;
  72   asection *srelbss;
  73
  74   int relocs32;
  75 };
  76
  77 /* Get the lm32 ELF linker hash table from a link_info structure.  */
  78
  79 #define lm32_elf_hash_table(p) \
  80   (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \
  81   == LM32_ELF_DATA ? ((struct elf_lm32_link_hash_table *) ((p)->hash)) : NULL)
  82
  83 #define lm32fdpic_got_section(info) \
  84   (lm32_elf_hash_table (info)->root.sgot)
  85 #define lm32fdpic_gotrel_section(info) \
  86   (lm32_elf_hash_table (info)->root.srelgot)
  87 #define lm32fdpic_fixup32_section(info) \
  88   (lm32_elf_hash_table (info)->sfixup32)
  89
  90 struct weak_symbol_list
  91 {
  92   const char *name;
  93   struct weak_symbol_list *next;
  94 };
  95
  96 /* Create an entry in an lm32 ELF linker hash table.  */
  97
  98 static struct bfd_hash_entry *
  99 lm32_elf_link_hash_newfunc (struct bfd_hash_entry *entry,
 100                             struct bfd_hash_table *table,
 101                             const char *string)
 102 {
 103   struct elf_lm32_link_hash_entry *ret =
 104     (struct elf_lm32_link_hash_entry *) entry;
 105
 106   /* Allocate the structure if it has not already been allocated by a
 107      subclass.  */
 108   if (ret == NULL)
 109     ret = bfd_hash_allocate (table,
 110                              sizeof (struct elf_lm32_link_hash_entry));
 111   if (ret == NULL)
 112     return NULL;
 113
 114   /* Call the allocation method of the superclass.  */
 115   ret = ((struct elf_lm32_link_hash_entry *)
 116          _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
 117                                      table, string));
 118   if (ret != NULL)
 119     {
 120       struct elf_lm32_link_hash_entry *eh;
 121
 122       eh = (struct elf_lm32_link_hash_entry *) ret;
 123       eh->dyn_relocs = NULL;
 124     }
 125
 126   return (struct bfd_hash_entry *) ret;
 127 }
 128
 129 /* Create an lm32 ELF linker hash table.  */
 130
 131 static struct bfd_link_hash_table *
 132 lm32_elf_link_hash_table_create (bfd *abfd)
 133 {
 134   struct elf_lm32_link_hash_table *ret;
 135   bfd_size_type amt = sizeof (struct elf_lm32_link_hash_table);
 136
 137   ret = bfd_zmalloc (amt);
 138   if (ret == NULL)
 139     return NULL;
 140
 141   if (!_bfd_elf_link_hash_table_init (&ret->root, abfd,
 142                                       lm32_elf_link_hash_newfunc,
 143                                       sizeof (struct elf_lm32_link_hash_entry),
 144                                       LM32_ELF_DATA))
 145     {
 146       free (ret);
 147       return NULL;
 148     }
 149
 150   return &ret->root.root;
 151 }
 152
 153 /* Add a fixup to the ROFIXUP section.  */
 154
 155 static bfd_vma
 156 _lm32fdpic_add_rofixup (bfd *output_bfd, asection *rofixup, bfd_vma relocation)
 157 {
 158   bfd_vma fixup_offset;
 159
 160   if (rofixup->flags & SEC_EXCLUDE)
 161     return -1;
 162
 163   fixup_offset = rofixup->reloc_count * 4;
 164   if (rofixup->contents)
 165     {
 166       BFD_ASSERT (fixup_offset < rofixup->size);
 167       if (fixup_offset < rofixup->size)
 168       bfd_put_32 (output_bfd, relocation, rofixup->contents + fixup_offset);
 169     }
 170   rofixup->reloc_count++;
 171
 172   return fixup_offset;
 173 }
 174
 175 /* Create .rofixup sections in DYNOBJ, and set up
 176    shortcuts to them in our hash table.  */
 177
 178 static bfd_boolean
 179 create_rofixup_section (bfd *dynobj, struct bfd_link_info *info)
 180 {
 181   struct elf_lm32_link_hash_table *htab;
 182   htab = lm32_elf_hash_table (info);
 183
 184   if (htab == NULL)
 185     return FALSE;
 186
 187   /* Fixup section for R_LM32_32 relocs.  */
 188   lm32fdpic_fixup32_section (info)
 189     = bfd_make_section_anyway_with_flags (dynobj,
 190                                           ".rofixup",
 191                                           (SEC_ALLOC
 192                                            | SEC_LOAD
 193                                            | SEC_HAS_CONTENTS
 194                                            | SEC_IN_MEMORY
 195                                            | SEC_LINKER_CREATED
 196                                            | SEC_READONLY));
 197   if (lm32fdpic_fixup32_section (info) == NULL
 198       || ! bfd_set_section_alignment (dynobj,
 199                                       lm32fdpic_fixup32_section (info), 2))
 200     return FALSE;
 201
 202   return TRUE;
 203 }
 204
 205 static reloc_howto_type lm32_elf_howto_table [] =
 206 {
 207   /* This reloc does nothing.  */
 208   HOWTO (R_LM32_NONE,               /* type */
 209          0,                         /* rightshift */
 210          3,                         /* size (0 = byte, 1 = short, 2 = long) */
 211          0,                         /* bitsize */
 212          FALSE,                     /* pc_relative */
 213          0,                         /* bitpos */
 214          complain_overflow_dont,    /* complain_on_overflow */
 215          bfd_elf_generic_reloc,     /* special_function */
 216          "R_LM32_NONE",             /* name */
 217          FALSE,                     /* partial_inplace */
 218          0,                         /* src_mask */
 219          0,                         /* dst_mask */
 220          FALSE),                    /* pcrel_offset */
 221
 222   /* An 8 bit absolute relocation.  */
 223   HOWTO (R_LM32_8,                  /* type */
 224          0,                         /* rightshift */
 225          0,                         /* size (0 = byte, 1 = short, 2 = long) */
 226          8,                         /* bitsize */
 227          FALSE,                     /* pc_relative */
 228          0,                         /* bitpos */
 229          complain_overflow_bitfield,/* complain_on_overflow */
 230          bfd_elf_generic_reloc,     /* special_function */
 231          "R_LM32_8",                /* name */
 232          FALSE,                     /* partial_inplace */
 233          0,                         /* src_mask */
 234          0xff,                      /* dst_mask */
 235          FALSE),                    /* pcrel_offset */
 236
 237   /* A 16 bit absolute relocation.  */
 238   HOWTO (R_LM32_16,                 /* type */
 239          0,                         /* rightshift */
 240          1,                         /* size (0 = byte, 1 = short, 2 = long) */
 241          16,                        /* bitsize */
 242          FALSE,                     /* pc_relative */
 243          0,                         /* bitpos */
 244          complain_overflow_bitfield,/* complain_on_overflow */
 245          bfd_elf_generic_reloc,     /* special_function */
 246          "R_LM32_16",               /* name */
 247          FALSE,                     /* partial_inplace */
 248          0,                         /* src_mask */
 249          0xffff,                    /* dst_mask */
 250          FALSE),                    /* pcrel_offset */
 251
 252   /* A 32 bit absolute relocation.  */
 253   HOWTO (R_LM32_32,                 /* type */
 254          0,                         /* rightshift */
 255          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 256          32,                        /* bitsize */
 257          FALSE,                     /* pc_relative */
 258          0,                         /* bitpos */
 259          complain_overflow_bitfield,/* complain_on_overflow */
 260          bfd_elf_generic_reloc,     /* special_function */
 261          "R_LM32_32",               /* name */
 262          FALSE,                     /* partial_inplace */
 263          0,                         /* src_mask */
 264          0xffffffff,                /* dst_mask */
 265          FALSE),                    /* pcrel_offset */
 266
 267   HOWTO (R_LM32_HI16,               /* type */
 268          16,                        /* rightshift */
 269          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 270          16,                        /* bitsize */
 271          FALSE,                     /* pc_relative */
 272          0,                         /* bitpos */
 273          complain_overflow_bitfield,/* complain_on_overflow */
 274          bfd_elf_generic_reloc,     /* special_function */
 275          "R_LM32_HI16",             /* name */
 276          FALSE,                     /* partial_inplace */
 277          0,                         /* src_mask */
 278          0xffff,                    /* dst_mask */
 279          FALSE),                    /* pcrel_offset */
 280
 281   HOWTO (R_LM32_LO16,               /* type */
 282          0,                         /* rightshift */
 283          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 284          16,                        /* bitsize */
 285          FALSE,                     /* pc_relative */
 286          0,                         /* bitpos */
 287          complain_overflow_dont,    /* complain_on_overflow */
 288          bfd_elf_generic_reloc,     /* special_function */
 289          "R_LM32_LO16",             /* name */
 290          FALSE,                     /* partial_inplace */
 291          0,                         /* src_mask */
 292          0xffff,                    /* dst_mask */
 293          FALSE),                    /* pcrel_offset */
 294
 295   HOWTO (R_LM32_GPREL16,            /* type */
 296          0,                         /* rightshift */
 297          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 298          16,                        /* bitsize */
 299          FALSE,                     /* pc_relative */
 300          0,                         /* bitpos */
 301          complain_overflow_dont,    /* complain_on_overflow */
 302          lm32_elf_gprel_reloc,      /* special_function */
 303          "R_LM32_GPREL16",          /* name */
 304          FALSE,                     /* partial_inplace */
 305          0,                         /* src_mask */
 306          0xffff,                    /* dst_mask */
 307          FALSE),                    /* pcrel_offset */
 308
 309   HOWTO (R_LM32_CALL,               /* type */
 310          2,                         /* rightshift */
 311          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 312          26,                        /* bitsize */
 313          TRUE,                      /* pc_relative */
 314          0,                         /* bitpos */
 315          complain_overflow_signed,  /* complain_on_overflow */
 316          bfd_elf_generic_reloc,     /* special_function */
 317          "R_LM32_CALL",             /* name */
 318          FALSE,                     /* partial_inplace */
 319          0,                         /* src_mask */
 320          0x3ffffff,                 /* dst_mask */
 321          TRUE),                     /* pcrel_offset */
 322
 323   HOWTO (R_LM32_BRANCH,             /* type */
 324          2,                         /* rightshift */
 325          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 326          16,                        /* bitsize */
 327          TRUE,                      /* pc_relative */
 328          0,                         /* bitpos */
 329          complain_overflow_signed,  /* complain_on_overflow */
 330          bfd_elf_generic_reloc,     /* special_function */
 331          "R_LM32_BRANCH",           /* name */
 332          FALSE,                     /* partial_inplace */
 333          0,                         /* src_mask */
 334          0xffff,                    /* dst_mask */
 335          TRUE),                     /* pcrel_offset */
 336
 337   /* GNU extension to record C++ vtable hierarchy.  */
 338   HOWTO (R_LM32_GNU_VTINHERIT,      /* type */
 339          0,                         /* rightshift */
 340          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 341          0,                         /* bitsize */
 342          FALSE,                     /* pc_relative */
 343          0,                         /* bitpos */
 344          complain_overflow_dont,    /* complain_on_overflow */
 345          NULL,                      /* special_function */
 346          "R_LM32_GNU_VTINHERIT",    /* name */
 347          FALSE,                     /* partial_inplace */
 348          0,                         /* src_mask */
 349          0,                         /* dst_mask */
 350          FALSE),                    /* pcrel_offset */
 351
 352   /* GNU extension to record C++ vtable member usage.  */
 353   HOWTO (R_LM32_GNU_VTENTRY,        /* type */
 354          0,                         /* rightshift */
 355          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 356          0,                         /* bitsize */
 357          FALSE,                     /* pc_relative */
 358          0,                         /* bitpos */
 359          complain_overflow_dont,    /* complain_on_overflow */
 360          _bfd_elf_rel_vtable_reloc_fn,/* special_function */
 361          "R_LM32_GNU_VTENTRY",      /* name */
 362          FALSE,                     /* partial_inplace */
 363          0,                         /* src_mask */
 364          0,                         /* dst_mask */
 365          FALSE),                    /* pcrel_offset */
 366
 367   HOWTO (R_LM32_16_GOT,             /* type */
 368          0,                         /* rightshift */
 369          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 370          16,                        /* bitsize */
 371          FALSE,                     /* pc_relative */
 372          0,                         /* bitpos */
 373          complain_overflow_signed,  /* complain_on_overflow */
 374          bfd_elf_generic_reloc,     /* special_function */
 375          "R_LM32_16_GOT",           /* name */
 376          FALSE,                     /* partial_inplace */
 377          0,                         /* src_mask */
 378          0xffff,                    /* dst_mask */
 379          FALSE),                    /* pcrel_offset */
 380
 381   HOWTO (R_LM32_GOTOFF_HI16,        /* type */
 382          16,                        /* rightshift */
 383          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 384          16,                        /* bitsize */
 385          FALSE,                     /* pc_relative */
 386          0,                         /* bitpos */
 387          complain_overflow_dont,    /* complain_on_overflow */
 388          bfd_elf_generic_reloc,     /* special_function */
 389          "R_LM32_GOTOFF_HI16",      /* name */
 390          FALSE,                     /* partial_inplace */
 391          0xffff,                    /* src_mask */
 392          0xffff,                    /* dst_mask */
 393          FALSE),                    /* pcrel_offset */
 394
 395   HOWTO (R_LM32_GOTOFF_LO16,        /* type */
 396          0,                         /* rightshift */
 397          2,                         /* size (0 = byte, 1 = short, 2 = long) */
 398          16,                        /* bitsize */
 399          FALSE,                     /* pc_relative */
 400          0,                         /* bitpos */
 401          complain_overflow_dont,    /* complain_on_overflow */
 402          bfd_elf_generic_reloc,     /* special_function */
 403          "R_LM32_GOTOFF_LO16",      /* name */
 404          FALSE,                     /* partial_inplace */
 405          0xffff,                    /* src_mask */
 406          0xffff,                    /* dst_mask */
 407          FALSE),                    /* pcrel_offset */
 408
 409   HOWTO (R_LM32_COPY,           /* type */
 410          0,                     /* rightshift */
 411          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 412          32,                    /* bitsize */
 413          FALSE,                 /* pc_relative */
 414          0,                     /* bitpos */
 415          complain_overflow_bitfield, /* complain_on_overflow */
 416          bfd_elf_generic_reloc, /* special_function */
 417          "R_LM32_COPY",         /* name */
 418          FALSE,                 /* partial_inplace */
 419          0xffffffff,            /* src_mask */
 420          0xffffffff,            /* dst_mask */
 421          FALSE),                /* pcrel_offset */
 422
 423   HOWTO (R_LM32_GLOB_DAT,       /* type */
 424          0,                     /* rightshift */
 425          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 426          32,                    /* bitsize */
 427          FALSE,                 /* pc_relative */
 428          0,                     /* bitpos */
 429          complain_overflow_bitfield, /* complain_on_overflow */
 430          bfd_elf_generic_reloc, /* special_function */
 431          "R_LM32_GLOB_DAT",     /* name */
 432          FALSE,                 /* partial_inplace */
 433          0xffffffff,            /* src_mask */
 434          0xffffffff,            /* dst_mask */
 435          FALSE),                /* pcrel_offset */
 436
 437   HOWTO (R_LM32_JMP_SLOT,       /* type */
 438          0,                     /* rightshift */
 439          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 440          32,                    /* bitsize */
 441          FALSE,                 /* pc_relative */
 442          0,                     /* bitpos */
 443          complain_overflow_bitfield, /* complain_on_overflow */
 444          bfd_elf_generic_reloc, /* special_function */
 445          "R_LM32_JMP_SLOT",     /* name */
 446          FALSE,                 /* partial_inplace */
 447          0xffffffff,            /* src_mask */
 448          0xffffffff,            /* dst_mask */
 449          FALSE),                /* pcrel_offset */
 450
 451   HOWTO (R_LM32_RELATIVE,       /* type */
 452          0,                     /* rightshift */
 453          2,                     /* size (0 = byte, 1 = short, 2 = long) */
 454          32,                    /* bitsize */
 455          FALSE,                 /* pc_relative */
 456          0,                     /* bitpos */
 457          complain_overflow_bitfield, /* complain_on_overflow */
 458          bfd_elf_generic_reloc, /* special_function */
 459          "R_LM32_RELATIVE",     /* name */
 460          FALSE,                 /* partial_inplace */
 461          0xffffffff,            /* src_mask */
 462          0xffffffff,            /* dst_mask */
 463          FALSE),                /* pcrel_offset */
 464
 465 };
 466
 467 /* Map BFD reloc types to lm32 ELF reloc types. */
 468
 469 struct lm32_reloc_map
 470 {
 471     bfd_reloc_code_real_type bfd_reloc_val;
 472     unsigned char elf_reloc_val;
 473 };
 474
 475 static const struct lm32_reloc_map lm32_reloc_map[] =
 476 {
 477   { BFD_RELOC_NONE,             R_LM32_NONE },
 478   { BFD_RELOC_8,                R_LM32_8 },
 479   { BFD_RELOC_16,               R_LM32_16 },
 480   { BFD_RELOC_32,               R_LM32_32 },
 481   { BFD_RELOC_HI16,             R_LM32_HI16 },
 482   { BFD_RELOC_LO16,             R_LM32_LO16 },
 483   { BFD_RELOC_GPREL16,          R_LM32_GPREL16 },
 484   { BFD_RELOC_LM32_CALL,        R_LM32_CALL },
 485   { BFD_RELOC_LM32_BRANCH,      R_LM32_BRANCH },
 486   { BFD_RELOC_VTABLE_INHERIT,   R_LM32_GNU_VTINHERIT },
 487   { BFD_RELOC_VTABLE_ENTRY,     R_LM32_GNU_VTENTRY },
 488   { BFD_RELOC_LM32_16_GOT,      R_LM32_16_GOT },
 489   { BFD_RELOC_LM32_GOTOFF_HI16, R_LM32_GOTOFF_HI16 },
 490   { BFD_RELOC_LM32_GOTOFF_LO16, R_LM32_GOTOFF_LO16 },
 491   { BFD_RELOC_LM32_COPY,        R_LM32_COPY },
 492   { BFD_RELOC_LM32_GLOB_DAT,    R_LM32_GLOB_DAT },
 493   { BFD_RELOC_LM32_JMP_SLOT,    R_LM32_JMP_SLOT },
 494   { BFD_RELOC_LM32_RELATIVE,    R_LM32_RELATIVE },
 495 };
 496
 497 static reloc_howto_type *
 498 lm32_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
 499                         bfd_reloc_code_real_type code)
 500 {
 501   unsigned int i;
 502
 503   for (i = 0; i < sizeof (lm32_reloc_map) / sizeof (lm32_reloc_map[0]); i++)
 504     if (lm32_reloc_map[i].bfd_reloc_val == code)
 505       return &lm32_elf_howto_table[lm32_reloc_map[i].elf_reloc_val];
 506   return NULL;
 507 }
 508
 509 static reloc_howto_type *
 510 lm32_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
 511                         const char *r_name)
 512 {
 513   unsigned int i;
 514
 515   for (i = 0;
 516        i < sizeof (lm32_elf_howto_table) / sizeof (lm32_elf_howto_table[0]);
 517        i++)
 518     if (lm32_elf_howto_table[i].name != NULL
 519         && strcasecmp (lm32_elf_howto_table[i].name, r_name) == 0)
 520       return &lm32_elf_howto_table[i];
 521
 522   return NULL;
 523 }
 524
 525
 526 /* Set the howto pointer for an Lattice Mico32 ELF reloc.  */
 527
 528 static void
 529 lm32_info_to_howto_rela (bfd *abfd ATTRIBUTE_UNUSED,
 530                          arelent *cache_ptr,
 531                          Elf_Internal_Rela *dst)
 532 {
 533   unsigned int r_type;
 534
 535   r_type = ELF32_R_TYPE (dst->r_info);
 536   if (r_type >= (unsigned int) R_LM32_max)
 537     {
 538       /* xgettext:c-format */
 539       _bfd_error_handler (_("%pB: invalid LM32 reloc number: %d"), abfd, r_type);
 540       r_type = 0;
 541     }
 542   cache_ptr->howto = &lm32_elf_howto_table[r_type];
 543 }
 544
 545 /* Set the right machine number for an Lattice Mico32 ELF file. */
 546
 547 static bfd_boolean
 548 lm32_elf_object_p (bfd *abfd)
 549 {
 550   return bfd_default_set_arch_mach (abfd, bfd_arch_lm32, bfd_mach_lm32);
 551 }
 552
 553 /* Set machine type flags just before file is written out. */
 554
 555 static void
 556 lm32_elf_final_write_processing (bfd *abfd, bfd_boolean linker ATTRIBUTE_UNUSED)
 557 {
 558   elf_elfheader (abfd)->e_machine = EM_LATTICEMICO32;
 559   elf_elfheader (abfd)->e_flags &=~ EF_LM32_MACH;
 560   switch (bfd_get_mach (abfd))
 561     {
 562       case bfd_mach_lm32:
 563         elf_elfheader (abfd)->e_flags |= E_LM32_MACH;
 564         break;
 565       default:
 566         abort ();
 567     }
 568 }
 569
 570 /* Set the GP value for OUTPUT_BFD.  Returns FALSE if this is a
 571    dangerous relocation.  */
 572
 573 static bfd_boolean
 574 lm32_elf_assign_gp (bfd *output_bfd, bfd_vma *pgp)
 575 {
 576   unsigned int count;
 577   asymbol **sym;
 578   unsigned int i;
 579
 580   /* If we've already figured out what GP will be, just return it. */
 581   *pgp = _bfd_get_gp_value (output_bfd);
 582   if (*pgp)
 583     return TRUE;
 584
 585   count = bfd_get_symcount (output_bfd);
 586   sym = bfd_get_outsymbols (output_bfd);
 587
 588   /* The linker script will have created a symbol named `_gp' with the
 589      appropriate value.  */
 590   if (sym == NULL)
 591     i = count;
 592   else
 593     {
 594       for (i = 0; i < count; i++, sym++)
 595         {
 596           const char *name;
 597
 598           name = bfd_asymbol_name (*sym);
 599           if (*name == '_' && strcmp (name, "_gp") == 0)
 600             {
 601               *pgp = bfd_asymbol_value (*sym);
 602               _bfd_set_gp_value (output_bfd, *pgp);
 603               break;
 604             }
 605         }
 606     }
 607
 608   if (i >= count)
 609     {
 610       /* Only get the error once.  */
 611       *pgp = 4;
 612       _bfd_set_gp_value (output_bfd, *pgp);
 613       return FALSE;
 614     }
 615
 616   return TRUE;
 617 }
 618
 619 /* We have to figure out the gp value, so that we can adjust the
 620    symbol value correctly.  We look up the symbol _gp in the output
 621    BFD.  If we can't find it, we're stuck.  We cache it in the ELF
 622    target data.  We don't need to adjust the symbol value for an
 623    external symbol if we are producing relocatable output.  */
 624
 625 static bfd_reloc_status_type
 626 lm32_elf_final_gp (bfd *output_bfd, asymbol *symbol, bfd_boolean relocatable,
 627                     char **error_message, bfd_vma *pgp)
 628 {
 629   if (bfd_is_und_section (symbol->section) && !relocatable)
 630     {
 631       *pgp = 0;
 632       return bfd_reloc_undefined;
 633     }
 634
 635   *pgp = _bfd_get_gp_value (output_bfd);
 636   if (*pgp == 0 && (!relocatable || (symbol->flags & BSF_SECTION_SYM) != 0))
 637     {
 638       if (relocatable)
 639         {
 640           /* Make up a value.  */
 641           *pgp = symbol->section->output_section->vma + 0x4000;
 642           _bfd_set_gp_value (output_bfd, *pgp);
 643         }
 644       else if (!lm32_elf_assign_gp (output_bfd, pgp))
 645         {
 646           *error_message =
 647             (char *)
 648             _("global pointer relative relocation when _gp not defined");
 649           return bfd_reloc_dangerous;
 650         }
 651     }
 652
 653   return bfd_reloc_ok;
 654 }
 655
 656 static bfd_reloc_status_type
 657 lm32_elf_do_gprel_relocate (bfd *abfd,
 658                             reloc_howto_type *howto,
 659                             asection *input_section ATTRIBUTE_UNUSED,
 660                             bfd_byte *data,
 661                             bfd_vma offset,
 662                             bfd_vma symbol_value,
 663                             bfd_vma addend)
 664 {
 665   return _bfd_final_link_relocate (howto, abfd, input_section,
 666                                    data, offset, symbol_value, addend);
 667 }
 668
 669 static bfd_reloc_status_type
 670 lm32_elf_gprel_reloc (bfd *abfd,
 671                       arelent *reloc_entry,
 672                       asymbol *symbol,
 673                       void *data,
 674                       asection *input_section,
 675                       bfd *output_bfd,
 676                       char **msg)
 677 {
 678   bfd_vma relocation;
 679   bfd_vma gp;
 680   bfd_reloc_status_type r;
 681
 682   if (output_bfd != (bfd *) NULL
 683       && (symbol->flags & BSF_SECTION_SYM) == 0
 684       && (!reloc_entry->howto->partial_inplace || reloc_entry->addend == 0))
 685     {
 686       reloc_entry->address += input_section->output_offset;
 687       return bfd_reloc_ok;
 688     }
 689
 690   if (output_bfd != NULL)
 691     return bfd_reloc_ok;
 692
 693   relocation = symbol->value
 694     + symbol->section->output_section->vma + symbol->section->output_offset;
 695
 696   if ((r =
 697        lm32_elf_final_gp (abfd, symbol, FALSE, msg, &gp)) == bfd_reloc_ok)
 698     {
 699       relocation = relocation + reloc_entry->addend - gp;
 700       reloc_entry->addend = 0;
 701       if ((signed) relocation < -32768 || (signed) relocation > 32767)
 702         {
 703           *msg = _("global pointer relative address out of range");
 704           r = bfd_reloc_outofrange;
 705         }
 706       else
 707         {
 708           r = lm32_elf_do_gprel_relocate (abfd, reloc_entry->howto,
 709                                              input_section,
 710                                              data, reloc_entry->address,
 711                                              relocation, reloc_entry->addend);
 712         }
 713     }
 714
 715   return r;
 716 }
 717
 718 /* Find the segment number in which OSEC, and output section, is
 719    located.  */
 720
 721 static unsigned
 722 _lm32fdpic_osec_to_segment (bfd *output_bfd, asection *osec)
 723 {
 724   struct elf_segment_map *m;
 725   Elf_Internal_Phdr *p;
 726
 727   /* Find the segment that contains the output_section.  */
 728   for (m = elf_seg_map (output_bfd), p = elf_tdata (output_bfd)->phdr;
 729        m != NULL;
 730        m = m->next, p++)
 731     {
 732       int i;
 733
 734       for (i = m->count - 1; i >= 0; i--)
 735         if (m->sections[i] == osec)
 736           break;
 737
 738       if (i >= 0)
 739         break;
 740     }
 741
 742   return p - elf_tdata (output_bfd)->phdr;
 743 }
 744
 745 /* Determine if an output section is read-only.  */
 746
 747 inline static bfd_boolean
 748 _lm32fdpic_osec_readonly_p (bfd *output_bfd, asection *osec)
 749 {
 750   unsigned seg = _lm32fdpic_osec_to_segment (output_bfd, osec);
 751
 752   return ! (elf_tdata (output_bfd)->phdr[seg].p_flags & PF_W);
 753 }
 754
 755 /* Relocate a section */
 756
 757 static bfd_boolean
 758 lm32_elf_relocate_section (bfd *output_bfd,
 759                            struct bfd_link_info *info,
 760                            bfd *input_bfd,
 761                            asection *input_section,
 762                            bfd_byte *contents,
 763                            Elf_Internal_Rela *relocs,
 764                            Elf_Internal_Sym *local_syms,
 765                            asection **local_sections)
 766 {
 767   Elf_Internal_Shdr *symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
 768   struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (input_bfd);
 769   Elf_Internal_Rela *rel, *relend;
 770   struct elf_lm32_link_hash_table *htab = lm32_elf_hash_table (info);
 771   bfd_vma *local_got_offsets;
 772   asection *sgot;
 773
 774   if (htab == NULL)
 775     return FALSE;
 776
 777   local_got_offsets = elf_local_got_offsets (input_bfd);
 778
 779   sgot = htab->root.sgot;
 780
 781   symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
 782   sym_hashes = elf_sym_hashes (input_bfd);
 783
 784   rel = relocs;
 785   relend = relocs + input_section->reloc_count;
 786   for (; rel < relend; rel++)
 787     {
 788       reloc_howto_type *howto;
 789       unsigned int r_type;
 790       unsigned long r_symndx;
 791       Elf_Internal_Sym *sym;
 792       asection *sec;
 793       struct elf_link_hash_entry *h;
 794       bfd_vma relocation;
 795       bfd_vma gp;
 796       bfd_reloc_status_type r;
 797       const char *name = NULL;
 798
 799       r_symndx = ELF32_R_SYM (rel->r_info);
 800       r_type = ELF32_R_TYPE (rel->r_info);
 801
 802       if (r_type == R_LM32_GNU_VTENTRY
 803           || r_type == R_LM32_GNU_VTINHERIT )
 804         continue;
 805
 806       h = NULL;
 807       sym = NULL;
 808       sec = NULL;
 809
 810       howto = lm32_elf_howto_table + r_type;
 811
 812       if (r_symndx < symtab_hdr->sh_info)
 813         {
 814           /* It's a local symbol.  */
 815           sym = local_syms + r_symndx;
 816           sec = local_sections[r_symndx];
 817           relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
 818           name = bfd_elf_string_from_elf_section
 819             (input_bfd, symtab_hdr->sh_link, sym->st_name);
 820           name = (name == NULL) ? bfd_section_name (input_bfd, sec) : name;
 821         }
 822       else
 823         {
 824           /* It's a global symbol.  */
 825           bfd_boolean unresolved_reloc;
 826           bfd_boolean warned, ignored;
 827
 828           RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
 829                                    r_symndx, symtab_hdr, sym_hashes,
 830                                    h, sec, relocation,
 831                                    unresolved_reloc, warned, ignored);
 832           name = h->root.root.string;
 833         }
 834
 835       if (sec != NULL && discarded_section (sec))
 836         RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
 837                                          rel, 1, relend, howto, 0, contents);
 838
 839       if (bfd_link_relocatable (info))
 840         {
 841           /* This is a relocatable link.  We don't have to change
 842              anything, unless the reloc is against a section symbol,
 843              in which case we have to adjust according to where the
 844              section symbol winds up in the output section.  */
 845           if (sym == NULL || ELF_ST_TYPE (sym->st_info) != STT_SECTION)
 846             continue;
 847
 848           /* If partial_inplace, we need to store any additional addend
 849              back in the section.  */
 850           if (! howto->partial_inplace)
 851             continue;
 852
 853           /* Shouldn't reach here.  */
 854           abort ();
 855           r = bfd_reloc_ok;
 856         }
 857       else
 858         {
 859           switch (howto->type)
 860             {
 861             case R_LM32_GPREL16:
 862               if (!lm32_elf_assign_gp (output_bfd, &gp))
 863                 r = bfd_reloc_dangerous;
 864               else
 865                 {
 866                   relocation = relocation + rel->r_addend - gp;
 867                   rel->r_addend = 0;
 868                   if ((signed)relocation < -32768 || (signed)relocation > 32767)
 869                     r = bfd_reloc_outofrange;
 870                   else
 871                     {
 872                       r = _bfd_final_link_relocate (howto, input_bfd,
 873                                                     input_section, contents,
 874                                                     rel->r_offset, relocation,
 875                                                     rel->r_addend);
 876                     }
 877                 }
 878               break;
 879             case R_LM32_16_GOT:
 880               /* Relocation is to the entry for this symbol in the global
 881                  offset table.  */
 882               BFD_ASSERT (sgot != NULL);
 883               if (h != NULL)
 884                 {
 885                   bfd_boolean dyn;
 886                   bfd_vma off;
 887
 888                   off = h->got.offset;
 889                   BFD_ASSERT (off != (bfd_vma) -1);
 890
 891                   dyn = htab->root.dynamic_sections_created;
 892                   if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn,
 893                                                          bfd_link_pic (info),
 894                                                          h)
 895                       || (bfd_link_pic (info)
 896                           && (info->symbolic
 897                               || h->dynindx == -1
 898                               || h->forced_local)
 899                           && h->def_regular))
 900                     {
 901                       /* This is actually a static link, or it is a
 902                          -Bsymbolic link and the symbol is defined
 903                          locally, or the symbol was forced to be local
 904                          because of a version file.  We must initialize
 905                          this entry in the global offset table.  Since the
 906                          offset must always be a multiple of 4, we use the
 907                          least significant bit to record whether we have
 908                          initialized it already.
 909
 910                          When doing a dynamic link, we create a .rela.got
 911                          relocation entry to initialize the value.  This
 912                          is done in the finish_dynamic_symbol routine.  */
 913                       if ((off & 1) != 0)
 914                         off &= ~1;
 915                       else
 916                         {
 917                           /* Write entry in GOT */
 918                           bfd_put_32 (output_bfd, relocation,
 919                                       sgot->contents + off);
 920                           /* Create entry in .rofixup pointing to GOT entry.  */
 921                            if (IS_FDPIC (output_bfd) && h->root.type != bfd_link_hash_undefweak)
 922                              {
 923                                _lm32fdpic_add_rofixup (output_bfd,
 924                                                        lm32fdpic_fixup32_section
 925                                                         (info),
 926                                                        sgot->output_section->vma
 927                                                         + sgot->output_offset
 928                                                         + off);
 929                              }
 930                           /* Mark GOT entry as having been written.  */
 931                           h->got.offset |= 1;
 932                         }
 933                     }
 934
 935                   relocation = sgot->output_offset + off;
 936                 }
 937               else
 938                 {
 939                   bfd_vma off;
 940                   bfd_byte *loc;
 941
 942                   BFD_ASSERT (local_got_offsets != NULL
 943                               && local_got_offsets[r_symndx] != (bfd_vma) -1);
 944
 945                   /* Get offset into GOT table.  */
 946                   off = local_got_offsets[r_symndx];
 947
 948                   /* The offset must always be a multiple of 4.  We use
 949                      the least significant bit to record whether we have
 950                      already processed this entry.  */
 951                   if ((off & 1) != 0)
 952                     off &= ~1;
 953                   else
 954                     {
 955                       /* Write entry in GOT.  */
 956                       bfd_put_32 (output_bfd, relocation, sgot->contents + off);
 957                       /* Create entry in .rofixup pointing to GOT entry.  */
 958                       if (IS_FDPIC (output_bfd))
 959                         {
 960                           _lm32fdpic_add_rofixup (output_bfd,
 961                                                   lm32fdpic_fixup32_section
 962                                                    (info),
 963                                                   sgot->output_section->vma
 964                                                    + sgot->output_offset
 965                                                    + off);
 966                         }
 967
 968                       if (bfd_link_pic (info))
 969                         {
 970                           asection *srelgot;
 971                           Elf_Internal_Rela outrel;
 972
 973                           /* We need to generate a R_LM32_RELATIVE reloc
 974                              for the dynamic linker.  */
 975                           srelgot = htab->root.srelgot;
 976                           BFD_ASSERT (srelgot != NULL);
 977
 978                           outrel.r_offset = (sgot->output_section->vma
 979                                              + sgot->output_offset
 980                                              + off);
 981                           outrel.r_info = ELF32_R_INFO (0, R_LM32_RELATIVE);
 982                           outrel.r_addend = relocation;
 983                           loc = srelgot->contents;
 984                           loc += srelgot->reloc_count * sizeof (Elf32_External_Rela);
 985                           bfd_elf32_swap_reloca_out (output_bfd, &outrel,loc);
 986                           ++srelgot->reloc_count;
 987                         }
 988
 989                       local_got_offsets[r_symndx] |= 1;
 990                     }
 991
 992
 993                   relocation = sgot->output_offset + off;
 994                 }
 995
 996               /* Addend should be zero.  */
 997               if (rel->r_addend != 0)
 998                 _bfd_error_handler (_("internal error: addend should be zero for R_LM32_16_GOT"));
 999
1000               r = _bfd_final_link_relocate (howto,
1001                                             input_bfd,
1002                                             input_section,
1003                                             contents,
1004                                             rel->r_offset,
1005                                             relocation,
1006                                             rel->r_addend);
1007               break;
1008
1009             case R_LM32_GOTOFF_LO16:
1010             case R_LM32_GOTOFF_HI16:
1011               /* Relocation is offset from GOT.  */
1012               BFD_ASSERT (sgot != NULL);
1013               relocation -= sgot->output_section->vma;
1014               /* Account for sign-extension.  */
1015               if ((r_type == R_LM32_GOTOFF_HI16)
1016                   && ((relocation + rel->r_addend) & 0x8000))
1017                 rel->r_addend += 0x10000;
1018               r = _bfd_final_link_relocate (howto,
1019                                             input_bfd,
1020                                             input_section,
1021                                             contents,
1022                                             rel->r_offset,
1023                                             relocation,
1024                                             rel->r_addend);
1025               break;
1026
1027             case R_LM32_32:
1028               if (IS_FDPIC (output_bfd))
1029                 {
1030                   if ((!h) || (h && h->root.type != bfd_link_hash_undefweak))
1031                     {
1032                       /* Only create .rofixup entries for relocs in loadable sections.  */
1033                       if ((bfd_get_section_flags (output_bfd, input_section->output_section)
1034                           & (SEC_ALLOC | SEC_LOAD)) == (SEC_ALLOC | SEC_LOAD))
1035
1036                         {
1037                           /* Check address to be modified is writable.  */
1038                           if (_lm32fdpic_osec_readonly_p (output_bfd,
1039                                                           input_section
1040                                                            ->output_section))
1041                             {
1042                               info->callbacks->warning
1043                                 (info,
1044                                  _("cannot emit dynamic relocations in read-only section"),
1045                                  name, input_bfd, input_section, rel->r_offset);
1046                                return FALSE;
1047                             }
1048                           /* Create entry in .rofixup section.  */
1049                           _lm32fdpic_add_rofixup (output_bfd,
1050                                                   lm32fdpic_fixup32_section (info),
1051                                                   input_section->output_section->vma
1052                                                    + input_section->output_offset
1053                                                    + rel->r_offset);
1054                         }
1055                     }
1056                 }
1057               /* Fall through.  */
1058
1059             default:
1060               r = _bfd_final_link_relocate (howto,
1061                                             input_bfd,
1062                                             input_section,
1063                                             contents,
1064                                             rel->r_offset,
1065                                             relocation,
1066                                             rel->r_addend);
1067               break;
1068             }
1069         }
1070
1071       if (r != bfd_reloc_ok)
1072         {
1073           const char *msg = NULL;
1074           arelent bfd_reloc;
1075
1076           lm32_info_to_howto_rela (input_bfd, &bfd_reloc, rel);
1077           howto = bfd_reloc.howto;
1078
1079           if (h != NULL)
1080             name = h->root.root.string;
1081           else
1082             {
1083               name = (bfd_elf_string_from_elf_section
1084                       (input_bfd, symtab_hdr->sh_link, sym->st_name));
1085               if (name == NULL || *name == '\0')
1086                 name = bfd_section_name (input_bfd, sec);
1087             }
1088
1089           switch (r)
1090             {
1091             case bfd_reloc_overflow:
1092               if ((h != NULL)
1093                  && (h->root.type == bfd_link_hash_undefweak))
1094                 break;
1095               (*info->callbacks->reloc_overflow)
1096                 (info, (h ? &h->root : NULL), name, howto->name,
1097                  (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
1098               break;
1099
1100             case bfd_reloc_undefined:
1101               (*info->callbacks->undefined_symbol)
1102                 (info, name, input_bfd, input_section, rel->r_offset, TRUE);
1103               break;
1104
1105             case bfd_reloc_outofrange:
1106               msg = _("internal error: out of range error");
1107               goto common_error;
1108
1109             case bfd_reloc_notsupported:
1110               msg = _("internal error: unsupported relocation error");
1111               goto common_error;
1112
1113             case bfd_reloc_dangerous:
1114               msg = _("internal error: dangerous error");
1115               goto common_error;
1116
1117             default:
1118               msg = _("internal error: unknown error");
1119               /* fall through */
1120
1121             common_error:
1122               (*info->callbacks->warning) (info, msg, name, input_bfd,
1123                                            input_section, rel->r_offset);
1124               break;
1125             }
1126         }
1127     }
1128
1129   return TRUE;
1130 }
1131
1132 static asection *
1133 lm32_elf_gc_mark_hook (asection *sec,
1134                        struct bfd_link_info *info,
1135                        Elf_Internal_Rela *rel,
1136                        struct elf_link_hash_entry *h,
1137                        Elf_Internal_Sym *sym)
1138 {
1139   if (h != NULL)
1140     switch (ELF32_R_TYPE (rel->r_info))
1141       {
1142       case R_LM32_GNU_VTINHERIT:
1143       case R_LM32_GNU_VTENTRY:
1144         return NULL;
1145       }
1146
1147   return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
1148 }
1149
1150 /* Look through the relocs for a section during the first phase.  */
1151
1152 static bfd_boolean
1153 lm32_elf_check_relocs (bfd *abfd,
1154                        struct bfd_link_info *info,
1155                        asection *sec,
1156                        const Elf_Internal_Rela *relocs)
1157 {
1158   Elf_Internal_Shdr *symtab_hdr;
1159   struct elf_link_hash_entry **sym_hashes, **sym_hashes_end;
1160   const Elf_Internal_Rela *rel;
1161   const Elf_Internal_Rela *rel_end;
1162   struct elf_lm32_link_hash_table *htab;
1163   bfd *dynobj;
1164
1165   if (bfd_link_relocatable (info))
1166     return TRUE;
1167
1168   /* Don't do anything special with non-loaded, non-alloced sections.
1169      In particular, any relocs in such sections should not affect GOT
1170      and PLT reference counting (ie. we don't allow them to create GOT
1171      or PLT entries), there's no possibility or desire to optimize TLS
1172      relocs, and there's not much point in propagating relocs to shared
1173      libs that the dynamic linker won't relocate.  */
1174   if ((sec->flags & SEC_ALLOC) == 0)
1175     return TRUE;
1176
1177   symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
1178   sym_hashes = elf_sym_hashes (abfd);
1179   sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof (Elf32_External_Sym);
1180   if (!elf_bad_symtab (abfd))
1181     sym_hashes_end -= symtab_hdr->sh_info;
1182
1183   htab = lm32_elf_hash_table (info);
1184   if (htab == NULL)
1185     return FALSE;
1186
1187   dynobj = htab->root.dynobj;
1188
1189   rel_end = relocs + sec->reloc_count;
1190   for (rel = relocs; rel < rel_end; rel++)
1191     {
1192       int r_type;
1193       struct elf_link_hash_entry *h;
1194       unsigned long r_symndx;
1195
1196       r_symndx = ELF32_R_SYM (rel->r_info);
1197       r_type = ELF32_R_TYPE (rel->r_info);
1198       if (r_symndx < symtab_hdr->sh_info)
1199         h = NULL;
1200       else
1201         {
1202           h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1203           while (h->root.type == bfd_link_hash_indirect
1204                  || h->root.type == bfd_link_hash_warning)
1205             h = (struct elf_link_hash_entry *) h->root.u.i.link;
1206         }
1207
1208       /* Some relocs require a global offset table.  */
1209       if (htab->root.sgot == NULL)
1210         {
1211           switch (r_type)
1212             {
1213             case R_LM32_16_GOT:
1214             case R_LM32_GOTOFF_HI16:
1215             case R_LM32_GOTOFF_LO16:
1216               if (dynobj == NULL)
1217                 htab->root.dynobj = dynobj = abfd;
1218               if (!_bfd_elf_create_got_section (dynobj, info))
1219                 return FALSE;
1220               break;
1221             }
1222         }
1223
1224       /* Some relocs require a rofixup table. */
1225       if (IS_FDPIC (abfd))
1226         {
1227           switch (r_type)
1228             {
1229             case R_LM32_32:
1230               /* FDPIC requires a GOT if there is a .rofixup section
1231                  (Normal ELF doesn't). */
1232               if (dynobj == NULL)
1233                 htab->root.dynobj = dynobj = abfd;
1234               if (!_bfd_elf_create_got_section (dynobj, info))
1235                 return FALSE;
1236               /* Create .rofixup section */
1237               if (htab->sfixup32 == NULL)
1238                 {
1239                   if (! create_rofixup_section (dynobj, info))
1240                     return FALSE;
1241                 }
1242               break;
1243             case R_LM32_16_GOT:
1244             case R_LM32_GOTOFF_HI16:
1245             case R_LM32_GOTOFF_LO16:
1246               /* Create .rofixup section.  */
1247               if (htab->sfixup32 == NULL)
1248                 {
1249                   if (dynobj == NULL)
1250                     htab->root.dynobj = dynobj = abfd;
1251                   if (! create_rofixup_section (dynobj, info))
1252                     return FALSE;
1253                 }
1254               break;
1255             }
1256         }
1257
1258       switch (r_type)
1259         {
1260         case R_LM32_16_GOT:
1261           if (h != NULL)
1262             h->got.refcount += 1;
1263           else
1264             {
1265               bfd_signed_vma *local_got_refcounts;
1266
1267               /* This is a global offset table entry for a local symbol.  */
1268               local_got_refcounts = elf_local_got_refcounts (abfd);
1269               if (local_got_refcounts == NULL)
1270                 {
1271                   bfd_size_type size;
1272
1273                   size = symtab_hdr->sh_info;
1274                   size *= sizeof (bfd_signed_vma);
1275                   local_got_refcounts = bfd_zalloc (abfd, size);
1276                   if (local_got_refcounts == NULL)
1277                     return FALSE;
1278                   elf_local_got_refcounts (abfd) = local_got_refcounts;
1279                 }
1280               local_got_refcounts[r_symndx] += 1;
1281             }
1282           break;
1283
1284         /* This relocation describes the C++ object vtable hierarchy.
1285            Reconstruct it for later use during GC.  */
1286         case R_LM32_GNU_VTINHERIT:
1287           if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
1288             return FALSE;
1289           break;
1290
1291         /* This relocation describes which C++ vtable entries are actually
1292            used.  Record for later use during GC.  */
1293         case R_LM32_GNU_VTENTRY:
1294           if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
1295             return FALSE;
1296           break;
1297
1298         }
1299     }
1300
1301   return TRUE;
1302 }
1303
1304 /* Finish up the dynamic sections.  */
1305
1306 static bfd_boolean
1307 lm32_elf_finish_dynamic_sections (bfd *output_bfd,
1308                                   struct bfd_link_info *info)
1309 {
1310   struct elf_lm32_link_hash_table *htab;
1311   bfd *dynobj;
1312   asection *sdyn;
1313   asection *sgot;
1314
1315   htab = lm32_elf_hash_table (info);
1316   if (htab == NULL)
1317     return FALSE;
1318
1319   dynobj = htab->root.dynobj;
1320
1321   sgot = htab->root.sgotplt;
1322   sdyn = bfd_get_linker_section (dynobj, ".dynamic");
1323
1324   if (htab->root.dynamic_sections_created)
1325     {
1326       asection *splt;
1327       Elf32_External_Dyn *dyncon, *dynconend;
1328
1329       BFD_ASSERT (sgot != NULL && sdyn != NULL);
1330
1331       dyncon = (Elf32_External_Dyn *) sdyn->contents;
1332       dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
1333
1334       for (; dyncon < dynconend; dyncon++)
1335         {
1336           Elf_Internal_Dyn dyn;
1337           asection *s;
1338
1339           bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
1340
1341           switch (dyn.d_tag)
1342             {
1343             default:
1344               break;
1345
1346             case DT_PLTGOT:
1347               s = htab->root.sgotplt;
1348               goto get_vma;
1349             case DT_JMPREL:
1350               s = htab->root.srelplt;
1351             get_vma:
1352               dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
1353               bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1354               break;
1355
1356             case DT_PLTRELSZ:
1357               s = htab->root.srelplt;
1358               dyn.d_un.d_val = s->size;
1359               bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
1360               break;
1361             }
1362         }
1363
1364       /* Fill in the first entry in the procedure linkage table.  */
1365       splt = htab->root.splt;
1366       if (splt && splt->size > 0)
1367         {
1368           if (bfd_link_pic (info))
1369             {
1370               bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD0, splt->contents);
1371               bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD1, splt->contents + 4);
1372               bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD2, splt->contents + 8);
1373               bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD3, splt->contents + 12);
1374               bfd_put_32 (output_bfd, PLT0_PIC_ENTRY_WORD4, splt->contents + 16);
1375             }
1376           else
1377             {
1378               unsigned long addr;
1379               /* addr = .got + 4 */
1380               addr = sgot->output_section->vma + sgot->output_offset + 4;
1381               bfd_put_32 (output_bfd,
1382                           PLT0_ENTRY_WORD0 | ((addr >> 16) & 0xffff),
1383                           splt->contents);
1384               bfd_put_32 (output_bfd,
1385                           PLT0_ENTRY_WORD1 | (addr & 0xffff),
1386                           splt->contents + 4);
1387               bfd_put_32 (output_bfd, PLT0_ENTRY_WORD2, splt->contents + 8);
1388               bfd_put_32 (output_bfd, PLT0_ENTRY_WORD3, splt->contents + 12);
1389               bfd_put_32 (output_bfd, PLT0_ENTRY_WORD4, splt->contents + 16);
1390             }
1391
1392           elf_section_data (splt->output_section)->this_hdr.sh_entsize =
1393             PLT_ENTRY_SIZE;
1394         }
1395     }
1396
1397   /* Fill in the first three entries in the global offset table.  */
1398   if (sgot && sgot->size > 0)
1399     {
1400       if (sdyn == NULL)
1401         bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
1402       else
1403         bfd_put_32 (output_bfd,
1404                     sdyn->output_section->vma + sdyn->output_offset,
1405                     sgot->contents);
1406       bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 4);
1407       bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + 8);
1408
1409       /* FIXME:  This can be null if create_dynamic_sections wasn't called. */
1410       if (elf_section_data (sgot->output_section) != NULL)
1411         elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
1412     }
1413
1414   if (lm32fdpic_fixup32_section (info))
1415     {
1416       struct elf_link_hash_entry *hgot = elf_hash_table (info)->hgot;
1417       bfd_vma got_value = hgot->root.u.def.value
1418             + hgot->root.u.def.section->output_section->vma
1419             + hgot->root.u.def.section->output_offset;
1420       struct bfd_link_hash_entry *hend;
1421
1422       /* Last entry is pointer to GOT.  */
1423       _lm32fdpic_add_rofixup (output_bfd, lm32fdpic_fixup32_section (info), got_value);
1424
1425       /* Check we wrote enough entries.  */
1426       if (lm32fdpic_fixup32_section (info)->size
1427               != (lm32fdpic_fixup32_section (info)->reloc_count * 4))
1428         {
1429           _bfd_error_handler
1430             ("LINKER BUG: .rofixup section size mismatch: size/4 %" PRId64
1431              " != relocs %d",
1432             (int64_t) (lm32fdpic_fixup32_section (info)->size / 4),
1433             lm32fdpic_fixup32_section (info)->reloc_count);
1434           return FALSE;
1435         }
1436
1437       hend = bfd_link_hash_lookup (info->hash, "__ROFIXUP_END__",
1438               FALSE, FALSE, TRUE);
1439       if (hend
1440           && (hend->type == bfd_link_hash_defined
1441               || hend->type == bfd_link_hash_defweak))
1442         {
1443           bfd_vma value =
1444             lm32fdpic_fixup32_section (info)->output_section->vma
1445             + lm32fdpic_fixup32_section (info)->output_offset
1446             + lm32fdpic_fixup32_section (info)->size
1447             - hend->u.def.section->output_section->vma
1448             - hend->u.def.section->output_offset;
1449           BFD_ASSERT (hend->u.def.value == value);
1450           if (hend->u.def.value != value)
1451             {
1452               _bfd_error_handler
1453                 ("LINKER BUG: .rofixup section hend->u.def.value != value: %"
1454                  PRId64 " != %" PRId64,
1455                  (int64_t) hend->u.def.value, (int64_t) value);
1456               return FALSE;
1457             }
1458         }
1459     }
1460
1461   return TRUE;
1462 }
1463
1464 /* Finish up dynamic symbol handling.  We set the contents of various
1465    dynamic sections here.  */
1466
1467 static bfd_boolean
1468 lm32_elf_finish_dynamic_symbol (bfd *output_bfd,
1469                                 struct bfd_link_info *info,
1470                                 struct elf_link_hash_entry *h,
1471                                 Elf_Internal_Sym *sym)
1472 {
1473   struct elf_lm32_link_hash_table *htab;
1474   bfd_byte *loc;
1475
1476   htab = lm32_elf_hash_table (info);
1477   if (htab == NULL)
1478     return FALSE;
1479
1480   if (h->plt.offset != (bfd_vma) -1)
1481     {
1482       asection *splt;
1483       asection *sgot;
1484       asection *srela;
1485
1486       bfd_vma plt_index;
1487       bfd_vma got_offset;
1488       Elf_Internal_Rela rela;
1489
1490       /* This symbol has an entry in the procedure linkage table.  Set
1491          it up.  */
1492       BFD_ASSERT (h->dynindx != -1);
1493
1494       splt = htab->root.splt;
1495       sgot = htab->root.sgotplt;
1496       srela = htab->root.srelplt;
1497       BFD_ASSERT (splt != NULL && sgot != NULL && srela != NULL);
1498
1499       /* Get the index in the procedure linkage table which
1500          corresponds to this symbol.  This is the index of this symbol
1501          in all the symbols for which we are making plt entries.  The
1502          first entry in the procedure linkage table is reserved.  */
1503       plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
1504
1505       /* Get the offset into the .got table of the entry that
1506         corresponds to this function.  Each .got entry is 4 bytes.
1507         The first three are reserved.  */
1508       got_offset = (plt_index + 3) * 4;
1509
1510       /* Fill in the entry in the procedure linkage table.  */
1511       if (! bfd_link_pic (info))
1512         {
1513           /* TODO */
1514         }
1515       else
1516         {
1517           /* TODO */
1518         }
1519
1520       /* Fill in the entry in the global offset table.  */
1521       bfd_put_32 (output_bfd,
1522                   (splt->output_section->vma
1523                    + splt->output_offset
1524                    + h->plt.offset
1525                    + 12), /* same offset */
1526                   sgot->contents + got_offset);
1527
1528       /* Fill in the entry in the .rela.plt section.  */
1529       rela.r_offset = (sgot->output_section->vma
1530                        + sgot->output_offset
1531                        + got_offset);
1532       rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_JMP_SLOT);
1533       rela.r_addend = 0;
1534       loc = srela->contents;
1535       loc += plt_index * sizeof (Elf32_External_Rela);
1536       bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1537
1538       if (!h->def_regular)
1539         {
1540           /* Mark the symbol as undefined, rather than as defined in
1541              the .plt section.  Leave the value alone.  */
1542           sym->st_shndx = SHN_UNDEF;
1543         }
1544
1545     }
1546
1547   if (h->got.offset != (bfd_vma) -1)
1548     {
1549       asection *sgot;
1550       asection *srela;
1551       Elf_Internal_Rela rela;
1552
1553       /* This symbol has an entry in the global offset table.  Set it
1554          up.  */
1555       sgot = htab->root.sgot;
1556       srela = htab->root.srelgot;
1557       BFD_ASSERT (sgot != NULL && srela != NULL);
1558
1559       rela.r_offset = (sgot->output_section->vma
1560                        + sgot->output_offset
1561                        + (h->got.offset &~ 1));
1562
1563       /* If this is a -Bsymbolic link, and the symbol is defined
1564          locally, we just want to emit a RELATIVE reloc.  Likewise if
1565          the symbol was forced to be local because of a version file.
1566          The entry in the global offset table will already have been
1567          initialized in the relocate_section function.  */
1568       if (bfd_link_pic (info)
1569           && (info->symbolic
1570               || h->dynindx == -1
1571               || h->forced_local)
1572           && h->def_regular)
1573         {
1574           rela.r_info = ELF32_R_INFO (0, R_LM32_RELATIVE);
1575           rela.r_addend = (h->root.u.def.value
1576                            + h->root.u.def.section->output_section->vma
1577                            + h->root.u.def.section->output_offset);
1578         }
1579       else
1580         {
1581           BFD_ASSERT ((h->got.offset & 1) == 0);
1582           bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got.offset);
1583           rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_GLOB_DAT);
1584           rela.r_addend = 0;
1585         }
1586
1587       loc = srela->contents;
1588       loc += srela->reloc_count * sizeof (Elf32_External_Rela);
1589       bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1590       ++srela->reloc_count;
1591     }
1592
1593   if (h->needs_copy)
1594     {
1595       asection *s;
1596       Elf_Internal_Rela rela;
1597
1598       /* This symbols needs a copy reloc.  Set it up.  */
1599       BFD_ASSERT (h->dynindx != -1
1600                   && (h->root.type == bfd_link_hash_defined
1601                       || h->root.type == bfd_link_hash_defweak));
1602
1603       s = bfd_get_linker_section (htab->root.dynobj, ".rela.bss");
1604       BFD_ASSERT (s != NULL);
1605
1606       rela.r_offset = (h->root.u.def.value
1607                        + h->root.u.def.section->output_section->vma
1608                        + h->root.u.def.section->output_offset);
1609       rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_COPY);
1610       rela.r_addend = 0;
1611       loc = s->contents;
1612       loc += s->reloc_count * sizeof (Elf32_External_Rela);
1613       bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1614       ++s->reloc_count;
1615     }
1616
1617   /* Mark some specially defined symbols as absolute.  */
1618   if (h == htab->root.hdynamic || h == htab->root.hgot)
1619     sym->st_shndx = SHN_ABS;
1620
1621   return TRUE;
1622 }
1623
1624 static enum elf_reloc_type_class
1625 lm32_elf_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
1626                            const asection *rel_sec ATTRIBUTE_UNUSED,
1627                            const Elf_Internal_Rela *rela)
1628 {
1629   switch ((int) ELF32_R_TYPE (rela->r_info))
1630     {
1631     case R_LM32_RELATIVE:  return reloc_class_relative;
1632     case R_LM32_JMP_SLOT:  return reloc_class_plt;
1633     case R_LM32_COPY:      return reloc_class_copy;
1634     default:               return reloc_class_normal;
1635     }
1636 }
1637
1638 /* Find dynamic relocs for H that apply to read-only sections.  */
1639
1640 static asection *
1641 readonly_dynrelocs (struct elf_link_hash_entry *h)
1642 {
1643   struct elf_dyn_relocs *p;
1644   struct elf_lm32_link_hash_entry *eh = (struct elf_lm32_link_hash_entry *) h;
1645
1646   for (p = eh->dyn_relocs; p != NULL; p = p->next)
1647     {
1648       asection *s = p->sec->output_section;
1649
1650       if (s != NULL && (s->flags & SEC_READONLY) != 0)
1651         return p->sec;
1652     }
1653   return NULL;
1654 }
1655
1656 /* Adjust a symbol defined by a dynamic object and referenced by a
1657    regular object.  The current definition is in some section of the
1658    dynamic object, but we're not including those sections.  We have to
1659    change the definition to something the rest of the link can
1660    understand.  */
1661
1662 static bfd_boolean
1663 lm32_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
1664                                 struct elf_link_hash_entry *h)
1665 {
1666   struct elf_lm32_link_hash_table *htab;
1667   bfd *dynobj;
1668   asection *s;
1669
1670   dynobj = elf_hash_table (info)->dynobj;
1671
1672   /* Make sure we know what is going on here.  */
1673   BFD_ASSERT (dynobj != NULL
1674               && (h->needs_plt
1675                   || h->is_weakalias
1676                   || (h->def_dynamic
1677                       && h->ref_regular
1678                       && !h->def_regular)));
1679
1680   /* If this is a function, put it in the procedure linkage table.  We
1681      will fill in the contents of the procedure linkage table later,
1682      when we know the address of the .got section.  */
1683   if (h->type == STT_FUNC
1684       || h->needs_plt)
1685     {
1686       if (! bfd_link_pic (info)
1687           && !h->def_dynamic
1688           && !h->ref_dynamic
1689           && h->root.type != bfd_link_hash_undefweak
1690           && h->root.type != bfd_link_hash_undefined)
1691         {
1692           /* This case can occur if we saw a PLT reloc in an input
1693              file, but the symbol was never referred to by a dynamic
1694              object.  In such a case, we don't actually need to build
1695              a procedure linkage table, and we can just do a PCREL
1696              reloc instead.  */
1697           h->plt.offset = (bfd_vma) -1;
1698           h->needs_plt = 0;
1699         }
1700
1701       return TRUE;
1702     }
1703   else
1704     h->plt.offset = (bfd_vma) -1;
1705
1706   /* If this is a weak symbol, and there is a real definition, the
1707      processor independent code will have arranged for us to see the
1708      real definition first, and we can just use the same value.  */
1709   if (h->is_weakalias)
1710     {
1711       struct elf_link_hash_entry *def = weakdef (h);
1712       BFD_ASSERT (def->root.type == bfd_link_hash_defined);
1713       h->root.u.def.section = def->root.u.def.section;
1714       h->root.u.def.value = def->root.u.def.value;
1715       return TRUE;
1716     }
1717
1718   /* This is a reference to a symbol defined by a dynamic object which
1719      is not a function.  */
1720
1721   /* If we are creating a shared library, we must presume that the
1722      only references to the symbol are via the global offset table.
1723      For such cases we need not do anything here; the relocations will
1724      be handled correctly by relocate_section.  */
1725   if (bfd_link_pic (info))
1726     return TRUE;
1727
1728   /* If there are no references to this symbol that do not use the
1729      GOT, we don't need to generate a copy reloc.  */
1730   if (!h->non_got_ref)
1731     return TRUE;
1732
1733   /* If -z nocopyreloc was given, we won't generate them either.  */
1734   if (0 && info->nocopyreloc)
1735     {
1736       h->non_got_ref = 0;
1737       return TRUE;
1738     }
1739
1740   /* If we don't find any dynamic relocs in read-only sections, then
1741      we'll be keeping the dynamic relocs and avoiding the copy reloc.  */
1742   if (0 && !readonly_dynrelocs (h))
1743     {
1744       h->non_got_ref = 0;
1745       return TRUE;
1746     }
1747
1748   /* We must allocate the symbol in our .dynbss section, which will
1749      become part of the .bss section of the executable.  There will be
1750      an entry for this symbol in the .dynsym section.  The dynamic
1751      object will contain position independent code, so all references
1752      from the dynamic object to this symbol will go through the global
1753      offset table.  The dynamic linker will use the .dynsym entry to
1754      determine the address it must put in the global offset table, so
1755      both the dynamic object and the regular object will refer to the
1756      same memory location for the variable.  */
1757
1758   htab = lm32_elf_hash_table (info);
1759   if (htab == NULL)
1760     return FALSE;
1761
1762   s = htab->sdynbss;
1763   BFD_ASSERT (s != NULL);
1764
1765   /* We must generate a R_LM32_COPY reloc to tell the dynamic linker
1766      to copy the initial value out of the dynamic object and into the
1767      runtime process image.  We need to remember the offset into the
1768      .rela.bss section we are going to use.  */
1769   if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
1770     {
1771       asection *srel;
1772
1773       srel = htab->srelbss;
1774       BFD_ASSERT (srel != NULL);
1775       srel->size += sizeof (Elf32_External_Rela);
1776       h->needs_copy = 1;
1777     }
1778
1779   return _bfd_elf_adjust_dynamic_copy (info, h, s);
1780 }
1781
1782 /* Allocate space in .plt, .got and associated reloc sections for
1783    dynamic relocs.  */
1784
1785 static bfd_boolean
1786 allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
1787 {
1788   struct bfd_link_info *info;
1789   struct elf_lm32_link_hash_table *htab;
1790   struct elf_lm32_link_hash_entry *eh;
1791   struct elf_dyn_relocs *p;
1792
1793   if (h->root.type == bfd_link_hash_indirect)
1794     return TRUE;
1795
1796   info = (struct bfd_link_info *) inf;
1797   htab = lm32_elf_hash_table (info);
1798   if (htab == NULL)
1799     return FALSE;
1800
1801   eh = (struct elf_lm32_link_hash_entry *) h;
1802
1803   if (htab->root.dynamic_sections_created
1804       && h->plt.refcount > 0)
1805     {
1806       /* Make sure this symbol is output as a dynamic symbol.
1807          Undefined weak syms won't yet be marked as dynamic.  */
1808       if (h->dynindx == -1
1809           && !h->forced_local)
1810         {
1811           if (! bfd_elf_link_record_dynamic_symbol (info, h))
1812             return FALSE;
1813         }
1814
1815       if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h))
1816         {
1817           asection *s = htab->root.splt;
1818
1819           /* If this is the first .plt entry, make room for the special
1820              first entry.  */
1821           if (s->size == 0)
1822             s->size += PLT_ENTRY_SIZE;
1823
1824           h->plt.offset = s->size;
1825
1826           /* If this symbol is not defined in a regular file, and we are
1827              not generating a shared library, then set the symbol to this
1828              location in the .plt.  This is required to make function
1829              pointers compare as equal between the normal executable and
1830              the shared library.  */
1831           if (! bfd_link_pic (info)
1832               && !h->def_regular)
1833             {
1834               h->root.u.def.section = s;
1835               h->root.u.def.value = h->plt.offset;
1836             }
1837
1838           /* Make room for this entry.  */
1839           s->size += PLT_ENTRY_SIZE;
1840
1841           /* We also need to make an entry in the .got.plt section, which
1842              will be placed in the .got section by the linker script.  */
1843           htab->root.sgotplt->size += 4;
1844
1845           /* We also need to make an entry in the .rel.plt section.  */
1846           htab->root.srelplt->size += sizeof (Elf32_External_Rela);
1847         }
1848       else
1849         {
1850           h->plt.offset = (bfd_vma) -1;
1851           h->needs_plt = 0;
1852         }
1853     }
1854   else
1855     {
1856       h->plt.offset = (bfd_vma) -1;
1857       h->needs_plt = 0;
1858     }
1859
1860   if (h->got.refcount > 0)
1861     {
1862       asection *s;
1863       bfd_boolean dyn;
1864
1865       /* Make sure this symbol is output as a dynamic symbol.
1866          Undefined weak syms won't yet be marked as dynamic.  */
1867       if (h->dynindx == -1
1868           && !h->forced_local)
1869         {
1870           if (! bfd_elf_link_record_dynamic_symbol (info, h))
1871             return FALSE;
1872         }
1873
1874       s = htab->root.sgot;
1875
1876       h->got.offset = s->size;
1877       s->size += 4;
1878       dyn = htab->root.dynamic_sections_created;
1879       if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h))
1880         htab->root.srelgot->size += sizeof (Elf32_External_Rela);
1881     }
1882   else
1883     h->got.offset = (bfd_vma) -1;
1884
1885   if (eh->dyn_relocs == NULL)
1886     return TRUE;
1887
1888   /* In the shared -Bsymbolic case, discard space allocated for
1889      dynamic pc-relative relocs against symbols which turn out to be
1890      defined in regular objects.  For the normal shared case, discard
1891      space for pc-relative relocs that have become local due to symbol
1892      visibility changes.  */
1893
1894   if (bfd_link_pic (info))
1895     {
1896       if (h->def_regular
1897           && (h->forced_local
1898               || info->symbolic))
1899         {
1900           struct elf_dyn_relocs **pp;
1901
1902           for (pp = &eh->dyn_relocs; (p = *pp) != NULL;)
1903             {
1904               p->count -= p->pc_count;
1905               p->pc_count = 0;
1906               if (p->count == 0)
1907                 *pp = p->next;
1908               else
1909                 pp = &p->next;
1910             }
1911         }
1912
1913       /* Also discard relocs on undefined weak syms with non-default
1914          visibility.  */
1915       if (eh->dyn_relocs != NULL
1916           && h->root.type == bfd_link_hash_undefweak)
1917         {
1918           if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
1919             eh->dyn_relocs = NULL;
1920
1921           /* Make sure undefined weak symbols are output as a dynamic
1922              symbol in PIEs.  */
1923           else if (h->dynindx == -1
1924                    && !h->forced_local)
1925             {
1926               if (! bfd_elf_link_record_dynamic_symbol (info, h))
1927                 return FALSE;
1928             }
1929         }
1930     }
1931   else
1932     {
1933       /* For the non-shared case, discard space for relocs against
1934          symbols which turn out to need copy relocs or are not
1935          dynamic.  */
1936
1937       if (!h->non_got_ref
1938           && ((h->def_dynamic
1939                && !h->def_regular)
1940               || (htab->root.dynamic_sections_created
1941                   && (h->root.type == bfd_link_hash_undefweak
1942                       || h->root.type == bfd_link_hash_undefined))))
1943         {
1944           /* Make sure this symbol is output as a dynamic symbol.
1945              Undefined weak syms won't yet be marked as dynamic.  */
1946           if (h->dynindx == -1
1947               && !h->forced_local)
1948             {
1949               if (! bfd_elf_link_record_dynamic_symbol (info, h))
1950                 return FALSE;
1951             }
1952
1953           /* If that succeeded, we know we'll be keeping all the
1954              relocs.  */
1955           if (h->dynindx != -1)
1956             goto keep;
1957         }
1958
1959       eh->dyn_relocs = NULL;
1960
1961     keep: ;
1962     }
1963
1964   /* Finally, allocate space.  */
1965   for (p = eh->dyn_relocs; p != NULL; p = p->next)
1966     {
1967       asection *sreloc = elf_section_data (p->sec)->sreloc;
1968       sreloc->size += p->count * sizeof (Elf32_External_Rela);
1969     }
1970
1971   return TRUE;
1972 }
1973
1974 /* Set DF_TEXTREL if we find any dynamic relocs that apply to
1975    read-only sections.  */
1976
1977 static bfd_boolean
1978 maybe_set_textrel (struct elf_link_hash_entry *h, void *info_p)
1979 {
1980   asection *sec;
1981
1982   if (h->root.type == bfd_link_hash_indirect)
1983     return TRUE;
1984
1985   sec = readonly_dynrelocs (h);
1986   if (sec != NULL)
1987     {
1988       struct bfd_link_info *info = (struct bfd_link_info *) info_p;
1989
1990       info->flags |= DF_TEXTREL;
1991       info->callbacks->minfo
1992         (_("%pB: dynamic relocation against `%pT' in read-only section `%pA'\n"),
1993          sec->owner, h->root.root.string, sec);
1994
1995       /* Not an error, just cut short the traversal.  */
1996       return FALSE;
1997     }
1998   return TRUE;
1999 }
2000
2001 /* Set the sizes of the dynamic sections.  */
2002
2003 static bfd_boolean
2004 lm32_elf_size_dynamic_sections (bfd *output_bfd,
2005                                 struct bfd_link_info *info)
2006 {
2007   struct elf_lm32_link_hash_table *htab;
2008   bfd *dynobj;
2009   asection *s;
2010   bfd_boolean relocs;
2011   bfd *ibfd;
2012
2013   htab = lm32_elf_hash_table (info);
2014   if (htab == NULL)
2015     return FALSE;
2016
2017   dynobj = htab->root.dynobj;
2018   BFD_ASSERT (dynobj != NULL);
2019
2020   if (htab->root.dynamic_sections_created)
2021     {
2022       /* Set the contents of the .interp section to the interpreter.  */
2023       if (bfd_link_executable (info) && !info->nointerp)
2024         {
2025           s = bfd_get_linker_section (dynobj, ".interp");
2026           BFD_ASSERT (s != NULL);
2027           s->size = sizeof ELF_DYNAMIC_INTERPRETER;
2028           s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
2029         }
2030     }
2031
2032   /* Set up .got offsets for local syms, and space for local dynamic
2033      relocs.  */
2034   for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
2035     {
2036       bfd_signed_vma *local_got;
2037       bfd_signed_vma *end_local_got;
2038       bfd_size_type locsymcount;
2039       Elf_Internal_Shdr *symtab_hdr;
2040       asection *srel;
2041
2042       if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour)
2043         continue;
2044
2045       for (s = ibfd->sections; s != NULL; s = s->next)
2046         {
2047           struct elf_dyn_relocs *p;
2048
2049           for (p = ((struct elf_dyn_relocs *)
2050                     elf_section_data (s)->local_dynrel);
2051                p != NULL;
2052                p = p->next)
2053             {
2054               if (! bfd_is_abs_section (p->sec)
2055                   && bfd_is_abs_section (p->sec->output_section))
2056                 {
2057                   /* Input section has been discarded, either because
2058                      it is a copy of a linkonce section or due to
2059                      linker script /DISCARD/, so we'll be discarding
2060                      the relocs too.  */
2061                 }
2062               else if (p->count != 0)
2063                 {
2064                   srel = elf_section_data (p->sec)->sreloc;
2065                   srel->size += p->count * sizeof (Elf32_External_Rela);
2066                   if ((p->sec->output_section->flags & SEC_READONLY) != 0)
2067                     info->flags |= DF_TEXTREL;
2068                 }
2069             }
2070         }
2071
2072       local_got = elf_local_got_refcounts (ibfd);
2073       if (!local_got)
2074         continue;
2075
2076       symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2077       locsymcount = symtab_hdr->sh_info;
2078       end_local_got = local_got + locsymcount;
2079       s = htab->root.sgot;
2080       srel = htab->root.srelgot;
2081       for (; local_got < end_local_got; ++local_got)
2082         {
2083           if (*local_got > 0)
2084             {
2085               *local_got = s->size;
2086               s->size += 4;
2087               if (bfd_link_pic (info))
2088                 srel->size += sizeof (Elf32_External_Rela);
2089             }
2090           else
2091             *local_got = (bfd_vma) -1;
2092         }
2093     }
2094
2095   /* Allocate global sym .plt and .got entries, and space for global
2096      sym dynamic relocs.  */
2097   elf_link_hash_traverse (&htab->root, allocate_dynrelocs, info);
2098
2099   /* We now have determined the sizes of the various dynamic sections.
2100      Allocate memory for them.  */
2101   relocs = FALSE;
2102   for (s = dynobj->sections; s != NULL; s = s->next)
2103     {
2104       if ((s->flags & SEC_LINKER_CREATED) == 0)
2105         continue;
2106
2107       if (s == htab->root.splt
2108           || s == htab->root.sgot
2109           || s == htab->root.sgotplt
2110           || s == htab->sdynbss)
2111         {
2112           /* Strip this section if we don't need it; see the
2113              comment below.  */
2114         }
2115       else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rela"))
2116         {
2117           if (s->size != 0 && s != htab->root.srelplt)
2118             relocs = TRUE;
2119
2120           /* We use the reloc_count field as a counter if we need
2121              to copy relocs into the output file.  */
2122           s->reloc_count = 0;
2123         }
2124       else
2125         /* It's not one of our sections, so don't allocate space.  */
2126         continue;
2127
2128       if (s->size == 0)
2129         {
2130           /* If we don't need this section, strip it from the
2131              output file.  This is mostly to handle .rela.bss and
2132              .rela.plt.  We must create both sections in
2133              create_dynamic_sections, because they must be created
2134              before the linker maps input sections to output
2135              sections.  The linker does that before
2136              adjust_dynamic_symbol is called, and it is that
2137              function which decides whether anything needs to go
2138              into these sections.  */
2139           s->flags |= SEC_EXCLUDE;
2140           continue;
2141         }
2142
2143       if ((s->flags & SEC_HAS_CONTENTS) == 0)
2144         continue;
2145
2146       /* Allocate memory for the section contents.  We use bfd_zalloc
2147          here in case unused entries are not reclaimed before the
2148          section's contents are written out.  This should not happen,
2149          but this way if it does, we get a R_LM32_NONE reloc instead
2150          of garbage.  */
2151       s->contents = bfd_zalloc (dynobj, s->size);
2152       if (s->contents == NULL)
2153         return FALSE;
2154     }
2155
2156   if (htab->root.dynamic_sections_created)
2157     {
2158       /* Add some entries to the .dynamic section.  We fill in the
2159          values later, in lm32_elf_finish_dynamic_sections, but we
2160          must add the entries now so that we get the correct size for
2161          the .dynamic section.  The DT_DEBUG entry is filled in by the
2162          dynamic linker and used by the debugger.  */
2163 #define add_dynamic_entry(TAG, VAL) \
2164   _bfd_elf_add_dynamic_entry (info, TAG, VAL)
2165
2166      if (bfd_link_executable (info))
2167         {
2168           if (! add_dynamic_entry (DT_DEBUG, 0))
2169             return FALSE;
2170         }
2171
2172       if (htab->root.splt->size != 0)
2173         {
2174           if (! add_dynamic_entry (DT_PLTGOT, 0)
2175               || ! add_dynamic_entry (DT_PLTRELSZ, 0)
2176               || ! add_dynamic_entry (DT_PLTREL, DT_RELA)
2177               || ! add_dynamic_entry (DT_JMPREL, 0))
2178             return FALSE;
2179         }
2180
2181       if (relocs)
2182         {
2183           if (! add_dynamic_entry (DT_RELA, 0)
2184               || ! add_dynamic_entry (DT_RELASZ, 0)
2185               || ! add_dynamic_entry (DT_RELAENT,
2186                                       sizeof (Elf32_External_Rela)))
2187             return FALSE;
2188
2189           /* If any dynamic relocs apply to a read-only section,
2190              then we need a DT_TEXTREL entry.  */
2191           if ((info->flags & DF_TEXTREL) == 0)
2192             elf_link_hash_traverse (&htab->root, maybe_set_textrel, info);
2193
2194           if ((info->flags & DF_TEXTREL) != 0)
2195             {
2196               if (! add_dynamic_entry (DT_TEXTREL, 0))
2197                 return FALSE;
2198             }
2199         }
2200     }
2201 #undef add_dynamic_entry
2202
2203   /* Allocate .rofixup section.  */
2204   if (IS_FDPIC (output_bfd))
2205     {
2206       struct weak_symbol_list *list_start = NULL, *list_end = NULL;
2207       int rgot_weak_count = 0;
2208       int r32_count = 0;
2209       int rgot_count = 0;
2210       /* Look for deleted sections.  */
2211       for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
2212         {
2213           for (s = ibfd->sections; s != NULL; s = s->next)
2214             {
2215               if (s->reloc_count)
2216                 {
2217                   /* Count relocs that need .rofixup entires.  */
2218                   Elf_Internal_Rela *internal_relocs, *end;
2219                   internal_relocs = elf_section_data (s)->relocs;
2220                   if (internal_relocs == NULL)
2221                     internal_relocs = (_bfd_elf_link_read_relocs (ibfd, s, NULL, NULL, FALSE));
2222                   if (internal_relocs != NULL)
2223                     {
2224                       end = internal_relocs + s->reloc_count;
2225                       while (internal_relocs < end)
2226                         {
2227                           Elf_Internal_Shdr *symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2228                           struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (ibfd);
2229                           unsigned long r_symndx;
2230                           struct elf_link_hash_entry *h;
2231
2232                           symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2233                           sym_hashes = elf_sym_hashes (ibfd);
2234                           r_symndx = ELF32_R_SYM (internal_relocs->r_info);
2235                           h = NULL;
2236                           if (r_symndx < symtab_hdr->sh_info)
2237                             {
2238                             }
2239                           else
2240                             {
2241                               h = sym_hashes[r_symndx - symtab_hdr->sh_info];
2242                               while (h->root.type == bfd_link_hash_indirect
2243                                      || h->root.type == bfd_link_hash_warning)
2244                                 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2245                               }
2246
2247                           /* Don't generate entries for weak symbols.  */
2248                           if (!h || (h && h->root.type != bfd_link_hash_undefweak))
2249                             {
2250                               if (!discarded_section (s) && !((bfd_get_section_flags (ibfd, s) & SEC_ALLOC) == 0))
2251                                 {
2252                                   switch (ELF32_R_TYPE (internal_relocs->r_info))
2253                                     {
2254                                     case R_LM32_32:
2255                                       r32_count++;
2256                                       break;
2257                                     case R_LM32_16_GOT:
2258                                       rgot_count++;
2259                                       break;
2260                                     }
2261                                 }
2262                             }
2263                           else
2264                             {
2265                               struct weak_symbol_list *current, *new_entry;
2266                               /* Is this symbol already in the list?  */
2267                               for (current = list_start; current; current = current->next)
2268                                 {
2269                                   if (!strcmp (current->name, h->root.root.string))
2270                                     break;
2271                                 }
2272                               if (!current && !discarded_section (s) && (bfd_get_section_flags (ibfd, s) & SEC_ALLOC))
2273                                 {
2274                                   /* Will this have an entry in the GOT.  */
2275                                   if (ELF32_R_TYPE (internal_relocs->r_info) == R_LM32_16_GOT)
2276                                     {
2277                                       /* Create a new entry.  */
2278                                       new_entry = malloc (sizeof (struct weak_symbol_list));
2279                                       if (!new_entry)
2280                                         return FALSE;
2281                                       new_entry->name = h->root.root.string;
2282                                       new_entry->next = NULL;
2283                                       /* Add to list */
2284                                       if (list_start == NULL)
2285                                         {
2286                                           list_start = new_entry;
2287                                           list_end = new_entry;
2288                                         }
2289                                       else
2290                                         {
2291                                           list_end->next = new_entry;
2292                                           list_end = new_entry;
2293                                         }
2294                                       /* Increase count of undefined weak symbols in the got.  */
2295                                       rgot_weak_count++;
2296                                     }
2297                                 }
2298                             }
2299                           internal_relocs++;
2300                         }
2301                     }
2302                   else
2303                     return FALSE;
2304                 }
2305             }
2306         }
2307       /* Free list.  */
2308       while (list_start)
2309         {
2310           list_end = list_start->next;
2311           free (list_start);
2312           list_start = list_end;
2313         }
2314
2315       /* Size sections.  */
2316       lm32fdpic_fixup32_section (info)->size
2317         = (r32_count + (htab->root.sgot->size / 4) - rgot_weak_count + 1) * 4;
2318       if (lm32fdpic_fixup32_section (info)->size == 0)
2319         lm32fdpic_fixup32_section (info)->flags |= SEC_EXCLUDE;
2320       else
2321         {
2322           lm32fdpic_fixup32_section (info)->contents =
2323              bfd_zalloc (dynobj, lm32fdpic_fixup32_section (info)->size);
2324           if (lm32fdpic_fixup32_section (info)->contents == NULL)
2325             return FALSE;
2326         }
2327     }
2328
2329   return TRUE;
2330 }
2331
2332 /* Create dynamic sections when linking against a dynamic object.  */
2333
2334 static bfd_boolean
2335 lm32_elf_create_dynamic_sections (bfd *abfd, struct bfd_link_info *info)
2336 {
2337   struct elf_lm32_link_hash_table *htab;
2338   flagword flags, pltflags;
2339   asection *s;
2340   const struct elf_backend_data *bed = get_elf_backend_data (abfd);
2341   int ptralign = 2; /* 32bit */
2342
2343   htab = lm32_elf_hash_table (info);
2344   if (htab == NULL)
2345     return FALSE;
2346
2347   /* Make sure we have a GOT - For the case where we have a dynamic object
2348      but none of the relocs in check_relocs */
2349   if (!_bfd_elf_create_got_section (abfd, info))
2350     return FALSE;
2351   if (IS_FDPIC (abfd) && (htab->sfixup32 == NULL))
2352     {
2353       if (! create_rofixup_section (abfd, info))
2354         return FALSE;
2355     }
2356
2357   /* We need to create .plt, .rel[a].plt, .got, .got.plt, .dynbss, and
2358      .rel[a].bss sections.  */
2359   flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
2360            | SEC_LINKER_CREATED);
2361
2362   pltflags = flags;
2363   pltflags |= SEC_CODE;
2364   if (bed->plt_not_loaded)
2365     pltflags &= ~ (SEC_LOAD | SEC_HAS_CONTENTS);
2366   if (bed->plt_readonly)
2367     pltflags |= SEC_READONLY;
2368
2369   s = bfd_make_section_anyway_with_flags (abfd, ".plt", pltflags);
2370   htab->root.splt = s;
2371   if (s == NULL
2372       || ! bfd_set_section_alignment (abfd, s, bed->plt_alignment))
2373     return FALSE;
2374
2375   if (bed->want_plt_sym)
2376     {
2377       /* Define the symbol _PROCEDURE_LINKAGE_TABLE_ at the start of the
2378          .plt section.  */
2379       struct bfd_link_hash_entry *bh = NULL;
2380       struct elf_link_hash_entry *h;
2381
2382       if (! (_bfd_generic_link_add_one_symbol
2383              (info, abfd, "_PROCEDURE_LINKAGE_TABLE_", BSF_GLOBAL, s,
2384               (bfd_vma) 0, NULL, FALSE,
2385               get_elf_backend_data (abfd)->collect, &bh)))
2386         return FALSE;
2387       h = (struct elf_link_hash_entry *) bh;
2388       h->def_regular = 1;
2389       h->type = STT_OBJECT;
2390       htab->root.hplt = h;
2391
2392       if (bfd_link_pic (info)
2393           && ! bfd_elf_link_record_dynamic_symbol (info, h))
2394         return FALSE;
2395     }
2396
2397   s = bfd_make_section_anyway_with_flags (abfd,
2398                                           bed->default_use_rela_p
2399                                           ? ".rela.plt" : ".rel.plt",
2400                                           flags | SEC_READONLY);
2401   htab->root.srelplt = s;
2402   if (s == NULL
2403       || ! bfd_set_section_alignment (abfd, s, ptralign))
2404     return FALSE;
2405
2406   if (htab->root.sgot == NULL
2407       && !_bfd_elf_create_got_section (abfd, info))
2408     return FALSE;
2409
2410   if (bed->want_dynbss)
2411     {
2412       /* The .dynbss section is a place to put symbols which are defined
2413          by dynamic objects, are referenced by regular objects, and are
2414          not functions.  We must allocate space for them in the process
2415          image and use a R_*_COPY reloc to tell the dynamic linker to
2416          initialize them at run time.  The linker script puts the .dynbss
2417          section into the .bss section of the final image.  */
2418       s = bfd_make_section_anyway_with_flags (abfd, ".dynbss",
2419                                               SEC_ALLOC | SEC_LINKER_CREATED);
2420       htab->sdynbss = s;
2421       if (s == NULL)
2422         return FALSE;
2423       /* The .rel[a].bss section holds copy relocs.  This section is not
2424          normally needed.  We need to create it here, though, so that the
2425          linker will map it to an output section.  We can't just create it
2426          only if we need it, because we will not know whether we need it
2427          until we have seen all the input files, and the first time the
2428          main linker code calls BFD after examining all the input files
2429          (size_dynamic_sections) the input sections have already been
2430          mapped to the output sections.  If the section turns out not to
2431          be needed, we can discard it later.  We will never need this
2432          section when generating a shared object, since they do not use
2433          copy relocs.  */
2434       if (! bfd_link_pic (info))
2435         {
2436           s = bfd_make_section_anyway_with_flags (abfd,
2437                                                   (bed->default_use_rela_p
2438                                                    ? ".rela.bss" : ".rel.bss"),
2439                                                   flags | SEC_READONLY);
2440           htab->srelbss = s;
2441           if (s == NULL
2442               || ! bfd_set_section_alignment (abfd, s, ptralign))
2443             return FALSE;
2444         }
2445     }
2446
2447   return TRUE;
2448 }
2449
2450 /* Copy the extra info we tack onto an elf_link_hash_entry.  */
2451
2452 static void
2453 lm32_elf_copy_indirect_symbol (struct bfd_link_info *info,
2454                                struct elf_link_hash_entry *dir,
2455                                struct elf_link_hash_entry *ind)
2456 {
2457   struct elf_lm32_link_hash_entry * edir;
2458   struct elf_lm32_link_hash_entry * eind;
2459
2460   edir = (struct elf_lm32_link_hash_entry *) dir;
2461   eind = (struct elf_lm32_link_hash_entry *) ind;
2462
2463   if (eind->dyn_relocs != NULL)
2464     {
2465       if (edir->dyn_relocs != NULL)
2466         {
2467           struct elf_dyn_relocs **pp;
2468           struct elf_dyn_relocs *p;
2469
2470           /* Add reloc counts against the indirect sym to the direct sym
2471              list.  Merge any entries against the same section.  */
2472           for (pp = &eind->dyn_relocs; (p = *pp) != NULL;)
2473             {
2474               struct elf_dyn_relocs *q;
2475
2476               for (q = edir->dyn_relocs; q != NULL; q = q->next)
2477                 if (q->sec == p->sec)
2478                   {
2479                     q->pc_count += p->pc_count;
2480                     q->count += p->count;
2481                     *pp = p->next;
2482                     break;
2483                   }
2484               if (q == NULL)
2485                 pp = &p->next;
2486             }
2487           *pp = edir->dyn_relocs;
2488         }
2489
2490       edir->dyn_relocs = eind->dyn_relocs;
2491       eind->dyn_relocs = NULL;
2492     }
2493
2494   _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2495 }
2496
2497 static bfd_boolean
2498 lm32_elf_always_size_sections (bfd *output_bfd, struct bfd_link_info *info)
2499 {
2500   if (!bfd_link_relocatable (info))
2501     {
2502       if (!bfd_elf_stack_segment_size (output_bfd, info,
2503                                        "__stacksize", DEFAULT_STACK_SIZE))
2504         return FALSE;
2505
2506       asection *sec = bfd_get_section_by_name (output_bfd, ".stack");
2507       if (sec)
2508         sec->size = info->stacksize >= 0 ? info->stacksize : 0;
2509     }
2510
2511   return TRUE;
2512 }
2513
2514 static bfd_boolean
2515 lm32_elf_fdpic_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
2516 {
2517   unsigned i;
2518
2519   if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
2520       || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
2521     return TRUE;
2522
2523   if (! _bfd_elf_copy_private_bfd_data (ibfd, obfd))
2524     return FALSE;
2525
2526   if (! elf_tdata (ibfd) || ! elf_tdata (ibfd)->phdr
2527       || ! elf_tdata (obfd) || ! elf_tdata (obfd)->phdr)
2528     return TRUE;
2529
2530   /* Copy the stack size.  */
2531   for (i = 0; i < elf_elfheader (ibfd)->e_phnum; i++)
2532     if (elf_tdata (ibfd)->phdr[i].p_type == PT_GNU_STACK)
2533       {
2534         Elf_Internal_Phdr *iphdr = &elf_tdata (ibfd)->phdr[i];
2535
2536         for (i = 0; i < elf_elfheader (obfd)->e_phnum; i++)
2537           if (elf_tdata (obfd)->phdr[i].p_type == PT_GNU_STACK)
2538             {
2539               memcpy (&elf_tdata (obfd)->phdr[i], iphdr, sizeof (*iphdr));
2540
2541               /* Rewrite the phdrs, since we're only called after they were first written.  */
2542               if (bfd_seek (obfd, (bfd_signed_vma) get_elf_backend_data (obfd)
2543                             ->s->sizeof_ehdr, SEEK_SET) != 0
2544                   || get_elf_backend_data (obfd)->s->write_out_phdrs (obfd, elf_tdata (obfd)->phdr,
2545                                      elf_elfheader (obfd)->e_phnum) != 0)
2546                 return FALSE;
2547               break;
2548             }
2549
2550         break;
2551       }
2552
2553   return TRUE;
2554 }
2555
2556
2557 #define ELF_ARCH                bfd_arch_lm32
2558 #define ELF_TARGET_ID           LM32_ELF_DATA
2559 #define ELF_MACHINE_CODE        EM_LATTICEMICO32
2560 #define ELF_MAXPAGESIZE         0x1000
2561
2562 #define TARGET_BIG_SYM          lm32_elf32_vec
2563 #define TARGET_BIG_NAME         "elf32-lm32"
2564
2565 #define bfd_elf32_bfd_reloc_type_lookup         lm32_reloc_type_lookup
2566 #define bfd_elf32_bfd_reloc_name_lookup         lm32_reloc_name_lookup
2567 #define elf_info_to_howto                       lm32_info_to_howto_rela
2568 #define elf_info_to_howto_rel                   0
2569 #define elf_backend_rela_normal                 1
2570 #define elf_backend_object_p                    lm32_elf_object_p
2571 #define elf_backend_final_write_processing      lm32_elf_final_write_processing
2572 #define elf_backend_stack_align                 8
2573 #define elf_backend_can_gc_sections             1
2574 #define elf_backend_can_refcount                1
2575 #define elf_backend_gc_mark_hook                lm32_elf_gc_mark_hook
2576 #define elf_backend_plt_readonly                1
2577 #define elf_backend_want_got_plt                1
2578 #define elf_backend_want_plt_sym                0
2579 #define elf_backend_got_header_size             12
2580 #define elf_backend_dtrel_excludes_plt          1
2581 #define bfd_elf32_bfd_link_hash_table_create    lm32_elf_link_hash_table_create
2582 #define elf_backend_check_relocs                lm32_elf_check_relocs
2583 #define elf_backend_reloc_type_class            lm32_elf_reloc_type_class
2584 #define elf_backend_copy_indirect_symbol        lm32_elf_copy_indirect_symbol
2585 #define elf_backend_size_dynamic_sections       lm32_elf_size_dynamic_sections
2586 #define elf_backend_omit_section_dynsym         _bfd_elf_omit_section_dynsym_all
2587 #define elf_backend_create_dynamic_sections     lm32_elf_create_dynamic_sections
2588 #define elf_backend_finish_dynamic_sections     lm32_elf_finish_dynamic_sections
2589 #define elf_backend_adjust_dynamic_symbol       lm32_elf_adjust_dynamic_symbol
2590 #define elf_backend_finish_dynamic_symbol       lm32_elf_finish_dynamic_symbol
2591 #define elf_backend_relocate_section            lm32_elf_relocate_section
2592
2593 #include "elf32-target.h"
2594
2595 #undef  ELF_MAXPAGESIZE
2596 #define ELF_MAXPAGESIZE         0x4000
2597
2598
2599 #undef  TARGET_BIG_SYM
2600 #define TARGET_BIG_SYM          lm32_elf32_fdpic_vec
2601 #undef  TARGET_BIG_NAME
2602 #define TARGET_BIG_NAME         "elf32-lm32fdpic"
2603 #undef  elf32_bed
2604 #define elf32_bed               elf32_lm32fdpic_bed
2605
2606 #undef  elf_backend_always_size_sections
2607 #define elf_backend_always_size_sections        lm32_elf_always_size_sections
2608 #undef  bfd_elf32_bfd_copy_private_bfd_data
2609 #define bfd_elf32_bfd_copy_private_bfd_data     lm32_elf_fdpic_copy_private_bfd_data
2610
2611 #include "elf32-target.h"