1 /*-
2 * Copyright 1996-1998 John D. Polstra.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
15 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
18 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
19 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
20 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
21 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
22 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
23 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24 *
25 * $FreeBSD: releng/8.1/sys/powerpc/powerpc/elf_machdep.c 200165 2009-12-05 20:43:15Z bz $
26 */
27
28 #include <sys/param.h>
29 #include <sys/kernel.h>
30 #include <sys/systm.h>
31 #include <sys/exec.h>
32 #include <sys/imgact.h>
33 #include <sys/malloc.h>
34 #include <sys/proc.h>
35 #include <sys/namei.h>
36 #include <sys/fcntl.h>
37 #include <sys/sysent.h>
38 #include <sys/imgact_elf.h>
39 #include <sys/syscall.h>
40 #include <sys/signalvar.h>
41 #include <sys/vnode.h>
42 #include <sys/linker.h>
43
44 #include <vm/vm.h>
45 #include <vm/vm_param.h>
46
47 #include <machine/cpu.h>
48 #include <machine/elf.h>
49 #include <machine/md_var.h>
50
51 struct sysentvec elf32_freebsd_sysvec = {
52 .sv_size = SYS_MAXSYSCALL,
53 .sv_table = sysent,
54 .sv_mask = 0,
55 .sv_sigsize = 0,
56 .sv_sigtbl = NULL,
57 .sv_errsize = 0,
58 .sv_errtbl = NULL,
59 .sv_transtrap = NULL,
60 .sv_fixup = __elfN(freebsd_fixup),
61 .sv_sendsig = sendsig,
62 .sv_sigcode = sigcode,
63 .sv_szsigcode = &szsigcode,
64 .sv_prepsyscall = NULL,
65 .sv_name = "FreeBSD ELF32",
66 .sv_coredump = __elfN(coredump),
67 .sv_imgact_try = NULL,
68 .sv_minsigstksz = MINSIGSTKSZ,
69 .sv_pagesize = PAGE_SIZE,
70 .sv_minuser = VM_MIN_ADDRESS,
71 .sv_maxuser = VM_MAXUSER_ADDRESS,
72 .sv_usrstack = USRSTACK,
73 .sv_psstrings = PS_STRINGS,
74 .sv_stackprot = VM_PROT_ALL,
75 .sv_copyout_strings = exec_copyout_strings,
76 .sv_setregs = exec_setregs,
77 .sv_fixlimit = NULL,
78 .sv_maxssiz = NULL,
79 .sv_flags = SV_ABI_FREEBSD | SV_ILP32
80 };
81
82 static Elf32_Brandinfo freebsd_brand_info = {
83 .brand = ELFOSABI_FREEBSD,
84 .machine = EM_PPC,
85 .compat_3_brand = "FreeBSD",
86 .emul_path = NULL,
87 .interp_path = "/libexec/ld-elf.so.1",
88 .sysvec = &elf32_freebsd_sysvec,
89 .interp_newpath = NULL,
90 .brand_note = &elf32_freebsd_brandnote,
91 .flags = BI_CAN_EXEC_DYN | BI_BRAND_NOTE
92 };
93
94 SYSINIT(elf32, SI_SUB_EXEC, SI_ORDER_FIRST,
95 (sysinit_cfunc_t) elf32_insert_brand_entry,
96 &freebsd_brand_info);
97
98 static Elf32_Brandinfo freebsd_brand_oinfo = {
99 .brand = ELFOSABI_FREEBSD,
100 .machine = EM_PPC,
101 .compat_3_brand = "FreeBSD",
102 .emul_path = NULL,
103 .interp_path = "/usr/libexec/ld-elf.so.1",
104 .sysvec = &elf32_freebsd_sysvec,
105 .interp_newpath = NULL,
106 .brand_note = &elf32_freebsd_brandnote,
107 .flags = BI_CAN_EXEC_DYN | BI_BRAND_NOTE
108 };
109
110 SYSINIT(oelf32, SI_SUB_EXEC, SI_ORDER_ANY,
111 (sysinit_cfunc_t) elf32_insert_brand_entry,
112 &freebsd_brand_oinfo);
113
114
115 void
116 elf32_dump_thread(struct thread *td __unused, void *dst __unused,
117 size_t *off __unused)
118 {
119 }
120
121
122 /* Process one elf relocation with addend. */
123 static int
124 elf_reloc_internal(linker_file_t lf, Elf_Addr relocbase, const void *data,
125 int type, int local, elf_lookup_fn lookup)
126 {
127 Elf_Addr *where;
128 Elf_Half *hwhere;
129 Elf_Addr addr;
130 Elf_Addr addend;
131 Elf_Word rtype, symidx;
132 const Elf_Rela *rela;
133
134 switch (type) {
135 case ELF_RELOC_REL:
136 panic("PPC only supports RELA relocations");
137 break;
138 case ELF_RELOC_RELA:
139 rela = (const Elf_Rela *)data;
140 where = (Elf_Addr *) (relocbase + rela->r_offset);
141 hwhere = (Elf_Half *) (relocbase + rela->r_offset);
142 addend = rela->r_addend;
143 rtype = ELF_R_TYPE(rela->r_info);
144 symidx = ELF_R_SYM(rela->r_info);
145 break;
146 default:
147 panic("elf_reloc: unknown relocation mode %d\n", type);
148 }
149
150 switch (rtype) {
151
152 case R_PPC_NONE:
153 break;
154
155 case R_PPC_ADDR32: /* word32 S + A */
156 addr = lookup(lf, symidx, 1);
157 if (addr == 0)
158 return -1;
159 addr += addend;
160 *where = addr;
161 break;
162
163 case R_PPC_ADDR16_LO: /* #lo(S) */
164 addr = lookup(lf, symidx, 1);
165 if (addr == 0)
166 return -1;
167 /*
168 * addend values are sometimes relative to sections
169 * (i.e. .rodata) in rela, where in reality they
170 * are relative to relocbase. Detect this condition.
171 */
172 if (addr > relocbase && addr <= (relocbase + addend))
173 addr = relocbase + addend;
174 else
175 addr += addend;
176 *hwhere = addr & 0xffff;
177 break;
178
179 case R_PPC_ADDR16_HA: /* #ha(S) */
180 addr = lookup(lf, symidx, 1);
181 if (addr == 0)
182 return -1;
183 /*
184 * addend values are sometimes relative to sections
185 * (i.e. .rodata) in rela, where in reality they
186 * are relative to relocbase. Detect this condition.
187 */
188 if (addr > relocbase && addr <= (relocbase + addend))
189 addr = relocbase + addend;
190 else
191 addr += addend;
192 *hwhere = ((addr >> 16) + ((addr & 0x8000) ? 1 : 0))
193 & 0xffff;
194 break;
195
196 case R_PPC_RELATIVE: /* word32 B + A */
197 *where = elf_relocaddr(lf, relocbase + addend);
198 break;
199
200 default:
201 printf("kldload: unexpected relocation type %d\n",
202 (int) rtype);
203 return -1;
204 }
205 return(0);
206 }
207
208 int
209 elf_reloc(linker_file_t lf, Elf_Addr relocbase, const void *data, int type,
210 elf_lookup_fn lookup)
211 {
212
213 return (elf_reloc_internal(lf, relocbase, data, type, 0, lookup));
214 }
215
216 int
217 elf_reloc_local(linker_file_t lf, Elf_Addr relocbase, const void *data,
218 int type, elf_lookup_fn lookup)
219 {
220
221 return (elf_reloc_internal(lf, relocbase, data, type, 1, lookup));
222 }
223
224 int
225 elf_cpu_load_file(linker_file_t lf)
226 {
227 /* Only sync the cache for non-kernel modules */
228 if (lf->id != 1)
229 __syncicache(lf->address, lf->size);
230 return (0);
231 }
232
233 int
234 elf_cpu_unload_file(linker_file_t lf __unused)
235 {
236
237 return (0);
238 }
Cache object: 1b491d726faab9b4d2863537c0e0addf
|