| 1 | |
| 2 | |
| 3 | * Copyright (C) 2004, 2007-2010, 2011-2012 Synopsys, Inc. (www.synopsys.com)
|
| 4 |
|
| 5 |
|
| 6 | #include <linux/module.h>
|
| 7 | #include <linux/moduleloader.h>
|
| 8 | #include <linux/kernel.h>
|
| 9 | #include <linux/elf.h>
|
| 10 | #include <linux/vmalloc.h>
|
| 11 | #include <linux/slab.h>
|
| 12 | #include <linux/fs.h>
|
| 13 | #include <linux/string.h>
|
| 14 | #include <asm/unwind.h>
|
| 15 |
|
| 16 | static inline void arc_write_me(unsigned short *addr, unsigned long value)
|
| 17 | {
|
| 18 | *addr = (value & 0xffff0000) >> 16;
|
| 19 | *(addr + 1) = (value & 0xffff);
|
| 20 | }
|
| 21 |
|
| 22 | |
| 23 | * This gets called before relocation loop in generic loader
|
| 24 | * Make a note of the section index of unwinding section
|
| 25 |
|
| 26 | int module_frob_arch_sections(Elf_Ehdr *hdr, Elf_Shdr *sechdrs,
|
| 27 | char *secstr, struct module *mod)
|
| 28 | {
|
| 29 | #ifdef CONFIG_ARC_DW2_UNWIND
|
| 30 | mod->arch.unw_sec_idx = 0;
|
| 31 | mod->arch.unw_info = NULL;
|
| 32 | #endif
|
| 33 | mod->arch.secstr = secstr;
|
| 34 | return 0;
|
| 35 | }
|
| 36 |
|
| 37 | void module_arch_cleanup(struct module *mod)
|
| 38 | {
|
| 39 | #ifdef CONFIG_ARC_DW2_UNWIND
|
| 40 | if (mod->arch.unw_info)
|
| 41 | unwind_remove_table(mod->arch.unw_info, 0);
|
| 42 | #endif
|
| 43 | }
|
| 44 |
|
| 45 | int apply_relocate_add(Elf32_Shdr *sechdrs,
|
| 46 | const char *strtab,
|
| 47 | unsigned int symindex,
|
| 48 | unsigned int relsec,
|
| 49 | struct module *module)
|
| 50 | {
|
| 51 | int i, n, relo_type;
|
| 52 | Elf32_Rela *rel_entry = (void *)sechdrs[relsec].sh_addr;
|
| 53 | Elf32_Sym *sym_entry, *sym_sec;
|
| 54 | Elf32_Addr relocation, location, tgt_addr;
|
| 55 | unsigned int tgtsec;
|
| 56 |
|
| 57 | |
| 58 | * @relsec has relocations e.g. .rela.init.text
|
| 59 | * @tgtsec is section to patch e.g. .init.text
|
| 60 |
|
| 61 | tgtsec = sechdrs[relsec].sh_info;
|
| 62 | tgt_addr = sechdrs[tgtsec].sh_addr;
|
| 63 | sym_sec = (Elf32_Sym *) sechdrs[symindex].sh_addr;
|
| 64 | n = sechdrs[relsec].sh_size / sizeof(*rel_entry);
|
| 65 |
|
| 66 | pr_debug("\nSection to fixup %s @%x\n",
|
| 67 | module->arch.secstr + sechdrs[tgtsec].sh_name, tgt_addr);
|
| 68 | pr_debug("=========================================================\n");
|
| 69 | pr_debug("r_off\tr_add\tst_value ADDRESS VALUE\n");
|
| 70 | pr_debug("=========================================================\n");
|
| 71 |
|
| 72 |
|
| 73 | for (i = 0; i < n; i++) {
|
| 74 | const char *s;
|
| 75 |
|
| 76 |
|
| 77 | location = tgt_addr + rel_entry[i].r_offset;
|
| 78 |
|
| 79 | |
| 80 | undefined symbols have been resolved.
|
| 81 | sym_entry = sym_sec + ELF32_R_SYM(rel_entry[i].r_info);
|
| 82 |
|
| 83 | relocation = sym_entry->st_value + rel_entry[i].r_addend;
|
| 84 |
|
| 85 | if (sym_entry->st_name == 0 && ELF_ST_TYPE (sym_entry->st_info) == STT_SECTION) {
|
| 86 | s = module->arch.secstr + sechdrs[sym_entry->st_shndx].sh_name;
|
| 87 | } else {
|
| 88 | s = strtab + sym_entry->st_name;
|
| 89 | }
|
| 90 |
|
| 91 | pr_debug(" %x\t%x\t%x %x %x [%s]\n",
|
| 92 | rel_entry[i].r_offset, rel_entry[i].r_addend,
|
| 93 | sym_entry->st_value, location, relocation, s);
|
| 94 |
|
| 95 | |
| 96 | * so any branches/jumps are absolute 32 bit jmps
|
| 97 | * global data access again is abs 32 bit.
|
| 98 | * Both of these are handled by same relocation type
|
| 99 |
|
| 100 | relo_type = ELF32_R_TYPE(rel_entry[i].r_info);
|
| 101 |
|
| 102 | if (likely(R_ARC_32_ME == relo_type))
|
| 103 | arc_write_me((unsigned short *)location, relocation);
|
| 104 | else if (R_ARC_32 == relo_type)
|
| 105 | *((Elf32_Addr *) location) = relocation;
|
| 106 | else if (R_ARC_32_PCREL == relo_type)
|
| 107 | *((Elf32_Addr *) location) = relocation - location;
|
| 108 | else
|
| 109 | goto relo_err;
|
| 110 |
|
| 111 | }
|
| 112 |
|
| 113 | #ifdef CONFIG_ARC_DW2_UNWIND
|
| 114 | if (strcmp(module->arch.secstr+sechdrs[tgtsec].sh_name, ".eh_frame") == 0)
|
| 115 | module->arch.unw_sec_idx = tgtsec;
|
| 116 | #endif
|
| 117 |
|
| 118 | return 0;
|
| 119 |
|
| 120 | relo_err:
|
| 121 | pr_err("%s: unknown relocation: %u\n",
|
| 122 | module->name, ELF32_R_TYPE(rel_entry[i].r_info));
|
| 123 | return -ENOEXEC;
|
| 124 |
|
| 125 | }
|
| 126 |
|
| 127 | |
| 128 | * dwarf section to unwinder table pool
|
| 129 | * This couldn't be done in module_frob_arch_sections() because
|
| 130 | * relocations had not been applied by then
|
| 131 |
|
| 132 | int module_finalize(const Elf32_Ehdr *hdr, const Elf_Shdr *sechdrs,
|
| 133 | struct module *mod)
|
| 134 | {
|
| 135 | #ifdef CONFIG_ARC_DW2_UNWIND
|
| 136 | void *unw;
|
| 137 | int unwsec = mod->arch.unw_sec_idx;
|
| 138 |
|
| 139 | if (unwsec) {
|
| 140 | unw = unwind_add_table(mod, (void *)sechdrs[unwsec].sh_addr,
|
| 141 | sechdrs[unwsec].sh_size);
|
| 142 | mod->arch.unw_info = unw;
|
| 143 | }
|
| 144 | #endif
|
| 145 | return 0;
|
| 146 | }
|