elf32_machdep.c revision 269129
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: head/sys/powerpc/powerpc/elf32_machdep.c 269129 2014-07-26 17:07:32Z marcel $
26 */
27
28#include <sys/param.h>
29#include <sys/kernel.h>
30#include <sys/systm.h>
31
32#define __ELF_WORD_SIZE 32
33
34#include <sys/exec.h>
35#include <sys/imgact.h>
36#include <sys/malloc.h>
37#include <sys/proc.h>
38#include <sys/namei.h>
39#include <sys/fcntl.h>
40#include <sys/sysent.h>
41#include <sys/imgact_elf.h>
42#include <sys/syscall.h>
43#include <sys/signalvar.h>
44#include <sys/vnode.h>
45#include <sys/linker.h>
46
47#include <vm/vm.h>
48#include <vm/vm_param.h>
49
50#include <machine/cpu.h>
51#include <machine/elf.h>
52#include <machine/reg.h>
53#include <machine/md_var.h>
54
55#ifdef __powerpc64__
56#include <compat/freebsd32/freebsd32_proto.h>
57#include <compat/freebsd32/freebsd32_util.h>
58
59extern const char *freebsd32_syscallnames[];
60#endif
61
62struct sysentvec elf32_freebsd_sysvec = {
63	.sv_size	= SYS_MAXSYSCALL,
64#ifdef __powerpc64__
65	.sv_table	= freebsd32_sysent,
66#else
67	.sv_table	= sysent,
68#endif
69	.sv_mask	= 0,
70	.sv_sigsize	= 0,
71	.sv_sigtbl	= NULL,
72	.sv_errsize	= 0,
73	.sv_errtbl	= NULL,
74	.sv_transtrap	= NULL,
75	.sv_fixup	= __elfN(freebsd_fixup),
76	.sv_sendsig	= sendsig,
77	.sv_sigcode	= sigcode32,
78	.sv_szsigcode	= &szsigcode32,
79	.sv_prepsyscall	= NULL,
80	.sv_name	= "FreeBSD ELF32",
81	.sv_coredump	= __elfN(coredump),
82	.sv_imgact_try	= NULL,
83	.sv_minsigstksz	= MINSIGSTKSZ,
84	.sv_pagesize	= PAGE_SIZE,
85	.sv_minuser	= VM_MIN_ADDRESS,
86	.sv_stackprot	= VM_PROT_ALL,
87#ifdef __powerpc64__
88	.sv_maxuser	= VM_MAXUSER_ADDRESS,
89	.sv_usrstack	= FREEBSD32_USRSTACK,
90	.sv_psstrings	= FREEBSD32_PS_STRINGS,
91	.sv_copyout_strings = freebsd32_copyout_strings,
92	.sv_setregs	= ppc32_setregs,
93	.sv_syscallnames = freebsd32_syscallnames,
94#else
95	.sv_maxuser	= VM_MAXUSER_ADDRESS,
96	.sv_usrstack	= USRSTACK,
97	.sv_psstrings	= PS_STRINGS,
98	.sv_copyout_strings = exec_copyout_strings,
99	.sv_setregs	= exec_setregs,
100	.sv_syscallnames = syscallnames,
101#endif
102	.sv_fixlimit	= NULL,
103	.sv_maxssiz	= NULL,
104	.sv_flags	= SV_ABI_FREEBSD | SV_ILP32 | SV_SHP,
105	.sv_set_syscall_retval = cpu_set_syscall_retval,
106	.sv_fetch_syscall_args = cpu_fetch_syscall_args,
107	.sv_shared_page_base = FREEBSD32_SHAREDPAGE,
108	.sv_shared_page_len = PAGE_SIZE,
109	.sv_schedtail	= NULL,
110};
111INIT_SYSENTVEC(elf32_sysvec, &elf32_freebsd_sysvec);
112
113static Elf32_Brandinfo freebsd_brand_info = {
114	.brand		= ELFOSABI_FREEBSD,
115	.machine	= EM_PPC,
116	.compat_3_brand	= "FreeBSD",
117	.emul_path	= NULL,
118	.interp_path	= "/libexec/ld-elf.so.1",
119	.sysvec		= &elf32_freebsd_sysvec,
120#ifdef __powerpc64__
121	.interp_newpath	= "/libexec/ld-elf32.so.1",
122#else
123	.interp_newpath	= NULL,
124#endif
125	.brand_note	= &elf32_freebsd_brandnote,
126	.flags		= BI_CAN_EXEC_DYN | BI_BRAND_NOTE
127};
128
129SYSINIT(elf32, SI_SUB_EXEC, SI_ORDER_FIRST,
130    (sysinit_cfunc_t) elf32_insert_brand_entry,
131    &freebsd_brand_info);
132
133static Elf32_Brandinfo freebsd_brand_oinfo = {
134	.brand		= ELFOSABI_FREEBSD,
135	.machine	= EM_PPC,
136	.compat_3_brand	= "FreeBSD",
137	.emul_path	= NULL,
138	.interp_path	= "/usr/libexec/ld-elf.so.1",
139	.sysvec		= &elf32_freebsd_sysvec,
140	.interp_newpath	= NULL,
141	.brand_note	= &elf32_freebsd_brandnote,
142	.flags		= BI_CAN_EXEC_DYN | BI_BRAND_NOTE
143};
144
145SYSINIT(oelf32, SI_SUB_EXEC, SI_ORDER_ANY,
146	(sysinit_cfunc_t) elf32_insert_brand_entry,
147	&freebsd_brand_oinfo);
148
149void
150elf32_dump_thread(struct thread *td __unused, void *dst __unused,
151    size_t *off __unused)
152{
153}
154
155#ifndef __powerpc64__
156/* Process one elf relocation with addend. */
157static int
158elf_reloc_internal(linker_file_t lf, Elf_Addr relocbase, const void *data,
159    int type, int local, elf_lookup_fn lookup)
160{
161	Elf_Addr *where;
162	Elf_Half *hwhere;
163	Elf_Addr addr;
164	Elf_Addr addend;
165	Elf_Word rtype, symidx;
166	const Elf_Rela *rela;
167
168	switch (type) {
169	case ELF_RELOC_REL:
170		panic("PPC only supports RELA relocations");
171		break;
172	case ELF_RELOC_RELA:
173		rela = (const Elf_Rela *)data;
174		where = (Elf_Addr *) ((uintptr_t)relocbase + rela->r_offset);
175		hwhere = (Elf_Half *) ((uintptr_t)relocbase + rela->r_offset);
176		addend = rela->r_addend;
177		rtype = ELF_R_TYPE(rela->r_info);
178		symidx = ELF_R_SYM(rela->r_info);
179		break;
180	default:
181		panic("elf_reloc: unknown relocation mode %d\n", type);
182	}
183
184	switch (rtype) {
185
186       	case R_PPC_NONE:
187	       	break;
188
189	case R_PPC_ADDR32: /* word32 S + A */
190       		addr = lookup(lf, symidx, 1);
191	       	if (addr == 0)
192	       		return -1;
193		*where = elf_relocaddr(lf, addr + addend);
194	       	break;
195
196       	case R_PPC_ADDR16_LO: /* #lo(S) */
197		addr = lookup(lf, symidx, 1);
198		if (addr == 0)
199			return -1;
200		/*
201		 * addend values are sometimes relative to sections
202		 * (i.e. .rodata) in rela, where in reality they
203		 * are relative to relocbase. Detect this condition.
204		 */
205		if (addr > relocbase && addr <= (relocbase + addend))
206			addr = relocbase;
207		addr = elf_relocaddr(lf, addr + addend);
208		*hwhere = addr & 0xffff;
209		break;
210
211	case R_PPC_ADDR16_HA: /* #ha(S) */
212		addr = lookup(lf, symidx, 1);
213		if (addr == 0)
214			return -1;
215		/*
216		 * addend values are sometimes relative to sections
217		 * (i.e. .rodata) in rela, where in reality they
218		 * are relative to relocbase. Detect this condition.
219		 */
220		if (addr > relocbase && addr <= (relocbase + addend))
221			addr = relocbase;
222		addr = elf_relocaddr(lf, addr + addend);
223	       	*hwhere = ((addr >> 16) + ((addr & 0x8000) ? 1 : 0))
224		    & 0xffff;
225		break;
226
227	case R_PPC_RELATIVE: /* word32 B + A */
228       		*where = elf_relocaddr(lf, relocbase + addend);
229	       	break;
230
231	default:
232       		printf("kldload: unexpected relocation type %d\n",
233	       	    (int) rtype);
234		return -1;
235	}
236	return(0);
237}
238
239int
240elf_reloc(linker_file_t lf, Elf_Addr relocbase, const void *data, int type,
241    elf_lookup_fn lookup)
242{
243
244	return (elf_reloc_internal(lf, relocbase, data, type, 0, lookup));
245}
246
247int
248elf_reloc_local(linker_file_t lf, Elf_Addr relocbase, const void *data,
249    int type, elf_lookup_fn lookup)
250{
251
252	return (elf_reloc_internal(lf, relocbase, data, type, 1, lookup));
253}
254
255int
256elf_cpu_load_file(linker_file_t lf)
257{
258	/* Only sync the cache for non-kernel modules */
259	if (lf->id != 1)
260		__syncicache(lf->address, lf->size);
261	return (0);
262}
263
264int
265elf_cpu_unload_file(linker_file_t lf __unused)
266{
267
268	return (0);
269}
270#endif
271