1 /*
2 * This file is subject to the terms and conditions of the GNU General Public
3 * License. See the file COPYING in the main directory of this archive
4 * for more details.
5 */
6
7 #include <linux/moduleloader.h>
8 #include <linux/elf.h>
9 #include <linux/vmalloc.h>
10 #include <linux/fs.h>
11 #include <linux/string.h>
12 #include <linux/kernel.h>
13
14 #if 0
15 #define DEBUGP printk
16 #else
17 #define DEBUGP(fmt...)
18 #endif
19
20 #ifdef CONFIG_MODULES
21
module_alloc(unsigned long size)22 void *module_alloc(unsigned long size)
23 {
24 if (size == 0)
25 return NULL;
26 return vmalloc(size);
27 }
28
29
30 /* Free memory returned from module_alloc */
module_free(struct module * mod,void * module_region)31 void module_free(struct module *mod, void *module_region)
32 {
33 vfree(module_region);
34 /* FIXME: If module_region == mod->init_region, trim exception
35 table entries. */
36 }
37
38 /* We don't need anything special. */
module_frob_arch_sections(Elf_Ehdr * hdr,Elf_Shdr * sechdrs,char * secstrings,struct module * mod)39 int module_frob_arch_sections(Elf_Ehdr *hdr,
40 Elf_Shdr *sechdrs,
41 char *secstrings,
42 struct module *mod)
43 {
44 return 0;
45 }
46
apply_relocate(Elf32_Shdr * sechdrs,const char * strtab,unsigned int symindex,unsigned int relsec,struct module * me)47 int apply_relocate(Elf32_Shdr *sechdrs,
48 const char *strtab,
49 unsigned int symindex,
50 unsigned int relsec,
51 struct module *me)
52 {
53 unsigned int i;
54 Elf32_Rel *rel = (void *)sechdrs[relsec].sh_addr;
55 Elf32_Sym *sym;
56 uint32_t *location;
57
58 DEBUGP("Applying relocate section %u to %u\n", relsec,
59 sechdrs[relsec].sh_info);
60 for (i = 0; i < sechdrs[relsec].sh_size / sizeof(*rel); i++) {
61 /* This is where to make the change */
62 location = (void *)sechdrs[sechdrs[relsec].sh_info].sh_addr
63 + rel[i].r_offset;
64 /* This is the symbol it is referring to. Note that all
65 undefined symbols have been resolved. */
66 sym = (Elf32_Sym *)sechdrs[symindex].sh_addr
67 + ELF32_R_SYM(rel[i].r_info);
68
69 switch (ELF32_R_TYPE(rel[i].r_info)) {
70 case R_68K_32:
71 /* We add the value into the location given */
72 *location += sym->st_value;
73 break;
74 case R_68K_PC32:
75 /* Add the value, subtract its postition */
76 *location += sym->st_value - (uint32_t)location;
77 break;
78 default:
79 printk(KERN_ERR "module %s: Unknown relocation: %u\n",
80 me->name, ELF32_R_TYPE(rel[i].r_info));
81 return -ENOEXEC;
82 }
83 }
84 return 0;
85 }
86
apply_relocate_add(Elf32_Shdr * sechdrs,const char * strtab,unsigned int symindex,unsigned int relsec,struct module * me)87 int apply_relocate_add(Elf32_Shdr *sechdrs,
88 const char *strtab,
89 unsigned int symindex,
90 unsigned int relsec,
91 struct module *me)
92 {
93 unsigned int i;
94 Elf32_Rela *rel = (void *)sechdrs[relsec].sh_addr;
95 Elf32_Sym *sym;
96 uint32_t *location;
97
98 DEBUGP("Applying relocate_add section %u to %u\n", relsec,
99 sechdrs[relsec].sh_info);
100 for (i = 0; i < sechdrs[relsec].sh_size / sizeof(*rel); i++) {
101 /* This is where to make the change */
102 location = (void *)sechdrs[sechdrs[relsec].sh_info].sh_addr
103 + rel[i].r_offset;
104 /* This is the symbol it is referring to. Note that all
105 undefined symbols have been resolved. */
106 sym = (Elf32_Sym *)sechdrs[symindex].sh_addr
107 + ELF32_R_SYM(rel[i].r_info);
108
109 switch (ELF32_R_TYPE(rel[i].r_info)) {
110 case R_68K_32:
111 /* We add the value into the location given */
112 *location = rel[i].r_addend + sym->st_value;
113 break;
114 case R_68K_PC32:
115 /* Add the value, subtract its postition */
116 *location = rel[i].r_addend + sym->st_value - (uint32_t)location;
117 break;
118 default:
119 printk(KERN_ERR "module %s: Unknown relocation: %u\n",
120 me->name, ELF32_R_TYPE(rel[i].r_info));
121 return -ENOEXEC;
122 }
123 }
124 return 0;
125 }
126
module_finalize(const Elf_Ehdr * hdr,const Elf_Shdr * sechdrs,struct module * mod)127 int module_finalize(const Elf_Ehdr *hdr,
128 const Elf_Shdr *sechdrs,
129 struct module *mod)
130 {
131 module_fixup(mod, mod->arch.fixup_start, mod->arch.fixup_end);
132
133 return 0;
134 }
135
module_arch_cleanup(struct module * mod)136 void module_arch_cleanup(struct module *mod)
137 {
138 }
139
140 #endif /* CONFIG_MODULES */
141
module_fixup(struct module * mod,struct m68k_fixup_info * start,struct m68k_fixup_info * end)142 void module_fixup(struct module *mod, struct m68k_fixup_info *start,
143 struct m68k_fixup_info *end)
144 {
145 struct m68k_fixup_info *fixup;
146
147 for (fixup = start; fixup < end; fixup++) {
148 switch (fixup->type) {
149 case m68k_fixup_memoffset:
150 *(u32 *)fixup->addr = m68k_memoffset;
151 break;
152 case m68k_fixup_vnode_shift:
153 *(u16 *)fixup->addr += m68k_virt_to_node_shift;
154 break;
155 }
156 }
157 }
158