1199767f8SToomas Soome /*-
2199767f8SToomas Soome * Copyright (c) 2003 Jake Burkholder.
3199767f8SToomas Soome * Copyright 1996-1998 John D. Polstra.
4199767f8SToomas Soome * Copyright (c) 1998 Michael Smith <msmith@freebsd.org>
5199767f8SToomas Soome * Copyright (c) 1998 Peter Wemm <peter@freebsd.org>
6199767f8SToomas Soome * All rights reserved.
7199767f8SToomas Soome *
8199767f8SToomas Soome * Redistribution and use in source and binary forms, with or without
9199767f8SToomas Soome * modification, are permitted provided that the following conditions
10199767f8SToomas Soome * are met:
11199767f8SToomas Soome * 1. Redistributions of source code must retain the above copyright
12199767f8SToomas Soome * notice, this list of conditions and the following disclaimer.
13199767f8SToomas Soome * 2. Redistributions in binary form must reproduce the above copyright
14199767f8SToomas Soome * notice, this list of conditions and the following disclaimer in the
15199767f8SToomas Soome * documentation and/or other materials provided with the distribution.
16199767f8SToomas Soome *
17199767f8SToomas Soome * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18199767f8SToomas Soome * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19199767f8SToomas Soome * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20199767f8SToomas Soome * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21199767f8SToomas Soome * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22199767f8SToomas Soome * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23199767f8SToomas Soome * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24199767f8SToomas Soome * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25199767f8SToomas Soome * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26199767f8SToomas Soome * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27199767f8SToomas Soome * SUCH DAMAGE.
28199767f8SToomas Soome */
29199767f8SToomas Soome
30199767f8SToomas Soome #include <sys/cdefs.h>
31199767f8SToomas Soome __FBSDID("$FreeBSD$");
32199767f8SToomas Soome
33199767f8SToomas Soome #include <sys/types.h>
34199767f8SToomas Soome #include <machine/elf.h>
35199767f8SToomas Soome
36199767f8SToomas Soome #include <stand.h>
37199767f8SToomas Soome
38199767f8SToomas Soome #define FREEBSD_ELF
39199767f8SToomas Soome #include <link.h>
40199767f8SToomas Soome
41199767f8SToomas Soome #include "bootstrap.h"
42199767f8SToomas Soome
43199767f8SToomas Soome #define COPYOUT(s,d,l) archsw.arch_copyout((vm_offset_t)(s), d, l)
44199767f8SToomas Soome
45199767f8SToomas Soome /*
46199767f8SToomas Soome * Apply a single intra-module relocation to the data. `relbase' is the
47199767f8SToomas Soome * target relocation base for the section (i.e. it corresponds to where
48199767f8SToomas Soome * r_offset == 0). `dataaddr' is the relocated address corresponding to
49199767f8SToomas Soome * the start of the data, and `len' is the number of bytes.
50199767f8SToomas Soome */
51199767f8SToomas Soome int
__elfN(reloc)52199767f8SToomas Soome __elfN(reloc)(struct elf_file *ef, symaddr_fn *symaddr, const void *reldata,
53199767f8SToomas Soome int reltype, Elf_Addr relbase, Elf_Addr dataaddr, void *data, size_t len)
54199767f8SToomas Soome {
55199767f8SToomas Soome #ifdef __sparc__
56199767f8SToomas Soome Elf_Size w;
57199767f8SToomas Soome const Elf_Rela *a;
58199767f8SToomas Soome
59199767f8SToomas Soome switch (reltype) {
60199767f8SToomas Soome case ELF_RELOC_RELA:
61199767f8SToomas Soome a = reldata;
62199767f8SToomas Soome if (relbase + a->r_offset >= dataaddr &&
63199767f8SToomas Soome relbase + a->r_offset < dataaddr + len) {
64199767f8SToomas Soome switch (ELF_R_TYPE(a->r_info)) {
65199767f8SToomas Soome case R_SPARC_RELATIVE:
66199767f8SToomas Soome w = relbase + a->r_addend;
67199767f8SToomas Soome bcopy(&w, (u_char *)data + (relbase +
68199767f8SToomas Soome a->r_offset - dataaddr), sizeof(w));
69199767f8SToomas Soome break;
70199767f8SToomas Soome default:
71199767f8SToomas Soome printf("\nunhandled relocation type %u\n",
72199767f8SToomas Soome (u_int)ELF_R_TYPE(a->r_info));
73199767f8SToomas Soome return (EFTYPE);
74199767f8SToomas Soome }
75199767f8SToomas Soome }
76199767f8SToomas Soome break;
77199767f8SToomas Soome }
78199767f8SToomas Soome
79199767f8SToomas Soome return (0);
80199767f8SToomas Soome #elif (defined(__i386__) || defined(__amd64__)) && __ELF_WORD_SIZE == 64
81199767f8SToomas Soome Elf64_Addr *where, val;
82199767f8SToomas Soome Elf_Addr addend, addr;
83199767f8SToomas Soome Elf_Size rtype, symidx;
84199767f8SToomas Soome const Elf_Rel *rel;
85199767f8SToomas Soome const Elf_Rela *rela;
86199767f8SToomas Soome
87199767f8SToomas Soome switch (reltype) {
88199767f8SToomas Soome case ELF_RELOC_REL:
89199767f8SToomas Soome rel = (const Elf_Rel *)reldata;
90199767f8SToomas Soome where = (Elf_Addr *)((char *)data + relbase + rel->r_offset -
91199767f8SToomas Soome dataaddr);
92199767f8SToomas Soome addend = 0;
93199767f8SToomas Soome rtype = ELF_R_TYPE(rel->r_info);
94199767f8SToomas Soome symidx = ELF_R_SYM(rel->r_info);
95199767f8SToomas Soome addend = 0;
96199767f8SToomas Soome break;
97199767f8SToomas Soome case ELF_RELOC_RELA:
98199767f8SToomas Soome rela = (const Elf_Rela *)reldata;
99199767f8SToomas Soome where = (Elf_Addr *)((char *)data + relbase + rela->r_offset -
100199767f8SToomas Soome dataaddr);
101199767f8SToomas Soome addend = rela->r_addend;
102199767f8SToomas Soome rtype = ELF_R_TYPE(rela->r_info);
103199767f8SToomas Soome symidx = ELF_R_SYM(rela->r_info);
104199767f8SToomas Soome break;
105199767f8SToomas Soome default:
106199767f8SToomas Soome return (EINVAL);
107199767f8SToomas Soome }
108199767f8SToomas Soome
109199767f8SToomas Soome if ((char *)where < (char *)data || (char *)where >= (char *)data + len)
110199767f8SToomas Soome return (0);
111199767f8SToomas Soome
112199767f8SToomas Soome if (reltype == ELF_RELOC_REL)
113199767f8SToomas Soome addend = *where;
114199767f8SToomas Soome
115199767f8SToomas Soome /* XXX, definitions not available on i386. */
116199767f8SToomas Soome #define R_X86_64_64 1
117199767f8SToomas Soome #define R_X86_64_RELATIVE 8
118199767f8SToomas Soome
119199767f8SToomas Soome switch (rtype) {
120199767f8SToomas Soome case R_X86_64_64: /* S + A */
121199767f8SToomas Soome addr = symaddr(ef, symidx);
122199767f8SToomas Soome if (addr == 0)
123199767f8SToomas Soome return (ESRCH);
124199767f8SToomas Soome val = addr + addend;
125199767f8SToomas Soome *where = val;
126199767f8SToomas Soome break;
127199767f8SToomas Soome case R_X86_64_RELATIVE:
128199767f8SToomas Soome addr = (Elf_Addr)addend + relbase;
129199767f8SToomas Soome val = addr;
130199767f8SToomas Soome *where = val;
131199767f8SToomas Soome break;
132199767f8SToomas Soome default:
133199767f8SToomas Soome printf("\nunhandled relocation type %u\n", (u_int)rtype);
134199767f8SToomas Soome return (EFTYPE);
135199767f8SToomas Soome }
136199767f8SToomas Soome
137199767f8SToomas Soome return (0);
138199767f8SToomas Soome #elif defined(__i386__) && __ELF_WORD_SIZE == 32
139199767f8SToomas Soome Elf_Addr addend, addr, *where, val;
140199767f8SToomas Soome Elf_Size rtype, symidx;
141199767f8SToomas Soome const Elf_Rel *rel;
142199767f8SToomas Soome const Elf_Rela *rela;
143199767f8SToomas Soome
144199767f8SToomas Soome switch (reltype) {
145199767f8SToomas Soome case ELF_RELOC_REL:
146199767f8SToomas Soome rel = (const Elf_Rel *)reldata;
147199767f8SToomas Soome where = (Elf_Addr *)((char *)data + relbase + rel->r_offset -
148199767f8SToomas Soome dataaddr);
149199767f8SToomas Soome addend = 0;
150199767f8SToomas Soome rtype = ELF_R_TYPE(rel->r_info);
151199767f8SToomas Soome symidx = ELF_R_SYM(rel->r_info);
152199767f8SToomas Soome addend = 0;
153199767f8SToomas Soome break;
154199767f8SToomas Soome case ELF_RELOC_RELA:
155199767f8SToomas Soome rela = (const Elf_Rela *)reldata;
156199767f8SToomas Soome where = (Elf_Addr *)((char *)data + relbase + rela->r_offset -
157199767f8SToomas Soome dataaddr);
158199767f8SToomas Soome addend = rela->r_addend;
159199767f8SToomas Soome rtype = ELF_R_TYPE(rela->r_info);
160199767f8SToomas Soome symidx = ELF_R_SYM(rela->r_info);
161199767f8SToomas Soome break;
162199767f8SToomas Soome default:
163199767f8SToomas Soome return (EINVAL);
164199767f8SToomas Soome }
165199767f8SToomas Soome
166199767f8SToomas Soome if ((char *)where < (char *)data || (char *)where >= (char *)data + len)
167199767f8SToomas Soome return (0);
168199767f8SToomas Soome
169199767f8SToomas Soome if (reltype == ELF_RELOC_REL)
170199767f8SToomas Soome addend = *where;
171199767f8SToomas Soome
172199767f8SToomas Soome /* XXX, definitions not available on amd64. */
173199767f8SToomas Soome #define R_386_32 1 /* Add symbol value. */
174199767f8SToomas Soome #define R_386_GLOB_DAT 6 /* Set GOT entry to data address. */
175199767f8SToomas Soome #define R_386_RELATIVE 8 /* Add load address of shared object. */
176199767f8SToomas Soome
177199767f8SToomas Soome switch (rtype) {
178199767f8SToomas Soome case R_386_RELATIVE:
179199767f8SToomas Soome addr = addend + relbase;
180199767f8SToomas Soome *where = addr;
181199767f8SToomas Soome break;
182199767f8SToomas Soome case R_386_32: /* S + A */
183199767f8SToomas Soome addr = symaddr(ef, symidx);
184199767f8SToomas Soome if (addr == 0)
185199767f8SToomas Soome return (ESRCH);
186199767f8SToomas Soome val = addr + addend;
187199767f8SToomas Soome *where = val;
188199767f8SToomas Soome break;
189199767f8SToomas Soome default:
190199767f8SToomas Soome printf("\nunhandled relocation type %u\n", (u_int)rtype);
191199767f8SToomas Soome return (EFTYPE);
192199767f8SToomas Soome }
193199767f8SToomas Soome
194199767f8SToomas Soome return (0);
195199767f8SToomas Soome #elif defined(__powerpc__)
196199767f8SToomas Soome Elf_Size w;
197199767f8SToomas Soome const Elf_Rela *rela;
198199767f8SToomas Soome
199199767f8SToomas Soome switch (reltype) {
200199767f8SToomas Soome case ELF_RELOC_RELA:
201199767f8SToomas Soome rela = reldata;
202199767f8SToomas Soome if (relbase + rela->r_offset >= dataaddr &&
203199767f8SToomas Soome relbase + rela->r_offset < dataaddr + len) {
204199767f8SToomas Soome switch (ELF_R_TYPE(rela->r_info)) {
205199767f8SToomas Soome case R_PPC_RELATIVE:
206199767f8SToomas Soome w = relbase + rela->r_addend;
207199767f8SToomas Soome bcopy(&w, (u_char *)data + (relbase +
208199767f8SToomas Soome rela->r_offset - dataaddr), sizeof(w));
209199767f8SToomas Soome break;
210199767f8SToomas Soome default:
211199767f8SToomas Soome printf("\nunhandled relocation type %u\n",
212199767f8SToomas Soome (u_int)ELF_R_TYPE(rela->r_info));
213199767f8SToomas Soome return (EFTYPE);
214199767f8SToomas Soome }
215199767f8SToomas Soome }
216199767f8SToomas Soome break;
217199767f8SToomas Soome }
218199767f8SToomas Soome
219199767f8SToomas Soome return (0);
220199767f8SToomas Soome #else
221199767f8SToomas Soome (void)ef;
222199767f8SToomas Soome (void)symaddr;
223199767f8SToomas Soome (void)reldata;
224199767f8SToomas Soome (void)reltype;
225199767f8SToomas Soome (void)relbase;
226199767f8SToomas Soome (void)dataaddr;
227199767f8SToomas Soome (void)data;
228199767f8SToomas Soome (void)len;
229199767f8SToomas Soome return (EOPNOTSUPP);
230199767f8SToomas Soome #endif
231199767f8SToomas Soome }
232