1 // SPDX-License-Identifier: GPL-2.0-only 2 /* 3 * Kernel module loader for Hexagon 4 * 5 * Copyright (c) 2010-2011, The Linux Foundation. All rights reserved. 6 */ 7 8 #include <asm/module.h> 9 #include <linux/elf.h> 10 #include <linux/module.h> 11 #include <linux/moduleloader.h> 12 #include <linux/vmalloc.h> 13 14 #if 0 15 #define DEBUGP printk 16 #else 17 #define DEBUGP(fmt , ...) 18 #endif 19 20 /* 21 * module_frob_arch_sections - tweak got/plt sections. 22 * @hdr - pointer to elf header 23 * @sechdrs - pointer to elf load section headers 24 * @secstrings - symbol names 25 * @mod - pointer to module 26 */ module_frob_arch_sections(Elf_Ehdr * hdr,Elf_Shdr * sechdrs,char * secstrings,struct module * mod)27 int module_frob_arch_sections(Elf_Ehdr *hdr, Elf_Shdr *sechdrs, 28 char *secstrings, 29 struct module *mod) 30 { 31 unsigned int i; 32 int found = 0; 33 34 /* Look for .plt and/or .got.plt and/or .init.plt sections */ 35 for (i = 0; i < hdr->e_shnum; i++) { 36 DEBUGP("Section %d is %s\n", i, 37 secstrings + sechdrs[i].sh_name); 38 if (strcmp(secstrings + sechdrs[i].sh_name, ".plt") == 0) 39 found = i+1; 40 if (strcmp(secstrings + sechdrs[i].sh_name, ".got.plt") == 0) 41 found = i+1; 42 if (strcmp(secstrings + sechdrs[i].sh_name, ".rela.plt") == 0) 43 found = i+1; 44 } 45 46 /* At this time, we don't support modules comiled with -shared */ 47 if (found) { 48 printk(KERN_WARNING 49 "Module '%s' contains unexpected .plt/.got sections.\n", 50 mod->name); 51 /* return -ENOEXEC; */ 52 } 53 54 return 0; 55 } 56 57 /* 58 * apply_relocate_add - perform rela relocations. 59 * @sechdrs - pointer to section headers 60 * @strtab - some sort of start address? 61 * @symindex - symbol index offset or something? 62 * @relsec - address to relocate to? 63 * @module - pointer to module 64 * 65 * Perform rela relocations. 66 */ apply_relocate_add(Elf_Shdr * sechdrs,const char * strtab,unsigned int symindex,unsigned int relsec,struct module * module)67 int apply_relocate_add(Elf_Shdr *sechdrs, const char *strtab, 68 unsigned int symindex, unsigned int relsec, 69 struct module *module) 70 { 71 unsigned int i; 72 Elf32_Sym *sym; 73 uint32_t *location; 74 uint32_t value; 75 unsigned int nrelocs = sechdrs[relsec].sh_size / sizeof(Elf32_Rela); 76 Elf32_Rela *rela = (void *)sechdrs[relsec].sh_addr; 77 Elf32_Word sym_info = sechdrs[relsec].sh_info; 78 Elf32_Sym *sym_base = (Elf32_Sym *) sechdrs[symindex].sh_addr; 79 void *loc_base = (void *) sechdrs[sym_info].sh_addr; 80 81 DEBUGP("Applying relocations in section %u to section %u base=%p\n", 82 relsec, sym_info, loc_base); 83 84 for (i = 0; i < nrelocs; i++) { 85 86 /* Symbol to relocate */ 87 sym = sym_base + ELF32_R_SYM(rela[i].r_info); 88 89 /* Where to make the change */ 90 location = loc_base + rela[i].r_offset; 91 92 /* `Everything is relative'. */ 93 value = sym->st_value + rela[i].r_addend; 94 95 DEBUGP("%d: value=%08x loc=%p reloc=%d symbol=%s\n", 96 i, value, location, ELF32_R_TYPE(rela[i].r_info), 97 sym->st_name ? 98 &strtab[sym->st_name] : "(anonymous)"); 99 100 switch (ELF32_R_TYPE(rela[i].r_info)) { 101 case R_HEXAGON_B22_PCREL: { 102 int dist = (int)(value - (uint32_t)location); 103 if ((dist < -0x00800000) || 104 (dist >= 0x00800000)) { 105 printk(KERN_ERR 106 "%s: %s: %08x=%08x-%08x %s\n", 107 module->name, 108 "R_HEXAGON_B22_PCREL reloc out of range", 109 dist, value, (uint32_t)location, 110 sym->st_name ? 111 &strtab[sym->st_name] : "(anonymous)"); 112 return -ENOEXEC; 113 } 114 DEBUGP("B22_PCREL contents: %08X.\n", *location); 115 *location &= ~0x01ff3fff; 116 *location |= 0x00003fff & dist; 117 *location |= 0x01ff0000 & (dist<<2); 118 DEBUGP("Contents after reloc: %08x\n", *location); 119 break; 120 } 121 case R_HEXAGON_HI16: 122 value = (value>>16) & 0xffff; 123 fallthrough; 124 case R_HEXAGON_LO16: 125 *location &= ~0x00c03fff; 126 *location |= value & 0x3fff; 127 *location |= (value & 0xc000) << 8; 128 break; 129 case R_HEXAGON_32: 130 *location = value; 131 break; 132 case R_HEXAGON_32_PCREL: 133 *location = value - (uint32_t)location; 134 break; 135 case R_HEXAGON_PLT_B22_PCREL: 136 case R_HEXAGON_GOTOFF_LO16: 137 case R_HEXAGON_GOTOFF_HI16: 138 printk(KERN_ERR "%s: GOT/PLT relocations unsupported\n", 139 module->name); 140 return -ENOEXEC; 141 default: 142 printk(KERN_ERR "%s: unknown relocation: %u\n", 143 module->name, 144 ELF32_R_TYPE(rela[i].r_info)); 145 return -ENOEXEC; 146 } 147 } 148 return 0; 149 } 150