xref: /netbsd-src/external/gpl3/binutils.old/dist/bfd/elf32-lm32.c (revision 82d56013d7b633d116a93943de88e08335357a7c)
1 /* Lattice Mico32-specific support for 32-bit ELF
2    Copyright (C) 2008-2018 Free Software Foundation, Inc.
3    Contributed by Jon Beniston <jon@beniston.com>
4 
5    This file is part of BFD, the Binary File Descriptor library.
6 
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3 of the License, or
10    (at your option) any later version.
11 
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16 
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20    MA 02110-1301, USA.  */
21 
22 #include "sysdep.h"
23 #include "bfd.h"
24 #include "libbfd.h"
25 #include "elf-bfd.h"
26 #include "elf/lm32.h"
27 
28 #define DEFAULT_STACK_SIZE 0x20000
29 
30 #define PLT_ENTRY_SIZE 20
31 
32 #define PLT0_ENTRY_WORD0  0
33 #define PLT0_ENTRY_WORD1  0
34 #define PLT0_ENTRY_WORD2  0
35 #define PLT0_ENTRY_WORD3  0
36 #define PLT0_ENTRY_WORD4  0
37 
38 #define PLT0_PIC_ENTRY_WORD0  0
39 #define PLT0_PIC_ENTRY_WORD1  0
40 #define PLT0_PIC_ENTRY_WORD2  0
41 #define PLT0_PIC_ENTRY_WORD3  0
42 #define PLT0_PIC_ENTRY_WORD4  0
43 
44 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/libc.so.1"
45 
46 extern const bfd_target lm32_elf32_fdpic_vec;
47 
48 #define IS_FDPIC(bfd) ((bfd)->xvec == &lm32_elf32_fdpic_vec)
49 
50 static bfd_reloc_status_type lm32_elf_gprel_reloc
51   (bfd *, arelent *, asymbol *, void *, asection *, bfd *, char **);
52 
53 /* lm32 ELF linker hash entry.  */
54 
55 struct elf_lm32_link_hash_entry
56 {
57   struct elf_link_hash_entry root;
58 
59   /* Track dynamic relocs copied for this symbol.  */
60   struct elf_dyn_relocs *dyn_relocs;
61 };
62 
63 /* lm32 ELF linker hash table.  */
64 
65 struct elf_lm32_link_hash_table
66 {
67   struct elf_link_hash_table root;
68 
69   /* Short-cuts to get to dynamic linker sections.  */
70   asection *sfixup32;
71   asection *sdynbss;
72   asection *srelbss;
73 
74   int relocs32;
75 };
76 
77 /* Get the lm32 ELF linker hash table from a link_info structure.  */
78 
79 #define lm32_elf_hash_table(p) \
80   (elf_hash_table_id ((struct elf_link_hash_table *) ((p)->hash)) \
81   == LM32_ELF_DATA ? ((struct elf_lm32_link_hash_table *) ((p)->hash)) : NULL)
82 
83 #define lm32fdpic_got_section(info) \
84   (lm32_elf_hash_table (info)->root.sgot)
85 #define lm32fdpic_gotrel_section(info) \
86   (lm32_elf_hash_table (info)->root.srelgot)
87 #define lm32fdpic_fixup32_section(info) \
88   (lm32_elf_hash_table (info)->sfixup32)
89 
90 struct weak_symbol_list
91 {
92   const char *name;
93   struct weak_symbol_list *next;
94 };
95 
96 /* Create an entry in an lm32 ELF linker hash table.  */
97 
98 static struct bfd_hash_entry *
99 lm32_elf_link_hash_newfunc (struct bfd_hash_entry *entry,
100 			    struct bfd_hash_table *table,
101 			    const char *string)
102 {
103   struct elf_lm32_link_hash_entry *ret =
104     (struct elf_lm32_link_hash_entry *) entry;
105 
106   /* Allocate the structure if it has not already been allocated by a
107      subclass.  */
108   if (ret == NULL)
109     ret = bfd_hash_allocate (table,
110 			     sizeof (struct elf_lm32_link_hash_entry));
111   if (ret == NULL)
112     return NULL;
113 
114   /* Call the allocation method of the superclass.  */
115   ret = ((struct elf_lm32_link_hash_entry *)
116 	 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
117 				     table, string));
118   if (ret != NULL)
119     {
120       struct elf_lm32_link_hash_entry *eh;
121 
122       eh = (struct elf_lm32_link_hash_entry *) ret;
123       eh->dyn_relocs = NULL;
124     }
125 
126   return (struct bfd_hash_entry *) ret;
127 }
128 
129 /* Create an lm32 ELF linker hash table.  */
130 
131 static struct bfd_link_hash_table *
132 lm32_elf_link_hash_table_create (bfd *abfd)
133 {
134   struct elf_lm32_link_hash_table *ret;
135   bfd_size_type amt = sizeof (struct elf_lm32_link_hash_table);
136 
137   ret = bfd_zmalloc (amt);
138   if (ret == NULL)
139     return NULL;
140 
141   if (!_bfd_elf_link_hash_table_init (&ret->root, abfd,
142 				      lm32_elf_link_hash_newfunc,
143 				      sizeof (struct elf_lm32_link_hash_entry),
144 				      LM32_ELF_DATA))
145     {
146       free (ret);
147       return NULL;
148     }
149 
150   return &ret->root.root;
151 }
152 
153 /* Add a fixup to the ROFIXUP section.  */
154 
155 static bfd_vma
156 _lm32fdpic_add_rofixup (bfd *output_bfd, asection *rofixup, bfd_vma relocation)
157 {
158   bfd_vma fixup_offset;
159 
160   if (rofixup->flags & SEC_EXCLUDE)
161     return -1;
162 
163   fixup_offset = rofixup->reloc_count * 4;
164   if (rofixup->contents)
165     {
166       BFD_ASSERT (fixup_offset < rofixup->size);
167       if (fixup_offset < rofixup->size)
168       bfd_put_32 (output_bfd, relocation, rofixup->contents + fixup_offset);
169     }
170   rofixup->reloc_count++;
171 
172   return fixup_offset;
173 }
174 
175 /* Create .rofixup sections in DYNOBJ, and set up
176    shortcuts to them in our hash table.  */
177 
178 static bfd_boolean
179 create_rofixup_section (bfd *dynobj, struct bfd_link_info *info)
180 {
181   struct elf_lm32_link_hash_table *htab;
182   htab = lm32_elf_hash_table (info);
183 
184   if (htab == NULL)
185     return FALSE;
186 
187   /* Fixup section for R_LM32_32 relocs.  */
188   lm32fdpic_fixup32_section (info)
189     = bfd_make_section_anyway_with_flags (dynobj,
190 					  ".rofixup",
191 					  (SEC_ALLOC
192 					   | SEC_LOAD
193 					   | SEC_HAS_CONTENTS
194 					   | SEC_IN_MEMORY
195 					   | SEC_LINKER_CREATED
196 					   | SEC_READONLY));
197   if (lm32fdpic_fixup32_section (info) == NULL
198       || ! bfd_set_section_alignment (dynobj,
199 				      lm32fdpic_fixup32_section (info), 2))
200     return FALSE;
201 
202   return TRUE;
203 }
204 
205 static reloc_howto_type lm32_elf_howto_table [] =
206 {
207   /* This reloc does nothing.  */
208   HOWTO (R_LM32_NONE,		    /* type */
209 	 0,			    /* rightshift */
210 	 3,			    /* size (0 = byte, 1 = short, 2 = long) */
211 	 0,			    /* bitsize */
212 	 FALSE,			    /* pc_relative */
213 	 0,			    /* bitpos */
214 	 complain_overflow_dont,    /* complain_on_overflow */
215 	 bfd_elf_generic_reloc,	    /* special_function */
216 	 "R_LM32_NONE",		    /* name */
217 	 FALSE,			    /* partial_inplace */
218 	 0,			    /* src_mask */
219 	 0,			    /* dst_mask */
220 	 FALSE),		    /* pcrel_offset */
221 
222   /* An 8 bit absolute relocation.  */
223   HOWTO (R_LM32_8,		    /* type */
224 	 0,			    /* rightshift */
225 	 0,			    /* size (0 = byte, 1 = short, 2 = long) */
226 	 8,			    /* bitsize */
227 	 FALSE,			    /* pc_relative */
228 	 0,			    /* bitpos */
229 	 complain_overflow_bitfield,/* complain_on_overflow */
230 	 bfd_elf_generic_reloc,	    /* special_function */
231 	 "R_LM32_8",		    /* name */
232 	 FALSE,			    /* partial_inplace */
233 	 0,			    /* src_mask */
234 	 0xff,			    /* dst_mask */
235 	 FALSE),		    /* pcrel_offset */
236 
237   /* A 16 bit absolute relocation.  */
238   HOWTO (R_LM32_16,		    /* type */
239 	 0,			    /* rightshift */
240 	 1,			    /* size (0 = byte, 1 = short, 2 = long) */
241 	 16,			    /* bitsize */
242 	 FALSE,			    /* pc_relative */
243 	 0,			    /* bitpos */
244 	 complain_overflow_bitfield,/* complain_on_overflow */
245 	 bfd_elf_generic_reloc,	    /* special_function */
246 	 "R_LM32_16",		    /* name */
247 	 FALSE,			    /* partial_inplace */
248 	 0,			    /* src_mask */
249 	 0xffff,		    /* dst_mask */
250 	 FALSE),		    /* pcrel_offset */
251 
252   /* A 32 bit absolute relocation.  */
253   HOWTO (R_LM32_32,		    /* type */
254 	 0,			    /* rightshift */
255 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
256 	 32,			    /* bitsize */
257 	 FALSE,			    /* pc_relative */
258 	 0,			    /* bitpos */
259 	 complain_overflow_bitfield,/* complain_on_overflow */
260 	 bfd_elf_generic_reloc,	    /* special_function */
261 	 "R_LM32_32",		    /* name */
262 	 FALSE,			    /* partial_inplace */
263 	 0,			    /* src_mask */
264 	 0xffffffff,		    /* dst_mask */
265 	 FALSE),		    /* pcrel_offset */
266 
267   HOWTO (R_LM32_HI16,		    /* type */
268 	 16,			    /* rightshift */
269 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
270 	 16,			    /* bitsize */
271 	 FALSE,			    /* pc_relative */
272 	 0,			    /* bitpos */
273 	 complain_overflow_bitfield,/* complain_on_overflow */
274 	 bfd_elf_generic_reloc,	    /* special_function */
275 	 "R_LM32_HI16",		    /* name */
276 	 FALSE,			    /* partial_inplace */
277 	 0,			    /* src_mask */
278 	 0xffff,		    /* dst_mask */
279 	 FALSE),		    /* pcrel_offset */
280 
281   HOWTO (R_LM32_LO16,		    /* type */
282 	 0,			    /* rightshift */
283 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
284 	 16,			    /* bitsize */
285 	 FALSE,			    /* pc_relative */
286 	 0,			    /* bitpos */
287 	 complain_overflow_dont,    /* complain_on_overflow */
288 	 bfd_elf_generic_reloc,	    /* special_function */
289 	 "R_LM32_LO16",		    /* name */
290 	 FALSE,			    /* partial_inplace */
291 	 0,			    /* src_mask */
292 	 0xffff,		    /* dst_mask */
293 	 FALSE),		    /* pcrel_offset */
294 
295   HOWTO (R_LM32_GPREL16,	    /* type */
296 	 0,			    /* rightshift */
297 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
298 	 16,			    /* bitsize */
299 	 FALSE,			    /* pc_relative */
300 	 0,			    /* bitpos */
301 	 complain_overflow_dont,    /* complain_on_overflow */
302 	 lm32_elf_gprel_reloc,	    /* special_function */
303 	 "R_LM32_GPREL16",	    /* name */
304 	 FALSE,			    /* partial_inplace */
305 	 0,			    /* src_mask */
306 	 0xffff,		    /* dst_mask */
307 	 FALSE),		    /* pcrel_offset */
308 
309   HOWTO (R_LM32_CALL,		    /* type */
310 	 2,			    /* rightshift */
311 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
312 	 26,			    /* bitsize */
313 	 TRUE,			    /* pc_relative */
314 	 0,			    /* bitpos */
315 	 complain_overflow_signed,  /* complain_on_overflow */
316 	 bfd_elf_generic_reloc,	    /* special_function */
317 	 "R_LM32_CALL",		    /* name */
318 	 FALSE,			    /* partial_inplace */
319 	 0,			    /* src_mask */
320 	 0x3ffffff,		    /* dst_mask */
321 	 TRUE),			    /* pcrel_offset */
322 
323   HOWTO (R_LM32_BRANCH,		    /* type */
324 	 2,			    /* rightshift */
325 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
326 	 16,			    /* bitsize */
327 	 TRUE,			    /* pc_relative */
328 	 0,			    /* bitpos */
329 	 complain_overflow_signed,  /* complain_on_overflow */
330 	 bfd_elf_generic_reloc,	    /* special_function */
331 	 "R_LM32_BRANCH",	    /* name */
332 	 FALSE,			    /* partial_inplace */
333 	 0,			    /* src_mask */
334 	 0xffff,		    /* dst_mask */
335 	 TRUE),			    /* pcrel_offset */
336 
337   /* GNU extension to record C++ vtable hierarchy.  */
338   HOWTO (R_LM32_GNU_VTINHERIT,	    /* type */
339 	 0,			    /* rightshift */
340 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
341 	 0,			    /* bitsize */
342 	 FALSE,			    /* pc_relative */
343 	 0,			    /* bitpos */
344 	 complain_overflow_dont,    /* complain_on_overflow */
345 	 NULL,			    /* special_function */
346 	 "R_LM32_GNU_VTINHERIT",    /* name */
347 	 FALSE,			    /* partial_inplace */
348 	 0,			    /* src_mask */
349 	 0,			    /* dst_mask */
350 	 FALSE),		    /* pcrel_offset */
351 
352   /* GNU extension to record C++ vtable member usage.  */
353   HOWTO (R_LM32_GNU_VTENTRY,	    /* type */
354 	 0,			    /* rightshift */
355 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
356 	 0,			    /* bitsize */
357 	 FALSE,			    /* pc_relative */
358 	 0,			    /* bitpos */
359 	 complain_overflow_dont,    /* complain_on_overflow */
360 	 _bfd_elf_rel_vtable_reloc_fn,/* special_function */
361 	 "R_LM32_GNU_VTENTRY",	    /* name */
362 	 FALSE,			    /* partial_inplace */
363 	 0,			    /* src_mask */
364 	 0,			    /* dst_mask */
365 	 FALSE),		    /* pcrel_offset */
366 
367   HOWTO (R_LM32_16_GOT,		    /* type */
368 	 0,			    /* rightshift */
369 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
370 	 16,			    /* bitsize */
371 	 FALSE,			    /* pc_relative */
372 	 0,			    /* bitpos */
373 	 complain_overflow_signed,  /* complain_on_overflow */
374 	 bfd_elf_generic_reloc,	    /* special_function */
375 	 "R_LM32_16_GOT",	    /* name */
376 	 FALSE,			    /* partial_inplace */
377 	 0,			    /* src_mask */
378 	 0xffff,		    /* dst_mask */
379 	 FALSE),		    /* pcrel_offset */
380 
381   HOWTO (R_LM32_GOTOFF_HI16,	    /* type */
382 	 16,			    /* rightshift */
383 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
384 	 16,			    /* bitsize */
385 	 FALSE,			    /* pc_relative */
386 	 0,			    /* bitpos */
387 	 complain_overflow_dont,    /* complain_on_overflow */
388 	 bfd_elf_generic_reloc,	    /* special_function */
389 	 "R_LM32_GOTOFF_HI16",	    /* name */
390 	 FALSE,			    /* partial_inplace */
391 	 0xffff,		    /* src_mask */
392 	 0xffff,		    /* dst_mask */
393 	 FALSE),		    /* pcrel_offset */
394 
395   HOWTO (R_LM32_GOTOFF_LO16,	    /* type */
396 	 0,			    /* rightshift */
397 	 2,			    /* size (0 = byte, 1 = short, 2 = long) */
398 	 16,			    /* bitsize */
399 	 FALSE,			    /* pc_relative */
400 	 0,			    /* bitpos */
401 	 complain_overflow_dont,    /* complain_on_overflow */
402 	 bfd_elf_generic_reloc,	    /* special_function */
403 	 "R_LM32_GOTOFF_LO16",	    /* name */
404 	 FALSE,			    /* partial_inplace */
405 	 0xffff,		    /* src_mask */
406 	 0xffff,		    /* dst_mask */
407 	 FALSE),		    /* pcrel_offset */
408 
409   HOWTO (R_LM32_COPY,		/* type */
410 	 0,			/* rightshift */
411 	 2,			/* size (0 = byte, 1 = short, 2 = long) */
412 	 32,			/* bitsize */
413 	 FALSE,			/* pc_relative */
414 	 0,			/* bitpos */
415 	 complain_overflow_bitfield, /* complain_on_overflow */
416 	 bfd_elf_generic_reloc, /* special_function */
417 	 "R_LM32_COPY",		/* name */
418 	 FALSE,			/* partial_inplace */
419 	 0xffffffff,		/* src_mask */
420 	 0xffffffff,		/* dst_mask */
421 	 FALSE),		/* pcrel_offset */
422 
423   HOWTO (R_LM32_GLOB_DAT,	/* type */
424 	 0,			/* rightshift */
425 	 2,			/* size (0 = byte, 1 = short, 2 = long) */
426 	 32,			/* bitsize */
427 	 FALSE,			/* pc_relative */
428 	 0,			/* bitpos */
429 	 complain_overflow_bitfield, /* complain_on_overflow */
430 	 bfd_elf_generic_reloc, /* special_function */
431 	 "R_LM32_GLOB_DAT",	/* name */
432 	 FALSE,			/* partial_inplace */
433 	 0xffffffff,		/* src_mask */
434 	 0xffffffff,		/* dst_mask */
435 	 FALSE),		/* pcrel_offset */
436 
437   HOWTO (R_LM32_JMP_SLOT,	/* type */
438 	 0,			/* rightshift */
439 	 2,			/* size (0 = byte, 1 = short, 2 = long) */
440 	 32,			/* bitsize */
441 	 FALSE,			/* pc_relative */
442 	 0,			/* bitpos */
443 	 complain_overflow_bitfield, /* complain_on_overflow */
444 	 bfd_elf_generic_reloc, /* special_function */
445 	 "R_LM32_JMP_SLOT",	/* name */
446 	 FALSE,			/* partial_inplace */
447 	 0xffffffff,		/* src_mask */
448 	 0xffffffff,		/* dst_mask */
449 	 FALSE),		/* pcrel_offset */
450 
451   HOWTO (R_LM32_RELATIVE,	/* type */
452 	 0,			/* rightshift */
453 	 2,			/* size (0 = byte, 1 = short, 2 = long) */
454 	 32,			/* bitsize */
455 	 FALSE,			/* pc_relative */
456 	 0,			/* bitpos */
457 	 complain_overflow_bitfield, /* complain_on_overflow */
458 	 bfd_elf_generic_reloc, /* special_function */
459 	 "R_LM32_RELATIVE",	/* name */
460 	 FALSE,			/* partial_inplace */
461 	 0xffffffff,		/* src_mask */
462 	 0xffffffff,		/* dst_mask */
463 	 FALSE),		/* pcrel_offset */
464 
465 };
466 
467 /* Map BFD reloc types to lm32 ELF reloc types. */
468 
469 struct lm32_reloc_map
470 {
471     bfd_reloc_code_real_type bfd_reloc_val;
472     unsigned char elf_reloc_val;
473 };
474 
475 static const struct lm32_reloc_map lm32_reloc_map[] =
476 {
477   { BFD_RELOC_NONE,		R_LM32_NONE },
478   { BFD_RELOC_8,		R_LM32_8 },
479   { BFD_RELOC_16,		R_LM32_16 },
480   { BFD_RELOC_32,		R_LM32_32 },
481   { BFD_RELOC_HI16,		R_LM32_HI16 },
482   { BFD_RELOC_LO16,		R_LM32_LO16 },
483   { BFD_RELOC_GPREL16,		R_LM32_GPREL16 },
484   { BFD_RELOC_LM32_CALL,	R_LM32_CALL },
485   { BFD_RELOC_LM32_BRANCH,	R_LM32_BRANCH },
486   { BFD_RELOC_VTABLE_INHERIT,	R_LM32_GNU_VTINHERIT },
487   { BFD_RELOC_VTABLE_ENTRY,	R_LM32_GNU_VTENTRY },
488   { BFD_RELOC_LM32_16_GOT,	R_LM32_16_GOT },
489   { BFD_RELOC_LM32_GOTOFF_HI16, R_LM32_GOTOFF_HI16 },
490   { BFD_RELOC_LM32_GOTOFF_LO16, R_LM32_GOTOFF_LO16 },
491   { BFD_RELOC_LM32_COPY,	R_LM32_COPY },
492   { BFD_RELOC_LM32_GLOB_DAT,	R_LM32_GLOB_DAT },
493   { BFD_RELOC_LM32_JMP_SLOT,	R_LM32_JMP_SLOT },
494   { BFD_RELOC_LM32_RELATIVE,	R_LM32_RELATIVE },
495 };
496 
497 static reloc_howto_type *
498 lm32_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
499 			bfd_reloc_code_real_type code)
500 {
501   unsigned int i;
502 
503   for (i = 0; i < sizeof (lm32_reloc_map) / sizeof (lm32_reloc_map[0]); i++)
504     if (lm32_reloc_map[i].bfd_reloc_val == code)
505       return &lm32_elf_howto_table[lm32_reloc_map[i].elf_reloc_val];
506   return NULL;
507 }
508 
509 static reloc_howto_type *
510 lm32_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
511 			const char *r_name)
512 {
513   unsigned int i;
514 
515   for (i = 0;
516        i < sizeof (lm32_elf_howto_table) / sizeof (lm32_elf_howto_table[0]);
517        i++)
518     if (lm32_elf_howto_table[i].name != NULL
519 	&& strcasecmp (lm32_elf_howto_table[i].name, r_name) == 0)
520       return &lm32_elf_howto_table[i];
521 
522   return NULL;
523 }
524 
525 
526 /* Set the howto pointer for an Lattice Mico32 ELF reloc.  */
527 
528 static 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 	{
1449 	  bfd_vma value =
1450 	    lm32fdpic_fixup32_section (info)->output_section->vma
1451 	    + lm32fdpic_fixup32_section (info)->output_offset
1452 	    + lm32fdpic_fixup32_section (info)->size
1453 	    - hend->u.def.section->output_section->vma
1454 	    - hend->u.def.section->output_offset;
1455 	  BFD_ASSERT (hend->u.def.value == value);
1456 	  if (hend->u.def.value != value)
1457 	    {
1458 	      _bfd_error_handler
1459 		("LINKER BUG: .rofixup section hend->u.def.value != value: %"
1460 		 PRId64 " != %" PRId64,
1461 		 (int64_t) hend->u.def.value, (int64_t) value);
1462 	      return FALSE;
1463 	    }
1464 	}
1465     }
1466 
1467   return TRUE;
1468 }
1469 
1470 /* Finish up dynamic symbol handling.  We set the contents of various
1471    dynamic sections here.  */
1472 
1473 static bfd_boolean
1474 lm32_elf_finish_dynamic_symbol (bfd *output_bfd,
1475 				struct bfd_link_info *info,
1476 				struct elf_link_hash_entry *h,
1477 				Elf_Internal_Sym *sym)
1478 {
1479   struct elf_lm32_link_hash_table *htab;
1480   bfd_byte *loc;
1481 
1482   htab = lm32_elf_hash_table (info);
1483   if (htab == NULL)
1484     return FALSE;
1485 
1486   if (h->plt.offset != (bfd_vma) -1)
1487     {
1488       asection *splt;
1489       asection *sgot;
1490       asection *srela;
1491 
1492       bfd_vma plt_index;
1493       bfd_vma got_offset;
1494       Elf_Internal_Rela rela;
1495 
1496       /* This symbol has an entry in the procedure linkage table.  Set
1497 	 it up.  */
1498       BFD_ASSERT (h->dynindx != -1);
1499 
1500       splt = htab->root.splt;
1501       sgot = htab->root.sgotplt;
1502       srela = htab->root.srelplt;
1503       BFD_ASSERT (splt != NULL && sgot != NULL && srela != NULL);
1504 
1505       /* Get the index in the procedure linkage table which
1506 	 corresponds to this symbol.  This is the index of this symbol
1507 	 in all the symbols for which we are making plt entries.  The
1508 	 first entry in the procedure linkage table is reserved.  */
1509       plt_index = h->plt.offset / PLT_ENTRY_SIZE - 1;
1510 
1511       /* Get the offset into the .got table of the entry that
1512 	corresponds to this function.  Each .got entry is 4 bytes.
1513 	The first three are reserved.  */
1514       got_offset = (plt_index + 3) * 4;
1515 
1516       /* Fill in the entry in the procedure linkage table.  */
1517       if (! bfd_link_pic (info))
1518 	{
1519 	  /* TODO */
1520 	}
1521       else
1522 	{
1523 	  /* TODO */
1524 	}
1525 
1526       /* Fill in the entry in the global offset table.  */
1527       bfd_put_32 (output_bfd,
1528 		  (splt->output_section->vma
1529 		   + splt->output_offset
1530 		   + h->plt.offset
1531 		   + 12), /* same offset */
1532 		  sgot->contents + got_offset);
1533 
1534       /* Fill in the entry in the .rela.plt section.  */
1535       rela.r_offset = (sgot->output_section->vma
1536 		       + sgot->output_offset
1537 		       + got_offset);
1538       rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_JMP_SLOT);
1539       rela.r_addend = 0;
1540       loc = srela->contents;
1541       loc += plt_index * sizeof (Elf32_External_Rela);
1542       bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1543 
1544       if (!h->def_regular)
1545 	{
1546 	  /* Mark the symbol as undefined, rather than as defined in
1547 	     the .plt section.  Leave the value alone.  */
1548 	  sym->st_shndx = SHN_UNDEF;
1549 	}
1550 
1551     }
1552 
1553   if (h->got.offset != (bfd_vma) -1)
1554     {
1555       asection *sgot;
1556       asection *srela;
1557       Elf_Internal_Rela rela;
1558 
1559       /* This symbol has an entry in the global offset table.  Set it
1560 	 up.  */
1561       sgot = htab->root.sgot;
1562       srela = htab->root.srelgot;
1563       BFD_ASSERT (sgot != NULL && srela != NULL);
1564 
1565       rela.r_offset = (sgot->output_section->vma
1566 		       + sgot->output_offset
1567 		       + (h->got.offset &~ 1));
1568 
1569       /* If this is a -Bsymbolic link, and the symbol is defined
1570 	 locally, we just want to emit a RELATIVE reloc.  Likewise if
1571 	 the symbol was forced to be local because of a version file.
1572 	 The entry in the global offset table will already have been
1573 	 initialized in the relocate_section function.  */
1574       if (bfd_link_pic (info)
1575 	  && (info->symbolic
1576 	      || h->dynindx == -1
1577 	      || h->forced_local)
1578 	  && h->def_regular)
1579 	{
1580 	  rela.r_info = ELF32_R_INFO (0, R_LM32_RELATIVE);
1581 	  rela.r_addend = (h->root.u.def.value
1582 			   + h->root.u.def.section->output_section->vma
1583 			   + h->root.u.def.section->output_offset);
1584 	}
1585       else
1586 	{
1587 	  BFD_ASSERT ((h->got.offset & 1) == 0);
1588 	  bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got.offset);
1589 	  rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_GLOB_DAT);
1590 	  rela.r_addend = 0;
1591 	}
1592 
1593       loc = srela->contents;
1594       loc += srela->reloc_count * sizeof (Elf32_External_Rela);
1595       bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1596       ++srela->reloc_count;
1597     }
1598 
1599   if (h->needs_copy)
1600     {
1601       asection *s;
1602       Elf_Internal_Rela rela;
1603 
1604       /* This symbols needs a copy reloc.  Set it up.  */
1605       BFD_ASSERT (h->dynindx != -1
1606 		  && (h->root.type == bfd_link_hash_defined
1607 		      || h->root.type == bfd_link_hash_defweak));
1608 
1609       s = bfd_get_linker_section (htab->root.dynobj, ".rela.bss");
1610       BFD_ASSERT (s != NULL);
1611 
1612       rela.r_offset = (h->root.u.def.value
1613 		       + h->root.u.def.section->output_section->vma
1614 		       + h->root.u.def.section->output_offset);
1615       rela.r_info = ELF32_R_INFO (h->dynindx, R_LM32_COPY);
1616       rela.r_addend = 0;
1617       loc = s->contents;
1618       loc += s->reloc_count * sizeof (Elf32_External_Rela);
1619       bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
1620       ++s->reloc_count;
1621     }
1622 
1623   /* Mark some specially defined symbols as absolute.  */
1624   if (h == htab->root.hdynamic || h == htab->root.hgot)
1625     sym->st_shndx = SHN_ABS;
1626 
1627   return TRUE;
1628 }
1629 
1630 static enum elf_reloc_type_class
1631 lm32_elf_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
1632 			   const asection *rel_sec ATTRIBUTE_UNUSED,
1633 			   const Elf_Internal_Rela *rela)
1634 {
1635   switch ((int) ELF32_R_TYPE (rela->r_info))
1636     {
1637     case R_LM32_RELATIVE:  return reloc_class_relative;
1638     case R_LM32_JMP_SLOT:  return reloc_class_plt;
1639     case R_LM32_COPY:      return reloc_class_copy;
1640     default:		   return reloc_class_normal;
1641     }
1642 }
1643 
1644 /* Find dynamic relocs for H that apply to read-only sections.  */
1645 
1646 static asection *
1647 readonly_dynrelocs (struct elf_link_hash_entry *h)
1648 {
1649   struct elf_dyn_relocs *p;
1650   struct elf_lm32_link_hash_entry *eh = (struct elf_lm32_link_hash_entry *) h;
1651 
1652   for (p = eh->dyn_relocs; p != NULL; p = p->next)
1653     {
1654       asection *s = p->sec->output_section;
1655 
1656       if (s != NULL && (s->flags & SEC_READONLY) != 0)
1657 	return p->sec;
1658     }
1659   return NULL;
1660 }
1661 
1662 /* Adjust a symbol defined by a dynamic object and referenced by a
1663    regular object.  The current definition is in some section of the
1664    dynamic object, but we're not including those sections.  We have to
1665    change the definition to something the rest of the link can
1666    understand.  */
1667 
1668 static bfd_boolean
1669 lm32_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
1670 				struct elf_link_hash_entry *h)
1671 {
1672   struct elf_lm32_link_hash_table *htab;
1673   bfd *dynobj;
1674   asection *s;
1675 
1676   dynobj = elf_hash_table (info)->dynobj;
1677 
1678   /* Make sure we know what is going on here.  */
1679   BFD_ASSERT (dynobj != NULL
1680 	      && (h->needs_plt
1681 		  || h->is_weakalias
1682 		  || (h->def_dynamic
1683 		      && h->ref_regular
1684 		      && !h->def_regular)));
1685 
1686   /* If this is a function, put it in the procedure linkage table.  We
1687      will fill in the contents of the procedure linkage table later,
1688      when we know the address of the .got section.  */
1689   if (h->type == STT_FUNC
1690       || h->needs_plt)
1691     {
1692       if (! bfd_link_pic (info)
1693 	  && !h->def_dynamic
1694 	  && !h->ref_dynamic
1695 	  && h->root.type != bfd_link_hash_undefweak
1696 	  && h->root.type != bfd_link_hash_undefined)
1697 	{
1698 	  /* This case can occur if we saw a PLT reloc in an input
1699 	     file, but the symbol was never referred to by a dynamic
1700 	     object.  In such a case, we don't actually need to build
1701 	     a procedure linkage table, and we can just do a PCREL
1702 	     reloc instead.  */
1703 	  h->plt.offset = (bfd_vma) -1;
1704 	  h->needs_plt = 0;
1705 	}
1706 
1707       return TRUE;
1708     }
1709   else
1710     h->plt.offset = (bfd_vma) -1;
1711 
1712   /* If this is a weak symbol, and there is a real definition, the
1713      processor independent code will have arranged for us to see the
1714      real definition first, and we can just use the same value.  */
1715   if (h->is_weakalias)
1716     {
1717       struct elf_link_hash_entry *def = weakdef (h);
1718       BFD_ASSERT (def->root.type == bfd_link_hash_defined);
1719       h->root.u.def.section = def->root.u.def.section;
1720       h->root.u.def.value = def->root.u.def.value;
1721       return TRUE;
1722     }
1723 
1724   /* This is a reference to a symbol defined by a dynamic object which
1725      is not a function.  */
1726 
1727   /* If we are creating a shared library, we must presume that the
1728      only references to the symbol are via the global offset table.
1729      For such cases we need not do anything here; the relocations will
1730      be handled correctly by relocate_section.  */
1731   if (bfd_link_pic (info))
1732     return TRUE;
1733 
1734   /* If there are no references to this symbol that do not use the
1735      GOT, we don't need to generate a copy reloc.  */
1736   if (!h->non_got_ref)
1737     return TRUE;
1738 
1739   /* If -z nocopyreloc was given, we won't generate them either.  */
1740   if (0 && info->nocopyreloc)
1741     {
1742       h->non_got_ref = 0;
1743       return TRUE;
1744     }
1745 
1746   /* If we don't find any dynamic relocs in read-only sections, then
1747      we'll be keeping the dynamic relocs and avoiding the copy reloc.  */
1748   if (0 && !readonly_dynrelocs (h))
1749     {
1750       h->non_got_ref = 0;
1751       return TRUE;
1752     }
1753 
1754   /* We must allocate the symbol in our .dynbss section, which will
1755      become part of the .bss section of the executable.  There will be
1756      an entry for this symbol in the .dynsym section.  The dynamic
1757      object will contain position independent code, so all references
1758      from the dynamic object to this symbol will go through the global
1759      offset table.  The dynamic linker will use the .dynsym entry to
1760      determine the address it must put in the global offset table, so
1761      both the dynamic object and the regular object will refer to the
1762      same memory location for the variable.  */
1763 
1764   htab = lm32_elf_hash_table (info);
1765   if (htab == NULL)
1766     return FALSE;
1767 
1768   s = htab->sdynbss;
1769   BFD_ASSERT (s != NULL);
1770 
1771   /* We must generate a R_LM32_COPY reloc to tell the dynamic linker
1772      to copy the initial value out of the dynamic object and into the
1773      runtime process image.  We need to remember the offset into the
1774      .rela.bss section we are going to use.  */
1775   if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
1776     {
1777       asection *srel;
1778 
1779       srel = htab->srelbss;
1780       BFD_ASSERT (srel != NULL);
1781       srel->size += sizeof (Elf32_External_Rela);
1782       h->needs_copy = 1;
1783     }
1784 
1785   return _bfd_elf_adjust_dynamic_copy (info, h, s);
1786 }
1787 
1788 /* Allocate space in .plt, .got and associated reloc sections for
1789    dynamic relocs.  */
1790 
1791 static bfd_boolean
1792 allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
1793 {
1794   struct bfd_link_info *info;
1795   struct elf_lm32_link_hash_table *htab;
1796   struct elf_lm32_link_hash_entry *eh;
1797   struct elf_dyn_relocs *p;
1798 
1799   if (h->root.type == bfd_link_hash_indirect)
1800     return TRUE;
1801 
1802   info = (struct bfd_link_info *) inf;
1803   htab = lm32_elf_hash_table (info);
1804   if (htab == NULL)
1805     return FALSE;
1806 
1807   eh = (struct elf_lm32_link_hash_entry *) h;
1808 
1809   if (htab->root.dynamic_sections_created
1810       && h->plt.refcount > 0)
1811     {
1812       /* Make sure this symbol is output as a dynamic symbol.
1813 	 Undefined weak syms won't yet be marked as dynamic.  */
1814       if (h->dynindx == -1
1815 	  && !h->forced_local)
1816 	{
1817 	  if (! bfd_elf_link_record_dynamic_symbol (info, h))
1818 	    return FALSE;
1819 	}
1820 
1821       if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h))
1822 	{
1823 	  asection *s = htab->root.splt;
1824 
1825 	  /* If this is the first .plt entry, make room for the special
1826 	     first entry.  */
1827 	  if (s->size == 0)
1828 	    s->size += PLT_ENTRY_SIZE;
1829 
1830 	  h->plt.offset = s->size;
1831 
1832 	  /* If this symbol is not defined in a regular file, and we are
1833 	     not generating a shared library, then set the symbol to this
1834 	     location in the .plt.  This is required to make function
1835 	     pointers compare as equal between the normal executable and
1836 	     the shared library.  */
1837 	  if (! bfd_link_pic (info)
1838 	      && !h->def_regular)
1839 	    {
1840 	      h->root.u.def.section = s;
1841 	      h->root.u.def.value = h->plt.offset;
1842 	    }
1843 
1844 	  /* Make room for this entry.  */
1845 	  s->size += PLT_ENTRY_SIZE;
1846 
1847 	  /* We also need to make an entry in the .got.plt section, which
1848 	     will be placed in the .got section by the linker script.  */
1849 	  htab->root.sgotplt->size += 4;
1850 
1851 	  /* We also need to make an entry in the .rel.plt section.  */
1852 	  htab->root.srelplt->size += sizeof (Elf32_External_Rela);
1853 	}
1854       else
1855 	{
1856 	  h->plt.offset = (bfd_vma) -1;
1857 	  h->needs_plt = 0;
1858 	}
1859     }
1860   else
1861     {
1862       h->plt.offset = (bfd_vma) -1;
1863       h->needs_plt = 0;
1864     }
1865 
1866   if (h->got.refcount > 0)
1867     {
1868       asection *s;
1869       bfd_boolean dyn;
1870 
1871       /* Make sure this symbol is output as a dynamic symbol.
1872 	 Undefined weak syms won't yet be marked as dynamic.  */
1873       if (h->dynindx == -1
1874 	  && !h->forced_local)
1875 	{
1876 	  if (! bfd_elf_link_record_dynamic_symbol (info, h))
1877 	    return FALSE;
1878 	}
1879 
1880       s = htab->root.sgot;
1881 
1882       h->got.offset = s->size;
1883       s->size += 4;
1884       dyn = htab->root.dynamic_sections_created;
1885       if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h))
1886 	htab->root.srelgot->size += sizeof (Elf32_External_Rela);
1887     }
1888   else
1889     h->got.offset = (bfd_vma) -1;
1890 
1891   if (eh->dyn_relocs == NULL)
1892     return TRUE;
1893 
1894   /* In the shared -Bsymbolic case, discard space allocated for
1895      dynamic pc-relative relocs against symbols which turn out to be
1896      defined in regular objects.  For the normal shared case, discard
1897      space for pc-relative relocs that have become local due to symbol
1898      visibility changes.  */
1899 
1900   if (bfd_link_pic (info))
1901     {
1902       if (h->def_regular
1903 	  && (h->forced_local
1904 	      || info->symbolic))
1905 	{
1906 	  struct elf_dyn_relocs **pp;
1907 
1908 	  for (pp = &eh->dyn_relocs; (p = *pp) != NULL;)
1909 	    {
1910 	      p->count -= p->pc_count;
1911 	      p->pc_count = 0;
1912 	      if (p->count == 0)
1913 		*pp = p->next;
1914 	      else
1915 		pp = &p->next;
1916 	    }
1917 	}
1918 
1919       /* Also discard relocs on undefined weak syms with non-default
1920 	 visibility.  */
1921       if (eh->dyn_relocs != NULL
1922 	  && h->root.type == bfd_link_hash_undefweak)
1923 	{
1924 	  if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
1925 	    eh->dyn_relocs = NULL;
1926 
1927 	  /* Make sure undefined weak symbols are output as a dynamic
1928 	     symbol in PIEs.  */
1929 	  else if (h->dynindx == -1
1930 		   && !h->forced_local)
1931 	    {
1932 	      if (! bfd_elf_link_record_dynamic_symbol (info, h))
1933 		return FALSE;
1934 	    }
1935 	}
1936     }
1937   else
1938     {
1939       /* For the non-shared case, discard space for relocs against
1940 	 symbols which turn out to need copy relocs or are not
1941 	 dynamic.  */
1942 
1943       if (!h->non_got_ref
1944 	  && ((h->def_dynamic
1945 	       && !h->def_regular)
1946 	      || (htab->root.dynamic_sections_created
1947 		  && (h->root.type == bfd_link_hash_undefweak
1948 		      || h->root.type == bfd_link_hash_undefined))))
1949 	{
1950 	  /* Make sure this symbol is output as a dynamic symbol.
1951 	     Undefined weak syms won't yet be marked as dynamic.  */
1952 	  if (h->dynindx == -1
1953 	      && !h->forced_local)
1954 	    {
1955 	      if (! bfd_elf_link_record_dynamic_symbol (info, h))
1956 		return FALSE;
1957 	    }
1958 
1959 	  /* If that succeeded, we know we'll be keeping all the
1960 	     relocs.  */
1961 	  if (h->dynindx != -1)
1962 	    goto keep;
1963 	}
1964 
1965       eh->dyn_relocs = NULL;
1966 
1967     keep: ;
1968     }
1969 
1970   /* Finally, allocate space.  */
1971   for (p = eh->dyn_relocs; p != NULL; p = p->next)
1972     {
1973       asection *sreloc = elf_section_data (p->sec)->sreloc;
1974       sreloc->size += p->count * sizeof (Elf32_External_Rela);
1975     }
1976 
1977   return TRUE;
1978 }
1979 
1980 /* Set DF_TEXTREL if we find any dynamic relocs that apply to
1981    read-only sections.  */
1982 
1983 static bfd_boolean
1984 maybe_set_textrel (struct elf_link_hash_entry *h, void *info_p)
1985 {
1986   asection *sec;
1987 
1988   if (h->root.type == bfd_link_hash_indirect)
1989     return TRUE;
1990 
1991   sec = readonly_dynrelocs (h);
1992   if (sec != NULL)
1993     {
1994       struct bfd_link_info *info = (struct bfd_link_info *) info_p;
1995 
1996       info->flags |= DF_TEXTREL;
1997       info->callbacks->minfo
1998 	(_("%pB: dynamic relocation against `%pT' in read-only section `%pA'\n"),
1999 	 sec->owner, h->root.root.string, sec);
2000 
2001       /* Not an error, just cut short the traversal.  */
2002       return FALSE;
2003     }
2004   return TRUE;
2005 }
2006 
2007 /* Set the sizes of the dynamic sections.  */
2008 
2009 static bfd_boolean
2010 lm32_elf_size_dynamic_sections (bfd *output_bfd,
2011 				struct bfd_link_info *info)
2012 {
2013   struct elf_lm32_link_hash_table *htab;
2014   bfd *dynobj;
2015   asection *s;
2016   bfd_boolean relocs;
2017   bfd *ibfd;
2018 
2019   htab = lm32_elf_hash_table (info);
2020   if (htab == NULL)
2021     return FALSE;
2022 
2023   dynobj = htab->root.dynobj;
2024   BFD_ASSERT (dynobj != NULL);
2025 
2026   if (htab->root.dynamic_sections_created)
2027     {
2028       /* Set the contents of the .interp section to the interpreter.  */
2029       if (bfd_link_executable (info) && !info->nointerp)
2030 	{
2031 	  s = bfd_get_linker_section (dynobj, ".interp");
2032 	  BFD_ASSERT (s != NULL);
2033 	  s->size = sizeof ELF_DYNAMIC_INTERPRETER;
2034 	  s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
2035 	}
2036     }
2037 
2038   /* Set up .got offsets for local syms, and space for local dynamic
2039      relocs.  */
2040   for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
2041     {
2042       bfd_signed_vma *local_got;
2043       bfd_signed_vma *end_local_got;
2044       bfd_size_type locsymcount;
2045       Elf_Internal_Shdr *symtab_hdr;
2046       asection *srel;
2047 
2048       if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour)
2049 	continue;
2050 
2051       for (s = ibfd->sections; s != NULL; s = s->next)
2052 	{
2053 	  struct elf_dyn_relocs *p;
2054 
2055 	  for (p = ((struct elf_dyn_relocs *)
2056 		    elf_section_data (s)->local_dynrel);
2057 	       p != NULL;
2058 	       p = p->next)
2059 	    {
2060 	      if (! bfd_is_abs_section (p->sec)
2061 		  && bfd_is_abs_section (p->sec->output_section))
2062 		{
2063 		  /* Input section has been discarded, either because
2064 		     it is a copy of a linkonce section or due to
2065 		     linker script /DISCARD/, so we'll be discarding
2066 		     the relocs too.  */
2067 		}
2068 	      else if (p->count != 0)
2069 		{
2070 		  srel = elf_section_data (p->sec)->sreloc;
2071 		  srel->size += p->count * sizeof (Elf32_External_Rela);
2072 		  if ((p->sec->output_section->flags & SEC_READONLY) != 0)
2073 		    info->flags |= DF_TEXTREL;
2074 		}
2075 	    }
2076 	}
2077 
2078       local_got = elf_local_got_refcounts (ibfd);
2079       if (!local_got)
2080 	continue;
2081 
2082       symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2083       locsymcount = symtab_hdr->sh_info;
2084       end_local_got = local_got + locsymcount;
2085       s = htab->root.sgot;
2086       srel = htab->root.srelgot;
2087       for (; local_got < end_local_got; ++local_got)
2088 	{
2089 	  if (*local_got > 0)
2090 	    {
2091 	      *local_got = s->size;
2092 	      s->size += 4;
2093 	      if (bfd_link_pic (info))
2094 		srel->size += sizeof (Elf32_External_Rela);
2095 	    }
2096 	  else
2097 	    *local_got = (bfd_vma) -1;
2098 	}
2099     }
2100 
2101   /* Allocate global sym .plt and .got entries, and space for global
2102      sym dynamic relocs.  */
2103   elf_link_hash_traverse (&htab->root, allocate_dynrelocs, info);
2104 
2105   /* We now have determined the sizes of the various dynamic sections.
2106      Allocate memory for them.  */
2107   relocs = FALSE;
2108   for (s = dynobj->sections; s != NULL; s = s->next)
2109     {
2110       if ((s->flags & SEC_LINKER_CREATED) == 0)
2111 	continue;
2112 
2113       if (s == htab->root.splt
2114 	  || s == htab->root.sgot
2115 	  || s == htab->root.sgotplt
2116 	  || s == htab->sdynbss)
2117 	{
2118 	  /* Strip this section if we don't need it; see the
2119 	     comment below.  */
2120 	}
2121       else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rela"))
2122 	{
2123 	  if (s->size != 0 && s != htab->root.srelplt)
2124 	    relocs = TRUE;
2125 
2126 	  /* We use the reloc_count field as a counter if we need
2127 	     to copy relocs into the output file.  */
2128 	  s->reloc_count = 0;
2129 	}
2130       else
2131 	/* It's not one of our sections, so don't allocate space.  */
2132 	continue;
2133 
2134       if (s->size == 0)
2135 	{
2136 	  /* If we don't need this section, strip it from the
2137 	     output file.  This is mostly to handle .rela.bss and
2138 	     .rela.plt.  We must create both sections in
2139 	     create_dynamic_sections, because they must be created
2140 	     before the linker maps input sections to output
2141 	     sections.  The linker does that before
2142 	     adjust_dynamic_symbol is called, and it is that
2143 	     function which decides whether anything needs to go
2144 	     into these sections.  */
2145 	  s->flags |= SEC_EXCLUDE;
2146 	  continue;
2147 	}
2148 
2149       if ((s->flags & SEC_HAS_CONTENTS) == 0)
2150 	continue;
2151 
2152       /* Allocate memory for the section contents.  We use bfd_zalloc
2153 	 here in case unused entries are not reclaimed before the
2154 	 section's contents are written out.  This should not happen,
2155 	 but this way if it does, we get a R_LM32_NONE reloc instead
2156 	 of garbage.  */
2157       s->contents = bfd_zalloc (dynobj, s->size);
2158       if (s->contents == NULL)
2159 	return FALSE;
2160     }
2161 
2162   if (htab->root.dynamic_sections_created)
2163     {
2164       /* Add some entries to the .dynamic section.  We fill in the
2165 	 values later, in lm32_elf_finish_dynamic_sections, but we
2166 	 must add the entries now so that we get the correct size for
2167 	 the .dynamic section.  The DT_DEBUG entry is filled in by the
2168 	 dynamic linker and used by the debugger.  */
2169 #define add_dynamic_entry(TAG, VAL) \
2170   _bfd_elf_add_dynamic_entry (info, TAG, VAL)
2171 
2172      if (bfd_link_executable (info))
2173 	{
2174 	  if (! add_dynamic_entry (DT_DEBUG, 0))
2175 	    return FALSE;
2176 	}
2177 
2178       if (htab->root.splt->size != 0)
2179 	{
2180 	  if (! add_dynamic_entry (DT_PLTGOT, 0)
2181 	      || ! add_dynamic_entry (DT_PLTRELSZ, 0)
2182 	      || ! add_dynamic_entry (DT_PLTREL, DT_RELA)
2183 	      || ! add_dynamic_entry (DT_JMPREL, 0))
2184 	    return FALSE;
2185 	}
2186 
2187       if (relocs)
2188 	{
2189 	  if (! add_dynamic_entry (DT_RELA, 0)
2190 	      || ! add_dynamic_entry (DT_RELASZ, 0)
2191 	      || ! add_dynamic_entry (DT_RELAENT,
2192 				      sizeof (Elf32_External_Rela)))
2193 	    return FALSE;
2194 
2195 	  /* If any dynamic relocs apply to a read-only section,
2196 	     then we need a DT_TEXTREL entry.  */
2197 	  if ((info->flags & DF_TEXTREL) == 0)
2198 	    elf_link_hash_traverse (&htab->root, maybe_set_textrel, info);
2199 
2200 	  if ((info->flags & DF_TEXTREL) != 0)
2201 	    {
2202 	      if (! add_dynamic_entry (DT_TEXTREL, 0))
2203 		return FALSE;
2204 	    }
2205 	}
2206     }
2207 #undef add_dynamic_entry
2208 
2209   /* Allocate .rofixup section.  */
2210   if (IS_FDPIC (output_bfd))
2211     {
2212       struct weak_symbol_list *list_start = NULL, *list_end = NULL;
2213       int rgot_weak_count = 0;
2214       int r32_count = 0;
2215       int rgot_count = 0;
2216       /* Look for deleted sections.  */
2217       for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
2218 	{
2219 	  for (s = ibfd->sections; s != NULL; s = s->next)
2220 	    {
2221 	      if (s->reloc_count)
2222 		{
2223 		  /* Count relocs that need .rofixup entires.  */
2224 		  Elf_Internal_Rela *internal_relocs, *end;
2225 		  internal_relocs = elf_section_data (s)->relocs;
2226 		  if (internal_relocs == NULL)
2227 		    internal_relocs = (_bfd_elf_link_read_relocs (ibfd, s, NULL, NULL, FALSE));
2228 		  if (internal_relocs != NULL)
2229 		    {
2230 		      end = internal_relocs + s->reloc_count;
2231 		      while (internal_relocs < end)
2232 			{
2233 			  Elf_Internal_Shdr *symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2234 			  struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (ibfd);
2235 			  unsigned long r_symndx;
2236 			  struct elf_link_hash_entry *h;
2237 
2238 			  symtab_hdr = &elf_tdata (ibfd)->symtab_hdr;
2239 			  sym_hashes = elf_sym_hashes (ibfd);
2240 			  r_symndx = ELF32_R_SYM (internal_relocs->r_info);
2241 			  h = NULL;
2242 			  if (r_symndx < symtab_hdr->sh_info)
2243 			    {
2244 			    }
2245 			  else
2246 			    {
2247 			      h = sym_hashes[r_symndx - symtab_hdr->sh_info];
2248 			      while (h->root.type == bfd_link_hash_indirect
2249 				     || h->root.type == bfd_link_hash_warning)
2250 				h = (struct elf_link_hash_entry *) h->root.u.i.link;
2251 			      }
2252 
2253 			  /* Don't generate entries for weak symbols.  */
2254 			  if (!h || (h && h->root.type != bfd_link_hash_undefweak))
2255 			    {
2256 			      if (!discarded_section (s) && !((bfd_get_section_flags (ibfd, s) & SEC_ALLOC) == 0))
2257 				{
2258 				  switch (ELF32_R_TYPE (internal_relocs->r_info))
2259 				    {
2260 				    case R_LM32_32:
2261 				      r32_count++;
2262 				      break;
2263 				    case R_LM32_16_GOT:
2264 				      rgot_count++;
2265 				      break;
2266 				    }
2267 				}
2268 			    }
2269 			  else
2270 			    {
2271 			      struct weak_symbol_list *current, *new_entry;
2272 			      /* Is this symbol already in the list?  */
2273 			      for (current = list_start; current; current = current->next)
2274 				{
2275 				  if (!strcmp (current->name, h->root.root.string))
2276 				    break;
2277 				}
2278 			      if (!current && !discarded_section (s) && (bfd_get_section_flags (ibfd, s) & SEC_ALLOC))
2279 				{
2280 				  /* Will this have an entry in the GOT.  */
2281 				  if (ELF32_R_TYPE (internal_relocs->r_info) == R_LM32_16_GOT)
2282 				    {
2283 				      /* Create a new entry.  */
2284 				      new_entry = malloc (sizeof (struct weak_symbol_list));
2285 				      if (!new_entry)
2286 					return FALSE;
2287 				      new_entry->name = h->root.root.string;
2288 				      new_entry->next = NULL;
2289 				      /* Add to list */
2290 				      if (list_start == NULL)
2291 					{
2292 					  list_start = new_entry;
2293 					  list_end = new_entry;
2294 					}
2295 				      else
2296 					{
2297 					  list_end->next = new_entry;
2298 					  list_end = new_entry;
2299 					}
2300 				      /* Increase count of undefined weak symbols in the got.  */
2301 				      rgot_weak_count++;
2302 				    }
2303 				}
2304 			    }
2305 			  internal_relocs++;
2306 			}
2307 		    }
2308 		  else
2309 		    return FALSE;
2310 		}
2311 	    }
2312 	}
2313       /* Free list.  */
2314       while (list_start)
2315 	{
2316 	  list_end = list_start->next;
2317 	  free (list_start);
2318 	  list_start = list_end;
2319 	}
2320 
2321       /* Size sections.  */
2322       lm32fdpic_fixup32_section (info)->size
2323 	= (r32_count + (htab->root.sgot->size / 4) - rgot_weak_count + 1) * 4;
2324       if (lm32fdpic_fixup32_section (info)->size == 0)
2325 	lm32fdpic_fixup32_section (info)->flags |= SEC_EXCLUDE;
2326       else
2327 	{
2328 	  lm32fdpic_fixup32_section (info)->contents =
2329 	     bfd_zalloc (dynobj, lm32fdpic_fixup32_section (info)->size);
2330 	  if (lm32fdpic_fixup32_section (info)->contents == NULL)
2331 	    return FALSE;
2332 	}
2333     }
2334 
2335   return TRUE;
2336 }
2337 
2338 /* Create dynamic sections when linking against a dynamic object.  */
2339 
2340 static bfd_boolean
2341 lm32_elf_create_dynamic_sections (bfd *abfd, struct bfd_link_info *info)
2342 {
2343   struct elf_lm32_link_hash_table *htab;
2344   flagword flags, pltflags;
2345   asection *s;
2346   const struct elf_backend_data *bed = get_elf_backend_data (abfd);
2347   int ptralign = 2; /* 32bit */
2348 
2349   htab = lm32_elf_hash_table (info);
2350   if (htab == NULL)
2351     return FALSE;
2352 
2353   /* Make sure we have a GOT - For the case where we have a dynamic object
2354      but none of the relocs in check_relocs */
2355   if (!_bfd_elf_create_got_section (abfd, info))
2356     return FALSE;
2357   if (IS_FDPIC (abfd) && (htab->sfixup32 == NULL))
2358     {
2359       if (! create_rofixup_section (abfd, info))
2360 	return FALSE;
2361     }
2362 
2363   /* We need to create .plt, .rel[a].plt, .got, .got.plt, .dynbss, and
2364      .rel[a].bss sections.  */
2365   flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
2366 	   | SEC_LINKER_CREATED);
2367 
2368   pltflags = flags;
2369   pltflags |= SEC_CODE;
2370   if (bed->plt_not_loaded)
2371     pltflags &= ~ (SEC_LOAD | SEC_HAS_CONTENTS);
2372   if (bed->plt_readonly)
2373     pltflags |= SEC_READONLY;
2374 
2375   s = bfd_make_section_anyway_with_flags (abfd, ".plt", pltflags);
2376   htab->root.splt = s;
2377   if (s == NULL
2378       || ! bfd_set_section_alignment (abfd, s, bed->plt_alignment))
2379     return FALSE;
2380 
2381   if (bed->want_plt_sym)
2382     {
2383       /* Define the symbol _PROCEDURE_LINKAGE_TABLE_ at the start of the
2384 	 .plt section.  */
2385       struct bfd_link_hash_entry *bh = NULL;
2386       struct elf_link_hash_entry *h;
2387 
2388       if (! (_bfd_generic_link_add_one_symbol
2389 	     (info, abfd, "_PROCEDURE_LINKAGE_TABLE_", BSF_GLOBAL, s,
2390 	      (bfd_vma) 0, NULL, FALSE,
2391 	      get_elf_backend_data (abfd)->collect, &bh)))
2392 	return FALSE;
2393       h = (struct elf_link_hash_entry *) bh;
2394       h->def_regular = 1;
2395       h->type = STT_OBJECT;
2396       htab->root.hplt = h;
2397 
2398       if (bfd_link_pic (info)
2399 	  && ! bfd_elf_link_record_dynamic_symbol (info, h))
2400 	return FALSE;
2401     }
2402 
2403   s = bfd_make_section_anyway_with_flags (abfd,
2404 					  bed->default_use_rela_p
2405 					  ? ".rela.plt" : ".rel.plt",
2406 					  flags | SEC_READONLY);
2407   htab->root.srelplt = s;
2408   if (s == NULL
2409       || ! bfd_set_section_alignment (abfd, s, ptralign))
2410     return FALSE;
2411 
2412   if (htab->root.sgot == NULL
2413       && !_bfd_elf_create_got_section (abfd, info))
2414     return FALSE;
2415 
2416   if (bed->want_dynbss)
2417     {
2418       /* The .dynbss section is a place to put symbols which are defined
2419 	 by dynamic objects, are referenced by regular objects, and are
2420 	 not functions.  We must allocate space for them in the process
2421 	 image and use a R_*_COPY reloc to tell the dynamic linker to
2422 	 initialize them at run time.  The linker script puts the .dynbss
2423 	 section into the .bss section of the final image.  */
2424       s = bfd_make_section_anyway_with_flags (abfd, ".dynbss",
2425 					      SEC_ALLOC | SEC_LINKER_CREATED);
2426       htab->sdynbss = s;
2427       if (s == NULL)
2428 	return FALSE;
2429       /* The .rel[a].bss section holds copy relocs.  This section is not
2430 	 normally needed.  We need to create it here, though, so that the
2431 	 linker will map it to an output section.  We can't just create it
2432 	 only if we need it, because we will not know whether we need it
2433 	 until we have seen all the input files, and the first time the
2434 	 main linker code calls BFD after examining all the input files
2435 	 (size_dynamic_sections) the input sections have already been
2436 	 mapped to the output sections.  If the section turns out not to
2437 	 be needed, we can discard it later.  We will never need this
2438 	 section when generating a shared object, since they do not use
2439 	 copy relocs.  */
2440       if (! bfd_link_pic (info))
2441 	{
2442 	  s = bfd_make_section_anyway_with_flags (abfd,
2443 						  (bed->default_use_rela_p
2444 						   ? ".rela.bss" : ".rel.bss"),
2445 						  flags | SEC_READONLY);
2446 	  htab->srelbss = s;
2447 	  if (s == NULL
2448 	      || ! bfd_set_section_alignment (abfd, s, ptralign))
2449 	    return FALSE;
2450 	}
2451     }
2452 
2453   return TRUE;
2454 }
2455 
2456 /* Copy the extra info we tack onto an elf_link_hash_entry.  */
2457 
2458 static void
2459 lm32_elf_copy_indirect_symbol (struct bfd_link_info *info,
2460 			       struct elf_link_hash_entry *dir,
2461 			       struct elf_link_hash_entry *ind)
2462 {
2463   struct elf_lm32_link_hash_entry * edir;
2464   struct elf_lm32_link_hash_entry * eind;
2465 
2466   edir = (struct elf_lm32_link_hash_entry *) dir;
2467   eind = (struct elf_lm32_link_hash_entry *) ind;
2468 
2469   if (eind->dyn_relocs != NULL)
2470     {
2471       if (edir->dyn_relocs != NULL)
2472 	{
2473 	  struct elf_dyn_relocs **pp;
2474 	  struct elf_dyn_relocs *p;
2475 
2476 	  /* Add reloc counts against the indirect sym to the direct sym
2477 	     list.  Merge any entries against the same section.  */
2478 	  for (pp = &eind->dyn_relocs; (p = *pp) != NULL;)
2479 	    {
2480 	      struct elf_dyn_relocs *q;
2481 
2482 	      for (q = edir->dyn_relocs; q != NULL; q = q->next)
2483 		if (q->sec == p->sec)
2484 		  {
2485 		    q->pc_count += p->pc_count;
2486 		    q->count += p->count;
2487 		    *pp = p->next;
2488 		    break;
2489 		  }
2490 	      if (q == NULL)
2491 		pp = &p->next;
2492 	    }
2493 	  *pp = edir->dyn_relocs;
2494 	}
2495 
2496       edir->dyn_relocs = eind->dyn_relocs;
2497       eind->dyn_relocs = NULL;
2498     }
2499 
2500   _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2501 }
2502 
2503 static bfd_boolean
2504 lm32_elf_always_size_sections (bfd *output_bfd, struct bfd_link_info *info)
2505 {
2506   if (!bfd_link_relocatable (info))
2507     {
2508       if (!bfd_elf_stack_segment_size (output_bfd, info,
2509 				       "__stacksize", DEFAULT_STACK_SIZE))
2510 	return FALSE;
2511 
2512       asection *sec = bfd_get_section_by_name (output_bfd, ".stack");
2513       if (sec)
2514 	sec->size = info->stacksize >= 0 ? info->stacksize : 0;
2515     }
2516 
2517   return TRUE;
2518 }
2519 
2520 static bfd_boolean
2521 lm32_elf_fdpic_copy_private_bfd_data (bfd *ibfd, bfd *obfd)
2522 {
2523   unsigned i;
2524 
2525   if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
2526       || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
2527     return TRUE;
2528 
2529   if (! _bfd_elf_copy_private_bfd_data (ibfd, obfd))
2530     return FALSE;
2531 
2532   if (! elf_tdata (ibfd) || ! elf_tdata (ibfd)->phdr
2533       || ! elf_tdata (obfd) || ! elf_tdata (obfd)->phdr)
2534     return TRUE;
2535 
2536   /* Copy the stack size.  */
2537   for (i = 0; i < elf_elfheader (ibfd)->e_phnum; i++)
2538     if (elf_tdata (ibfd)->phdr[i].p_type == PT_GNU_STACK)
2539       {
2540 	Elf_Internal_Phdr *iphdr = &elf_tdata (ibfd)->phdr[i];
2541 
2542 	for (i = 0; i < elf_elfheader (obfd)->e_phnum; i++)
2543 	  if (elf_tdata (obfd)->phdr[i].p_type == PT_GNU_STACK)
2544 	    {
2545 	      memcpy (&elf_tdata (obfd)->phdr[i], iphdr, sizeof (*iphdr));
2546 
2547 	      /* Rewrite the phdrs, since we're only called after they were first written.  */
2548 	      if (bfd_seek (obfd, (bfd_signed_vma) get_elf_backend_data (obfd)
2549 			    ->s->sizeof_ehdr, SEEK_SET) != 0
2550 		  || get_elf_backend_data (obfd)->s->write_out_phdrs (obfd, elf_tdata (obfd)->phdr,
2551 				     elf_elfheader (obfd)->e_phnum) != 0)
2552 		return FALSE;
2553 	      break;
2554 	    }
2555 
2556 	break;
2557       }
2558 
2559   return TRUE;
2560 }
2561 
2562 
2563 #define ELF_ARCH		bfd_arch_lm32
2564 #define ELF_TARGET_ID		LM32_ELF_DATA
2565 #define ELF_MACHINE_CODE	EM_LATTICEMICO32
2566 #define ELF_MAXPAGESIZE		0x1000
2567 
2568 #define TARGET_BIG_SYM		lm32_elf32_vec
2569 #define TARGET_BIG_NAME		"elf32-lm32"
2570 
2571 #define bfd_elf32_bfd_reloc_type_lookup		lm32_reloc_type_lookup
2572 #define bfd_elf32_bfd_reloc_name_lookup		lm32_reloc_name_lookup
2573 #define elf_info_to_howto			lm32_info_to_howto_rela
2574 #define elf_info_to_howto_rel			NULL
2575 #define elf_backend_rela_normal			1
2576 #define elf_backend_object_p			lm32_elf_object_p
2577 #define elf_backend_final_write_processing	lm32_elf_final_write_processing
2578 #define elf_backend_stack_align			8
2579 #define elf_backend_can_gc_sections		1
2580 #define elf_backend_can_refcount		1
2581 #define elf_backend_gc_mark_hook		lm32_elf_gc_mark_hook
2582 #define elf_backend_plt_readonly		1
2583 #define elf_backend_want_got_plt		1
2584 #define elf_backend_want_plt_sym		0
2585 #define elf_backend_got_header_size		12
2586 #define elf_backend_dtrel_excludes_plt		1
2587 #define bfd_elf32_bfd_link_hash_table_create	lm32_elf_link_hash_table_create
2588 #define elf_backend_check_relocs		lm32_elf_check_relocs
2589 #define elf_backend_reloc_type_class		lm32_elf_reloc_type_class
2590 #define elf_backend_copy_indirect_symbol	lm32_elf_copy_indirect_symbol
2591 #define elf_backend_size_dynamic_sections	lm32_elf_size_dynamic_sections
2592 #define elf_backend_omit_section_dynsym		_bfd_elf_omit_section_dynsym_all
2593 #define elf_backend_create_dynamic_sections	lm32_elf_create_dynamic_sections
2594 #define elf_backend_finish_dynamic_sections	lm32_elf_finish_dynamic_sections
2595 #define elf_backend_adjust_dynamic_symbol	lm32_elf_adjust_dynamic_symbol
2596 #define elf_backend_finish_dynamic_symbol	lm32_elf_finish_dynamic_symbol
2597 #define elf_backend_relocate_section		lm32_elf_relocate_section
2598 
2599 #include "elf32-target.h"
2600 
2601 #undef  ELF_MAXPAGESIZE
2602 #define ELF_MAXPAGESIZE		0x4000
2603 
2604 
2605 #undef  TARGET_BIG_SYM
2606 #define TARGET_BIG_SYM		lm32_elf32_fdpic_vec
2607 #undef	TARGET_BIG_NAME
2608 #define TARGET_BIG_NAME		"elf32-lm32fdpic"
2609 #undef	elf32_bed
2610 #define	elf32_bed		elf32_lm32fdpic_bed
2611 
2612 #undef	elf_backend_always_size_sections
2613 #define elf_backend_always_size_sections	lm32_elf_always_size_sections
2614 #undef	bfd_elf32_bfd_copy_private_bfd_data
2615 #define bfd_elf32_bfd_copy_private_bfd_data	lm32_elf_fdpic_copy_private_bfd_data
2616 
2617 #include "elf32-target.h"
2618