mirror of
https://github.com/autc04/Retro68.git
synced 2024-12-27 07:31:35 +00:00
209 lines
8.4 KiB
C
209 lines
8.4 KiB
C
/* BFD back-end for Sparc COFF files.
|
|
Copyright (C) 1990-2017 Free Software Foundation, Inc.
|
|
Written by Cygnus Support.
|
|
|
|
This file is part of BFD, the Binary File Descriptor library.
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 3 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; if not, write to the Free Software
|
|
Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
|
|
MA 02110-1301, USA. */
|
|
|
|
#include "sysdep.h"
|
|
#include "bfd.h"
|
|
#include "libbfd.h"
|
|
#include "coff/sparc.h"
|
|
#include "coff/internal.h"
|
|
#include "libcoff.h"
|
|
|
|
#define COFF_DEFAULT_SECTION_ALIGNMENT_POWER (3)
|
|
|
|
#define BADMAG(x) ((x).f_magic != SPARCMAGIC && (x).f_magic != LYNXCOFFMAGIC)
|
|
|
|
/* The page size is a guess based on ELF. */
|
|
#define COFF_PAGE_SIZE 0x10000
|
|
|
|
enum reloc_type
|
|
{
|
|
R_SPARC_NONE = 0,
|
|
R_SPARC_8, R_SPARC_16, R_SPARC_32,
|
|
R_SPARC_DISP8, R_SPARC_DISP16, R_SPARC_DISP32,
|
|
R_SPARC_WDISP30, R_SPARC_WDISP22,
|
|
R_SPARC_HI22, R_SPARC_22,
|
|
R_SPARC_13, R_SPARC_LO10,
|
|
R_SPARC_GOT10, R_SPARC_GOT13, R_SPARC_GOT22,
|
|
R_SPARC_PC10, R_SPARC_PC22,
|
|
R_SPARC_WPLT30,
|
|
R_SPARC_COPY,
|
|
R_SPARC_GLOB_DAT, R_SPARC_JMP_SLOT,
|
|
R_SPARC_RELATIVE,
|
|
R_SPARC_UA32,
|
|
R_SPARC_max
|
|
};
|
|
|
|
/* This is stolen pretty directly from elf.c. */
|
|
|
|
static bfd_reloc_status_type
|
|
bfd_coff_generic_reloc (bfd *abfd ATTRIBUTE_UNUSED,
|
|
arelent *reloc_entry,
|
|
asymbol *symbol,
|
|
void * data ATTRIBUTE_UNUSED,
|
|
asection *input_section,
|
|
bfd *output_bfd,
|
|
char **error_message ATTRIBUTE_UNUSED)
|
|
{
|
|
if (output_bfd != (bfd *) NULL
|
|
&& (symbol->flags & BSF_SECTION_SYM) == 0)
|
|
{
|
|
reloc_entry->address += input_section->output_offset;
|
|
return bfd_reloc_ok;
|
|
}
|
|
|
|
return bfd_reloc_continue;
|
|
}
|
|
|
|
static reloc_howto_type coff_sparc_howto_table[] =
|
|
{
|
|
HOWTO(R_SPARC_NONE, 0,3, 0,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_NONE", FALSE,0,0x00000000,TRUE),
|
|
HOWTO(R_SPARC_8, 0,0, 8,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_8", FALSE,0,0x000000ff,TRUE),
|
|
HOWTO(R_SPARC_16, 0,1,16,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_16", FALSE,0,0x0000ffff,TRUE),
|
|
HOWTO(R_SPARC_32, 0,2,32,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_32", FALSE,0,0xffffffff,TRUE),
|
|
HOWTO(R_SPARC_DISP8, 0,0, 8,TRUE, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP8", FALSE,0,0x000000ff,TRUE),
|
|
HOWTO(R_SPARC_DISP16, 0,1,16,TRUE, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP16", FALSE,0,0x0000ffff,TRUE),
|
|
HOWTO(R_SPARC_DISP32, 0,2,32,TRUE, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP32", FALSE,0,0x00ffffff,TRUE),
|
|
HOWTO(R_SPARC_WDISP30, 2,2,30,TRUE, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_WDISP30", FALSE,0,0x3fffffff,TRUE),
|
|
HOWTO(R_SPARC_WDISP22, 2,2,22,TRUE, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_WDISP22", FALSE,0,0x003fffff,TRUE),
|
|
HOWTO(R_SPARC_HI22, 10,2,22,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_HI22", FALSE,0,0x003fffff,TRUE),
|
|
HOWTO(R_SPARC_22, 0,2,22,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_22", FALSE,0,0x003fffff,TRUE),
|
|
HOWTO(R_SPARC_13, 0,2,13,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_13", FALSE,0,0x00001fff,TRUE),
|
|
HOWTO(R_SPARC_LO10, 0,2,10,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_LO10", FALSE,0,0x000003ff,TRUE),
|
|
HOWTO(R_SPARC_GOT10, 0,2,10,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT10", FALSE,0,0x000003ff,TRUE),
|
|
HOWTO(R_SPARC_GOT13, 0,2,13,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT13", FALSE,0,0x00001fff,TRUE),
|
|
HOWTO(R_SPARC_GOT22, 10,2,22,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT22", FALSE,0,0x003fffff,TRUE),
|
|
HOWTO(R_SPARC_PC10, 0,2,10,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC10", FALSE,0,0x000003ff,TRUE),
|
|
HOWTO(R_SPARC_PC22, 0,2,22,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC22", FALSE,0,0x003fffff,TRUE),
|
|
HOWTO(R_SPARC_WPLT30, 0,0,00,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_WPLT30", FALSE,0,0x00000000,TRUE),
|
|
HOWTO(R_SPARC_COPY, 0,0,00,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_COPY", FALSE,0,0x00000000,TRUE),
|
|
HOWTO(R_SPARC_GLOB_DAT,0,0,00,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_GLOB_DAT",FALSE,0,0x00000000,TRUE),
|
|
HOWTO(R_SPARC_JMP_SLOT,0,0,00,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_JMP_SLOT",FALSE,0,0x00000000,TRUE),
|
|
HOWTO(R_SPARC_RELATIVE,0,0,00,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_RELATIVE",FALSE,0,0x00000000,TRUE),
|
|
HOWTO(R_SPARC_UA32, 0,0,00,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_UA32", FALSE,0,0x00000000,TRUE),
|
|
};
|
|
|
|
struct coff_reloc_map
|
|
{
|
|
bfd_reloc_code_real_type bfd_reloc_val;
|
|
unsigned char coff_reloc_val;
|
|
};
|
|
|
|
static const struct coff_reloc_map sparc_reloc_map[] =
|
|
{
|
|
{ BFD_RELOC_NONE, R_SPARC_NONE, },
|
|
{ BFD_RELOC_16, R_SPARC_16, },
|
|
{ BFD_RELOC_8, R_SPARC_8 },
|
|
{ BFD_RELOC_8_PCREL, R_SPARC_DISP8 },
|
|
{ BFD_RELOC_CTOR, R_SPARC_32 }, /* @@ Assumes 32 bits. */
|
|
{ BFD_RELOC_32, R_SPARC_32 },
|
|
{ BFD_RELOC_32_PCREL, R_SPARC_DISP32 },
|
|
{ BFD_RELOC_HI22, R_SPARC_HI22 },
|
|
{ BFD_RELOC_LO10, R_SPARC_LO10, },
|
|
{ BFD_RELOC_32_PCREL_S2, R_SPARC_WDISP30 },
|
|
{ BFD_RELOC_SPARC22, R_SPARC_22 },
|
|
{ BFD_RELOC_SPARC13, R_SPARC_13 },
|
|
{ BFD_RELOC_SPARC_GOT10, R_SPARC_GOT10 },
|
|
{ BFD_RELOC_SPARC_GOT13, R_SPARC_GOT13 },
|
|
{ BFD_RELOC_SPARC_GOT22, R_SPARC_GOT22 },
|
|
{ BFD_RELOC_SPARC_PC10, R_SPARC_PC10 },
|
|
{ BFD_RELOC_SPARC_PC22, R_SPARC_PC22 },
|
|
{ BFD_RELOC_SPARC_WPLT30, R_SPARC_WPLT30 },
|
|
{ BFD_RELOC_SPARC_COPY, R_SPARC_COPY },
|
|
{ BFD_RELOC_SPARC_GLOB_DAT, R_SPARC_GLOB_DAT },
|
|
{ BFD_RELOC_SPARC_JMP_SLOT, R_SPARC_JMP_SLOT },
|
|
{ BFD_RELOC_SPARC_RELATIVE, R_SPARC_RELATIVE },
|
|
{ BFD_RELOC_SPARC_WDISP22, R_SPARC_WDISP22 },
|
|
/* { BFD_RELOC_SPARC_UA32, R_SPARC_UA32 }, not used?? */
|
|
};
|
|
|
|
static reloc_howto_type *
|
|
coff_sparc_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
|
|
bfd_reloc_code_real_type code)
|
|
{
|
|
unsigned int i;
|
|
for (i = 0; i < sizeof (sparc_reloc_map) / sizeof (struct coff_reloc_map); i++)
|
|
{
|
|
if (sparc_reloc_map[i].bfd_reloc_val == code)
|
|
return &coff_sparc_howto_table[(int) sparc_reloc_map[i].coff_reloc_val];
|
|
}
|
|
return 0;
|
|
}
|
|
#define coff_bfd_reloc_type_lookup coff_sparc_reloc_type_lookup
|
|
|
|
static reloc_howto_type *
|
|
coff_sparc_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
|
|
const char *r_name)
|
|
{
|
|
unsigned int i;
|
|
|
|
for (i = 0;
|
|
i < (sizeof (coff_sparc_howto_table)
|
|
/ sizeof (coff_sparc_howto_table[0]));
|
|
i++)
|
|
if (coff_sparc_howto_table[i].name != NULL
|
|
&& strcasecmp (coff_sparc_howto_table[i].name, r_name) == 0)
|
|
return &coff_sparc_howto_table[i];
|
|
|
|
return NULL;
|
|
}
|
|
#define coff_bfd_reloc_name_lookup coff_sparc_reloc_name_lookup
|
|
|
|
static void
|
|
rtype2howto (arelent *cache_ptr, struct internal_reloc *dst)
|
|
{
|
|
BFD_ASSERT (dst->r_type < (unsigned int) R_SPARC_max);
|
|
cache_ptr->howto = &coff_sparc_howto_table[dst->r_type];
|
|
}
|
|
|
|
#define RTYPE2HOWTO(internal, relocentry) rtype2howto(internal,relocentry)
|
|
|
|
#define SWAP_IN_RELOC_OFFSET H_GET_32
|
|
#define SWAP_OUT_RELOC_OFFSET H_PUT_32
|
|
#define CALC_ADDEND(abfd, ptr, reloc, cache_ptr) \
|
|
cache_ptr->addend = reloc.r_offset;
|
|
|
|
/* Clear the r_spare field in relocs. */
|
|
#define SWAP_OUT_RELOC_EXTRA(abfd,src,dst) \
|
|
do { \
|
|
dst->r_spare[0] = 0; \
|
|
dst->r_spare[1] = 0; \
|
|
} while (0)
|
|
|
|
#define __A_MAGIC_SET__
|
|
|
|
/* Enable Sparc-specific hacks in coffcode.h. */
|
|
|
|
#define COFF_SPARC
|
|
|
|
#define bfd_pe_print_pdata NULL
|
|
|
|
#include "coffcode.h"
|
|
|
|
#ifndef TARGET_SYM
|
|
#define TARGET_SYM sparc_coff_vec
|
|
#endif
|
|
|
|
#ifndef TARGET_NAME
|
|
#define TARGET_NAME "coff-sparc"
|
|
#endif
|
|
|
|
CREATE_BIG_COFF_TARGET_VEC (TARGET_SYM, TARGET_NAME, D_PAGED, 0, '_', NULL, COFF_SWAP_TABLE)
|