/* Sparc64 specific support for Elf loading and relocation. Copyright 1997 Linux International. Contributed by Jakub Jelinek This file is part of the Linux modutils. 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 2 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ #ident "$Id: obj_sparc64.c,v 1.1.1.5 2000/12/04 19:27:25 msw Exp $" #include #include #include #include /*======================================================================*/ struct obj_file * arch_new_file (void) { return xmalloc(sizeof(struct obj_file)); } struct obj_section * arch_new_section (void) { return xmalloc(sizeof(struct obj_section)); } struct obj_symbol * arch_new_symbol (void) { return xmalloc(sizeof(struct obj_symbol)); } #ifdef BROKEN_SPARC64_RELOCS #undef R_SPARC_PLT32 #undef R_SPARC_HIPLT22 #undef R_SPARC_LOPLT10 #undef R_SPARC_PCPLT32 #undef R_SPARC_PCPLT22 #undef R_SPARC_PCPLT10 #undef R_SPARC_10 #undef R_SPARC_11 #undef R_SPARC_64 #undef R_SPARC_OLO10 #undef R_SPARC_HH22 #undef R_SPARC_HM10 #undef R_SPARC_LM22 #undef R_SPARC_PC_HH22 #undef R_SPARC_PC_HM10 #undef R_SPARC_PC_LM22 #undef R_SPARC_WDISP16 #undef R_SPARC_WDISP19 #undef R_SPARC_GLOB_JMP #undef R_SPARC_7 #undef R_SPARC_5 #undef R_SPARC_6 #define R_SPARC_10 24 #define R_SPARC_11 25 #define R_SPARC_64 26 #define R_SPARC_OLO10 27 #define R_SPARC_HH22 28 #define R_SPARC_HM10 29 #define R_SPARC_LM22 30 #define R_SPARC_PC_HH22 31 #define R_SPARC_PC_HM10 32 #define R_SPARC_PC_LM22 33 #define R_SPARC_WDISP16 34 #define R_SPARC_WDISP19 35 #define R_SPARC_GLOB_JMP 36 #define R_SPARC_7 37 #define R_SPARC_5 38 #define R_SPARC_6 39 #else #ifndef R_SPARC_64 #define R_SPARC_64 32 #define R_SPARC_OLO10 33 #define R_SPARC_HH22 34 #define R_SPARC_HM10 35 #define R_SPARC_LM22 36 #define R_SPARC_PC_HH22 37 #define R_SPARC_PC_HM10 38 #define R_SPARC_PC_LM22 39 #endif #endif int arch_load_proc_section(struct obj_section *sec, int fp) { /* Assume it's just a debugging section that we can safely ignore ... */ sec->contents = NULL; return 0; } #define ELF64_R_TYPE_ID(info) ((info) & 0xff) #define ELF64_R_TYPE_DATA(info) ((info) >> 8) enum obj_reloc arch_apply_relocation (struct obj_file *ef, struct obj_section *targsec, struct obj_section *symsec, struct obj_symbol *sym, Elf64_Rela *rel, Elf64_Addr v) { unsigned int *loc = (unsigned int *)(targsec->contents + rel->r_offset); unsigned int dot = targsec->header.sh_addr + rel->r_offset; enum obj_reloc ret = obj_reloc_ok; switch (ELF64_R_TYPE_ID(rel->r_info)) { case R_SPARC_NONE: break; case R_SPARC_64: case R_SPARC_UA64: if (! ((long) loc & 3)) { /* Common in .eh_frame */ ((unsigned int *) loc) [0] = v >> 32; ((unsigned int *) loc) [1] = v; break; } ((unsigned char *) loc) [0] = v >> 56; ((unsigned char *) loc) [1] = v >> 48; ((unsigned char *) loc) [2] = v >> 40; ((unsigned char *) loc) [3] = v >> 32; ((unsigned char *) loc) [4] = v >> 24; ((unsigned char *) loc) [5] = v >> 16; ((unsigned char *) loc) [6] = v >> 8; ((unsigned char *) loc) [7] = v; break; case R_SPARC_32: case R_SPARC_UA32: if (! ((long) loc & 3)) { *loc = v; break; } ((unsigned char *) loc) [0] = v >> 24; ((unsigned char *) loc) [1] = v >> 16; ((unsigned char *) loc) [2] = v >> 8; ((unsigned char *) loc) [3] = v; break; case R_SPARC_16: if (v > 0xffff) ret = obj_reloc_overflow; *loc = (*loc & ~0xffff) | (v & 0xffff); break; case R_SPARC_8: if (v > 0xff) ret = obj_reloc_overflow; *loc = (*loc & ~0xff) | (v & 0xff); break; case R_SPARC_DISP32: v -= dot; *loc = v; break; case R_SPARC_DISP16: v -= dot; if (v > 0xffff) ret = obj_reloc_overflow; *loc = (*loc & ~0xffff) | (v & 0xffff); break; case R_SPARC_DISP8: v -= dot; if (v > 0xff) ret = obj_reloc_overflow; *loc = (*loc & ~0xff) | (v & 0xff); break; case R_SPARC_WDISP30: v -= dot; if (v % 4) ret = obj_reloc_dangerous; *loc = (*loc & ~0x3fffffff) | ((v >> 2) & 0x3fffffff); break; /* MEDLOW code model relocs */ case R_SPARC_LO10: *loc = (*loc & ~0x3ff) | (v & 0x3ff); break; case R_SPARC_HI22: *loc = (*loc & ~0x3fffff) | (v >> 10); break; case R_SPARC_OLO10: *loc = (*loc & ~0x1fff) | (((v & 0x3ff) + ELF64_R_TYPE_DATA (rel->r_info)) & 0x1fff); break; /* MEDMID code model relocs */ case R_SPARC_H44: *loc = (*loc & ~0x3fffff) | (v >> 22); break; case R_SPARC_M44: *loc = (*loc & ~0x3ff) | ((v >> 12) & 0x3ff); break; case R_SPARC_L44: *loc = (*loc & ~0xfff) | (v & 0xfff); break; /* MEDANY code model relocs */ case R_SPARC_HH22: *loc = (*loc & ~0x3fffff) | (v >> 42); break; case R_SPARC_HM10: *loc = (*loc & ~0x3ff) | ((v >> 32) & 0x3ff); break; case R_SPARC_LM22: *loc = (*loc & ~0x3fffff) | ((v >> 10) & 0x3fffff); break; case R_SPARC_WDISP22: v -= dot; if (v % 4) ret = obj_reloc_dangerous; *loc = (*loc & ~0x3fffff) | ((v >> 2) & 0x3fffff); break; case R_SPARC_22: if (v > 0x3fffff) ret = obj_reloc_overflow; *loc = (*loc & ~0x3fffff) | (v & 0x3fffff); break; case R_SPARC_13: if (v > 0x1fff) ret = obj_reloc_overflow; *loc = (*loc & ~0x1fff) | (v & 0x1fff); break; case R_SPARC_PC10: v -= dot; *loc = (*loc & ~0x3ff) | (v & 0x3ff); break; case R_SPARC_PC22: v -= dot; *loc = (*loc & ~0x3fffff) | ((v >> 10) & 0x3fffff); break; #ifdef R_SPARC_10 case R_SPARC_10: if (v > 0x3ff) ret = obj_reloc_overflow; *loc = (*loc & ~0x3ff) | (v & 0x3ff); break; case R_SPARC_11: if (v > 0x7ff) ret = obj_reloc_overflow; *loc = (*loc & ~0x7ff) | (v & 0x7ff); break; #ifdef R_SPARC_64 case R_SPARC_PC_HH22: v -= dot; *loc = (*loc & ~0x3fffff) | (v >> 42); break; case R_SPARC_PC_HM10: v -= dot; *loc = (*loc & ~0x3ff) | ((v >> 32) & 0x3ff); break; case R_SPARC_PC_LM22: v -= dot; *loc = (*loc & ~0x3fffff) | ((v >> 10) & 0x3fffff); break; #endif case R_SPARC_WDISP16: v -= dot; if (v % 4) ret = obj_reloc_dangerous; *loc = (*loc & ~0x303fff) | ((v << 4) & 0x300000) | ((v >> 2) & 0x3fff); break; case R_SPARC_WDISP19: v -= dot; if (v % 4) ret = obj_reloc_dangerous; *loc = (*loc & ~0x7ffff) | ((v >> 2) & 0x7ffff); break; case R_SPARC_7: if (v > 0x7f) ret = obj_reloc_overflow; *loc = (*loc & ~0x7f) | (v & 0x7f); break; case R_SPARC_5: if (v > 0x1f) ret = obj_reloc_overflow; *loc = (*loc & ~0x1f) | (v & 0x1f); break; case R_SPARC_6: if (v > 0x3f) ret = obj_reloc_overflow; *loc = (*loc & ~0x3f) | (v & 0x3f); break; #endif /* R_SPARC_10 */ default: ret = obj_reloc_unhandled; break; } return ret; } int arch_create_got (struct obj_file *ef) { return 1; } int arch_init_module (struct obj_file *f, struct module *mod) { return 1; } int arch_finalize_section_address(struct obj_file *f, Elf64_Addr base) { int i, n = f->header.e_shnum; f->baseaddr = base; for (i = 0; i < n; ++i) f->sections[i]->header.sh_addr += base; return 1; } int arch_archdata (struct obj_file *fin, struct obj_section *sec) { return 0; }