elf_machdep.c revision 212998
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 212998 2010-09-22 12:52:12Z kib $");
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/proc.h>
51#include <sys/sysent.h>
52#include <sys/imgact_elf.h>
53#include <sys/syscall.h>
54#include <sys/signalvar.h>
55#include <sys/vnode.h>
56
57#include <vm/vm.h>
58#include <vm/vm_param.h>
59
60#include <machine/elf.h>
61
62#include "linker_if.h"
63
64static struct sysentvec elf64_freebsd_sysvec = {
65	.sv_size	= SYS_MAXSYSCALL,
66	.sv_table	= sysent,
67	.sv_mask	= 0,
68	.sv_sigsize	= 0,
69	.sv_sigtbl	= NULL,
70	.sv_errsize	= 0,
71	.sv_errtbl	= NULL,
72	.sv_transtrap	= NULL,
73	.sv_fixup	= __elfN(freebsd_fixup),
74	.sv_sendsig	= sendsig,
75	.sv_sigcode	= NULL,
76	.sv_szsigcode	= NULL,
77	.sv_prepsyscall	= NULL,
78	.sv_name	= "FreeBSD ELF64",
79	.sv_coredump	= __elfN(coredump),
80	.sv_imgact_try	= NULL,
81	.sv_minsigstksz	= MINSIGSTKSZ,
82	.sv_pagesize	= PAGE_SIZE,
83	.sv_minuser	= VM_MIN_ADDRESS,
84	.sv_maxuser	= VM_MAXUSER_ADDRESS,
85	.sv_usrstack	= USRSTACK,
86	.sv_psstrings	= PS_STRINGS,
87	.sv_stackprot	= VM_PROT_READ | VM_PROT_WRITE,
88	.sv_copyout_strings = exec_copyout_strings,
89	.sv_setregs	= exec_setregs,
90	.sv_fixlimit	= NULL,
91	.sv_maxssiz	= NULL,
92	.sv_flags	= SV_ABI_FREEBSD | SV_LP64,
93	.sv_set_syscall_retval = cpu_set_syscall_retval,
94	.sv_fetch_syscall_args = cpu_fetch_syscall_args,
95	.sv_syscallnames = syscallnames,
96};
97
98static Elf64_Brandinfo freebsd_brand_info = {
99	.brand		= ELFOSABI_FREEBSD,
100	.machine	= EM_SPARCV9,
101	.compat_3_brand	= "FreeBSD",
102	.emul_path	= NULL,
103	.interp_path	= "/libexec/ld-elf.so.1",
104	.sysvec		= &elf64_freebsd_sysvec,
105	.interp_newpath	= NULL,
106	.brand_note	= &elf64_freebsd_brandnote,
107	.flags		= BI_CAN_EXEC_DYN | BI_BRAND_NOTE
108};
109
110SYSINIT(elf64, SI_SUB_EXEC, SI_ORDER_FIRST,
111    (sysinit_cfunc_t) elf64_insert_brand_entry,
112    &freebsd_brand_info);
113
114static Elf64_Brandinfo freebsd_brand_oinfo = {
115	.brand		= ELFOSABI_FREEBSD,
116	.machine	= EM_SPARCV9,
117	.compat_3_brand	= "FreeBSD",
118	.emul_path	= NULL,
119	.interp_path	= "/usr/libexec/ld-elf.so.1",
120	.sysvec		= &elf64_freebsd_sysvec,
121	.interp_newpath	= NULL,
122	.brand_note	= &elf64_freebsd_brandnote,
123	.flags		= BI_CAN_EXEC_DYN | BI_BRAND_NOTE
124};
125
126SYSINIT(oelf64, SI_SUB_EXEC, SI_ORDER_ANY,
127	(sysinit_cfunc_t) elf64_insert_brand_entry,
128	&freebsd_brand_oinfo);
129
130
131void
132elf64_dump_thread(struct thread *td __unused, void *dst __unused,
133    size_t *off __unused)
134{
135}
136
137
138/*
139 * The following table holds for each relocation type:
140 *	- the width in bits of the memory location the relocation
141 *	  applies to (not currently used)
142 *	- the number of bits the relocation value must be shifted to the
143 *	  right (i.e. discard least significant bits) to fit into
144 *	  the appropriate field in the instruction word.
145 *	- flags indicating whether
146 *		* the relocation involves a symbol
147 *		* the relocation is relative to the current position
148 *		* the relocation is for a GOT entry
149 *		* the relocation is relative to the load address
150 *
151 */
152#define _RF_S		0x80000000		/* Resolve symbol */
153#define _RF_A		0x40000000		/* Use addend */
154#define _RF_P		0x20000000		/* Location relative */
155#define _RF_G		0x10000000		/* GOT offset */
156#define _RF_B		0x08000000		/* Load address relative */
157#define _RF_U		0x04000000		/* Unaligned */
158#define	_RF_X		0x02000000		/* Bare symbols, needs proc */
159#define _RF_SZ(s)	(((s) & 0xff) << 8)	/* memory target size */
160#define _RF_RS(s)	( (s) & 0xff)		/* right shift */
161static const int reloc_target_flags[] = {
162	0,							/* NONE */
163	_RF_S|_RF_A|		_RF_SZ(8)  | _RF_RS(0),		/* RELOC_8 */
164	_RF_S|_RF_A|		_RF_SZ(16) | _RF_RS(0),		/* RELOC_16 */
165	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* RELOC_32 */
166	_RF_S|_RF_A|_RF_P|	_RF_SZ(8)  | _RF_RS(0),		/* DISP_8 */
167	_RF_S|_RF_A|_RF_P|	_RF_SZ(16) | _RF_RS(0),		/* DISP_16 */
168	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(0),		/* DISP_32 */
169	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(2),		/* WDISP_30 */
170	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(2),		/* WDISP_22 */
171	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(10),	/* HI22 */
172	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(0),		/* 22 */
173	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(0),		/* 13 */
174	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(0),		/* LO10 */
175	_RF_G|			_RF_SZ(32) | _RF_RS(0),		/* GOT10 */
176	_RF_G|			_RF_SZ(32) | _RF_RS(0),		/* GOT13 */
177	_RF_G|			_RF_SZ(32) | _RF_RS(10),	/* GOT22 */
178	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(0),		/* PC10 */
179	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(10),	/* PC22 */
180	      _RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(2),		/* WPLT30 */
181				_RF_SZ(32) | _RF_RS(0),		/* COPY */
182	_RF_S|_RF_A|		_RF_SZ(64) | _RF_RS(0),		/* GLOB_DAT */
183				_RF_SZ(32) | _RF_RS(0),		/* JMP_SLOT */
184	      _RF_A|	_RF_B|	_RF_SZ(64) | _RF_RS(0),		/* RELATIVE */
185	_RF_S|_RF_A|	_RF_U|	_RF_SZ(32) | _RF_RS(0),		/* UA_32 */
186
187	      _RF_A|		_RF_SZ(32) | _RF_RS(0),		/* PLT32 */
188	      _RF_A|		_RF_SZ(32) | _RF_RS(10),	/* HIPLT22 */
189	      _RF_A|		_RF_SZ(32) | _RF_RS(0),		/* LOPLT10 */
190	      _RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(0),		/* PCPLT32 */
191	      _RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(10),	/* PCPLT22 */
192	      _RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(0),		/* PCPLT10 */
193	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(0),		/* 10 */
194	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(0),		/* 11 */
195	_RF_S|_RF_A|_RF_X|	_RF_SZ(64) | _RF_RS(0),		/* 64 */
196	_RF_S|_RF_A|/*extra*/	_RF_SZ(32) | _RF_RS(0),		/* OLO10 */
197	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(42),	/* HH22 */
198	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(32),	/* HM10 */
199	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(10),	/* LM22 */
200	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(42),	/* PC_HH22 */
201	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(32),	/* PC_HM10 */
202	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(10),	/* PC_LM22 */
203	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(2),		/* WDISP16 */
204	_RF_S|_RF_A|_RF_P|	_RF_SZ(32) | _RF_RS(2),		/* WDISP19 */
205	_RF_S|_RF_A|		_RF_SZ(32) | _RF_RS(0),		/* GLOB_JMP */
206	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(0),		/* 7 */
207	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(0),		/* 5 */
208	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(0),		/* 6 */
209	_RF_S|_RF_A|_RF_P|	_RF_SZ(64) | _RF_RS(0),		/* DISP64 */
210	      _RF_A|		_RF_SZ(64) | _RF_RS(0),		/* PLT64 */
211	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(10),	/* HIX22 */
212	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(0),		/* LOX10 */
213	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(22),	/* H44 */
214	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(12),	/* M44 */
215	_RF_S|_RF_A|_RF_X|	_RF_SZ(32) | _RF_RS(0),		/* L44 */
216	_RF_S|_RF_A|		_RF_SZ(64) | _RF_RS(0),		/* REGISTER */
217	_RF_S|_RF_A|	_RF_U|	_RF_SZ(64) | _RF_RS(0),		/* UA64 */
218	_RF_S|_RF_A|	_RF_U|	_RF_SZ(16) | _RF_RS(0),		/* UA16 */
219};
220
221#if 0
222static const char *reloc_names[] = {
223	"NONE", "RELOC_8", "RELOC_16", "RELOC_32", "DISP_8",
224	"DISP_16", "DISP_32", "WDISP_30", "WDISP_22", "HI22",
225	"22", "13", "LO10", "GOT10", "GOT13",
226	"GOT22", "PC10", "PC22", "WPLT30", "COPY",
227	"GLOB_DAT", "JMP_SLOT", "RELATIVE", "UA_32", "PLT32",
228	"HIPLT22", "LOPLT10", "LOPLT10", "PCPLT22", "PCPLT32",
229	"10", "11", "64", "OLO10", "HH22",
230	"HM10", "LM22", "PC_HH22", "PC_HM10", "PC_LM22",
231	"WDISP16", "WDISP19", "GLOB_JMP", "7", "5", "6",
232	"DISP64", "PLT64", "HIX22", "LOX10", "H44", "M44",
233	"L44", "REGISTER", "UA64", "UA16"
234};
235#endif
236
237#define RELOC_RESOLVE_SYMBOL(t)		((reloc_target_flags[t] & _RF_S) != 0)
238#define RELOC_PC_RELATIVE(t)		((reloc_target_flags[t] & _RF_P) != 0)
239#define RELOC_BASE_RELATIVE(t)		((reloc_target_flags[t] & _RF_B) != 0)
240#define RELOC_UNALIGNED(t)		((reloc_target_flags[t] & _RF_U) != 0)
241#define RELOC_USE_ADDEND(t)		((reloc_target_flags[t] & _RF_A) != 0)
242#define	RELOC_BARE_SYMBOL(t)		((reloc_target_flags[t] & _RF_X) != 0)
243#define RELOC_TARGET_SIZE(t)		((reloc_target_flags[t] >> 8) & 0xff)
244#define RELOC_VALUE_RIGHTSHIFT(t)	(reloc_target_flags[t] & 0xff)
245
246static const long reloc_target_bitmask[] = {
247#define _BM(x)	(~(-(1ULL << (x))))
248	0,				/* NONE */
249	_BM(8), _BM(16), _BM(32),	/* RELOC_8, _16, _32 */
250	_BM(8), _BM(16), _BM(32),	/* DISP8, DISP16, DISP32 */
251	_BM(30), _BM(22),		/* WDISP30, WDISP22 */
252	_BM(22), _BM(22),		/* HI22, _22 */
253	_BM(13), _BM(10),		/* RELOC_13, _LO10 */
254	_BM(10), _BM(13), _BM(22),	/* GOT10, GOT13, GOT22 */
255	_BM(10), _BM(22),		/* _PC10, _PC22 */
256	_BM(30), 0,			/* _WPLT30, _COPY */
257	_BM(32), _BM(32), _BM(32),	/* _GLOB_DAT, JMP_SLOT, _RELATIVE */
258	_BM(32), _BM(32),		/* _UA32, PLT32 */
259	_BM(22), _BM(10),		/* _HIPLT22, LOPLT10 */
260	_BM(32), _BM(22), _BM(10),	/* _PCPLT32, _PCPLT22, _PCPLT10 */
261	_BM(10), _BM(11), -1,		/* _10, _11, _64 */
262	_BM(13), _BM(22),		/* _OLO10, _HH22 */
263	_BM(10), _BM(22),		/* _HM10, _LM22 */
264	_BM(22), _BM(10), _BM(22),	/* _PC_HH22, _PC_HM10, _PC_LM22 */
265	_BM(16), _BM(19),		/* _WDISP16, _WDISP19 */
266	-1,				/* GLOB_JMP */
267	_BM(7), _BM(5), _BM(6)		/* _7, _5, _6 */
268	-1, -1,				/* DISP64, PLT64 */
269	_BM(22), _BM(13),		/* HIX22, LOX10 */
270	_BM(22), _BM(10), _BM(13),	/* H44, M44, L44 */
271	-1, -1, _BM(16),		/* REGISTER, UA64, UA16 */
272#undef _BM
273};
274#define RELOC_VALUE_BITMASK(t)	(reloc_target_bitmask[t])
275
276int
277elf_reloc_local(linker_file_t lf, Elf_Addr relocbase, const void *data,
278    int type, elf_lookup_fn lookup)
279{
280	const Elf_Rela *rela;
281	Elf_Addr value;
282	Elf_Addr *where;
283
284	if (type != ELF_RELOC_RELA)
285		return (-1);
286
287	rela = (const Elf_Rela *)data;
288	if (ELF64_R_TYPE_ID(rela->r_info) != R_SPARC_RELATIVE)
289		return (-1);
290
291	value = rela->r_addend + (Elf_Addr)lf->address;
292	where = (Elf_Addr *)((Elf_Addr)lf->address + rela->r_offset);
293
294	*where = elf_relocaddr(lf, value);
295
296	return (0);
297}
298
299/* Process one elf relocation with addend. */
300int
301elf_reloc(linker_file_t lf, Elf_Addr relocbase, const void *data, int type,
302    elf_lookup_fn lookup)
303{
304	const Elf_Rela *rela;
305	Elf_Word *where32;
306	Elf_Addr *where;
307	Elf_Size rtype, symidx;
308	Elf_Addr value;
309	Elf_Addr mask;
310	Elf_Addr addr;
311
312	if (type != ELF_RELOC_RELA)
313		return (-1);
314
315	rela = (const Elf_Rela *)data;
316	where = (Elf_Addr *)(relocbase + rela->r_offset);
317	where32 = (Elf_Word *)where;
318	rtype = ELF64_R_TYPE_ID(rela->r_info);
319	symidx = ELF_R_SYM(rela->r_info);
320
321	if (rtype == R_SPARC_NONE || rtype == R_SPARC_RELATIVE)
322		return (0);
323
324	if (rtype == R_SPARC_JMP_SLOT || rtype == R_SPARC_COPY ||
325	    rtype >= sizeof(reloc_target_bitmask) /
326	    sizeof(*reloc_target_bitmask))
327		return (-1);
328
329	if (RELOC_UNALIGNED(rtype))
330		return (-1);
331
332	value = rela->r_addend;
333
334	if (RELOC_RESOLVE_SYMBOL(rtype)) {
335		addr = lookup(lf, symidx, 1);
336		if (addr == 0)
337			return (-1);
338		value += addr;
339		if (RELOC_BARE_SYMBOL(rtype))
340			value = elf_relocaddr(lf, value);
341	}
342
343	if (rtype == R_SPARC_OLO10)
344		value = (value & 0x3ff) + ELF64_R_TYPE_DATA(rela->r_info);
345
346	if (RELOC_PC_RELATIVE(rtype))
347		value -= (Elf_Addr)where;
348
349	if (RELOC_BASE_RELATIVE(rtype)) {
350		value = elf_relocaddr(lf, value + relocbase);
351	}
352
353	mask = RELOC_VALUE_BITMASK(rtype);
354	value >>= RELOC_VALUE_RIGHTSHIFT(rtype);
355	value &= mask;
356
357	if (RELOC_TARGET_SIZE(rtype) > 32) {
358		*where &= ~mask;
359		*where |= value;
360	} else {
361		*where32 &= ~mask;
362		*where32 |= value;
363	}
364
365	return (0);
366}
367
368int
369elf_cpu_load_file(linker_file_t lf __unused)
370{
371
372	return (0);
373}
374
375int
376elf_cpu_unload_file(linker_file_t lf __unused)
377{
378
379	return (0);
380}
381