hc
2023-11-20 3c9370f7b6bffd697c9907a7139e9df5b0d4b9df
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
/*
 * linux/arch/unicore32/kernel/module.c
 *
 * Code specific to PKUnity SoC and UniCore ISA
 *
 * Copyright (C) 2001-2010 GUAN Xue-tao
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation.
 */
#include <linux/module.h>
#include <linux/moduleloader.h>
#include <linux/kernel.h>
#include <linux/mm.h>
#include <linux/elf.h>
#include <linux/vmalloc.h>
#include <linux/fs.h>
#include <linux/string.h>
#include <linux/gfp.h>
 
#include <asm/pgtable.h>
#include <asm/sections.h>
 
void *module_alloc(unsigned long size)
{
   return __vmalloc_node_range(size, 1, MODULES_VADDR, MODULES_END,
               GFP_KERNEL, PAGE_KERNEL_EXEC, 0, NUMA_NO_NODE,
               __builtin_return_address(0));
}
 
int
apply_relocate(Elf32_Shdr *sechdrs, const char *strtab, unsigned int symindex,
          unsigned int relindex, struct module *module)
{
   Elf32_Shdr *symsec = sechdrs + symindex;
   Elf32_Shdr *relsec = sechdrs + relindex;
   Elf32_Shdr *dstsec = sechdrs + relsec->sh_info;
   Elf32_Rel *rel = (void *)relsec->sh_addr;
   unsigned int i;
 
   for (i = 0; i < relsec->sh_size / sizeof(Elf32_Rel); i++, rel++) {
       unsigned long loc;
       Elf32_Sym *sym;
       s32 offset;
 
       offset = ELF32_R_SYM(rel->r_info);
       if (offset < 0 || offset >
               (symsec->sh_size / sizeof(Elf32_Sym))) {
           printk(KERN_ERR "%s: bad relocation, "
                   "section %d reloc %d\n",
                   module->name, relindex, i);
           return -ENOEXEC;
       }
 
       sym = ((Elf32_Sym *)symsec->sh_addr) + offset;
 
       if (rel->r_offset < 0 || rel->r_offset >
               dstsec->sh_size - sizeof(u32)) {
           printk(KERN_ERR "%s: out of bounds relocation, "
               "section %d reloc %d offset %d size %d\n",
               module->name, relindex, i, rel->r_offset,
               dstsec->sh_size);
           return -ENOEXEC;
       }
 
       loc = dstsec->sh_addr + rel->r_offset;
 
       switch (ELF32_R_TYPE(rel->r_info)) {
       case R_UNICORE_NONE:
           /* ignore */
           break;
 
       case R_UNICORE_ABS32:
           *(u32 *)loc += sym->st_value;
           break;
 
       case R_UNICORE_PC24:
       case R_UNICORE_CALL:
       case R_UNICORE_JUMP24:
           offset = (*(u32 *)loc & 0x00ffffff) << 2;
           if (offset & 0x02000000)
               offset -= 0x04000000;
 
           offset += sym->st_value - loc;
           if (offset & 3 ||
               offset <= (s32)0xfe000000 ||
               offset >= (s32)0x02000000) {
               printk(KERN_ERR
                      "%s: relocation out of range, section "
                      "%d reloc %d sym '%s'\n", module->name,
                      relindex, i, strtab + sym->st_name);
               return -ENOEXEC;
           }
 
           offset >>= 2;
 
           *(u32 *)loc &= 0xff000000;
           *(u32 *)loc |= offset & 0x00ffffff;
           break;
 
       default:
           printk(KERN_ERR "%s: unknown relocation: %u\n",
                  module->name, ELF32_R_TYPE(rel->r_info));
           return -ENOEXEC;
       }
   }
   return 0;
}