hc
2024-12-19 9370bb92b2d16684ee45cf24e879c93c509162da
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
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
/*
 * This file is subject to the terms and conditions of the GNU General Public
 * License.  See the file COPYING in the main directory of this archive
 * for more details.
 */
 
#include <linux/moduleloader.h>
#include <linux/elf.h>
#include <linux/vmalloc.h>
#include <linux/fs.h>
#include <linux/string.h>
#include <linux/kernel.h>
 
#if 0
#define DEBUGP(fmt, ...) printk(KERN_DEBUG pr_fmt(fmt), ##__VA_ARGS__)
#else
#define DEBUGP(fmt, ...) no_printk(KERN_DEBUG pr_fmt(fmt), ##__VA_ARGS__)
#endif
 
#ifdef CONFIG_MODULES
 
int apply_relocate(Elf32_Shdr *sechdrs,
          const char *strtab,
          unsigned int symindex,
          unsigned int relsec,
          struct module *me)
{
   unsigned int i;
   Elf32_Rel *rel = (void *)sechdrs[relsec].sh_addr;
   Elf32_Sym *sym;
   uint32_t *location;
 
   DEBUGP("Applying relocate section %u to %u\n", relsec,
          sechdrs[relsec].sh_info);
   for (i = 0; i < sechdrs[relsec].sh_size / sizeof(*rel); i++) {
       /* This is where to make the change */
       location = (void *)sechdrs[sechdrs[relsec].sh_info].sh_addr
           + rel[i].r_offset;
       /* This is the symbol it is referring to.  Note that all
          undefined symbols have been resolved.  */
       sym = (Elf32_Sym *)sechdrs[symindex].sh_addr
           + ELF32_R_SYM(rel[i].r_info);
 
       switch (ELF32_R_TYPE(rel[i].r_info)) {
       case R_68K_32:
           /* We add the value into the location given */
           *location += sym->st_value;
           break;
       case R_68K_PC32:
           /* Add the value, subtract its position */
           *location += sym->st_value - (uint32_t)location;
           break;
       default:
           pr_err("module %s: Unknown relocation: %u\n", me->name,
                  ELF32_R_TYPE(rel[i].r_info));
           return -ENOEXEC;
       }
   }
   return 0;
}
 
int apply_relocate_add(Elf32_Shdr *sechdrs,
              const char *strtab,
              unsigned int symindex,
              unsigned int relsec,
              struct module *me)
{
   unsigned int i;
   Elf32_Rela *rel = (void *)sechdrs[relsec].sh_addr;
   Elf32_Sym *sym;
   uint32_t *location;
 
   DEBUGP("Applying relocate_add section %u to %u\n", relsec,
          sechdrs[relsec].sh_info);
   for (i = 0; i < sechdrs[relsec].sh_size / sizeof(*rel); i++) {
       /* This is where to make the change */
       location = (void *)sechdrs[sechdrs[relsec].sh_info].sh_addr
           + rel[i].r_offset;
       /* This is the symbol it is referring to.  Note that all
          undefined symbols have been resolved.  */
       sym = (Elf32_Sym *)sechdrs[symindex].sh_addr
           + ELF32_R_SYM(rel[i].r_info);
 
       switch (ELF32_R_TYPE(rel[i].r_info)) {
       case R_68K_32:
           /* We add the value into the location given */
           *location = rel[i].r_addend + sym->st_value;
           break;
       case R_68K_PC32:
           /* Add the value, subtract its position */
           *location = rel[i].r_addend + sym->st_value - (uint32_t)location;
           break;
       default:
           pr_err("module %s: Unknown relocation: %u\n", me->name,
                  ELF32_R_TYPE(rel[i].r_info));
           return -ENOEXEC;
       }
   }
   return 0;
}
 
int module_finalize(const Elf_Ehdr *hdr,
           const Elf_Shdr *sechdrs,
           struct module *mod)
{
   module_fixup(mod, mod->arch.fixup_start, mod->arch.fixup_end);
   return 0;
}
 
#endif /* CONFIG_MODULES */
 
void module_fixup(struct module *mod, struct m68k_fixup_info *start,
         struct m68k_fixup_info *end)
{
#ifdef CONFIG_MMU
   struct m68k_fixup_info *fixup;
 
   for (fixup = start; fixup < end; fixup++) {
       switch (fixup->type) {
       case m68k_fixup_memoffset:
           *(u32 *)fixup->addr = m68k_memoffset;
           break;
       case m68k_fixup_vnode_shift:
           *(u16 *)fixup->addr += m68k_virt_to_node_shift;
           break;
       }
   }
#endif
}