1/* BFD back-end for Sparc COFF files. 2 Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1999, 2000, 2001, 3 2002, 2003, 2005, 2007 Free Software Foundation, Inc. 4 Written by Cygnus Support. 5 6 This file is part of BFD, the Binary File Descriptor library. 7 8 This program is free software; you can redistribute it and/or modify 9 it under the terms of the GNU General Public License as published by 10 the Free Software Foundation; either version 3 of the License, or 11 (at your option) any later version. 12 13 This program is distributed in the hope that it will be useful, 14 but WITHOUT ANY WARRANTY; without even the implied warranty of 15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 16 GNU General Public License for more details. 17 18 You should have received a copy of the GNU General Public License 19 along with this program; if not, write to the Free Software 20 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, 21 MA 02110-1301, USA. */ 22 23#include "sysdep.h" 24#include "bfd.h" 25#include "libbfd.h" 26#include "coff/sparc.h" 27#include "coff/internal.h" 28#include "libcoff.h" 29 30#define COFF_DEFAULT_SECTION_ALIGNMENT_POWER (3) 31 32#define BADMAG(x) ((x).f_magic != SPARCMAGIC && (x).f_magic != LYNXCOFFMAGIC) 33 34/* The page size is a guess based on ELF. */ 35#define COFF_PAGE_SIZE 0x10000 36 37 38static reloc_howto_type *coff_sparc_reloc_type_lookup 39 PARAMS ((bfd *, bfd_reloc_code_real_type)); 40static void rtype2howto PARAMS ((arelent *, struct internal_reloc *)); 41 42enum reloc_type 43 { 44 R_SPARC_NONE = 0, 45 R_SPARC_8, R_SPARC_16, R_SPARC_32, 46 R_SPARC_DISP8, R_SPARC_DISP16, R_SPARC_DISP32, 47 R_SPARC_WDISP30, R_SPARC_WDISP22, 48 R_SPARC_HI22, R_SPARC_22, 49 R_SPARC_13, R_SPARC_LO10, 50 R_SPARC_GOT10, R_SPARC_GOT13, R_SPARC_GOT22, 51 R_SPARC_PC10, R_SPARC_PC22, 52 R_SPARC_WPLT30, 53 R_SPARC_COPY, 54 R_SPARC_GLOB_DAT, R_SPARC_JMP_SLOT, 55 R_SPARC_RELATIVE, 56 R_SPARC_UA32, 57 R_SPARC_max 58 }; 59 60/* This is stolen pretty directly from elf.c. */ 61static bfd_reloc_status_type 62bfd_coff_generic_reloc PARAMS ((bfd *, arelent *, asymbol *, PTR, 63 asection *, bfd *, char **)); 64 65static bfd_reloc_status_type 66bfd_coff_generic_reloc (abfd, reloc_entry, symbol, data, input_section, 67 output_bfd, error_message) 68 bfd *abfd ATTRIBUTE_UNUSED; 69 arelent *reloc_entry; 70 asymbol *symbol; 71 PTR data ATTRIBUTE_UNUSED; 72 asection *input_section; 73 bfd *output_bfd; 74 char **error_message ATTRIBUTE_UNUSED; 75{ 76 if (output_bfd != (bfd *) NULL 77 && (symbol->flags & BSF_SECTION_SYM) == 0) 78 { 79 reloc_entry->address += input_section->output_offset; 80 return bfd_reloc_ok; 81 } 82 83 return bfd_reloc_continue; 84} 85 86static reloc_howto_type coff_sparc_howto_table[] = 87{ 88 HOWTO(R_SPARC_NONE, 0,0, 0,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_NONE", FALSE,0,0x00000000,TRUE), 89 HOWTO(R_SPARC_8, 0,0, 8,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_8", FALSE,0,0x000000ff,TRUE), 90 HOWTO(R_SPARC_16, 0,1,16,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_16", FALSE,0,0x0000ffff,TRUE), 91 HOWTO(R_SPARC_32, 0,2,32,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_32", FALSE,0,0xffffffff,TRUE), 92 HOWTO(R_SPARC_DISP8, 0,0, 8,TRUE, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP8", FALSE,0,0x000000ff,TRUE), 93 HOWTO(R_SPARC_DISP16, 0,1,16,TRUE, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP16", FALSE,0,0x0000ffff,TRUE), 94 HOWTO(R_SPARC_DISP32, 0,2,32,TRUE, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP32", FALSE,0,0x00ffffff,TRUE), 95 HOWTO(R_SPARC_WDISP30, 2,2,30,TRUE, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_WDISP30", FALSE,0,0x3fffffff,TRUE), 96 HOWTO(R_SPARC_WDISP22, 2,2,22,TRUE, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_WDISP22", FALSE,0,0x003fffff,TRUE), 97 HOWTO(R_SPARC_HI22, 10,2,22,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_HI22", FALSE,0,0x003fffff,TRUE), 98 HOWTO(R_SPARC_22, 0,2,22,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_22", FALSE,0,0x003fffff,TRUE), 99 HOWTO(R_SPARC_13, 0,2,13,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_13", FALSE,0,0x00001fff,TRUE), 100 HOWTO(R_SPARC_LO10, 0,2,10,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_LO10", FALSE,0,0x000003ff,TRUE), 101 HOWTO(R_SPARC_GOT10, 0,2,10,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT10", FALSE,0,0x000003ff,TRUE), 102 HOWTO(R_SPARC_GOT13, 0,2,13,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT13", FALSE,0,0x00001fff,TRUE), 103 HOWTO(R_SPARC_GOT22, 10,2,22,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT22", FALSE,0,0x003fffff,TRUE), 104 HOWTO(R_SPARC_PC10, 0,2,10,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC10", FALSE,0,0x000003ff,TRUE), 105 HOWTO(R_SPARC_PC22, 0,2,22,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC22", FALSE,0,0x003fffff,TRUE), 106 HOWTO(R_SPARC_WPLT30, 0,0,00,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_WPLT30", FALSE,0,0x00000000,TRUE), 107 HOWTO(R_SPARC_COPY, 0,0,00,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_COPY", FALSE,0,0x00000000,TRUE), 108 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), 109 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), 110 HOWTO(R_SPARC_RELATIVE,0,0,00,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_RELATIVE",FALSE,0,0x00000000,TRUE), 111 HOWTO(R_SPARC_UA32, 0,0,00,FALSE,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_UA32", FALSE,0,0x00000000,TRUE), 112}; 113 114struct coff_reloc_map { 115 bfd_reloc_code_real_type bfd_reloc_val; 116 unsigned char coff_reloc_val; 117}; 118 119static const struct coff_reloc_map sparc_reloc_map[] = 120{ 121 { BFD_RELOC_NONE, R_SPARC_NONE, }, 122 { BFD_RELOC_16, R_SPARC_16, }, 123 { BFD_RELOC_8, R_SPARC_8 }, 124 { BFD_RELOC_8_PCREL, R_SPARC_DISP8 }, 125 { BFD_RELOC_CTOR, R_SPARC_32 }, /* @@ Assumes 32 bits. */ 126 { BFD_RELOC_32, R_SPARC_32 }, 127 { BFD_RELOC_32_PCREL, R_SPARC_DISP32 }, 128 { BFD_RELOC_HI22, R_SPARC_HI22 }, 129 { BFD_RELOC_LO10, R_SPARC_LO10, }, 130 { BFD_RELOC_32_PCREL_S2, R_SPARC_WDISP30 }, 131 { BFD_RELOC_SPARC22, R_SPARC_22 }, 132 { BFD_RELOC_SPARC13, R_SPARC_13 }, 133 { BFD_RELOC_SPARC_GOT10, R_SPARC_GOT10 }, 134 { BFD_RELOC_SPARC_GOT13, R_SPARC_GOT13 }, 135 { BFD_RELOC_SPARC_GOT22, R_SPARC_GOT22 }, 136 { BFD_RELOC_SPARC_PC10, R_SPARC_PC10 }, 137 { BFD_RELOC_SPARC_PC22, R_SPARC_PC22 }, 138 { BFD_RELOC_SPARC_WPLT30, R_SPARC_WPLT30 }, 139 { BFD_RELOC_SPARC_COPY, R_SPARC_COPY }, 140 { BFD_RELOC_SPARC_GLOB_DAT, R_SPARC_GLOB_DAT }, 141 { BFD_RELOC_SPARC_JMP_SLOT, R_SPARC_JMP_SLOT }, 142 { BFD_RELOC_SPARC_RELATIVE, R_SPARC_RELATIVE }, 143 { BFD_RELOC_SPARC_WDISP22, R_SPARC_WDISP22 }, 144 /* { BFD_RELOC_SPARC_UA32, R_SPARC_UA32 }, not used?? */ 145}; 146 147static reloc_howto_type * 148coff_sparc_reloc_type_lookup (abfd, code) 149 bfd *abfd ATTRIBUTE_UNUSED; 150 bfd_reloc_code_real_type code; 151{ 152 unsigned int i; 153 for (i = 0; i < sizeof (sparc_reloc_map) / sizeof (struct coff_reloc_map); i++) 154 { 155 if (sparc_reloc_map[i].bfd_reloc_val == code) 156 return &coff_sparc_howto_table[(int) sparc_reloc_map[i].coff_reloc_val]; 157 } 158 return 0; 159} 160#define coff_bfd_reloc_type_lookup coff_sparc_reloc_type_lookup 161 162static reloc_howto_type * 163coff_sparc_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED, 164 const char *r_name) 165{ 166 unsigned int i; 167 168 for (i = 0; 169 i < (sizeof (coff_sparc_howto_table) 170 / sizeof (coff_sparc_howto_table[0])); 171 i++) 172 if (coff_sparc_howto_table[i].name != NULL 173 && strcasecmp (coff_sparc_howto_table[i].name, r_name) == 0) 174 return &coff_sparc_howto_table[i]; 175 176 return NULL; 177} 178#define coff_bfd_reloc_name_lookup coff_sparc_reloc_name_lookup 179 180static void 181rtype2howto (cache_ptr, dst) 182 arelent *cache_ptr; 183 struct internal_reloc *dst; 184{ 185 BFD_ASSERT (dst->r_type < (unsigned int) R_SPARC_max); 186 cache_ptr->howto = &coff_sparc_howto_table[dst->r_type]; 187} 188 189#define RTYPE2HOWTO(internal, relocentry) rtype2howto(internal,relocentry) 190 191#define SWAP_IN_RELOC_OFFSET H_GET_32 192#define SWAP_OUT_RELOC_OFFSET H_PUT_32 193#define CALC_ADDEND(abfd, ptr, reloc, cache_ptr) \ 194 cache_ptr->addend = reloc.r_offset; 195 196/* Clear the r_spare field in relocs. */ 197#define SWAP_OUT_RELOC_EXTRA(abfd,src,dst) \ 198 do { \ 199 dst->r_spare[0] = 0; \ 200 dst->r_spare[1] = 0; \ 201 } while (0) 202 203#define __A_MAGIC_SET__ 204 205/* Enable Sparc-specific hacks in coffcode.h. */ 206 207#define COFF_SPARC 208 209#include "coffcode.h" 210 211#ifndef TARGET_SYM 212#define TARGET_SYM sparccoff_vec 213#endif 214 215#ifndef TARGET_NAME 216#define TARGET_NAME "coff-sparc" 217#endif 218 219CREATE_BIG_COFF_TARGET_VEC (TARGET_SYM, TARGET_NAME, D_PAGED, 0, '_', NULL, COFF_SWAP_TABLE) 220