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$
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
51struct sysentvec elf64_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	= sigcode64,
63	.sv_szsigcode	= &szsigcode64,
64	.sv_prepsyscall	= NULL,
65	.sv_name	= "FreeBSD ELF64",
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_LP64 | SV_SHP,
80	.sv_set_syscall_retval = cpu_set_syscall_retval,
81	.sv_fetch_syscall_args = cpu_fetch_syscall_args,
82	.sv_syscallnames = syscallnames,
83	.sv_shared_page_base = SHAREDPAGE,
84	.sv_shared_page_len = PAGE_SIZE,
85	.sv_schedtail	= NULL,
86};
87INIT_SYSENTVEC(elf64_sysvec, &elf64_freebsd_sysvec);
88
89static Elf64_Brandinfo freebsd_brand_info = {
90	.brand		= ELFOSABI_FREEBSD,
91	.machine	= EM_PPC64,
92	.compat_3_brand	= "FreeBSD",
93	.emul_path	= NULL,
94	.interp_path	= "/libexec/ld-elf.so.1",
95	.sysvec		= &elf64_freebsd_sysvec,
96	.interp_newpath	= NULL,
97	.brand_note	= &elf64_freebsd_brandnote,
98	.flags		= BI_CAN_EXEC_DYN | BI_BRAND_NOTE
99};
100
101SYSINIT(elf64, SI_SUB_EXEC, SI_ORDER_ANY,
102    (sysinit_cfunc_t) elf64_insert_brand_entry,
103    &freebsd_brand_info);
104
105static Elf64_Brandinfo freebsd_brand_oinfo = {
106	.brand		= ELFOSABI_FREEBSD,
107	.machine	= EM_PPC64,
108	.compat_3_brand	= "FreeBSD",
109	.emul_path	= NULL,
110	.interp_path	= "/usr/libexec/ld-elf.so.1",
111	.sysvec		= &elf64_freebsd_sysvec,
112	.interp_newpath	= NULL,
113	.brand_note	= &elf64_freebsd_brandnote,
114	.flags		= BI_CAN_EXEC_DYN | BI_BRAND_NOTE
115};
116
117SYSINIT(oelf64, SI_SUB_EXEC, SI_ORDER_ANY,
118	(sysinit_cfunc_t) elf64_insert_brand_entry,
119	&freebsd_brand_oinfo);
120
121void
122elf64_dump_thread(struct thread *td __unused, void *dst __unused,
123    size_t *off __unused)
124{
125}
126
127
128/* Process one elf relocation with addend. */
129static int
130elf_reloc_internal(linker_file_t lf, Elf_Addr relocbase, const void *data,
131    int type, int local, elf_lookup_fn lookup)
132{
133	Elf_Addr *where;
134	Elf_Addr addr;
135	Elf_Addr addend;
136	Elf_Word rtype, symidx;
137	const Elf_Rela *rela;
138
139	switch (type) {
140	case ELF_RELOC_REL:
141		panic("PPC only supports RELA relocations");
142		break;
143	case ELF_RELOC_RELA:
144		rela = (const Elf_Rela *)data;
145		where = (Elf_Addr *) (relocbase + rela->r_offset);
146		addend = rela->r_addend;
147		rtype = ELF_R_TYPE(rela->r_info);
148		symidx = ELF_R_SYM(rela->r_info);
149		break;
150	default:
151		panic("elf_reloc: unknown relocation mode %d\n", type);
152	}
153
154	switch (rtype) {
155
156       	case R_PPC_NONE:
157	       	break;
158
159	case R_PPC64_ADDR64:	/* doubleword64 S + A */
160       		addr = lookup(lf, symidx, 1);
161	       	if (addr == 0)
162	       		return -1;
163		addr += addend;
164	       	*where = addr;
165	       	break;
166
167	case R_PPC_RELATIVE:	/* doubleword64 B + A */
168       		*where = elf_relocaddr(lf, relocbase + addend);
169	       	break;
170
171	case R_PPC_JMP_SLOT:	/* function descriptor copy */
172		addr = lookup(lf, symidx, 1);
173		memcpy(where, (Elf_Addr *)addr, 3*sizeof(Elf_Addr));
174		__asm __volatile("dcbst 0,%0; sync" :: "r"(where) : "memory");
175		break;
176
177	default:
178       		printf("kldload: unexpected relocation type %d\n",
179	       	    (int) rtype);
180		return -1;
181	}
182	return(0);
183}
184
185int
186elf_reloc(linker_file_t lf, Elf_Addr relocbase, const void *data, int type,
187    elf_lookup_fn lookup)
188{
189
190	return (elf_reloc_internal(lf, relocbase, data, type, 0, lookup));
191}
192
193int
194elf_reloc_local(linker_file_t lf, Elf_Addr relocbase, const void *data,
195    int type, elf_lookup_fn lookup)
196{
197
198	return (elf_reloc_internal(lf, relocbase, data, type, 1, lookup));
199}
200
201int
202elf_cpu_load_file(linker_file_t lf)
203{
204	/* Only sync the cache for non-kernel modules */
205	if (lf->id != 1)
206		__syncicache(lf->address, lf->size);
207	return (0);
208}
209
210int
211elf_cpu_unload_file(linker_file_t lf __unused)
212{
213
214	return (0);
215}
216