arch/arc/kernel/module.c

   1 // SPDX-License-Identifier: GPL-2.0-only
   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,   /* sec index for sym tbl */
  48                        unsigned int relsec,     /* sec index for relo sec */
  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         /* Loop thru entries in relocation section */
  73         for (i = 0; i < n; i++) {
  74                 const char *s;
  75
  76                 /* This is where to make the change */
  77                 location = tgt_addr + rel_entry[i].r_offset;
  78
  79                 /* This is the symbol it is referring to.  Note that all
  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                 /* This assumes modules are built with -mlong-calls
  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))   /* ME ( S + A ) */
 103                         arc_write_me((unsigned short *)location, relocation);
 104                 else if (R_ARC_32 == relo_type)         /* ( S + A ) */
 105                         *((Elf32_Addr *) location) = relocation;
 106                 else if (R_ARC_32_PCREL == relo_type)   /* ( S + A ) - PDATA ) */
 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 /* Just before lift off: After sections have been relocated, we add the
 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 }