/* Ubicom IP2xxx specific support for 32-bit ELF
- Copyright (C) 2000-2018 Free Software Foundation, Inc.
+ Copyright (C) 2000-2022 Free Software Foundation, Inc.
This file is part of BFD, the Binary File Descriptor library.
unsigned short mask;
};
-static bfd_boolean ip2k_relaxed = FALSE;
+static bool ip2k_relaxed = false;
static const struct ip2k_opcode ip2k_page_opcode[] =
{
complain_overflow_dont,/* complain_on_overflow */ \
bfd_elf_generic_reloc,/* special_function */ \
name, /* name */ \
- FALSE, /* partial_inplace */ \
+ false, /* partial_inplace */ \
sm, /* src_mask */ \
dm, /* dst_mask */ \
pr) /* pcrel_offset */
/* This reloc does nothing. */
- IP2K_HOWTO (R_IP2K_NONE, 0,3,0, FALSE, 0, "R_IP2K_NONE", 0, 0),
+ IP2K_HOWTO (R_IP2K_NONE, 0,3,0, false, 0, "R_IP2K_NONE", 0, 0),
/* A 16 bit absolute relocation. */
- IP2K_HOWTO (R_IP2K_16, 0,1,16, FALSE, 0, "R_IP2K_16", 0, 0xffff),
+ IP2K_HOWTO (R_IP2K_16, 0,1,16, false, 0, "R_IP2K_16", 0, 0xffff),
/* A 32 bit absolute relocation. */
- IP2K_HOWTO (R_IP2K_32, 0,2,32, FALSE, 0, "R_IP2K_32", 0, 0xffffffff),
+ IP2K_HOWTO (R_IP2K_32, 0,2,32, false, 0, "R_IP2K_32", 0, 0xffffffff),
/* A 8-bit data relocation for the FR9 field. Ninth bit is computed specially. */
- IP2K_HOWTO (R_IP2K_FR9, 0,1,9, FALSE, 0, "R_IP2K_FR9", 0, 0x00ff),
+ IP2K_HOWTO (R_IP2K_FR9, 0,1,9, false, 0, "R_IP2K_FR9", 0, 0x00ff),
/* A 4-bit data relocation. */
- IP2K_HOWTO (R_IP2K_BANK, 8,1,4, FALSE, 0, "R_IP2K_BANK", 0, 0x000f),
+ IP2K_HOWTO (R_IP2K_BANK, 8,1,4, false, 0, "R_IP2K_BANK", 0, 0x000f),
/* A 13-bit insn relocation - word address => right-shift 1 bit extra. */
- IP2K_HOWTO (R_IP2K_ADDR16CJP, 1,1,13, FALSE, 0, "R_IP2K_ADDR16CJP", 0, 0x1fff),
+ IP2K_HOWTO (R_IP2K_ADDR16CJP, 1,1,13, false, 0, "R_IP2K_ADDR16CJP", 0, 0x1fff),
/* A 3-bit insn relocation - word address => right-shift 1 bit extra. */
- IP2K_HOWTO (R_IP2K_PAGE3, 14,1,3, FALSE, 0, "R_IP2K_PAGE3", 0, 0x0007),
+ IP2K_HOWTO (R_IP2K_PAGE3, 14,1,3, false, 0, "R_IP2K_PAGE3", 0, 0x0007),
/* Two 8-bit data relocations. */
- IP2K_HOWTO (R_IP2K_LO8DATA, 0,1,8, FALSE, 0, "R_IP2K_LO8DATA", 0, 0x00ff),
- IP2K_HOWTO (R_IP2K_HI8DATA, 8,1,8, FALSE, 0, "R_IP2K_HI8DATA", 0, 0x00ff),
+ IP2K_HOWTO (R_IP2K_LO8DATA, 0,1,8, false, 0, "R_IP2K_LO8DATA", 0, 0x00ff),
+ IP2K_HOWTO (R_IP2K_HI8DATA, 8,1,8, false, 0, "R_IP2K_HI8DATA", 0, 0x00ff),
/* Two 8-bit insn relocations. word address => right-shift 1 bit extra. */
- IP2K_HOWTO (R_IP2K_LO8INSN, 1,1,8, FALSE, 0, "R_IP2K_LO8INSN", 0, 0x00ff),
- IP2K_HOWTO (R_IP2K_HI8INSN, 9,1,8, FALSE, 0, "R_IP2K_HI8INSN", 0, 0x00ff),
+ IP2K_HOWTO (R_IP2K_LO8INSN, 1,1,8, false, 0, "R_IP2K_LO8INSN", 0, 0x00ff),
+ IP2K_HOWTO (R_IP2K_HI8INSN, 9,1,8, false, 0, "R_IP2K_HI8INSN", 0, 0x00ff),
/* Special 1 bit relocation for SKIP instructions. */
- IP2K_HOWTO (R_IP2K_PC_SKIP, 1,1,1, FALSE, 12, "R_IP2K_PC_SKIP", 0xfffe, 0x1000),
+ IP2K_HOWTO (R_IP2K_PC_SKIP, 1,1,1, false, 12, "R_IP2K_PC_SKIP", 0xfffe, 0x1000),
/* 16 bit word address. */
- IP2K_HOWTO (R_IP2K_TEXT, 1,1,16, FALSE, 0, "R_IP2K_TEXT", 0, 0xffff),
+ IP2K_HOWTO (R_IP2K_TEXT, 1,1,16, false, 0, "R_IP2K_TEXT", 0, 0xffff),
/* A 7-bit offset relocation for the FR9 field. Eigth and ninth bit comes from insn. */
- IP2K_HOWTO (R_IP2K_FR_OFFSET, 0,1,9, FALSE, 0, "R_IP2K_FR_OFFSET", 0x180, 0x007f),
+ IP2K_HOWTO (R_IP2K_FR_OFFSET, 0,1,9, false, 0, "R_IP2K_FR_OFFSET", 0x180, 0x007f),
/* Bits 23:16 of an address. */
- IP2K_HOWTO (R_IP2K_EX8DATA, 16,1,8, FALSE, 0, "R_IP2K_EX8DATA", 0, 0x00ff),
+ IP2K_HOWTO (R_IP2K_EX8DATA, 16,1,8, false, 0, "R_IP2K_EX8DATA", 0, 0x00ff),
};
* ptr ++ = bfd_get_8 (abfd, addr ++);
}
-static bfd_boolean
+static bool
ip2k_is_opcode (bfd_byte *code, const struct ip2k_opcode *opcodes)
{
unsigned short insn = (code[0] << 8) | code[1];
while (opcodes->mask != 0)
{
if ((insn & opcodes->mask) == opcodes->opcode)
- return TRUE;
+ return true;
opcodes ++;
}
- return FALSE;
+ return false;
}
#define PAGENO(ABSADDR) ((ABSADDR) & 0xFFFFC000)
return 0;
}
-static bfd_boolean
+static bool
ip2k_test_page_insn (bfd *abfd ATTRIBUTE_UNUSED,
asection *sec,
Elf_Internal_Rela *irel,
/* This appears to be a reference to an undefined
symbol. Just ignore it--it will be caught by the
regular reloc processing. */
- return FALSE;
+ return false;
/* Test if we can delete this page instruction. */
if (PAGENO (symval + irel->r_addend) !=
ip2k_nominal_page_bits (abfd, sec, irel->r_offset, misc->contents))
- return FALSE;
+ return false;
- return TRUE;
+ return true;
}
/* Parts of a Stabs entry. */
{
if (!bfd_malloc_and_get_section (abfd, stab, &stabcontents))
{
- if (stabcontents != NULL)
- free (stabcontents);
+ free (stabcontents);
return;
}
/* Delete some bytes from a section while relaxing. */
-static bfd_boolean
+static bool
ip2k_elf_relax_delete_bytes (bfd *abfd,
asection *sec,
bfd_vma addr,
sec->size -= count;
adjust_all_relocations (abfd, sec, addr + count, endaddr, -count, 0);
- return TRUE;
+ return true;
}
-static bfd_boolean
+static bool
ip2k_delete_page_insn (bfd *abfd ATTRIBUTE_UNUSED,
asection *sec,
Elf_Internal_Rela *irel,
- bfd_boolean *again,
+ bool *again,
struct misc *misc)
{
/* Note that we've changed the relocs, section contents, etc. */
/* Delete the PAGE insn. */
if (!ip2k_elf_relax_delete_bytes (abfd, sec, irel->r_offset, 2))
- return FALSE;
+ return false;
/* Modified => will need to iterate relaxation again. */
- *again = TRUE;
+ *again = true;
- return TRUE;
+ return true;
}
-static bfd_boolean
+static bool
ip2k_relax_switch_table_128 (bfd *abfd ATTRIBUTE_UNUSED,
asection *sec,
Elf_Internal_Rela *irel,
- bfd_boolean *again,
+ bool *again,
struct misc *misc)
{
Elf_Internal_Rela *irelend = misc->irelbase + sec->reloc_count;
if (ireltest >= irelend)
{
_bfd_error_handler (_("ip2k relaxer: switch table without complete matching relocation information."));
- return FALSE;
+ return false;
}
if (ireltest->r_offset != addr)
{
_bfd_error_handler (_("ip2k relaxer: switch table without complete matching relocation information."));
- return FALSE;
+ return false;
}
if (! ip2k_test_page_insn (abfd, sec, ireltest, misc))
/* Un-removable page insn => nothing can be done. */
- return TRUE;
+ return true;
addr += 4;
ireltest += 2;
|| (! IS_ADD_PCL_W_OPCODE (code + 2)))
{
_bfd_error_handler (_("ip2k relaxer: switch table header corrupt."));
- return FALSE;
+ return false;
}
if (!ip2k_elf_relax_delete_bytes (abfd, sec, irel->r_offset - 4, 2))
- return FALSE;
+ return false;
- *again = TRUE;
+ *again = true;
/* Delete all page instructions in table. */
while (irel < ireltest)
{
if (!ip2k_delete_page_insn (abfd, sec, irel, again, misc))
- return FALSE;
+ return false;
irel += 2;
}
- return TRUE;
+ return true;
}
-static bfd_boolean
+static bool
ip2k_relax_switch_table_256 (bfd *abfd ATTRIBUTE_UNUSED,
asection *sec,
Elf_Internal_Rela *irel,
- bfd_boolean *again,
+ bool *again,
struct misc *misc)
{
Elf_Internal_Rela *irelend = misc->irelbase + sec->reloc_count;
if (ireltest >= irelend)
{
_bfd_error_handler (_("ip2k relaxer: switch table without complete matching relocation information."));
- return FALSE;
+ return false;
}
if (ireltest->r_offset != addr)
{
_bfd_error_handler (_("ip2k relaxer: switch table without complete matching relocation information."));
- return FALSE;
+ return false;
}
if (!ip2k_test_page_insn (abfd, sec, ireltest, misc))
/* Un-removable page insn => nothing can be done. */
- return TRUE;
+ return true;
addr += 4;
ireltest += 2;
|| (!IS_INC_1SP_OPCODE (code + 10)))
{
_bfd_error_handler (_("ip2k relaxer: switch table header corrupt."));
- return FALSE;
+ return false;
}
/* Delete first 3 opcodes. */
if (!ip2k_elf_relax_delete_bytes (abfd, sec, addr + 0, 6))
- return FALSE;
+ return false;
- *again = TRUE;
+ *again = true;
/* Delete all page instructions in table. */
while (irel < ireltest)
{
if (!ip2k_delete_page_insn (abfd, sec, irel, again, misc))
- return FALSE;
+ return false;
irel += 2;
}
- return TRUE;
+ return true;
}
/* This function handles relaxation of a section in a specific page. */
-static bfd_boolean
+static bool
ip2k_elf_relax_section_page (bfd *abfd,
asection *sec,
- bfd_boolean *again,
+ bool *again,
struct misc *misc,
unsigned long page_start,
unsigned long page_end)
if (BASEADDR (sec) + irel->r_offset > page_end)
/* Flow beyond end of page => nothing more to do for this page. */
- return TRUE;
+ return true;
/* Detect switch tables. */
switch_table_128 = ip2k_is_switch_table_128 (abfd, sec, irel->r_offset, misc->contents);
if (switch_table_128 == 0)
{
if (!ip2k_relax_switch_table_128 (abfd, sec, irel, again, misc))
- return FALSE;
+ return false;
continue;
}
if (switch_table_256 == 0)
{
if (!ip2k_relax_switch_table_256 (abfd, sec, irel, again, misc))
- return FALSE;
+ return false;
continue;
}
if (ip2k_test_page_insn (abfd, sec, irel, misc))
{
if (!ip2k_delete_page_insn (abfd, sec, irel, again, misc))
- return FALSE;
+ return false;
continue;
}
}
- return TRUE;
+ return true;
}
/* This function handles relaxing for the ip2k.
Processing the pages one at a time from the lowest page allows a removal
only policy to be used - pages can be removed but are never reinserted. */
-static bfd_boolean
+static bool
ip2k_elf_relax_section (bfd *abfd,
asection *sec,
struct bfd_link_info *link_info,
- bfd_boolean *again)
+ bool *again)
{
Elf_Internal_Shdr *symtab_hdr;
Elf_Internal_Rela *internal_relocs;
static unsigned long page_start = 0;
static unsigned long page_end = 0;
static unsigned int pass = 0;
- static bfd_boolean new_pass = FALSE;
- static bfd_boolean changed = FALSE;
+ static bool new_pass = false;
+ static bool changed = false;
struct misc misc;
/* Assume nothing changes. */
- *again = FALSE;
+ *again = false;
if (first_section == NULL)
{
- ip2k_relaxed = TRUE;
+ ip2k_relaxed = true;
first_section = sec;
}
if (first_section == sec)
{
pass++;
- new_pass = TRUE;
+ new_pass = true;
}
/* We don't have to do anything for a relocatable link,
|| (sec->flags & SEC_RELOC) == 0
|| sec->reloc_count == 0
|| (sec->flags & SEC_CODE) == 0)
- return TRUE;
+ return true;
symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
if (new_pass)
{
pass = 1;
- new_pass = FALSE;
- changed = TRUE; /* Pre-initialize to break out of pass 1. */
+ new_pass = false;
+ changed = true; /* Pre-initialize to break out of pass 1. */
search_addr = 0xFFFFFFFF;
}
search_addr = BASEADDR (sec);
/* Found a page => more work to do. */
- *again = TRUE;
+ *again = true;
}
}
else
{
if (new_pass)
{
- new_pass = FALSE;
- changed = FALSE;
+ new_pass = false;
+ changed = false;
page_start = PAGENO (search_addr);
page_end = page_start | 0x00003FFF;
}
&& (BASEADDR (sec) <= page_end))
{
if (!ip2k_elf_relax_section_page (abfd, sec, &changed, &misc, page_start, page_end))
- return FALSE;
+ return false;
}
- *again = TRUE;
+ *again = true;
}
/* Perform some house keeping after relaxing the section. */
}
}
- if (internal_relocs != NULL
- && elf_section_data (sec)->relocs != internal_relocs)
+ if (elf_section_data (sec)->relocs != internal_relocs)
free (internal_relocs);
- return TRUE;
+ return true;
error_return:
- if (isymbuf != NULL
- && symtab_hdr->contents != (unsigned char *) isymbuf)
+ if (symtab_hdr->contents != (unsigned char *) isymbuf)
free (isymbuf);
- if (contents != NULL
- && elf_section_data (sec)->this_hdr.contents != contents)
+ if (elf_section_data (sec)->this_hdr.contents != contents)
free (contents);
- if (internal_relocs != NULL
- && elf_section_data (sec)->relocs != internal_relocs)
+ if (elf_section_data (sec)->relocs != internal_relocs)
free (internal_relocs);
- return FALSE;
+ return false;
}
/* Set the howto pointer for a IP2K ELF reloc. */
-static void
-ip2k_info_to_howto_rela (bfd * abfd ATTRIBUTE_UNUSED,
+static bool
+ip2k_info_to_howto_rela (bfd * abfd,
arelent * cache_ptr,
Elf_Internal_Rela * dst)
{
if (r_type >= (unsigned int) R_IP2K_max)
{
/* xgettext:c-format */
- _bfd_error_handler (_("%B: invalid IP2K reloc number: %d"), abfd, r_type);
- r_type = 0;
+ _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
+ abfd, r_type);
+ bfd_set_error (bfd_error_bad_value);
+ return false;
}
cache_ptr->howto = & ip2k_elf_howto_table [r_type];
+ return true;
}
/* Perform a single relocation.
ip2k_nominal_page_bits (input_bfd, input_section,
rel->r_offset, contents))
/* xgettext:c-format */
- _bfd_error_handler (_("ip2k linker: missing page instruction at %#Lx (dest = %#Lx)"),
- BASEADDR (input_section) + rel->r_offset,
- relocation + rel->r_addend);
+ _bfd_error_handler
+ (_("ip2k linker: missing page instruction "
+ "at %#" PRIx64 " (dest = %#" PRIx64 ")"),
+ (uint64_t) (BASEADDR (input_section) + rel->r_offset),
+ (uint64_t) (relocation + rel->r_addend));
}
else if (ip2k_relaxed)
{
ip2k_nominal_page_bits (input_bfd, input_section,
rel->r_offset - 2, contents)))
/* xgettext:c-format */
- _bfd_error_handler (_("ip2k linker: redundant page instruction at %#Lx (dest = %#Lx)"),
- page_addr,
- relocation + rel->r_addend);
+ _bfd_error_handler
+ (_("ip2k linker: redundant page instruction "
+ "at %#" PRIx64 " (dest = %#" PRIx64 ")"),
+ (uint64_t) page_addr,
+ (uint64_t) (relocation + rel->r_addend));
}
if ((relocation & IP2K_INSN_MASK) == IP2K_INSN_VALUE)
relocation &= ~IP2K_INSN_MASK;
section, which means that the addend must be adjusted
accordingly. */
-static bfd_boolean
+static int
ip2k_elf_relocate_section (bfd *output_bfd ATTRIBUTE_UNUSED,
struct bfd_link_info *info,
bfd *input_bfd,
name = bfd_elf_string_from_elf_section
(input_bfd, symtab_hdr->sh_link, sym->st_name);
- name = (name == NULL) ? bfd_section_name (input_bfd, sec) : name;
+ name = name == NULL ? bfd_section_name (sec) : name;
}
else
{
- bfd_boolean warned, ignored;
- bfd_boolean unresolved_reloc;
+ bool warned, ignored;
+ bool unresolved_reloc;
RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
r_symndx, symtab_hdr, sym_hashes,
case bfd_reloc_undefined:
(*info->callbacks->undefined_symbol)
- (info, name, input_bfd, input_section, rel->r_offset, TRUE);
+ (info, name, input_bfd, input_section, rel->r_offset, true);
break;
case bfd_reloc_outofrange:
}
}
- return TRUE;
+ return true;
}
#define TARGET_BIG_SYM ip2k_elf32_vec
projects / binutils-gdb.git / blobdiff