bfd/elf32-lm32.c

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