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
26 #include <sys/cdefs.h>
27 __FBSDID("$FreeBSD$");
28
29 #include <sys/param.h>
30 #include <sys/kernel.h>
31 #include <sys/systm.h>
32 #include <sys/exec.h>
33 #include <sys/imgact.h>
34 #include <sys/linker.h>
35 #include <sys/sysent.h>
36 #include <sys/imgact_elf.h>
37 #include <sys/syscall.h>
38 #include <sys/signalvar.h>
39 #include <sys/vnode.h>
40
41 #include <vm/vm.h>
42 #include <vm/pmap.h>
43 #include <vm/vm_param.h>
44
45 #include <machine/elf.h>
46 #include <machine/md_var.h>
47
48 struct sysentvec elf64_freebsd_sysvec = {
49 .sv_size = SYS_MAXSYSCALL,
50 .sv_table = sysent,
51 .sv_mask = 0,
52 .sv_sigsize = 0,
53 .sv_sigtbl = NULL,
54 .sv_errsize = 0,
55 .sv_errtbl = NULL,
56 .sv_transtrap = NULL,
57 .sv_fixup = __elfN(freebsd_fixup),
58 .sv_sendsig = sendsig,
59 .sv_sigcode = sigcode,
60 .sv_szsigcode = &szsigcode,
61 .sv_prepsyscall = NULL,
62 .sv_name = "FreeBSD ELF64",
63 .sv_coredump = __elfN(coredump),
64 .sv_imgact_try = NULL,
65 .sv_minsigstksz = MINSIGSTKSZ,
66 .sv_pagesize = PAGE_SIZE,
67 .sv_minuser = VM_MIN_ADDRESS,
68 .sv_maxuser = VM_MAXUSER_ADDRESS,
69 .sv_usrstack = USRSTACK,
70 .sv_psstrings = PS_STRINGS,
71 .sv_stackprot = VM_PROT_ALL,
72 .sv_copyout_strings = exec_copyout_strings,
73 .sv_setregs = exec_setregs,
74 .sv_fixlimit = NULL,
75 .sv_maxssiz = NULL
76 };
77
78 static Elf64_Brandinfo freebsd_brand_info = {
79 .brand = ELFOSABI_FREEBSD,
80 .machine = EM_X86_64,
81 .compat_3_brand = "FreeBSD",
82 .emul_path = NULL,
83 .interp_path = "/libexec/ld-elf.so.1",
84 .sysvec = &elf64_freebsd_sysvec,
85 .interp_newpath = NULL,
86 .brand_note = &elf64_freebsd_brandnote,
87 .flags = BI_CAN_EXEC_DYN | BI_BRAND_NOTE
88 };
89
90 SYSINIT(elf64, SI_SUB_EXEC, SI_ORDER_ANY,
91 (sysinit_cfunc_t) elf64_insert_brand_entry,
92 &freebsd_brand_info);
93
94 static Elf64_Brandinfo freebsd_brand_oinfo = {
95 .brand = ELFOSABI_FREEBSD,
96 .machine = EM_X86_64,
97 .compat_3_brand = "FreeBSD",
98 .emul_path = NULL,
99 .interp_path = "/usr/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
106 SYSINIT(oelf64, SI_SUB_EXEC, SI_ORDER_ANY,
107 (sysinit_cfunc_t) elf64_insert_brand_entry,
108 &freebsd_brand_oinfo);
109
110
111 void
112 elf64_dump_thread(struct thread *td __unused, void *dst __unused,
113 size_t *off __unused)
114 {
115 }
116
117
118 /* Process one elf relocation with addend. */
119 static int
120 elf_reloc_internal(linker_file_t lf, Elf_Addr relocbase, const void *data,
121 int type, int local, elf_lookup_fn lookup)
122 {
123 Elf64_Addr *where, val;
124 Elf32_Addr *where32, val32;
125 Elf_Addr addr;
126 Elf_Addr addend;
127 Elf_Size rtype, symidx;
128 const Elf_Rel *rel;
129 const Elf_Rela *rela;
130
131 switch (type) {
132 case ELF_RELOC_REL:
133 rel = (const Elf_Rel *)data;
134 where = (Elf_Addr *) (relocbase + rel->r_offset);
135 rtype = ELF_R_TYPE(rel->r_info);
136 symidx = ELF_R_SYM(rel->r_info);
137 /* Addend is 32 bit on 32 bit relocs */
138 switch (rtype) {
139 case R_X86_64_PC32:
140 case R_X86_64_32S:
141 addend = *(Elf32_Addr *)where;
142 break;
143 default:
144 addend = *where;
145 break;
146 }
147 break;
148 case ELF_RELOC_RELA:
149 rela = (const Elf_Rela *)data;
150 where = (Elf_Addr *) (relocbase + rela->r_offset);
151 addend = rela->r_addend;
152 rtype = ELF_R_TYPE(rela->r_info);
153 symidx = ELF_R_SYM(rela->r_info);
154 break;
155 default:
156 panic("unknown reloc type %d\n", type);
157 }
158
159 switch (rtype) {
160
161 case R_X86_64_NONE: /* none */
162 break;
163
164 case R_X86_64_64: /* S + A */
165 addr = lookup(lf, symidx, 1);
166 val = addr + addend;
167 if (addr == 0)
168 return -1;
169 if (*where != val)
170 *where = val;
171 break;
172
173 case R_X86_64_PC32: /* S + A - P */
174 addr = lookup(lf, symidx, 1);
175 where32 = (Elf32_Addr *)where;
176 val32 = (Elf32_Addr)(addr + addend - (Elf_Addr)where);
177 if (addr == 0)
178 return -1;
179 if (*where32 != val32)
180 *where32 = val32;
181 break;
182
183 case R_X86_64_32S: /* S + A sign extend */
184 addr = lookup(lf, symidx, 1);
185 val32 = (Elf32_Addr)(addr + addend);
186 where32 = (Elf32_Addr *)where;
187 if (addr == 0)
188 return -1;
189 if (*where32 != val32)
190 *where32 = val32;
191 break;
192
193 case R_X86_64_COPY: /* none */
194 /*
195 * There shouldn't be copy relocations in kernel
196 * objects.
197 */
198 printf("kldload: unexpected R_COPY relocation\n");
199 return -1;
200 break;
201
202 case R_X86_64_GLOB_DAT: /* S */
203 case R_X86_64_JMP_SLOT: /* XXX need addend + offset */
204 addr = lookup(lf, symidx, 1);
205 if (addr == 0)
206 return -1;
207 if (*where != addr)
208 *where = addr;
209 break;
210
211 case R_X86_64_RELATIVE: /* B + A */
212 addr = relocbase + addend;
213 val = addr;
214 if (*where != val)
215 *where = val;
216 break;
217
218 default:
219 printf("kldload: unexpected relocation type %ld\n",
220 rtype);
221 return -1;
222 }
223 return(0);
224 }
225
226 int
227 elf_reloc(linker_file_t lf, Elf_Addr relocbase, const void *data, int type,
228 elf_lookup_fn lookup)
229 {
230
231 return (elf_reloc_internal(lf, relocbase, data, type, 0, lookup));
232 }
233
234 int
235 elf_reloc_local(linker_file_t lf, Elf_Addr relocbase, const void *data,
236 int type, elf_lookup_fn lookup)
237 {
238
239 return (elf_reloc_internal(lf, relocbase, data, type, 1, lookup));
240 }
241
242 int
243 elf_cpu_load_file(linker_file_t lf __unused)
244 {
245
246 return (0);
247 }
248
249 int
250 elf_cpu_unload_file(linker_file_t lf __unused)
251 {
252
253 return (0);
254 }
Cache object: 339e2cba905e31f270a5e3868d041980
|