| Line 1... |
Line 1... |
/* BFD back-end for National Semiconductor's CR16 ELF
|
/* BFD back-end for National Semiconductor's CR16 ELF
|
Copyright 2007 Free Software Foundation, Inc.
|
Copyright 2007, 2008, 2009 Free Software Foundation, Inc.
|
Written by M R Swami Reddy.
|
Written by M R Swami Reddy.
|
|
|
This file is part of BFD, the Binary File Descriptor library.
|
This file is part of BFD, the Binary File Descriptor library.
|
|
|
This program is free software; you can redistribute it and/or modify
|
This program is free software; you can redistribute it and/or modify
|
| Line 24... |
Line 24... |
#include "libbfd.h"
|
#include "libbfd.h"
|
#include "libiberty.h"
|
#include "libiberty.h"
|
#include "elf-bfd.h"
|
#include "elf-bfd.h"
|
#include "elf/cr16.h"
|
#include "elf/cr16.h"
|
|
|
|
/* The cr16 linker needs to keep track of the number of relocs that
|
|
it decides to copy in check_relocs for each symbol. This is so
|
|
that it can discard PC relative relocs if it doesn't need them when
|
|
linking with -Bsymbolic. We store the information in a field
|
|
extending the regular ELF linker hash table. */
|
|
|
|
struct elf32_cr16_link_hash_entry {
|
|
/* The basic elf link hash table entry. */
|
|
struct elf_link_hash_entry root;
|
|
|
|
/* For function symbols, the number of times this function is
|
|
called directly (ie by name). */
|
|
unsigned int direct_calls;
|
|
|
|
/* For function symbols, the size of this function's stack
|
|
(if <= 255 bytes). We stuff this into "call" instructions
|
|
to this target when it's valid and profitable to do so.
|
|
|
|
This does not include stack allocated by movm! */
|
|
unsigned char stack_size;
|
|
|
|
/* For function symbols, arguments (if any) for movm instruction
|
|
in the prologue. We stuff this value into "call" instructions
|
|
to the target when it's valid and profitable to do so. */
|
|
unsigned char movm_args;
|
|
|
|
/* For function symbols, the amount of stack space that would be allocated
|
|
by the movm instruction. This is redundant with movm_args, but we
|
|
add it to the hash table to avoid computing it over and over. */
|
|
unsigned char movm_stack_size;
|
|
|
|
/* Used to mark functions which have had redundant parts of their
|
|
prologue deleted. */
|
|
#define CR16_DELETED_PROLOGUE_BYTES 0x1
|
|
unsigned char flags;
|
|
|
|
/* Calculated value. */
|
|
bfd_vma value;
|
|
};
|
|
|
|
/* We derive a hash table from the main elf linker hash table so
|
|
we can store state variables and a secondary hash table without
|
|
resorting to global variables. */
|
|
struct elf32_cr16_link_hash_table {
|
|
/* The main hash table. */
|
|
struct elf_link_hash_table root;
|
|
|
|
/* A hash table for static functions. We could derive a new hash table
|
|
instead of using the full elf32_cr16_link_hash_table if we wanted
|
|
to save some memory. */
|
|
struct elf32_cr16_link_hash_table *static_hash_table;
|
|
|
|
/* Random linker state flags. */
|
|
#define CR16_HASH_ENTRIES_INITIALIZED 0x1
|
|
char flags;
|
|
};
|
|
|
|
/* For CR16 linker hash table. */
|
|
|
|
/* Get the CR16 ELF linker hash table from a link_info structure. */
|
|
|
|
#define elf32_cr16_hash_table(p) \
|
|
((struct elf32_cr16_link_hash_table *) ((p)->hash))
|
|
|
|
#define elf32_cr16_link_hash_traverse(table, func, info) \
|
|
(elf_link_hash_traverse \
|
|
(&(table)->root, \
|
|
(bfd_boolean (*) ((struct elf_link_hash_entry *, void *))) (func), (info)))
|
|
|
/* cr16_reloc_map array maps BFD relocation enum into a CRGAS relocation type. */
|
/* cr16_reloc_map array maps BFD relocation enum into a CRGAS relocation type. */
|
|
|
struct cr16_reloc_map
|
struct cr16_reloc_map
|
{
|
{
|
bfd_reloc_code_real_type bfd_reloc_enum; /* BFD relocation enum. */
|
bfd_reloc_code_real_type bfd_reloc_enum; /* BFD relocation enum. */
|
| Line 62... |
Line 131... |
{BFD_RELOC_CR16_DISP16, R_CR16_DISP16},
|
{BFD_RELOC_CR16_DISP16, R_CR16_DISP16},
|
{BFD_RELOC_CR16_DISP24, R_CR16_DISP24},
|
{BFD_RELOC_CR16_DISP24, R_CR16_DISP24},
|
{BFD_RELOC_CR16_DISP24a, R_CR16_DISP24a},
|
{BFD_RELOC_CR16_DISP24a, R_CR16_DISP24a},
|
{BFD_RELOC_CR16_SWITCH8, R_CR16_SWITCH8},
|
{BFD_RELOC_CR16_SWITCH8, R_CR16_SWITCH8},
|
{BFD_RELOC_CR16_SWITCH16, R_CR16_SWITCH16},
|
{BFD_RELOC_CR16_SWITCH16, R_CR16_SWITCH16},
|
{BFD_RELOC_CR16_SWITCH32, R_CR16_SWITCH32}
|
{BFD_RELOC_CR16_SWITCH32, R_CR16_SWITCH32},
|
|
{BFD_RELOC_CR16_GOT_REGREL20, R_CR16_GOT_REGREL20},
|
|
{BFD_RELOC_CR16_GOTC_REGREL20, R_CR16_GOTC_REGREL20},
|
|
{BFD_RELOC_CR16_GLOB_DAT, R_CR16_GLOB_DAT}
|
};
|
};
|
|
|
static reloc_howto_type cr16_elf_howto_table[] =
|
static reloc_howto_type cr16_elf_howto_table[] =
|
{
|
{
|
HOWTO (R_CR16_NONE, /* type */
|
HOWTO (R_CR16_NONE, /* type */
|
| Line 91... |
Line 163... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_NUM8", /* name */
|
"R_CR16_NUM8", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xff, /* src_mask */
|
0x0, /* src_mask */
|
0xff, /* dst_mask */
|
0xff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_NUM16, /* type */
|
HOWTO (R_CR16_NUM16, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 105... |
Line 177... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_NUM16", /* name */
|
"R_CR16_NUM16", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffff, /* dst_mask */
|
0xffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_NUM32, /* type */
|
HOWTO (R_CR16_NUM32, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 119... |
Line 191... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_NUM32", /* name */
|
"R_CR16_NUM32", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffffffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffffffff, /* dst_mask */
|
0xffffffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_NUM32a, /* type */
|
HOWTO (R_CR16_NUM32a, /* type */
|
1, /* rightshift */
|
1, /* rightshift */
|
| Line 133... |
Line 205... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_NUM32a", /* name */
|
"R_CR16_NUM32a", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffffffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffffffff, /* dst_mask */
|
0xffffffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_REGREL4, /* type */
|
HOWTO (R_CR16_REGREL4, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 147... |
Line 219... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_REGREL4", /* name */
|
"R_CR16_REGREL4", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xf, /* src_mask */
|
0x0, /* src_mask */
|
0xf, /* dst_mask */
|
0xf, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_REGREL4a, /* type */
|
HOWTO (R_CR16_REGREL4a, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 161... |
Line 233... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_REGREL4a", /* name */
|
"R_CR16_REGREL4a", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xf, /* src_mask */
|
0x0, /* src_mask */
|
0xf, /* dst_mask */
|
0xf, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_REGREL14, /* type */
|
HOWTO (R_CR16_REGREL14, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 175... |
Line 247... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_REGREL14", /* name */
|
"R_CR16_REGREL14", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0x3fff, /* src_mask */
|
0x0, /* src_mask */
|
0x3fff, /* dst_mask */
|
0x3fff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_REGREL14a, /* type */
|
HOWTO (R_CR16_REGREL14a, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 189... |
Line 261... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_REGREL14a", /* name */
|
"R_CR16_REGREL14a", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0x3fff, /* src_mask */
|
0x0, /* src_mask */
|
0x3fff, /* dst_mask */
|
0x3fff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_REGREL16, /* type */
|
HOWTO (R_CR16_REGREL16, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 203... |
Line 275... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_REGREL16", /* name */
|
"R_CR16_REGREL16", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffff, /* dst_mask */
|
0xffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_REGREL20, /* type */
|
HOWTO (R_CR16_REGREL20, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 217... |
Line 289... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_REGREL20", /* name */
|
"R_CR16_REGREL20", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xfffff, /* src_mask */
|
0x0, /* src_mask */
|
0xfffff, /* dst_mask */
|
0xfffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_REGREL20a, /* type */
|
HOWTO (R_CR16_REGREL20a, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 231... |
Line 303... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_REGREL20a", /* name */
|
"R_CR16_REGREL20a", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xfffff, /* src_mask */
|
0x0, /* src_mask */
|
0xfffff, /* dst_mask */
|
0xfffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_ABS20, /* type */
|
HOWTO (R_CR16_ABS20, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 245... |
Line 317... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_ABS20", /* name */
|
"R_CR16_ABS20", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xfffff, /* src_mask */
|
0x0, /* src_mask */
|
0xfffff, /* dst_mask */
|
0xfffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_ABS24, /* type */
|
HOWTO (R_CR16_ABS24, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 259... |
Line 331... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_ABS24", /* name */
|
"R_CR16_ABS24", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffffff, /* dst_mask */
|
0xffffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_IMM4, /* type */
|
HOWTO (R_CR16_IMM4, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 273... |
Line 345... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_IMM4", /* name */
|
"R_CR16_IMM4", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xf, /* src_mask */
|
0x0, /* src_mask */
|
0xf, /* dst_mask */
|
0xf, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_IMM8, /* type */
|
HOWTO (R_CR16_IMM8, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 287... |
Line 359... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_IMM8", /* name */
|
"R_CR16_IMM8", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xff, /* src_mask */
|
0x0, /* src_mask */
|
0xff, /* dst_mask */
|
0xff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_IMM16, /* type */
|
HOWTO (R_CR16_IMM16, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 301... |
Line 373... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_IMM16", /* name */
|
"R_CR16_IMM16", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffff, /* dst_mask */
|
0xffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_IMM20, /* type */
|
HOWTO (R_CR16_IMM20, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 315... |
Line 387... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_IMM20", /* name */
|
"R_CR16_IMM20", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xfffff, /* src_mask */
|
0x0, /* src_mask */
|
0xfffff, /* dst_mask */
|
0xfffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_IMM24, /* type */
|
HOWTO (R_CR16_IMM24, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 329... |
Line 401... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_IMM24", /* name */
|
"R_CR16_IMM24", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffffff, /* dst_mask */
|
0xffffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_IMM32, /* type */
|
HOWTO (R_CR16_IMM32, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 343... |
Line 415... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_IMM32", /* name */
|
"R_CR16_IMM32", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffffffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffffffff, /* dst_mask */
|
0xffffffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_IMM32a, /* type */
|
HOWTO (R_CR16_IMM32a, /* type */
|
1, /* rightshift */
|
1, /* rightshift */
|
| Line 357... |
Line 429... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
complain_overflow_bitfield,/* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_IMM32a", /* name */
|
"R_CR16_IMM32a", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffffffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffffffff, /* dst_mask */
|
0xffffffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_DISP4, /* type */
|
HOWTO (R_CR16_DISP4, /* type */
|
1, /* rightshift */
|
1, /* rightshift */
|
| Line 371... |
Line 443... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_DISP4", /* name */
|
"R_CR16_DISP4", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xf, /* src_mask */
|
0x0, /* src_mask */
|
0xf, /* dst_mask */
|
0xf, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_DISP8, /* type */
|
HOWTO (R_CR16_DISP8, /* type */
|
1, /* rightshift */
|
1, /* rightshift */
|
| Line 385... |
Line 457... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_DISP8", /* name */
|
"R_CR16_DISP8", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0x1ff, /* src_mask */
|
0x0, /* src_mask */
|
0x1ff, /* dst_mask */
|
0x1ff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_DISP16, /* type */
|
HOWTO (R_CR16_DISP16, /* type */
|
0, /* rightshift REVIITS: To sync with WinIDEA*/
|
0, /* rightshift REVIITS: To sync with WinIDEA*/
|
| Line 399... |
Line 471... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_DISP16", /* name */
|
"R_CR16_DISP16", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0x1ffff, /* src_mask */
|
0x0, /* src_mask */
|
0x1ffff, /* dst_mask */
|
0x1ffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
/* REVISIT: DISP24 should be left-shift by 2 as per ISA doc
|
/* REVISIT: DISP24 should be left-shift by 2 as per ISA doc
|
but its not done, to sync with WinIDEA and CR16 4.1 tools */
|
but its not done, to sync with WinIDEA and CR16 4.1 tools */
|
HOWTO (R_CR16_DISP24, /* type */
|
HOWTO (R_CR16_DISP24, /* type */
|
| Line 414... |
Line 486... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_DISP24", /* name */
|
"R_CR16_DISP24", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0x1ffffff, /* src_mask */
|
0x0, /* src_mask */
|
0x1ffffff, /* dst_mask */
|
0x1ffffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
HOWTO (R_CR16_DISP24a, /* type */
|
HOWTO (R_CR16_DISP24a, /* type */
|
0, /* rightshift */
|
0, /* rightshift */
|
| Line 428... |
Line 500... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_DISP24a", /* name */
|
"R_CR16_DISP24a", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffffff, /* dst_mask */
|
0xffffff, /* dst_mask */
|
FALSE), /* pcrel_offset */
|
FALSE), /* pcrel_offset */
|
|
|
/* An 8 bit switch table entry. This is generated for an expression
|
/* An 8 bit switch table entry. This is generated for an expression
|
such as ``.byte L1 - L2''. The offset holds the difference
|
such as ``.byte L1 - L2''. The offset holds the difference
|
| Line 445... |
Line 517... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_SWITCH8", /* name */
|
"R_CR16_SWITCH8", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xff, /* src_mask */
|
0x0, /* src_mask */
|
0xff, /* dst_mask */
|
0xff, /* dst_mask */
|
TRUE), /* pcrel_offset */
|
TRUE), /* pcrel_offset */
|
|
|
/* A 16 bit switch table entry. This is generated for an expression
|
/* A 16 bit switch table entry. This is generated for an expression
|
such as ``.word L1 - L2''. The offset holds the difference
|
such as ``.word L1 - L2''. The offset holds the difference
|
| Line 462... |
Line 534... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_SWITCH16", /* name */
|
"R_CR16_SWITCH16", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffff, /* src_mask */
|
0x0, /* src_mask */
|
0xffff, /* dst_mask */
|
0xffff, /* dst_mask */
|
TRUE), /* pcrel_offset */
|
TRUE), /* pcrel_offset */
|
|
|
/* A 32 bit switch table entry. This is generated for an expression
|
/* A 32 bit switch table entry. This is generated for an expression
|
such as ``.long L1 - L2''. The offset holds the difference
|
such as ``.long L1 - L2''. The offset holds the difference
|
| Line 479... |
Line 551... |
0, /* bitpos */
|
0, /* bitpos */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
complain_overflow_unsigned, /* complain_on_overflow */
|
bfd_elf_generic_reloc, /* special_function */
|
bfd_elf_generic_reloc, /* special_function */
|
"R_CR16_SWITCH32", /* name */
|
"R_CR16_SWITCH32", /* name */
|
FALSE, /* partial_inplace */
|
FALSE, /* partial_inplace */
|
0xffffffff, /* src_mask */
|
0x0, /* src_mask */
|
|
0xffffffff, /* dst_mask */
|
|
TRUE), /* pcrel_offset */
|
|
|
|
HOWTO (R_CR16_GOT_REGREL20, /* type */
|
|
0, /* rightshift */
|
|
2, /* size */
|
|
20, /* bitsize */
|
|
FALSE, /* pc_relative */
|
|
0, /* bitpos */
|
|
complain_overflow_bitfield,/* complain_on_overflow */
|
|
bfd_elf_generic_reloc, /* special_function */
|
|
"R_CR16_GOT_REGREL20", /* name */
|
|
TRUE, /* partial_inplace */
|
|
0x0, /* src_mask */
|
|
0xfffff, /* dst_mask */
|
|
FALSE), /* pcrel_offset */
|
|
|
|
HOWTO (R_CR16_GOTC_REGREL20, /* type */
|
|
0, /* rightshift */
|
|
2, /* size */
|
|
20, /* bitsize */
|
|
FALSE, /* pc_relative */
|
|
0, /* bitpos */
|
|
complain_overflow_bitfield,/* complain_on_overflow */
|
|
bfd_elf_generic_reloc, /* special_function */
|
|
"R_CR16_GOTC_REGREL20", /* name */
|
|
TRUE, /* partial_inplace */
|
|
0x0, /* src_mask */
|
|
0xfffff, /* dst_mask */
|
|
FALSE), /* pcrel_offset */
|
|
|
|
HOWTO (R_CR16_GLOB_DAT, /* type */
|
|
0, /* rightshift */
|
|
2, /* size (0 = byte, 1 = short, 2 = long) */
|
|
32, /* bitsize */
|
|
FALSE, /* pc_relative */
|
|
0, /* bitpos */
|
|
complain_overflow_unsigned, /* complain_on_overflow */
|
|
bfd_elf_generic_reloc, /* special_function */
|
|
"R_CR16_GLOB_DAT", /* name */
|
|
FALSE, /* partial_inplace */
|
|
0x0, /* src_mask */
|
0xffffffff, /* dst_mask */
|
0xffffffff, /* dst_mask */
|
TRUE) /* pcrel_offset */
|
TRUE) /* pcrel_offset */
|
};
|
};
|
|
|
|
|
|
/* Create the GOT section. */
|
|
|
|
static bfd_boolean
|
|
_bfd_cr16_elf_create_got_section (bfd * abfd, struct bfd_link_info * info)
|
|
{
|
|
flagword flags;
|
|
asection * s;
|
|
struct elf_link_hash_entry * h;
|
|
const struct elf_backend_data * bed = get_elf_backend_data (abfd);
|
|
int ptralign;
|
|
|
|
/* This function may be called more than once. */
|
|
if (bfd_get_section_by_name (abfd, ".got") != NULL)
|
|
return TRUE;
|
|
|
|
switch (bed->s->arch_size)
|
|
{
|
|
case 16:
|
|
ptralign = 1;
|
|
break;
|
|
|
|
case 32:
|
|
ptralign = 2;
|
|
break;
|
|
|
|
default:
|
|
bfd_set_error (bfd_error_bad_value);
|
|
return FALSE;
|
|
}
|
|
|
|
flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
|
|
| SEC_LINKER_CREATED);
|
|
|
|
s = bfd_make_section_with_flags (abfd, ".got", flags);
|
|
if (s == NULL
|
|
|| ! bfd_set_section_alignment (abfd, s, ptralign))
|
|
return FALSE;
|
|
|
|
if (bed->want_got_plt)
|
|
{
|
|
s = bfd_make_section_with_flags (abfd, ".got.plt", flags);
|
|
if (s == NULL
|
|
|| ! bfd_set_section_alignment (abfd, s, ptralign))
|
|
return FALSE;
|
|
}
|
|
|
|
/* Define the symbol _GLOBAL_OFFSET_TABLE_ at the start of the .got
|
|
(or .got.plt) section. We don't do this in the linker script
|
|
because we don't want to define the symbol if we are not creating
|
|
a global offset table. */
|
|
h = _bfd_elf_define_linkage_sym (abfd, info, s, "_GLOBAL_OFFSET_TABLE_");
|
|
elf_hash_table (info)->hgot = h;
|
|
if (h == NULL)
|
|
return FALSE;
|
|
|
|
/* The first bit of the global offset table is the header. */
|
|
s->size += bed->got_header_size;
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
|
/* Retrieve a howto ptr using a BFD reloc_code. */
|
/* Retrieve a howto ptr using a BFD reloc_code. */
|
|
|
static reloc_howto_type *
|
static reloc_howto_type *
|
elf_cr16_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
|
elf_cr16_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
|
bfd_reloc_code_real_type code)
|
bfd_reloc_code_real_type code)
|
| Line 523... |
Line 700... |
Elf_Internal_Rela *dst)
|
Elf_Internal_Rela *dst)
|
{
|
{
|
unsigned int r_type = ELF32_R_TYPE (dst->r_info);
|
unsigned int r_type = ELF32_R_TYPE (dst->r_info);
|
|
|
BFD_ASSERT (r_type < (unsigned int) R_CR16_MAX);
|
BFD_ASSERT (r_type < (unsigned int) R_CR16_MAX);
|
cache_ptr->howto = &cr16_elf_howto_table[r_type];
|
cache_ptr->howto = cr16_elf_howto_table + r_type;
|
|
}
|
|
|
|
/* Look through the relocs for a section during the first phase.
|
|
Since we don't do .gots or .plts, we just need to consider the
|
|
virtual table relocs for gc. */
|
|
|
|
static bfd_boolean
|
|
cr16_elf_check_relocs (bfd *abfd, struct bfd_link_info *info, asection *sec,
|
|
const Elf_Internal_Rela *relocs)
|
|
{
|
|
Elf_Internal_Shdr *symtab_hdr;
|
|
Elf_Internal_Sym * isymbuf = NULL;
|
|
struct elf_link_hash_entry **sym_hashes, **sym_hashes_end;
|
|
const Elf_Internal_Rela *rel;
|
|
const Elf_Internal_Rela *rel_end;
|
|
bfd * dynobj;
|
|
bfd_vma * local_got_offsets;
|
|
asection * sgot;
|
|
asection * srelgot;
|
|
|
|
sgot = NULL;
|
|
srelgot = NULL;
|
|
bfd_boolean result = FALSE;
|
|
|
|
if (info->relocatable)
|
|
return TRUE;
|
|
|
|
symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
|
|
sym_hashes = elf_sym_hashes (abfd);
|
|
sym_hashes_end = sym_hashes + symtab_hdr->sh_size/sizeof (Elf32_External_Sym);
|
|
if (!elf_bad_symtab (abfd))
|
|
sym_hashes_end -= symtab_hdr->sh_info;
|
|
|
|
dynobj = elf_hash_table (info)->dynobj;
|
|
local_got_offsets = elf_local_got_offsets (abfd);
|
|
rel_end = relocs + sec->reloc_count;
|
|
for (rel = relocs; rel < rel_end; rel++)
|
|
{
|
|
struct elf_link_hash_entry *h;
|
|
unsigned long r_symndx;
|
|
|
|
r_symndx = ELF32_R_SYM (rel->r_info);
|
|
if (r_symndx < symtab_hdr->sh_info)
|
|
h = NULL;
|
|
else
|
|
{
|
|
h = sym_hashes[r_symndx - symtab_hdr->sh_info];
|
|
while (h->root.type == bfd_link_hash_indirect
|
|
|| h->root.type == bfd_link_hash_warning)
|
|
h = (struct elf_link_hash_entry *) h->root.u.i.link;
|
|
}
|
|
|
|
/* Some relocs require a global offset table. */
|
|
if (dynobj == NULL)
|
|
{
|
|
switch (ELF32_R_TYPE (rel->r_info))
|
|
{
|
|
case R_CR16_GOT_REGREL20:
|
|
case R_CR16_GOTC_REGREL20:
|
|
elf_hash_table (info)->dynobj = dynobj = abfd;
|
|
if (! _bfd_cr16_elf_create_got_section (dynobj, info))
|
|
goto fail;
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
|
|
switch (ELF32_R_TYPE (rel->r_info))
|
|
{
|
|
case R_CR16_GOT_REGREL20:
|
|
case R_CR16_GOTC_REGREL20:
|
|
/* This symbol requires a global offset table entry. */
|
|
|
|
if (sgot == NULL)
|
|
{
|
|
sgot = bfd_get_section_by_name (dynobj, ".got");
|
|
BFD_ASSERT (sgot != NULL);
|
|
}
|
|
|
|
if (srelgot == NULL
|
|
&& (h != NULL || info->executable))
|
|
{
|
|
srelgot = bfd_get_section_by_name (dynobj, ".rela.got");
|
|
if (srelgot == NULL)
|
|
{
|
|
srelgot = bfd_make_section_with_flags (dynobj,
|
|
".rela.got",
|
|
(SEC_ALLOC
|
|
| SEC_LOAD
|
|
| SEC_HAS_CONTENTS
|
|
| SEC_IN_MEMORY
|
|
| SEC_LINKER_CREATED
|
|
| SEC_READONLY));
|
|
if (srelgot == NULL
|
|
|| ! bfd_set_section_alignment (dynobj, srelgot, 2))
|
|
goto fail;
|
|
}
|
|
}
|
|
|
|
if (h != NULL)
|
|
{
|
|
if (h->got.offset != (bfd_vma) -1)
|
|
/* We have already allocated space in the .got. */
|
|
break;
|
|
|
|
h->got.offset = sgot->size;
|
|
|
|
/* Make sure this symbol is output as a dynamic symbol. */
|
|
if (h->dynindx == -1)
|
|
{
|
|
if (! bfd_elf_link_record_dynamic_symbol (info, h))
|
|
goto fail;
|
|
}
|
|
|
|
srelgot->size += sizeof (Elf32_External_Rela);
|
|
}
|
|
else
|
|
{
|
|
/* This is a global offset table entry for a local
|
|
symbol. */
|
|
if (local_got_offsets == NULL)
|
|
{
|
|
size_t size;
|
|
unsigned int i;
|
|
|
|
size = symtab_hdr->sh_info * sizeof (bfd_vma);
|
|
local_got_offsets = (bfd_vma *) bfd_alloc (abfd, size);
|
|
|
|
if (local_got_offsets == NULL)
|
|
goto fail;
|
|
|
|
elf_local_got_offsets (abfd) = local_got_offsets;
|
|
|
|
for (i = 0; i < symtab_hdr->sh_info; i++)
|
|
local_got_offsets[i] = (bfd_vma) -1;
|
|
}
|
|
|
|
if (local_got_offsets[r_symndx] != (bfd_vma) -1)
|
|
/* We have already allocated space in the .got. */
|
|
break;
|
|
|
|
local_got_offsets[r_symndx] = sgot->size;
|
|
|
|
if (info->executable)
|
|
/* If we are generating a shared object, we need to
|
|
output a R_CR16_RELATIVE reloc so that the dynamic
|
|
linker can adjust this GOT entry. */
|
|
srelgot->size += sizeof (Elf32_External_Rela);
|
|
}
|
|
|
|
sgot->size += 4;
|
|
break;
|
|
|
|
}
|
|
}
|
|
|
|
result = TRUE;
|
|
fail:
|
|
if (isymbuf != NULL)
|
|
free (isymbuf);
|
|
|
|
return result;
|
}
|
}
|
|
|
/* Perform a relocation as part of a final link. */
|
/* Perform a relocation as part of a final link. */
|
|
|
static bfd_reloc_status_type
|
static bfd_reloc_status_type
|
| Line 537... |
Line 878... |
asection *input_section,
|
asection *input_section,
|
bfd_byte *contents,
|
bfd_byte *contents,
|
bfd_vma offset,
|
bfd_vma offset,
|
bfd_vma Rvalue,
|
bfd_vma Rvalue,
|
bfd_vma addend,
|
bfd_vma addend,
|
|
struct elf_link_hash_entry * h,
|
|
unsigned long symndx ATTRIBUTE_UNUSED,
|
struct bfd_link_info *info ATTRIBUTE_UNUSED,
|
struct bfd_link_info *info ATTRIBUTE_UNUSED,
|
asection *sec ATTRIBUTE_UNUSED,
|
asection *sec ATTRIBUTE_UNUSED,
|
int is_local ATTRIBUTE_UNUSED)
|
int is_local ATTRIBUTE_UNUSED)
|
{
|
{
|
unsigned short r_type = howto->type;
|
unsigned short r_type = howto->type;
|
bfd_byte *hit_data = contents + offset;
|
bfd_byte *hit_data = contents + offset;
|
bfd_vma reloc_bits, check, Rvalue1;
|
bfd_vma reloc_bits, check, Rvalue1;
|
|
|
|
bfd * dynobj;
|
|
bfd_vma * local_got_offsets;
|
|
asection * sgot;
|
|
|
|
dynobj = elf_hash_table (info)->dynobj;
|
|
local_got_offsets = elf_local_got_offsets (input_bfd);
|
|
|
|
sgot = NULL;
|
|
|
|
|
switch (r_type)
|
switch (r_type)
|
{
|
{
|
case R_CR16_IMM4:
|
case R_CR16_IMM4:
|
case R_CR16_IMM20:
|
case R_CR16_IMM20:
|
case R_CR16_ABS20:
|
case R_CR16_ABS20:
|
| Line 562... |
Line 915... |
case R_CR16_REGREL4a:
|
case R_CR16_REGREL4a:
|
case R_CR16_REGREL14:
|
case R_CR16_REGREL14:
|
case R_CR16_REGREL14a:
|
case R_CR16_REGREL14a:
|
case R_CR16_REGREL16:
|
case R_CR16_REGREL16:
|
case R_CR16_REGREL20:
|
case R_CR16_REGREL20:
|
|
case R_CR16_REGREL20a:
|
|
case R_CR16_GOT_REGREL20:
|
|
case R_CR16_GOTC_REGREL20:
|
case R_CR16_ABS24:
|
case R_CR16_ABS24:
|
case R_CR16_DISP16:
|
case R_CR16_DISP16:
|
case R_CR16_DISP24:
|
case R_CR16_DISP24:
|
/* 'hit_data' is relative to the start of the instruction, not the
|
/* 'hit_data' is relative to the start of the instruction, not the
|
relocation offset. Advance it to account for the exact offset. */
|
relocation offset. Advance it to account for the exact offset. */
|
| Line 617... |
Line 973... |
/* Assumes two's complement. This expression avoids
|
/* Assumes two's complement. This expression avoids
|
overflow if howto->bitsize is the number of bits in
|
overflow if howto->bitsize is the number of bits in
|
bfd_vma. */
|
bfd_vma. */
|
reloc_bits = (((1 << (howto->bitsize - 1)) - 1) << 1) | 1;
|
reloc_bits = (((1 << (howto->bitsize - 1)) - 1) << 1) | 1;
|
|
|
|
/* For GOT and GOTC relocs no boundary checks applied. */
|
|
if (!((r_type == R_CR16_GOT_REGREL20)
|
|
|| (r_type == R_CR16_GOTC_REGREL20)))
|
|
{
|
if (((bfd_vma) check & ~reloc_bits) != 0
|
if (((bfd_vma) check & ~reloc_bits) != 0
|
&& (((bfd_vma) check & ~reloc_bits)
|
&& (((bfd_vma) check & ~reloc_bits)
|
!= (-(bfd_vma) 1 & ~reloc_bits)))
|
!= (-(bfd_vma) 1 & ~reloc_bits)))
|
{
|
{
|
/* The above right shift is incorrect for a signed
|
/* The above right shift is incorrect for a signed
|
| Line 643... |
Line 1003... |
/* Drop unwanted bits from the value we are relocating to. */
|
/* Drop unwanted bits from the value we are relocating to. */
|
Rvalue >>= (bfd_vma) howto->rightshift;
|
Rvalue >>= (bfd_vma) howto->rightshift;
|
|
|
/* Apply dst_mask to select only relocatable part of the insn. */
|
/* Apply dst_mask to select only relocatable part of the insn. */
|
Rvalue &= howto->dst_mask;
|
Rvalue &= howto->dst_mask;
|
|
}
|
|
|
switch (howto->size)
|
switch (howto->size)
|
{
|
{
|
case 0:
|
case 0:
|
if (r_type == R_CR16_DISP8)
|
if (r_type == R_CR16_DISP8)
|
| Line 679... |
Line 1040... |
if (r_type == R_CR16_DISP16)
|
if (r_type == R_CR16_DISP16)
|
{
|
{
|
Rvalue |= (bfd_get_16 (input_bfd, hit_data));
|
Rvalue |= (bfd_get_16 (input_bfd, hit_data));
|
Rvalue = ((Rvalue & 0xfffe) | ((Rvalue >> 16) & 0x1));
|
Rvalue = ((Rvalue & 0xfffe) | ((Rvalue >> 16) & 0x1));
|
}
|
}
|
|
if (r_type == R_CR16_IMM16)
|
|
{
|
|
Rvalue1 = bfd_get_16 (input_bfd, hit_data);
|
|
|
|
/* Add or subtract the offset value. */
|
|
if (Rvalue1 & 0x8000)
|
|
Rvalue -= (~Rvalue1 + 1) & 0xffff;
|
|
else
|
|
Rvalue += Rvalue1;
|
|
|
|
/* Check for range. */
|
|
if ((long) Rvalue > 0xffff || (long) Rvalue < 0x0)
|
|
return bfd_reloc_overflow;
|
|
}
|
|
|
bfd_put_16 (input_bfd, Rvalue, hit_data);
|
bfd_put_16 (input_bfd, Rvalue, hit_data);
|
break;
|
break;
|
|
|
case 2:
|
case 2:
|
if ((r_type == R_CR16_ABS20) || (r_type == R_CR16_IMM20))
|
if ((r_type == R_CR16_ABS20) || (r_type == R_CR16_IMM20))
|
{
|
{
|
|
Rvalue1 = (bfd_get_16 (input_bfd, hit_data + 2)
|
|
| (((bfd_get_16 (input_bfd, hit_data) & 0xf) <<16)));
|
|
|
|
/* Add or subtract the offset value. */
|
|
if (Rvalue1 & 0x80000)
|
|
Rvalue -= (~Rvalue1 + 1) & 0xfffff;
|
|
else
|
|
Rvalue += Rvalue1;
|
|
|
|
/* Check for range. */
|
|
if ((long) Rvalue > 0xfffff || (long) Rvalue < 0x0)
|
|
return bfd_reloc_overflow;
|
|
|
|
bfd_put_16 (input_bfd, ((bfd_get_16 (input_bfd, hit_data) & 0xfff0)
|
|
| ((Rvalue >> 16) & 0xf)), hit_data);
|
|
bfd_put_16 (input_bfd, (Rvalue) & 0xffff, hit_data + 2);
|
|
}
|
|
else if (r_type == R_CR16_GOT_REGREL20)
|
|
{
|
|
asection * sgot = bfd_get_section_by_name (dynobj, ".got");
|
|
|
|
if (h != NULL)
|
|
{
|
|
bfd_vma off;
|
|
|
|
off = h->got.offset;
|
|
BFD_ASSERT (off != (bfd_vma) -1);
|
|
|
|
if (! elf_hash_table (info)->dynamic_sections_created
|
|
|| SYMBOL_REFERENCES_LOCAL (info, h))
|
|
/* This is actually a static link, or it is a
|
|
-Bsymbolic link and the symbol is defined
|
|
locally, or the symbol was forced to be local
|
|
because of a version file. We must initialize
|
|
this entry in the global offset table.
|
|
When doing a dynamic link, we create a .rela.got
|
|
relocation entry to initialize the value. This
|
|
is done in the finish_dynamic_symbol routine. */
|
|
bfd_put_32 (output_bfd, Rvalue, sgot->contents + off);
|
|
|
|
Rvalue = sgot->output_offset + off;
|
|
}
|
|
else
|
|
{
|
|
bfd_vma off;
|
|
|
|
off = elf_local_got_offsets (input_bfd)[symndx];
|
|
bfd_put_32 (output_bfd,Rvalue, sgot->contents + off);
|
|
|
|
Rvalue = sgot->output_offset + off;
|
|
}
|
|
|
|
Rvalue += addend;
|
|
|
|
/* REVISIT: if ((long) Rvalue > 0xffffff ||
|
|
(long) Rvalue < -0x800000). */
|
|
if ((long) Rvalue > 0xffffff || (long) Rvalue < 0)
|
|
return bfd_reloc_overflow;
|
|
|
|
|
|
bfd_put_16 (input_bfd, (bfd_get_16 (input_bfd, hit_data))
|
|
| (((Rvalue >> 16) & 0xf) << 8), hit_data);
|
|
bfd_put_16 (input_bfd, (Rvalue) & 0xffff, hit_data + 2);
|
|
|
|
}
|
|
else if (r_type == R_CR16_GOTC_REGREL20)
|
|
{
|
|
asection * sgot;
|
|
sgot = bfd_get_section_by_name (dynobj, ".got");
|
|
|
|
if (h != NULL)
|
|
{
|
|
bfd_vma off;
|
|
|
|
off = h->got.offset;
|
|
BFD_ASSERT (off != (bfd_vma) -1);
|
|
|
|
Rvalue >>=1; /* For code symbols. */
|
|
|
|
if (! elf_hash_table (info)->dynamic_sections_created
|
|
|| SYMBOL_REFERENCES_LOCAL (info, h))
|
|
/* This is actually a static link, or it is a
|
|
-Bsymbolic link and the symbol is defined
|
|
locally, or the symbol was forced to be local
|
|
because of a version file. We must initialize
|
|
this entry in the global offset table.
|
|
When doing a dynamic link, we create a .rela.got
|
|
relocation entry to initialize the value. This
|
|
is done in the finish_dynamic_symbol routine. */
|
|
bfd_put_32 (output_bfd, Rvalue, sgot->contents + off);
|
|
|
|
Rvalue = sgot->output_offset + off;
|
|
}
|
|
else
|
|
{
|
|
bfd_vma off;
|
|
|
|
off = elf_local_got_offsets (input_bfd)[symndx];
|
|
Rvalue >>= 1;
|
|
bfd_put_32 (output_bfd,Rvalue, sgot->contents + off);
|
|
Rvalue = sgot->output_offset + off;
|
|
}
|
|
|
|
Rvalue += addend;
|
|
|
|
/* Check if any value in DISP. */
|
|
Rvalue1 =((bfd_get_32 (input_bfd, hit_data) >>16)
|
|
| (((bfd_get_32 (input_bfd, hit_data) & 0xfff) >> 8) <<16));
|
|
|
|
/* Add or subtract the offset value. */
|
|
if (Rvalue1 & 0x80000)
|
|
Rvalue -= (~Rvalue1 + 1) & 0xfffff;
|
|
else
|
|
Rvalue += Rvalue1;
|
|
|
|
/* Check for range. */
|
|
/* REVISIT: if ((long) Rvalue > 0xffffff
|
|
|| (long) Rvalue < -0x800000). */
|
|
if ((long) Rvalue > 0xffffff || (long) Rvalue < 0)
|
|
return bfd_reloc_overflow;
|
|
|
bfd_put_16 (input_bfd, (bfd_get_16 (input_bfd, hit_data))
|
bfd_put_16 (input_bfd, (bfd_get_16 (input_bfd, hit_data))
|
| ((Rvalue >> 16) & 0xf), hit_data);
|
| (((Rvalue >> 16) & 0xf) << 8), hit_data);
|
bfd_put_16 (input_bfd, (Rvalue) & 0xffff, hit_data + 2);
|
bfd_put_16 (input_bfd, (Rvalue) & 0xffff, hit_data + 2);
|
}
|
}
|
else
|
else
|
{
|
{
|
if (r_type == R_CR16_ABS24)
|
if (r_type == R_CR16_ABS24)
|
{
|
{
|
|
Rvalue1 = ((bfd_get_32 (input_bfd, hit_data) >> 16)
|
|
| (((bfd_get_32 (input_bfd, hit_data) & 0xfff) >> 8) <<16)
|
|
| (((bfd_get_32 (input_bfd, hit_data) & 0xf) <<20)));
|
|
|
|
/* Add or subtract the offset value. */
|
|
if (Rvalue1 & 0x800000)
|
|
Rvalue -= (~Rvalue1 + 1) & 0xffffff;
|
|
else
|
|
Rvalue += Rvalue1;
|
|
|
|
/* Check for Range. */
|
|
if ((long) Rvalue > 0xffffff || (long) Rvalue < 0x0)
|
|
return bfd_reloc_overflow;
|
|
|
Rvalue = ((((Rvalue >> 20)& 0xf) | (((Rvalue >> 16) & 0xf) << 8)
|
Rvalue = ((((Rvalue >> 20)& 0xf) | (((Rvalue >> 16) & 0xf) << 8)
|
| (bfd_get_16 (input_bfd, hit_data)))
|
| (bfd_get_32 (input_bfd, hit_data) & 0xf0f0))
|
| ((Rvalue & 0xffff) << 16));
|
| ((Rvalue & 0xffff) << 16));
|
}
|
}
|
if (r_type == R_CR16_DISP24)
|
else if (r_type == R_CR16_DISP24)
|
{
|
{
|
Rvalue = ((((Rvalue >> 20)& 0xf) | (((Rvalue >>16) & 0xf) << 8)
|
Rvalue = ((((Rvalue >> 20)& 0xf) | (((Rvalue >>16) & 0xf) << 8)
|
| (bfd_get_16 (input_bfd, hit_data)))
|
| (bfd_get_16 (input_bfd, hit_data)))
|
| (((Rvalue & 0xfffe)
|
| (((Rvalue & 0xfffe) | ((Rvalue >> 24) & 0x1)) << 16));
|
| ((Rvalue >> 24) & 0x1)) << 16));
|
|
}
|
}
|
else if ((r_type == R_CR16_IMM32) ||(r_type == R_CR16_IMM32a))
|
else if ((r_type == R_CR16_IMM32) ||(r_type == R_CR16_IMM32a))
|
{
|
{
|
Rvalue = (((Rvalue >> 16)& 0xffff)
|
Rvalue1 =((((bfd_get_32 (input_bfd, hit_data)) >> 16) &0xffff)
|
| (bfd_get_16 (input_bfd, hit_data)))
|
| (((bfd_get_32 (input_bfd, hit_data)) &0xffff)) << 16);
|
| ((Rvalue & 0xffff) << 16);
|
|
|
/* Add or subtract the offset value. */
|
|
if (Rvalue1 & 0x80000000)
|
|
Rvalue -= (~Rvalue1 + 1) & 0xffffffff;
|
|
else
|
|
Rvalue += Rvalue1;
|
|
|
|
/* Check for range. */
|
|
if (Rvalue > 0xffffffff || (long) Rvalue < 0x0)
|
|
return bfd_reloc_overflow;
|
|
|
|
Rvalue = (((Rvalue >> 16)& 0xffff) | (Rvalue & 0xffff) << 16);
|
}
|
}
|
else if (r_type == R_CR16_DISP24a)
|
else if (r_type == R_CR16_DISP24a)
|
{
|
{
|
Rvalue = (((Rvalue & 0xfffffe) | (Rvalue >> 23)));
|
Rvalue = (((Rvalue & 0xfffffe) | (Rvalue >> 23)));
|
Rvalue = ((Rvalue >> 16) & 0xff) | ((Rvalue & 0xffff) << 16)
|
Rvalue = ((Rvalue >> 16) & 0xff) | ((Rvalue & 0xffff) << 16)
|
| (bfd_get_32 (input_bfd, hit_data));
|
| (bfd_get_32 (input_bfd, hit_data));
|
}
|
}
|
|
else if ((r_type == R_CR16_REGREL20)
|
|
|| (r_type == R_CR16_REGREL20a))
|
|
{
|
|
Rvalue1 = ((bfd_get_32 (input_bfd, hit_data) >> 16)
|
|
| (((bfd_get_32 (input_bfd, hit_data) & 0xfff) >> 8) <<16));
|
|
/* Add or subtract the offset value. */
|
|
if (Rvalue1 & 0x80000)
|
|
Rvalue -= (~Rvalue1 + 1) & 0xfffff;
|
|
else
|
|
Rvalue += Rvalue1;
|
|
|
|
/* Check for range. */
|
|
if ((long) Rvalue > 0xfffff || (long) Rvalue < 0x0)
|
|
return bfd_reloc_overflow;
|
|
|
|
Rvalue = (((((Rvalue >> 20)& 0xf) | (((Rvalue >>16) & 0xf)<<8)
|
|
| ((Rvalue & 0xffff) << 16)))
|
|
| (bfd_get_32 (input_bfd, hit_data) & 0xf0ff));
|
|
|
|
}
|
|
else if (r_type == R_CR16_NUM32)
|
|
{
|
|
Rvalue1 = (bfd_get_32 (input_bfd, hit_data));
|
|
|
|
/* Add or subtract the offset value */
|
|
if (Rvalue1 & 0x80000000)
|
|
Rvalue -= (~Rvalue1 + 1) & 0xffffffff;
|
|
else
|
|
Rvalue += Rvalue1;
|
|
|
|
/* Check for Ranga */
|
|
if (Rvalue > 0xffffffff)
|
|
return bfd_reloc_overflow;
|
|
}
|
|
|
bfd_put_32 (input_bfd, Rvalue, hit_data);
|
bfd_put_32 (input_bfd, Rvalue, hit_data);
|
}
|
}
|
break;
|
break;
|
|
|
| Line 782... |
Line 1336... |
&& isym->st_value > addr
|
&& isym->st_value > addr
|
&& isym->st_value < toaddr)
|
&& isym->st_value < toaddr)
|
{
|
{
|
/* Adjust the addend of SWITCH relocations in this section,
|
/* Adjust the addend of SWITCH relocations in this section,
|
which reference this local symbol. */
|
which reference this local symbol. */
|
|
#if 0
|
for (irel = elf_section_data (sec)->relocs; irel < irelend; irel++)
|
for (irel = elf_section_data (sec)->relocs; irel < irelend; irel++)
|
{
|
{
|
unsigned long r_symndx;
|
unsigned long r_symndx;
|
Elf_Internal_Sym *rsym;
|
Elf_Internal_Sym *rsym;
|
bfd_vma addsym, subsym;
|
bfd_vma addsym, subsym;
|
| Line 810... |
Line 1365... |
if (subsym <= addr)
|
if (subsym <= addr)
|
irel->r_addend -= count;
|
irel->r_addend -= count;
|
else
|
else
|
continue;
|
continue;
|
}
|
}
|
|
#endif
|
|
|
isym->st_value -= count;
|
isym->st_value -= count;
|
}
|
}
|
}
|
}
|
|
|
| Line 919... |
Line 1475... |
|
|
r = cr16_elf_final_link_relocate (howto, input_bfd, output_bfd,
|
r = cr16_elf_final_link_relocate (howto, input_bfd, output_bfd,
|
input_section,
|
input_section,
|
contents, rel->r_offset,
|
contents, rel->r_offset,
|
relocation, rel->r_addend,
|
relocation, rel->r_addend,
|
|
(struct elf_link_hash_entry *) h,
|
|
r_symndx,
|
info, sec, h == NULL);
|
info, sec, h == NULL);
|
|
|
if (r != bfd_reloc_ok)
|
if (r != bfd_reloc_ok)
|
{
|
{
|
const char *name;
|
const char *name;
|
| Line 1089... |
Line 1647... |
&& elf_section_data (input_section)->relocs != internal_relocs)
|
&& elf_section_data (input_section)->relocs != internal_relocs)
|
free (internal_relocs);
|
free (internal_relocs);
|
return NULL;
|
return NULL;
|
}
|
}
|
|
|
/* This function handles relaxing for the CR16.
|
/* Assorted hash table functions. */
|
|
|
There's quite a few relaxing opportunites available on the CR16:
|
/* Initialize an entry in the link hash table. */
|
|
|
* bcond:24 -> bcond:16 2 bytes
|
/* Create an entry in an CR16 ELF linker hash table. */
|
* bcond:16 -> bcond:8 2 bytes
|
|
* arithmetic imm32 -> arithmetic imm20/imm16 2 bytes
|
|
* arithmetic imm20/imm16 -> arithmetic imm4 2 bytes
|
|
|
|
Symbol- and reloc-reading infrastructure copied from elf-m10200.c. */
|
static struct bfd_hash_entry *
|
|
elf32_cr16_link_hash_newfunc (struct bfd_hash_entry *entry,
|
|
struct bfd_hash_table *table,
|
|
const char *string)
|
|
{
|
|
struct elf32_cr16_link_hash_entry *ret =
|
|
(struct elf32_cr16_link_hash_entry *) entry;
|
|
|
static bfd_boolean
|
/* Allocate the structure if it has not already been allocated by a
|
elf32_cr16_relax_section (bfd *abfd, asection *sec,
|
subclass. */
|
struct bfd_link_info *link_info, bfd_boolean *again)
|
if (ret == (struct elf32_cr16_link_hash_entry *) NULL)
|
|
ret = ((struct elf32_cr16_link_hash_entry *)
|
|
bfd_hash_allocate (table,
|
|
sizeof (struct elf32_cr16_link_hash_entry)));
|
|
if (ret == (struct elf32_cr16_link_hash_entry *) NULL)
|
|
return (struct bfd_hash_entry *) ret;
|
|
|
|
/* Call the allocation method of the superclass. */
|
|
ret = ((struct elf32_cr16_link_hash_entry *)
|
|
_bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
|
|
table, string));
|
|
if (ret != (struct elf32_cr16_link_hash_entry *) NULL)
|
{
|
{
|
Elf_Internal_Shdr *symtab_hdr;
|
ret->direct_calls = 0;
|
Elf_Internal_Rela *internal_relocs;
|
ret->stack_size = 0;
|
Elf_Internal_Rela *irel, *irelend;
|
ret->movm_args = 0;
|
bfd_byte *contents = NULL;
|
ret->movm_stack_size = 0;
|
Elf_Internal_Sym *isymbuf = NULL;
|
ret->flags = 0;
|
|
ret->value = 0;
|
|
}
|
|
|
/* Assume nothing changes. */
|
return (struct bfd_hash_entry *) ret;
|
*again = FALSE;
|
}
|
|
|
/* We don't have to do anything for a relocatable link, if
|
/* Create an cr16 ELF linker hash table. */
|
this section does not have relocs, or if this is not a
|
|
code section. */
|
|
if (link_info->relocatable
|
|
|| (sec->flags & SEC_RELOC) == 0
|
|
|| sec->reloc_count == 0
|
|
|| (sec->flags & SEC_CODE) == 0)
|
|
return TRUE;
|
|
|
|
symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
|
static struct bfd_link_hash_table *
|
|
elf32_cr16_link_hash_table_create (bfd *abfd)
|
|
{
|
|
struct elf32_cr16_link_hash_table *ret;
|
|
bfd_size_type amt = sizeof (struct elf32_cr16_link_hash_table);
|
|
|
/* Get a copy of the native relocations. */
|
ret = (struct elf32_cr16_link_hash_table *) bfd_malloc (amt);
|
internal_relocs = _bfd_elf_link_read_relocs (abfd, sec, NULL, NULL,
|
if (ret == (struct elf32_cr16_link_hash_table *) NULL)
|
link_info->keep_memory);
|
return NULL;
|
if (internal_relocs == NULL)
|
|
goto error_return;
|
if (!_bfd_elf_link_hash_table_init (&ret->root, abfd,
|
|
elf32_cr16_link_hash_newfunc,
|
|
sizeof (struct elf32_cr16_link_hash_entry)))
|
|
{
|
|
free (ret);
|
|
return NULL;
|
|
}
|
|
|
|
ret->flags = 0;
|
|
amt = sizeof (struct elf_link_hash_table);
|
|
ret->static_hash_table
|
|
= (struct elf32_cr16_link_hash_table *) bfd_malloc (amt);
|
|
if (ret->static_hash_table == NULL)
|
|
{
|
|
free (ret);
|
|
return NULL;
|
|
}
|
|
|
|
if (!_bfd_elf_link_hash_table_init (&ret->static_hash_table->root, abfd,
|
|
elf32_cr16_link_hash_newfunc,
|
|
sizeof (struct elf32_cr16_link_hash_entry)))
|
|
{
|
|
free (ret->static_hash_table);
|
|
free (ret);
|
|
return NULL;
|
|
}
|
|
return &ret->root.root;
|
|
}
|
|
|
|
/* Free an cr16 ELF linker hash table. */
|
|
|
|
static void
|
|
elf32_cr16_link_hash_table_free (struct bfd_link_hash_table *hash)
|
|
{
|
|
struct elf32_cr16_link_hash_table *ret
|
|
= (struct elf32_cr16_link_hash_table *) hash;
|
|
|
|
_bfd_generic_link_hash_table_free
|
|
((struct bfd_link_hash_table *) ret->static_hash_table);
|
|
_bfd_generic_link_hash_table_free
|
|
((struct bfd_link_hash_table *) ret);
|
|
}
|
|
|
|
static unsigned long
|
|
elf_cr16_mach (flagword flags)
|
|
{
|
|
switch (flags)
|
|
{
|
|
case EM_CR16:
|
|
default:
|
|
return bfd_mach_cr16;
|
|
}
|
|
}
|
|
|
|
/* The final processing done just before writing out a CR16 ELF object
|
|
file. This gets the CR16 architecture right based on the machine
|
|
number. */
|
|
|
|
static void
|
|
_bfd_cr16_elf_final_write_processing (bfd *abfd,
|
|
bfd_boolean linker ATTRIBUTE_UNUSED)
|
|
{
|
|
unsigned long val;
|
|
switch (bfd_get_mach (abfd))
|
|
{
|
|
default:
|
|
case bfd_mach_cr16:
|
|
val = EM_CR16;
|
|
break;
|
|
}
|
|
|
|
|
|
elf_elfheader (abfd)->e_flags |= val;
|
|
}
|
|
|
|
|
|
static bfd_boolean
|
|
_bfd_cr16_elf_object_p (bfd *abfd)
|
|
{
|
|
bfd_default_set_arch_mach (abfd, bfd_arch_cr16,
|
|
elf_cr16_mach (elf_elfheader (abfd)->e_flags));
|
|
return TRUE;
|
|
}
|
|
|
|
/* Merge backend specific data from an object file to the output
|
|
object file when linking. */
|
|
|
|
static bfd_boolean
|
|
_bfd_cr16_elf_merge_private_bfd_data (bfd *ibfd, bfd *obfd)
|
|
{
|
|
if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
|
|
|| bfd_get_flavour (obfd) != bfd_target_elf_flavour)
|
|
return TRUE;
|
|
|
|
if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
|
|
&& bfd_get_mach (obfd) < bfd_get_mach (ibfd))
|
|
{
|
|
if (! bfd_set_arch_mach (obfd, bfd_get_arch (ibfd),
|
|
bfd_get_mach (ibfd)))
|
|
return FALSE;
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
/* This function handles relaxing for the CR16.
|
|
|
|
There's quite a few relaxing opportunites available on the CR16:
|
|
|
|
* bcond:24 -> bcond:16 1 byte
|
|
* bcond:16 -> bcond:8 1 byte
|
|
* arithmetic imm32 -> arithmetic imm20 12 bits
|
|
* arithmetic imm20/imm16 -> arithmetic imm4 12/16 bits
|
|
|
|
Symbol- and reloc-reading infrastructure copied from elf-m10200.c. */
|
|
|
|
static bfd_boolean
|
|
elf32_cr16_relax_section (bfd *abfd, asection *sec,
|
|
struct bfd_link_info *link_info, bfd_boolean *again)
|
|
{
|
|
Elf_Internal_Shdr *symtab_hdr;
|
|
Elf_Internal_Rela *internal_relocs;
|
|
Elf_Internal_Rela *irel, *irelend;
|
|
bfd_byte *contents = NULL;
|
|
Elf_Internal_Sym *isymbuf = NULL;
|
|
|
|
/* Assume nothing changes. */
|
|
*again = FALSE;
|
|
|
|
/* We don't have to do anything for a relocatable link, if
|
|
this section does not have relocs, or if this is not a
|
|
code section. */
|
|
if (link_info->relocatable
|
|
|| (sec->flags & SEC_RELOC) == 0
|
|
|| sec->reloc_count == 0
|
|
|| (sec->flags & SEC_CODE) == 0)
|
|
return TRUE;
|
|
|
|
symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
|
|
|
|
/* Get a copy of the native relocations. */
|
|
internal_relocs = _bfd_elf_link_read_relocs (abfd, sec, NULL, NULL,
|
|
link_info->keep_memory);
|
|
if (internal_relocs == NULL)
|
|
goto error_return;
|
|
|
/* Walk through them looking for relaxing opportunities. */
|
/* Walk through them looking for relaxing opportunities. */
|
irelend = internal_relocs + sec->reloc_count;
|
irelend = internal_relocs + sec->reloc_count;
|
for (irel = internal_relocs; irel < irelend; irel++)
|
for (irel = internal_relocs; irel < irelend; irel++)
|
{
|
{
|
| Line 1241... |
Line 1957... |
/* Get the opcode. */
|
/* Get the opcode. */
|
code = (unsigned int) bfd_get_32 (abfd, contents + irel->r_offset);
|
code = (unsigned int) bfd_get_32 (abfd, contents + irel->r_offset);
|
|
|
/* Verify it's a 'bcond' and fix the opcode. */
|
/* Verify it's a 'bcond' and fix the opcode. */
|
if ((code & 0xffff) == 0x0010)
|
if ((code & 0xffff) == 0x0010)
|
{
|
|
bfd_put_16 (abfd, 0x1800 | ((0xf & (code >> 20)) << 4), contents + irel->r_offset);
|
bfd_put_16 (abfd, 0x1800 | ((0xf & (code >> 20)) << 4), contents + irel->r_offset);
|
bfd_put_16 (abfd, value, contents + irel->r_offset + 2);
|
|
}
|
|
else
|
else
|
continue;
|
continue;
|
|
|
/* Note that we've changed the relocs, section contents, etc. */
|
/* Note that we've changed the relocs, section contents, etc. */
|
elf_section_data (sec)->relocs = internal_relocs;
|
elf_section_data (sec)->relocs = internal_relocs;
|
| Line 1268... |
Line 1981... |
Note that this is not required, and it may be slow. */
|
Note that this is not required, and it may be slow. */
|
*again = TRUE;
|
*again = TRUE;
|
}
|
}
|
}
|
}
|
|
|
/* Try to turn a 16-bit pc-relative branch into an
|
/* Try to turn a 16bit pc-relative branch into an
|
8-bit pc-relative branch. */
|
8bit pc-relative branch. */
|
if (ELF32_R_TYPE (irel->r_info) == (int) R_CR16_DISP16)
|
if (ELF32_R_TYPE (irel->r_info) == (int) R_CR16_DISP16)
|
{
|
{
|
bfd_vma value = symval;
|
bfd_vma value = symval;
|
|
|
/* Deal with pc-relative gunk. */
|
/* Deal with pc-relative gunk. */
|
| Line 1282... |
Line 1995... |
value += irel->r_addend;
|
value += irel->r_addend;
|
|
|
/* See if the value will fit in 8 bits, note the high value is
|
/* See if the value will fit in 8 bits, note the high value is
|
0xfc + 2 as the target will be two bytes closer if we are
|
0xfc + 2 as the target will be two bytes closer if we are
|
able to relax. */
|
able to relax. */
|
if ((long) value < 0xfe && (long) value > -0x100)
|
/*if ((long) value < 0x1fa && (long) value > -0x100) REVISIT:range */
|
|
if ((long) value < 0xfa && (long) value > -0x100)
|
{
|
{
|
unsigned short code;
|
unsigned short code;
|
|
|
/* Get the opcode. */
|
/* Get the opcode. */
|
code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset);
|
code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset);
|
|
|
/* Verify it's a 'bcond' opcode. */
|
/* Verify it's a 'bcond' and fix the opcode. */
|
if ((code & 0xff00) == 0x1800)
|
if ((code & 0xff0f) == 0x1800)
|
{
|
bfd_put_16 (abfd, (code & 0xf0f0), contents + irel->r_offset);
|
bfd_put_8 (abfd, 0x1 | ((0xf & (code >> 4)) << 4), contents + irel->r_offset);
|
|
bfd_put_8 (abfd, value, contents + irel->r_offset + 2);
|
|
}
|
|
else
|
else
|
continue;
|
continue;
|
|
|
/* Note that we've changed the relocs, section contents, etc. */
|
/* Note that we've changed the relocs, section contents, etc. */
|
elf_section_data (sec)->relocs = internal_relocs;
|
elf_section_data (sec)->relocs = internal_relocs;
|
| Line 1318... |
Line 2029... |
Note that this is not required, and it may be slow. */
|
Note that this is not required, and it may be slow. */
|
*again = TRUE;
|
*again = TRUE;
|
}
|
}
|
}
|
}
|
|
|
/* Try to turn a 32bit immediate address into
|
/* Try to turn a 32-bit IMM address into a 20/16-bit IMM address */
|
a 20/16bit immediate address. */
|
|
if (ELF32_R_TYPE (irel->r_info) == (int) R_CR16_IMM32)
|
if (ELF32_R_TYPE (irel->r_info) == (int) R_CR16_IMM32)
|
{
|
{
|
bfd_vma value = symval;
|
bfd_vma value = symval;
|
unsigned short is_add_mov = 0;
|
unsigned short is_add_mov = 0;
|
|
bfd_vma value1 = 0;
|
|
|
|
/* Get the existing value from the mcode */
|
|
value1 = ((bfd_get_32 (abfd, contents + irel->r_offset + 2) >> 16)
|
|
|(((bfd_get_32 (abfd, contents + irel->r_offset + 2) & 0xffff) << 16)));
|
|
|
/* See if the value will fit in 20 bits. */
|
/* See if the value will fit in 20 bits. */
|
if ((long) value < 0xfffff && (long) value > 0)
|
if ((long) (value + value1) < 0xfffff && (long) (value + value1) > 0)
|
{
|
{
|
unsigned short code;
|
unsigned short code;
|
|
|
/* Get the opcode. */
|
/* Get the opcode. */
|
code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset);
|
code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset);
|
|
|
/* Verify it's a arithmetic ADDD or MOVD instruction.
|
/* Verify it's a 'arithmetic ADDD or MOVD instruction'.
|
For ADDD and MOVD only, convert to IMM32 -> IMM20. */
|
For ADDD and MOVD only, convert to IMM32 -> IMM20. */
|
|
|
if (((code & 0xfff0) == 0x0070) || ((code & 0xfff0) == 0x0020))
|
if (((code & 0xfff0) == 0x0070) || ((code & 0xfff0) == 0x0020))
|
is_add_mov = 1;
|
is_add_mov = 1;
|
|
|
if (is_add_mov)
|
if (is_add_mov)
|
{
|
{
|
| Line 1354... |
Line 2070... |
else /* code == 0x0020 for addd. */
|
else /* code == 0x0020 for addd. */
|
bfd_put_8 (abfd, 0x04, contents + irel->r_offset + 1);
|
bfd_put_8 (abfd, 0x04, contents + irel->r_offset + 1);
|
|
|
bfd_put_8 (abfd, (code & 0xf) << 4, contents + irel->r_offset);
|
bfd_put_8 (abfd, (code & 0xf) << 4, contents + irel->r_offset);
|
|
|
|
/* If existing value is nagavive adjust approriately
|
|
place the 16-20bits (ie 4 bit) in new opcode,
|
|
as the 0xffffxxxx, the higher 2 byte values removed. */
|
|
if (value1 & 0x80000000)
|
|
bfd_put_8 (abfd, (0x0f | (bfd_get_8(abfd, contents + irel->r_offset))), contents + irel->r_offset);
|
|
else
|
|
bfd_put_8 (abfd, (((value1 >> 16)&0xf) | (bfd_get_8(abfd, contents + irel->r_offset))), contents + irel->r_offset);
|
|
|
/* Fix the relocation's type. */
|
/* Fix the relocation's type. */
|
irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
|
irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
|
R_CR16_IMM20);
|
R_CR16_IMM20);
|
|
|
/* Delete two bytes of data. */
|
/* Delete two bytes of data. */
|
if (!elf32_cr16_relax_delete_bytes (link_info, abfd, sec,
|
if (!elf32_cr16_relax_delete_bytes (link_info, abfd, sec,
|
irel->r_offset + 2, 2))
|
irel->r_offset + 2, 2))
|
goto error_return;
|
goto error_return;
|
|
|
/* That will change things, so, we should relax again.
|
/* That will change things, so, we should relax again.
|
Note that this is not required, and it may be slow. */
|
Note that this is not required, and it may be slow. */
|
*again = TRUE;
|
*again = TRUE;
|
}
|
}
|
}
|
}
|
|
|
/* See if the value will fit in 16 bits. */
|
/* See if the value will fit in 16 bits. */
|
if ((!is_add_mov) && ((long) value < 0x7fff && (long) value > 0))
|
if ((!is_add_mov)
|
|
&& ((long)(value + value1) < 0x7fff && (long)(value + value1) > 0))
|
{
|
{
|
unsigned short code;
|
unsigned short code;
|
|
|
/* Get the opcode. */
|
/* Get the opcode. */
|
code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset);
|
code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset);
|
| Line 1393... |
Line 2119... |
else
|
else
|
continue;
|
continue;
|
|
|
bfd_put_8 (abfd, 0xb0 | (code & 0xf), contents + irel->r_offset);
|
bfd_put_8 (abfd, 0xb0 | (code & 0xf), contents + irel->r_offset);
|
|
|
|
/* If existing value is nagavive adjust approriately
|
|
place the 12-16bits (ie 4 bit) in new opcode,
|
|
as the 0xfffffxxx, the higher 2 byte values removed. */
|
|
if (value1 & 0x80000000)
|
|
bfd_put_8 (abfd, (0x0f | (bfd_get_8(abfd, contents + irel->r_offset))), contents + irel->r_offset);
|
|
else
|
|
bfd_put_16 (abfd, value1, contents + irel->r_offset + 2);
|
|
|
|
|
/* Fix the relocation's type. */
|
/* Fix the relocation's type. */
|
irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
|
irel->r_info = ELF32_R_INFO (ELF32_R_SYM (irel->r_info),
|
R_CR16_IMM16);
|
R_CR16_IMM16);
|
|
|
/* Delete two bytes of data. */
|
/* Delete two bytes of data. */
|
| Line 1408... |
Line 2143... |
Note that this is not required, and it may be slow. */
|
Note that this is not required, and it may be slow. */
|
*again = TRUE;
|
*again = TRUE;
|
}
|
}
|
}
|
}
|
|
|
/* Try to turn a 20/16bit immediate address into
|
#if 0
|
a 4bit immediate address. */
|
/* Try to turn a 16bit immediate address into a 4bit
|
|
immediate address. */
|
if ((ELF32_R_TYPE (irel->r_info) == (int) R_CR16_IMM20)
|
if ((ELF32_R_TYPE (irel->r_info) == (int) R_CR16_IMM20)
|
|| (ELF32_R_TYPE (irel->r_info) == (int) R_CR16_IMM16))
|
|| (ELF32_R_TYPE (irel->r_info) == (int) R_CR16_IMM16))
|
{
|
{
|
bfd_vma value = symval;
|
bfd_vma value = symval;
|
|
bfd_vma value1 = 0;
|
|
|
|
/* Get the existing value from the mcode */
|
|
value1 = ((bfd_get_16 (abfd, contents + irel->r_offset + 2) & 0xffff));
|
|
|
|
if (ELF32_R_TYPE (irel->r_info) == (int) R_CR16_IMM20)
|
|
{
|
|
value1 |= ((bfd_get_16 (abfd, contents + irel->r_offset + 1) & 0xf000) << 0x4);
|
|
}
|
|
|
/* See if the value will fit in 4 bits. */
|
/* See if the value will fit in 4 bits. */
|
if ((long) value < 0xf && (long) value > 0)
|
if ((((long) (value + value1)) < 0xf)
|
|
&& (((long) (value + value1)) > 0))
|
{
|
{
|
unsigned short code;
|
unsigned short code;
|
|
|
/* Get the opcode. */
|
/* Get the opcode. */
|
code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset);
|
code = (unsigned short) bfd_get_16 (abfd, contents + irel->r_offset);
|
| Line 1457... |
Line 2203... |
bfd_put_8 (abfd, 0x2C, contents + irel->r_offset);
|
bfd_put_8 (abfd, 0x2C, contents + irel->r_offset);
|
else if ((code & 0xfff0) == 0x32b0) /* For adduw imm16. */
|
else if ((code & 0xfff0) == 0x32b0) /* For adduw imm16. */
|
bfd_put_8 (abfd, 0x32, contents + irel->r_offset);
|
bfd_put_8 (abfd, 0x32, contents + irel->r_offset);
|
else if ((code & 0xfff0) == 0x38b0) /* For subb imm16. */
|
else if ((code & 0xfff0) == 0x38b0) /* For subb imm16. */
|
bfd_put_8 (abfd, 0x38, contents + irel->r_offset);
|
bfd_put_8 (abfd, 0x38, contents + irel->r_offset);
|
|
else if ((code & 0xfff0) == 0x3Cb0) /* For subcb imm16. */
|
|
bfd_put_8 (abfd, 0x3C, contents + irel->r_offset);
|
|
else if ((code & 0xfff0) == 0x3Fb0) /* For subcw imm16. */
|
|
bfd_put_8 (abfd, 0x3F, contents + irel->r_offset);
|
else if ((code & 0xfff0) == 0x3Ab0) /* For subw imm16. */
|
else if ((code & 0xfff0) == 0x3Ab0) /* For subw imm16. */
|
bfd_put_8 (abfd, 0x3A, contents + irel->r_offset);
|
bfd_put_8 (abfd, 0x3A, contents + irel->r_offset);
|
else if ((code & 0xfff0) == 0x50b0) /* For cmpb imm16. */
|
else if ((code & 0xfff0) == 0x50b0) /* For cmpb imm16. */
|
bfd_put_8 (abfd, 0x50, contents + irel->r_offset);
|
bfd_put_8 (abfd, 0x50, contents + irel->r_offset);
|
else if ((code & 0xfff0) == 0x52b0) /* For cmpw imm16. */
|
else if ((code & 0xfff0) == 0x52b0) /* For cmpw imm16. */
|
| Line 1483... |
Line 2233... |
/* That will change things, so, we should relax again.
|
/* That will change things, so, we should relax again.
|
Note that this is not required, and it may be slow. */
|
Note that this is not required, and it may be slow. */
|
*again = TRUE;
|
*again = TRUE;
|
}
|
}
|
}
|
}
|
|
#endif
|
}
|
}
|
|
|
if (isymbuf != NULL
|
if (isymbuf != NULL
|
&& symtab_hdr->contents != (unsigned char *) isymbuf)
|
&& symtab_hdr->contents != (unsigned char *) isymbuf)
|
{
|
{
|
| Line 1503... |
Line 2254... |
if (! link_info->keep_memory)
|
if (! link_info->keep_memory)
|
free (contents);
|
free (contents);
|
else
|
else
|
/* Cache the section contents for elf_link_input_bfd. */
|
/* Cache the section contents for elf_link_input_bfd. */
|
elf_section_data (sec)->this_hdr.contents = contents;
|
elf_section_data (sec)->this_hdr.contents = contents;
|
|
|
}
|
}
|
|
|
if (internal_relocs != NULL
|
if (internal_relocs != NULL
|
&& elf_section_data (sec)->relocs != internal_relocs)
|
&& elf_section_data (sec)->relocs != internal_relocs)
|
free (internal_relocs);
|
free (internal_relocs);
|
| Line 1561... |
Line 2313... |
{
|
{
|
/* We don't support garbage collection of GOT and PLT relocs yet. */
|
/* We don't support garbage collection of GOT and PLT relocs yet. */
|
return TRUE;
|
return TRUE;
|
}
|
}
|
|
|
|
/* Create dynamic sections when linking against a dynamic object. */
|
|
|
|
static bfd_boolean
|
|
_bfd_cr16_elf_create_dynamic_sections (bfd *abfd, struct bfd_link_info *info)
|
|
{
|
|
flagword flags;
|
|
asection * s;
|
|
const struct elf_backend_data * bed = get_elf_backend_data (abfd);
|
|
int ptralign = 0;
|
|
|
|
switch (bed->s->arch_size)
|
|
{
|
|
case 16:
|
|
ptralign = 1;
|
|
break;
|
|
|
|
case 32:
|
|
ptralign = 2;
|
|
break;
|
|
|
|
default:
|
|
bfd_set_error (bfd_error_bad_value);
|
|
return FALSE;
|
|
}
|
|
|
|
/* We need to create .plt, .rel[a].plt, .got, .got.plt, .dynbss, and
|
|
.rel[a].bss sections. */
|
|
|
|
flags = (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS | SEC_IN_MEMORY
|
|
| SEC_LINKER_CREATED);
|
|
|
|
s = bfd_make_section_with_flags (abfd,
|
|
(bed->default_use_rela_p
|
|
? ".rela.plt" : ".rel.plt"),
|
|
flags | SEC_READONLY);
|
|
if (s == NULL
|
|
|| ! bfd_set_section_alignment (abfd, s, ptralign))
|
|
return FALSE;
|
|
|
|
if (! _bfd_cr16_elf_create_got_section (abfd, info))
|
|
return FALSE;
|
|
|
|
{
|
|
const char * secname;
|
|
char * relname;
|
|
flagword secflags;
|
|
asection * sec;
|
|
|
|
for (sec = abfd->sections; sec; sec = sec->next)
|
|
{
|
|
secflags = bfd_get_section_flags (abfd, sec);
|
|
if ((secflags & (SEC_DATA | SEC_LINKER_CREATED))
|
|
|| ((secflags & SEC_HAS_CONTENTS) != SEC_HAS_CONTENTS))
|
|
continue;
|
|
|
|
secname = bfd_get_section_name (abfd, sec);
|
|
relname = (char *) bfd_malloc (strlen (secname) + 6);
|
|
strcpy (relname, ".rela");
|
|
strcat (relname, secname);
|
|
|
|
s = bfd_make_section_with_flags (abfd, relname,
|
|
flags | SEC_READONLY);
|
|
if (s == NULL
|
|
|| ! bfd_set_section_alignment (abfd, s, ptralign))
|
|
return FALSE;
|
|
}
|
|
}
|
|
|
|
if (bed->want_dynbss)
|
|
{
|
|
/* The .dynbss section is a place to put symbols which are defined
|
|
by dynamic objects, are referenced by regular objects, and are
|
|
not functions. We must allocate space for them in the process
|
|
image and use a R_*_COPY reloc to tell the dynamic linker to
|
|
initialize them at run time. The linker script puts the .dynbss
|
|
section into the .bss section of the final image. */
|
|
s = bfd_make_section_with_flags (abfd, ".dynbss",
|
|
SEC_ALLOC | SEC_LINKER_CREATED);
|
|
if (s == NULL)
|
|
return FALSE;
|
|
|
|
/* The .rel[a].bss section holds copy relocs. This section is not
|
|
normally needed. We need to create it here, though, so that the
|
|
linker will map it to an output section. We can't just create it
|
|
only if we need it, because we will not know whether we need it
|
|
until we have seen all the input files, and the first time the
|
|
main linker code calls BFD after examining all the input files
|
|
(size_dynamic_sections) the input sections have already been
|
|
mapped to the output sections. If the section turns out not to
|
|
be needed, we can discard it later. We will never need this
|
|
section when generating a shared object, since they do not use
|
|
copy relocs. */
|
|
if (! info->executable)
|
|
{
|
|
s = bfd_make_section_with_flags (abfd,
|
|
(bed->default_use_rela_p
|
|
? ".rela.bss" : ".rel.bss"),
|
|
flags | SEC_READONLY);
|
|
if (s == NULL
|
|
|| ! bfd_set_section_alignment (abfd, s, ptralign))
|
|
return FALSE;
|
|
}
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
/* Adjust a symbol defined by a dynamic object and referenced by a
|
|
regular object. The current definition is in some section of the
|
|
dynamic object, but we're not including those sections. We have to
|
|
change the definition to something the rest of the link can
|
|
understand. */
|
|
|
|
static bfd_boolean
|
|
_bfd_cr16_elf_adjust_dynamic_symbol (struct bfd_link_info * info,
|
|
struct elf_link_hash_entry * h)
|
|
{
|
|
bfd * dynobj;
|
|
asection * s;
|
|
|
|
dynobj = elf_hash_table (info)->dynobj;
|
|
|
|
/* Make sure we know what is going on here. */
|
|
BFD_ASSERT (dynobj != NULL
|
|
&& (h->needs_plt
|
|
|| h->u.weakdef != NULL
|
|
|| (h->def_dynamic
|
|
&& h->ref_regular
|
|
&& !h->def_regular)));
|
|
|
|
/* If this is a function, put it in the procedure linkage table. We
|
|
will fill in the contents of the procedure linkage table later,
|
|
when we know the address of the .got section. */
|
|
if (h->type == STT_FUNC
|
|
|| h->needs_plt)
|
|
{
|
|
if (! info->executable
|
|
&& !h->def_dynamic
|
|
&& !h->ref_dynamic)
|
|
{
|
|
/* This case can occur if we saw a PLT reloc in an input
|
|
file, but the symbol was never referred to by a dynamic
|
|
object. In such a case, we don't actually need to build
|
|
a procedure linkage table, and we can just do a REL32
|
|
reloc instead. */
|
|
BFD_ASSERT (h->needs_plt);
|
|
return TRUE;
|
|
}
|
|
|
|
/* Make sure this symbol is output as a dynamic symbol. */
|
|
if (h->dynindx == -1)
|
|
{
|
|
if (! bfd_elf_link_record_dynamic_symbol (info, h))
|
|
return FALSE;
|
|
}
|
|
|
|
/* We also need to make an entry in the .got.plt section, which
|
|
will be placed in the .got section by the linker script. */
|
|
|
|
s = bfd_get_section_by_name (dynobj, ".got.plt");
|
|
BFD_ASSERT (s != NULL);
|
|
s->size += 4;
|
|
|
|
/* We also need to make an entry in the .rela.plt section. */
|
|
|
|
s = bfd_get_section_by_name (dynobj, ".rela.plt");
|
|
BFD_ASSERT (s != NULL);
|
|
s->size += sizeof (Elf32_External_Rela);
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
/* If this is a weak symbol, and there is a real definition, the
|
|
processor independent code will have arranged for us to see the
|
|
real definition first, and we can just use the same value. */
|
|
if (h->u.weakdef != NULL)
|
|
{
|
|
BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
|
|
|| h->u.weakdef->root.type == bfd_link_hash_defweak);
|
|
h->root.u.def.section = h->u.weakdef->root.u.def.section;
|
|
h->root.u.def.value = h->u.weakdef->root.u.def.value;
|
|
return TRUE;
|
|
}
|
|
|
|
/* This is a reference to a symbol defined by a dynamic object which
|
|
is not a function. */
|
|
|
|
/* If we are creating a shared library, we must presume that the
|
|
only references to the symbol are via the global offset table.
|
|
For such cases we need not do anything here; the relocations will
|
|
be handled correctly by relocate_section. */
|
|
if (info->executable)
|
|
return TRUE;
|
|
|
|
/* If there are no references to this symbol that do not use the
|
|
GOT, we don't need to generate a copy reloc. */
|
|
if (!h->non_got_ref)
|
|
return TRUE;
|
|
|
|
if (h->size == 0)
|
|
{
|
|
(*_bfd_error_handler) (_("dynamic variable `%s' is zero size"),
|
|
h->root.root.string);
|
|
return TRUE;
|
|
}
|
|
|
|
/* We must allocate the symbol in our .dynbss section, which will
|
|
become part of the .bss section of the executable. There will be
|
|
an entry for this symbol in the .dynsym section. The dynamic
|
|
object will contain position independent code, so all references
|
|
from the dynamic object to this symbol will go through the global
|
|
offset table. The dynamic linker will use the .dynsym entry to
|
|
determine the address it must put in the global offset table, so
|
|
both the dynamic object and the regular object will refer to the
|
|
same memory location for the variable. */
|
|
|
|
s = bfd_get_section_by_name (dynobj, ".dynbss");
|
|
BFD_ASSERT (s != NULL);
|
|
|
|
/* We must generate a R_CR16_COPY reloc to tell the dynamic linker to
|
|
copy the initial value out of the dynamic object and into the
|
|
runtime process image. We need to remember the offset into the
|
|
.rela.bss section we are going to use. */
|
|
if ((h->root.u.def.section->flags & SEC_ALLOC) != 0)
|
|
{
|
|
asection * srel;
|
|
|
|
srel = bfd_get_section_by_name (dynobj, ".rela.bss");
|
|
BFD_ASSERT (srel != NULL);
|
|
srel->size += sizeof (Elf32_External_Rela);
|
|
h->needs_copy = 1;
|
|
}
|
|
|
|
return _bfd_elf_adjust_dynamic_copy (h, s);
|
|
}
|
|
|
|
/* Set the sizes of the dynamic sections. */
|
|
|
|
static bfd_boolean
|
|
_bfd_cr16_elf_size_dynamic_sections (bfd * output_bfd,
|
|
struct bfd_link_info * info)
|
|
{
|
|
bfd * dynobj;
|
|
asection * s;
|
|
bfd_boolean plt;
|
|
bfd_boolean relocs;
|
|
bfd_boolean reltext;
|
|
|
|
dynobj = elf_hash_table (info)->dynobj;
|
|
BFD_ASSERT (dynobj != NULL);
|
|
|
|
if (elf_hash_table (info)->dynamic_sections_created)
|
|
{
|
|
/* Set the contents of the .interp section to the interpreter. */
|
|
if (info->executable)
|
|
{
|
|
#if 0
|
|
s = bfd_get_section_by_name (dynobj, ".interp");
|
|
BFD_ASSERT (s != NULL);
|
|
s->size = sizeof ELF_DYNAMIC_INTERPRETER;
|
|
s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
|
|
#endif
|
|
}
|
|
}
|
|
else
|
|
{
|
|
/* We may have created entries in the .rela.got section.
|
|
However, if we are not creating the dynamic sections, we will
|
|
not actually use these entries. Reset the size of .rela.got,
|
|
which will cause it to get stripped from the output file
|
|
below. */
|
|
s = bfd_get_section_by_name (dynobj, ".rela.got");
|
|
if (s != NULL)
|
|
s->size = 0;
|
|
}
|
|
|
|
/* The check_relocs and adjust_dynamic_symbol entry points have
|
|
determined the sizes of the various dynamic sections. Allocate
|
|
memory for them. */
|
|
plt = FALSE;
|
|
relocs = FALSE;
|
|
reltext = FALSE;
|
|
for (s = dynobj->sections; s != NULL; s = s->next)
|
|
{
|
|
const char * name;
|
|
|
|
if ((s->flags & SEC_LINKER_CREATED) == 0)
|
|
continue;
|
|
|
|
/* It's OK to base decisions on the section name, because none
|
|
of the dynobj section names depend upon the input files. */
|
|
name = bfd_get_section_name (dynobj, s);
|
|
|
|
if (strcmp (name, ".plt") == 0)
|
|
{
|
|
/* Remember whether there is a PLT. */
|
|
plt = s->size != 0;
|
|
}
|
|
else if (CONST_STRNEQ (name, ".rela"))
|
|
{
|
|
if (s->size != 0)
|
|
{
|
|
asection * target;
|
|
|
|
/* Remember whether there are any reloc sections other
|
|
than .rela.plt. */
|
|
if (strcmp (name, ".rela.plt") != 0)
|
|
{
|
|
const char * outname;
|
|
|
|
relocs = TRUE;
|
|
|
|
/* If this relocation section applies to a read only
|
|
section, then we probably need a DT_TEXTREL
|
|
entry. The entries in the .rela.plt section
|
|
really apply to the .got section, which we
|
|
created ourselves and so know is not readonly. */
|
|
outname = bfd_get_section_name (output_bfd,
|
|
s->output_section);
|
|
target = bfd_get_section_by_name (output_bfd, outname + 5);
|
|
if (target != NULL
|
|
&& (target->flags & SEC_READONLY) != 0
|
|
&& (target->flags & SEC_ALLOC) != 0)
|
|
reltext = TRUE;
|
|
}
|
|
|
|
/* We use the reloc_count field as a counter if we need
|
|
to copy relocs into the output file. */
|
|
s->reloc_count = 0;
|
|
}
|
|
}
|
|
else if (! CONST_STRNEQ (name, ".got")
|
|
&& strcmp (name, ".dynbss") != 0)
|
|
/* It's not one of our sections, so don't allocate space. */
|
|
continue;
|
|
|
|
if (s->size == 0)
|
|
{
|
|
/* If we don't need this section, strip it from the
|
|
output file. This is mostly to handle .rela.bss and
|
|
.rela.plt. We must create both sections in
|
|
create_dynamic_sections, because they must be created
|
|
before the linker maps input sections to output
|
|
sections. The linker does that before
|
|
adjust_dynamic_symbol is called, and it is that
|
|
function which decides whether anything needs to go
|
|
into these sections. */
|
|
s->flags |= SEC_EXCLUDE;
|
|
continue;
|
|
}
|
|
|
|
if ((s->flags & SEC_HAS_CONTENTS) == 0)
|
|
continue;
|
|
|
|
/* Allocate memory for the section contents. We use bfd_zalloc
|
|
here in case unused entries are not reclaimed before the
|
|
section's contents are written out. This should not happen,
|
|
but this way if it does, we get a R_CR16_NONE reloc
|
|
instead of garbage. */
|
|
s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
|
|
if (s->contents == NULL)
|
|
return FALSE;
|
|
}
|
|
|
|
if (elf_hash_table (info)->dynamic_sections_created)
|
|
{
|
|
/* Add some entries to the .dynamic section. We fill in the
|
|
values later, in _bfd_cr16_elf_finish_dynamic_sections,
|
|
but we must add the entries now so that we get the correct
|
|
size for the .dynamic section. The DT_DEBUG entry is filled
|
|
in by the dynamic linker and used by the debugger. */
|
|
if (! info->executable)
|
|
{
|
|
if (!_bfd_elf_add_dynamic_entry (info, DT_DEBUG, 0))
|
|
return FALSE;
|
|
}
|
|
|
|
if (plt)
|
|
{
|
|
if (!_bfd_elf_add_dynamic_entry (info, DT_PLTGOT, 0)
|
|
|| !_bfd_elf_add_dynamic_entry (info, DT_PLTRELSZ, 0)
|
|
|| !_bfd_elf_add_dynamic_entry (info, DT_PLTREL, DT_RELA)
|
|
|| !_bfd_elf_add_dynamic_entry (info, DT_JMPREL, 0))
|
|
return FALSE;
|
|
}
|
|
|
|
if (relocs)
|
|
{
|
|
if (!_bfd_elf_add_dynamic_entry (info, DT_RELA, 0)
|
|
|| !_bfd_elf_add_dynamic_entry (info, DT_RELASZ, 0)
|
|
|| !_bfd_elf_add_dynamic_entry (info, DT_RELAENT,
|
|
sizeof (Elf32_External_Rela)))
|
|
return FALSE;
|
|
}
|
|
|
|
if (reltext)
|
|
{
|
|
if (!_bfd_elf_add_dynamic_entry (info, DT_TEXTREL, 0))
|
|
return FALSE;
|
|
}
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
/* Finish up dynamic symbol handling. We set the contents of various
|
|
dynamic sections here. */
|
|
|
|
static bfd_boolean
|
|
_bfd_cr16_elf_finish_dynamic_symbol (bfd * output_bfd,
|
|
struct bfd_link_info * info,
|
|
struct elf_link_hash_entry * h,
|
|
Elf_Internal_Sym * sym)
|
|
{
|
|
bfd * dynobj;
|
|
|
|
dynobj = elf_hash_table (info)->dynobj;
|
|
|
|
if (h->got.offset != (bfd_vma) -1)
|
|
{
|
|
asection * sgot;
|
|
asection * srel;
|
|
Elf_Internal_Rela rel;
|
|
|
|
/* This symbol has an entry in the global offset table. Set it up. */
|
|
|
|
sgot = bfd_get_section_by_name (dynobj, ".got");
|
|
srel = bfd_get_section_by_name (dynobj, ".rela.got");
|
|
BFD_ASSERT (sgot != NULL && srel != NULL);
|
|
|
|
rel.r_offset = (sgot->output_section->vma
|
|
+ sgot->output_offset
|
|
+ (h->got.offset & ~1));
|
|
|
|
/* If this is a -Bsymbolic link, and the symbol is defined
|
|
locally, we just want to emit a RELATIVE reloc. Likewise if
|
|
the symbol was forced to be local because of a version file.
|
|
The entry in the global offset table will already have been
|
|
initialized in the relocate_section function. */
|
|
if (info->executable
|
|
&& (info->symbolic || h->dynindx == -1)
|
|
&& h->def_regular)
|
|
{
|
|
rel.r_info = ELF32_R_INFO (0, R_CR16_GOT_REGREL20);
|
|
rel.r_addend = (h->root.u.def.value
|
|
+ h->root.u.def.section->output_section->vma
|
|
+ h->root.u.def.section->output_offset);
|
|
}
|
|
else
|
|
{
|
|
bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents + h->got.offset);
|
|
rel.r_info = ELF32_R_INFO (h->dynindx, R_CR16_GOT_REGREL20);
|
|
rel.r_addend = 0;
|
|
}
|
|
|
|
bfd_elf32_swap_reloca_out (output_bfd, &rel,
|
|
(bfd_byte *) ((Elf32_External_Rela *) srel->contents
|
|
+ srel->reloc_count));
|
|
++ srel->reloc_count;
|
|
}
|
|
|
|
if (h->needs_copy)
|
|
{
|
|
asection * s;
|
|
Elf_Internal_Rela rel;
|
|
|
|
/* This symbol needs a copy reloc. Set it up. */
|
|
BFD_ASSERT (h->dynindx != -1
|
|
&& (h->root.type == bfd_link_hash_defined
|
|
|| h->root.type == bfd_link_hash_defweak));
|
|
|
|
s = bfd_get_section_by_name (h->root.u.def.section->owner,
|
|
".rela.bss");
|
|
BFD_ASSERT (s != NULL);
|
|
|
|
rel.r_offset = (h->root.u.def.value
|
|
+ h->root.u.def.section->output_section->vma
|
|
+ h->root.u.def.section->output_offset);
|
|
rel.r_info = ELF32_R_INFO (h->dynindx, R_CR16_GOT_REGREL20);
|
|
rel.r_addend = 0;
|
|
bfd_elf32_swap_reloca_out (output_bfd, &rel,
|
|
(bfd_byte *) ((Elf32_External_Rela *) s->contents
|
|
+ s->reloc_count));
|
|
++ s->reloc_count;
|
|
}
|
|
|
|
/* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. */
|
|
if (strcmp (h->root.root.string, "_DYNAMIC") == 0
|
|
|| h == elf_hash_table (info)->hgot)
|
|
sym->st_shndx = SHN_ABS;
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
/* Finish up the dynamic sections. */
|
|
|
|
static bfd_boolean
|
|
_bfd_cr16_elf_finish_dynamic_sections (bfd * output_bfd,
|
|
struct bfd_link_info * info)
|
|
{
|
|
bfd * dynobj;
|
|
asection * sgot;
|
|
asection * sdyn;
|
|
|
|
dynobj = elf_hash_table (info)->dynobj;
|
|
|
|
sgot = bfd_get_section_by_name (dynobj, ".got.plt");
|
|
BFD_ASSERT (sgot != NULL);
|
|
sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
|
|
|
|
if (elf_hash_table (info)->dynamic_sections_created)
|
|
{
|
|
Elf32_External_Dyn * dyncon;
|
|
Elf32_External_Dyn * dynconend;
|
|
|
|
BFD_ASSERT (sdyn != NULL);
|
|
|
|
dyncon = (Elf32_External_Dyn *) sdyn->contents;
|
|
dynconend = (Elf32_External_Dyn *) (sdyn->contents + sdyn->size);
|
|
|
|
for (; dyncon < dynconend; dyncon++)
|
|
{
|
|
Elf_Internal_Dyn dyn;
|
|
const char * name;
|
|
asection * s;
|
|
|
|
bfd_elf32_swap_dyn_in (dynobj, dyncon, &dyn);
|
|
|
|
switch (dyn.d_tag)
|
|
{
|
|
default:
|
|
break;
|
|
|
|
case DT_PLTGOT:
|
|
name = ".got";
|
|
goto get_vma;
|
|
|
|
case DT_JMPREL:
|
|
name = ".rela.plt";
|
|
get_vma:
|
|
s = bfd_get_section_by_name (output_bfd, name);
|
|
BFD_ASSERT (s != NULL);
|
|
dyn.d_un.d_ptr = s->vma;
|
|
bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
|
|
break;
|
|
|
|
case DT_PLTRELSZ:
|
|
s = bfd_get_section_by_name (output_bfd, ".rela.plt");
|
|
BFD_ASSERT (s != NULL);
|
|
dyn.d_un.d_val = s->size;
|
|
bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
|
|
break;
|
|
|
|
case DT_RELASZ:
|
|
/* My reading of the SVR4 ABI indicates that the
|
|
procedure linkage table relocs (DT_JMPREL) should be
|
|
included in the overall relocs (DT_RELA). This is
|
|
what Solaris does. However, UnixWare can not handle
|
|
that case. Therefore, we override the DT_RELASZ entry
|
|
here to make it not include the JMPREL relocs. Since
|
|
the linker script arranges for .rela.plt to follow all
|
|
other relocation sections, we don't have to worry
|
|
about changing the DT_RELA entry. */
|
|
s = bfd_get_section_by_name (output_bfd, ".rela.plt");
|
|
if (s != NULL)
|
|
dyn.d_un.d_val -= s->size;
|
|
bfd_elf32_swap_dyn_out (output_bfd, &dyn, dyncon);
|
|
break;
|
|
}
|
|
}
|
|
|
|
}
|
|
|
|
/* Fill in the first three entries in the global offset table. */
|
|
if (sgot->size > 0)
|
|
{
|
|
if (sdyn == NULL)
|
|
bfd_put_32 (output_bfd, (bfd_vma) 0, sgot->contents);
|
|
else
|
|
bfd_put_32 (output_bfd,
|
|
sdyn->output_section->vma + sdyn->output_offset,
|
|
sgot->contents);
|
|
}
|
|
|
|
elf_section_data (sgot->output_section)->this_hdr.sh_entsize = 4;
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
/* Given a .data.rel section and a .emreloc in-memory section, store
|
|
relocation information into the .emreloc section which can be
|
|
used at runtime to relocate the section. This is called by the
|
|
linker when the --embedded-relocs switch is used. This is called
|
|
after the add_symbols entry point has been called for all the
|
|
objects, and before the final_link entry point is called. */
|
|
|
|
bfd_boolean
|
|
bfd_cr16_elf32_create_embedded_relocs (bfd *abfd,
|
|
struct bfd_link_info *info,
|
|
asection *datasec,
|
|
asection *relsec,
|
|
char **errmsg)
|
|
{
|
|
Elf_Internal_Shdr *symtab_hdr;
|
|
Elf_Internal_Sym *isymbuf = NULL;
|
|
Elf_Internal_Rela *internal_relocs = NULL;
|
|
Elf_Internal_Rela *irel, *irelend;
|
|
bfd_byte *p;
|
|
bfd_size_type amt;
|
|
|
|
BFD_ASSERT (! info->relocatable);
|
|
|
|
*errmsg = NULL;
|
|
|
|
if (datasec->reloc_count == 0)
|
|
return TRUE;
|
|
|
|
symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
|
|
|
|
/* Get a copy of the native relocations. */
|
|
internal_relocs = (_bfd_elf_link_read_relocs
|
|
(abfd, datasec, NULL, NULL, info->keep_memory));
|
|
if (internal_relocs == NULL)
|
|
goto error_return;
|
|
|
|
amt = (bfd_size_type) datasec->reloc_count * 8;
|
|
relsec->contents = (bfd_byte *) bfd_alloc (abfd, amt);
|
|
if (relsec->contents == NULL)
|
|
goto error_return;
|
|
|
|
p = relsec->contents;
|
|
|
|
irelend = internal_relocs + datasec->reloc_count;
|
|
for (irel = internal_relocs; irel < irelend; irel++, p += 8)
|
|
{
|
|
asection *targetsec;
|
|
|
|
/* We are going to write a four byte longword into the runtime
|
|
reloc section. The longword will be the address in the data
|
|
section which must be relocated. It is followed by the name
|
|
of the target section NUL-padded or truncated to 8
|
|
characters. */
|
|
|
|
/* We can only relocate absolute longword relocs at run time. */
|
|
if (!((ELF32_R_TYPE (irel->r_info) == (int) R_CR16_NUM32a)
|
|
|| (ELF32_R_TYPE (irel->r_info) == (int) R_CR16_NUM32)))
|
|
{
|
|
*errmsg = _("unsupported reloc type");
|
|
bfd_set_error (bfd_error_bad_value);
|
|
goto error_return;
|
|
}
|
|
|
|
/* Get the target section referred to by the reloc. */
|
|
if (ELF32_R_SYM (irel->r_info) < symtab_hdr->sh_info)
|
|
{
|
|
/* A local symbol. */
|
|
Elf_Internal_Sym *isym;
|
|
|
|
/* Read this BFD's local symbols if we haven't done so already. */
|
|
if (isymbuf == NULL)
|
|
{
|
|
isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
|
|
if (isymbuf == NULL)
|
|
isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr,
|
|
symtab_hdr->sh_info, 0,
|
|
NULL, NULL, NULL);
|
|
if (isymbuf == NULL)
|
|
goto error_return;
|
|
}
|
|
|
|
isym = isymbuf + ELF32_R_SYM (irel->r_info);
|
|
targetsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
|
|
}
|
|
else
|
|
{
|
|
unsigned long indx;
|
|
struct elf_link_hash_entry *h;
|
|
|
|
/* An external symbol. */
|
|
indx = ELF32_R_SYM (irel->r_info) - symtab_hdr->sh_info;
|
|
h = elf_sym_hashes (abfd)[indx];
|
|
BFD_ASSERT (h != NULL);
|
|
if (h->root.type == bfd_link_hash_defined
|
|
|| h->root.type == bfd_link_hash_defweak)
|
|
targetsec = h->root.u.def.section;
|
|
else
|
|
targetsec = NULL;
|
|
}
|
|
|
|
bfd_put_32 (abfd, irel->r_offset + datasec->output_offset, p);
|
|
memset (p + 4, 0, 4);
|
|
if ((ELF32_R_TYPE (irel->r_info) == (int) R_CR16_NUM32a)
|
|
&& (targetsec != NULL) )
|
|
strncpy ((char *) p + 4, targetsec->output_section->name, 4);
|
|
}
|
|
|
|
if (isymbuf != NULL && symtab_hdr->contents != (unsigned char *) isymbuf)
|
|
free (isymbuf);
|
|
if (internal_relocs != NULL
|
|
&& elf_section_data (datasec)->relocs != internal_relocs)
|
|
free (internal_relocs);
|
|
return TRUE;
|
|
|
|
error_return:
|
|
if (isymbuf != NULL && symtab_hdr->contents != (unsigned char *) isymbuf)
|
|
free (isymbuf);
|
|
if (internal_relocs != NULL
|
|
&& elf_section_data (datasec)->relocs != internal_relocs)
|
|
free (internal_relocs);
|
|
return FALSE;
|
|
}
|
|
|
|
|
|
/* Classify relocation types, such that combreloc can sort them
|
|
properly. */
|
|
|
|
static enum elf_reloc_type_class
|
|
_bfd_cr16_elf_reloc_type_class (const Elf_Internal_Rela *rela)
|
|
{
|
|
switch ((int) ELF32_R_TYPE (rela->r_info))
|
|
{
|
|
case R_CR16_GOT_REGREL20:
|
|
case R_CR16_GOTC_REGREL20:
|
|
return reloc_class_relative;
|
|
default:
|
|
return reloc_class_normal;
|
|
}
|
|
}
|
|
|
/* Definitions for setting CR16 target vector. */
|
/* Definitions for setting CR16 target vector. */
|
#define TARGET_LITTLE_SYM bfd_elf32_cr16_vec
|
#define TARGET_LITTLE_SYM bfd_elf32_cr16_vec
|
#define TARGET_LITTLE_NAME "elf32-cr16"
|
#define TARGET_LITTLE_NAME "elf32-cr16"
|
#define ELF_ARCH bfd_arch_cr16
|
#define ELF_ARCH bfd_arch_cr16
|
#define ELF_MACHINE_CODE EM_CR16
|
#define ELF_MACHINE_CODE EM_CR16
|
|
#define ELF_MACHINE_ALT1 EM_CR16_OLD
|
#define ELF_MAXPAGESIZE 0x1
|
#define ELF_MAXPAGESIZE 0x1
|
#define elf_symbol_leading_char '_'
|
#define elf_symbol_leading_char '_'
|
|
|
#define bfd_elf32_bfd_reloc_type_lookup elf_cr16_reloc_type_lookup
|
#define bfd_elf32_bfd_reloc_type_lookup elf_cr16_reloc_type_lookup
|
#define bfd_elf32_bfd_reloc_name_lookup elf_cr16_reloc_name_lookup
|
#define bfd_elf32_bfd_reloc_name_lookup elf_cr16_reloc_name_lookup
|
| Line 1581... |
Line 3063... |
elf32_cr16_get_relocated_section_contents
|
elf32_cr16_get_relocated_section_contents
|
#define elf_backend_gc_mark_hook elf32_cr16_gc_mark_hook
|
#define elf_backend_gc_mark_hook elf32_cr16_gc_mark_hook
|
#define elf_backend_gc_sweep_hook elf32_cr16_gc_sweep_hook
|
#define elf_backend_gc_sweep_hook elf32_cr16_gc_sweep_hook
|
#define elf_backend_can_gc_sections 1
|
#define elf_backend_can_gc_sections 1
|
#define elf_backend_rela_normal 1
|
#define elf_backend_rela_normal 1
|
|
#define elf_backend_check_relocs cr16_elf_check_relocs
|
|
/* So we can set bits in e_flags. */
|
|
#define elf_backend_final_write_processing \
|
|
_bfd_cr16_elf_final_write_processing
|
|
#define elf_backend_object_p _bfd_cr16_elf_object_p
|
|
|
|
#define bfd_elf32_bfd_merge_private_bfd_data \
|
|
_bfd_cr16_elf_merge_private_bfd_data
|
|
|
|
|
|
#define bfd_elf32_bfd_link_hash_table_create \
|
|
elf32_cr16_link_hash_table_create
|
|
#define bfd_elf32_bfd_link_hash_table_free \
|
|
elf32_cr16_link_hash_table_free
|
|
|
|
#define elf_backend_create_dynamic_sections \
|
|
_bfd_cr16_elf_create_dynamic_sections
|
|
#define elf_backend_adjust_dynamic_symbol \
|
|
_bfd_cr16_elf_adjust_dynamic_symbol
|
|
#define elf_backend_size_dynamic_sections \
|
|
_bfd_cr16_elf_size_dynamic_sections
|
|
#define elf_backend_omit_section_dynsym \
|
|
((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true)
|
|
#define elf_backend_finish_dynamic_symbol \
|
|
_bfd_cr16_elf_finish_dynamic_symbol
|
|
#define elf_backend_finish_dynamic_sections \
|
|
_bfd_cr16_elf_finish_dynamic_sections
|
|
|
|
#define elf_backend_reloc_type_class _bfd_cr16_elf_reloc_type_class
|
|
|
|
|
|
#define elf_backend_want_got_plt 1
|
|
#define elf_backend_plt_readonly 1
|
|
#define elf_backend_want_plt_sym 0
|
|
#define elf_backend_got_header_size 12
|
|
|
#include "elf32-target.h"
|
#include "elf32-target.h"
|
|
|
No newline at end of file
|
No newline at end of file
|
