elf_machdep.c revision 197729
1/*-
2 * Copyright (c) 2001 Jake Burkholder.
3 * Copyright (c) 2000 Eduardo Horvath.
4 * Copyright (c) 1999 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Paul Kranenburg.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 *    notice, this list of conditions and the following disclaimer in the
17 *    documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 *    must display the following acknowledgement:
20 *        This product includes software developed by the NetBSD
21 *        Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 *    contributors may be used to endorse or promote products derived
24 *    from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 *
38 *	from: NetBSD: mdreloc.c,v 1.5 2001/04/25 12:24:51 kleink Exp
39 */
40
41#include <sys/cdefs.h>
42__FBSDID("$FreeBSD: head/sys/sparc64/sparc64/elf_machdep.c 197729 2009-10-03 11:57:21Z bz $");
43
44#include <sys/param.h>
45#include <sys/kernel.h>
46#include <sys/systm.h>
47#include <sys/exec.h>
48#include <sys/imgact.h>
49#include <sys/linker.h>
50#include <sys/sysent.h>
51#include <sys/imgact_elf.h>
52#include <sys/syscall.h>
53#include <sys/signalvar.h>
54#include <sys/vnode.h>
55
56#include <vm/vm.h>
57#include <vm/vm_param.h>
58
59#include <machine/elf.h>
60
61#include "linker_if.h"
62
63static struct sysentvec elf64_freebsd_sysvec = {
64	.sv_size	= SYS_MAXSYSCALL,
65	.sv_table	= sysent,
66	.sv_mask	= 0,
67	.sv_sigsize	= 0,
68	.sv_sigtbl	= NULL,
69	.sv_errsize	= 0,
70	.sv_errtbl	= NULL,
71	.sv_transtrap	= NULL,
72	.sv_fixup	= __elfN(freebsd_fixup),
73	.sv_sendsig	= sendsig,
74	.sv_sigcode	= NULL,
75	.sv_szsigcode	= NULL,
76	.sv_prepsyscall	= NULL,
77	.sv_name	= "FreeBSD ELF64",
78	.sv_coredump	= __elfN(coredump),
79	.sv_imgact_try	= NULL,
80	.sv_minsigstksz	= MINSIGSTKSZ,
81	.sv_pagesize	= PAGE_SIZE,
82	.sv_minuser	= VM_MIN_ADDRESS,
83	.sv_maxuser	= VM_MAXUSER_ADDRESS,
84	.sv_usrstack	= USRSTACK,
85	.sv_psstrings	= PS_STRINGS,
86	.sv_stackprot	= VM_PROT_READ | VM_PROT_WRITE,
87	.sv_copyout_strings = exec_copyout_strings,
88	.sv_setregs	= exec_setregs,
89	.sv_fixlimit	= NULL,
90	.sv_maxssiz	= NULL,
91	.sv_flags	= SV_ABI_FREEBSD | SV_LP64
92};
93
94static Elf64_Brandinfo freebsd_brand_info = {
95	.brand		= ELFOSABI_FREEBSD,
96	.machine	= EM_SPARCV9,
97	.compat_3_brand	= "FreeBSD",
98	.emul_path	= NULL,
99	.interp_path	= "/libexec/ld-elf.so.1",
100	.sysvec		= &elf64_freebsd_sysvec,
101	.interp_newpath	= NULL,
102	.brand_note	= &elf64_freebsd_brandnote,
103	.flags		= BI_CAN_EXEC_DYN | BI_BRAND_NOTE
104};
105
106SYSINIT(elf64, SI_SUB_EXEC, SI_ORDER_FIRST,
107    (sysinit_cfunc_t) elf64_insert_brand_entry,
108    &freebsd_brand_info);
109
110static Elf64_Brandinfo freebsd_brand_oinfo = {
111	.brand		= ELFOSABI_FREEBSD,
112	.machine	= EM_SPARCV9,
113	.compat_3_brand	= "FreeBSD",
114	.emul_path	= NULL,
115	.interp_path	= "/usr/libexec/ld-elf.so.1",
116	.sysvec		= &elf64_freebsd_sysvec,
117	.interp_newpath	= NULL,
118	.brand_note	= &elf64_freebsd_brandnote,
119	.flags		= BI_CAN_EXEC_DYN | BI_BRAND_NOTE
120};
121
122SYSINIT(oelf64, SI_SUB_EXEC, SI_ORDER_ANY,
123	(sysinit_cfunc_t) elf64_insert_brand_entry,
124	&freebsd_brand_oinfo);
125
126
127void
128elf64_dump_thread(struct thread *td __unused, void *dst __unused,
129    size_t *off __unused)
130{
131}
132
133
134/*
135 * The following table holds for each relocation type:
136 *	- the width in bits of the memory location the relocation
137 *	  applies to (not currently used)
138 *	- the number of bits the relocation value must be shifted to the
139 *	  right (i.e. discard least significant bits) to fit into
140 *	  the appropriate field in the instruction word.
141 *	- flags indicating whether
142 *		* the relocation involves a symbol
143 *		* the relocation is relative to the current position
144 *		* the relocation is for a GOT entry
145 *		* the relocation is relative to the load address
146 *
147 */
148#define _RF_S		0x80000000		/* Resolve symbol */
149#define _RF_A		0x40000000		/* Use addend */
150#define _RF_P		0x20000000		/* Location relative */
151#define _RF_G		0x10000000		/* GOT offset */
152#define _RF_B		0x08000000		/* Load address relative */
153#define _RF_U		0x04000000		/* Unaligned */
154#define _RF_SZ(s)	(((s) & 0xff) << 8)	/* memory target size */
155#define _RF_RS(s)	( (s) & 0xff)		/* right shift */
156static const int reloc_target_flags[] = {
157	0,							/* NONE */
158	_RF_S|_RF_A|		_RF_SZ(8)  | _RF_RS(0),		/* RELOC_8 */
159	_RF_S|_RF_A|		_RF_SZ(16) | _RF_RS(0),		/* RELOC_16 */
160	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* RELOC_32 */
161	_RF_S|_RF_A|_RF_P|	_RF_SZ(8)  | _RF_RS(0),		/* DISP_8 */
162	_RF_S|_RF_A|_RF_P|	_RF_SZ(16) | _RF_RS(0),		/* DISP_16 */
163	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(0),		/* DISP_32 */
164	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(2),		/* WDISP_30 */
165	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(2),		/* WDISP_22 */
166	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(10),	/* HI22 */
167	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* 22 */
168	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* 13 */
169	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* LO10 */
170	_RF_G|			_RF_SZ(32) | _RF_RS(0),		/* GOT10 */
171	_RF_G|			_RF_SZ(32) | _RF_RS(0),		/* GOT13 */
172	_RF_G|			_RF_SZ(32) | _RF_RS(10),	/* GOT22 */
173	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(0),		/* PC10 */
174	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(10),	/* PC22 */
175	      _RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(2),		/* WPLT30 */
176				_RF_SZ(32) | _RF_RS(0),		/* COPY */
177	_RF_S|_RF_A|		_RF_SZ(64) | _RF_RS(0),		/* GLOB_DAT */
178				_RF_SZ(32) | _RF_RS(0),		/* JMP_SLOT */
179	      _RF_A|	_RF_B|	_RF_SZ(64) | _RF_RS(0),		/* RELATIVE */
180	_RF_S|_RF_A|	_RF_U|	_RF_SZ(32) | _RF_RS(0),		/* UA_32 */
181
182	      _RF_A|		_RF_SZ(32) | _RF_RS(0),		/* PLT32 */
183	      _RF_A|		_RF_SZ(32) | _RF_RS(10),	/* HIPLT22 */
184	      _RF_A|		_RF_SZ(32) | _RF_RS(0),		/* LOPLT10 */
185	      _RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(0),		/* PCPLT32 */
186	      _RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(10),	/* PCPLT22 */
187	      _RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(0),		/* PCPLT10 */
188	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* 10 */
189	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* 11 */
190	_RF_S|_RF_A|		_RF_SZ(64) | _RF_RS(0),		/* 64 */
191	_RF_S|_RF_A|/*extra*/	_RF_SZ(32) | _RF_RS(0),		/* OLO10 */
192	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(42),	/* HH22 */
193	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(32),	/* HM10 */
194	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(10),	/* LM22 */
195	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(42),	/* PC_HH22 */
196	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(32),	/* PC_HM10 */
197	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(10),	/* PC_LM22 */
198	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(2),		/* WDISP16 */
199	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(2),		/* WDISP19 */
200	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* GLOB_JMP */
201	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* 7 */
202	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* 5 */
203	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* 6 */
204	_RF_S|_RF_A|_RF_P|	_RF_SZ(64) | _RF_RS(0),		/* DISP64 */
205	      _RF_A|		_RF_SZ(64) | _RF_RS(0),		/* PLT64 */
206	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(10),	/* HIX22 */
207	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* LOX10 */
208	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(22),	/* H44 */
209	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(12),	/* M44 */
210	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* L44 */
211	_RF_S|_RF_A|		_RF_SZ(64) | _RF_RS(0),		/* REGISTER */
212	_RF_S|_RF_A|	_RF_U|	_RF_SZ(64) | _RF_RS(0),		/* UA64 */
213	_RF_S|_RF_A|	_RF_U|	_RF_SZ(16) | _RF_RS(0),		/* UA16 */
214};
215
216#if 0
217static const char *reloc_names[] = {
218	"NONE", "RELOC_8", "RELOC_16", "RELOC_32", "DISP_8",
219	"DISP_16", "DISP_32", "WDISP_30", "WDISP_22", "HI22",
220	"22", "13", "LO10", "GOT10", "GOT13",
221	"GOT22", "PC10", "PC22", "WPLT30", "COPY",
222	"GLOB_DAT", "JMP_SLOT", "RELATIVE", "UA_32", "PLT32",
223	"HIPLT22", "LOPLT10", "LOPLT10", "PCPLT22", "PCPLT32",
224	"10", "11", "64", "OLO10", "HH22",
225	"HM10", "LM22", "PC_HH22", "PC_HM10", "PC_LM22",
226	"WDISP16", "WDISP19", "GLOB_JMP", "7", "5", "6",
227	"DISP64", "PLT64", "HIX22", "LOX10", "H44", "M44",
228	"L44", "REGISTER", "UA64", "UA16"
229};
230#endif
231
232#define RELOC_RESOLVE_SYMBOL(t)		((reloc_target_flags[t] & _RF_S) != 0)
233#define RELOC_PC_RELATIVE(t)		((reloc_target_flags[t] & _RF_P) != 0)
234#define RELOC_BASE_RELATIVE(t)		((reloc_target_flags[t] & _RF_B) != 0)
235#define RELOC_UNALIGNED(t)		((reloc_target_flags[t] & _RF_U) != 0)
236#define RELOC_USE_ADDEND(t)		((reloc_target_flags[t] & _RF_A) != 0)
237#define RELOC_TARGET_SIZE(t)		((reloc_target_flags[t] >> 8) & 0xff)
238#define RELOC_VALUE_RIGHTSHIFT(t)	(reloc_target_flags[t] & 0xff)
239
240static const long reloc_target_bitmask[] = {
241#define _BM(x)	(~(-(1ULL << (x))))
242	0,				/* NONE */
243	_BM(8), _BM(16), _BM(32),	/* RELOC_8, _16, _32 */
244	_BM(8), _BM(16), _BM(32),	/* DISP8, DISP16, DISP32 */
245	_BM(30), _BM(22),		/* WDISP30, WDISP22 */
246	_BM(22), _BM(22),		/* HI22, _22 */
247	_BM(13), _BM(10),		/* RELOC_13, _LO10 */
248	_BM(10), _BM(13), _BM(22),	/* GOT10, GOT13, GOT22 */
249	_BM(10), _BM(22),		/* _PC10, _PC22 */
250	_BM(30), 0,			/* _WPLT30, _COPY */
251	_BM(32), _BM(32), _BM(32),	/* _GLOB_DAT, JMP_SLOT, _RELATIVE */
252	_BM(32), _BM(32),		/* _UA32, PLT32 */
253	_BM(22), _BM(10),		/* _HIPLT22, LOPLT10 */
254	_BM(32), _BM(22), _BM(10),	/* _PCPLT32, _PCPLT22, _PCPLT10 */
255	_BM(10), _BM(11), -1,		/* _10, _11, _64 */
256	_BM(13), _BM(22),		/* _OLO10, _HH22 */
257	_BM(10), _BM(22),		/* _HM10, _LM22 */
258	_BM(22), _BM(10), _BM(22),	/* _PC_HH22, _PC_HM10, _PC_LM22 */
259	_BM(16), _BM(19),		/* _WDISP16, _WDISP19 */
260	-1,				/* GLOB_JMP */
261	_BM(7), _BM(5), _BM(6)		/* _7, _5, _6 */
262	-1, -1,				/* DISP64, PLT64 */
263	_BM(22), _BM(13),		/* HIX22, LOX10 */
264	_BM(22), _BM(10), _BM(13),	/* H44, M44, L44 */
265	-1, -1, _BM(16),		/* REGISTER, UA64, UA16 */
266#undef _BM
267};
268#define RELOC_VALUE_BITMASK(t)	(reloc_target_bitmask[t])
269
270int
271elf_reloc_local(linker_file_t lf, Elf_Addr relocbase, const void *data,
272    int type, elf_lookup_fn lookup)
273{
274	const Elf_Rela *rela;
275	Elf_Addr value;
276	Elf_Addr *where;
277
278	if (type != ELF_RELOC_RELA)
279		return (-1);
280
281	rela = (const Elf_Rela *)data;
282	if (ELF64_R_TYPE_ID(rela->r_info) != R_SPARC_RELATIVE)
283		return (-1);
284
285	value = rela->r_addend + (Elf_Addr)lf->address;
286	where = (Elf_Addr *)((Elf_Addr)lf->address + rela->r_offset);
287
288	*where = elf_relocaddr(lf, value);
289
290	return (0);
291}
292
293/* Process one elf relocation with addend. */
294int
295elf_reloc(linker_file_t lf, Elf_Addr relocbase, const void *data, int type,
296    elf_lookup_fn lookup)
297{
298	const Elf_Rela *rela;
299	Elf_Word *where32;
300	Elf_Addr *where;
301	Elf_Size rtype, symidx;
302	Elf_Addr value;
303	Elf_Addr mask;
304	Elf_Addr addr;
305
306	if (type != ELF_RELOC_RELA)
307		return (-1);
308
309	rela = (const Elf_Rela *)data;
310	where = (Elf_Addr *)(relocbase + rela->r_offset);
311	where32 = (Elf_Word *)where;
312	rtype = ELF64_R_TYPE_ID(rela->r_info);
313	symidx = ELF_R_SYM(rela->r_info);
314
315	if (rtype == R_SPARC_NONE || rtype == R_SPARC_RELATIVE)
316		return (0);
317
318	if (rtype == R_SPARC_JMP_SLOT || rtype == R_SPARC_COPY ||
319	    rtype >= sizeof(reloc_target_bitmask) /
320	    sizeof(*reloc_target_bitmask))
321		return (-1);
322
323	if (RELOC_UNALIGNED(rtype))
324		return (-1);
325
326	value = rela->r_addend;
327
328	if (RELOC_RESOLVE_SYMBOL(rtype)) {
329		addr = lookup(lf, symidx, 1);
330		if (addr == 0)
331			return (-1);
332		value += addr;
333	}
334
335	if (rtype == R_SPARC_OLO10)
336		value = (value & 0x3ff) + ELF64_R_TYPE_DATA(rela->r_info);
337
338	if (RELOC_PC_RELATIVE(rtype))
339		value -= (Elf_Addr)where;
340
341	if (RELOC_BASE_RELATIVE(rtype)) {
342		value = elf_relocaddr(lf, value + relocbase);
343	}
344
345	mask = RELOC_VALUE_BITMASK(rtype);
346	value >>= RELOC_VALUE_RIGHTSHIFT(rtype);
347	value &= mask;
348
349	if (RELOC_TARGET_SIZE(rtype) > 32) {
350		*where &= ~mask;
351		*where |= value;
352	} else {
353		*where32 &= ~mask;
354		*where32 |= value;
355	}
356
357	return (0);
358}
359
360int
361elf_cpu_load_file(linker_file_t lf __unused)
362{
363
364	return (0);
365}
366
367int
368elf_cpu_unload_file(linker_file_t lf __unused)
369{
370
371	return (0);
372}
373