1*22028508SToomas Soome /*-
2*22028508SToomas Soome * Copyright (c) 2003 Jake Burkholder.
3*22028508SToomas Soome * Copyright 1996-1998 John D. Polstra.
4*22028508SToomas Soome * Copyright (c) 1998 Michael Smith <msmith@freebsd.org>
5*22028508SToomas Soome * Copyright (c) 1998 Peter Wemm <peter@freebsd.org>
6*22028508SToomas Soome * All rights reserved.
7*22028508SToomas Soome *
8*22028508SToomas Soome * Redistribution and use in source and binary forms, with or without
9*22028508SToomas Soome * modification, are permitted provided that the following conditions
10*22028508SToomas Soome * are met:
11*22028508SToomas Soome * 1. Redistributions of source code must retain the above copyright
12*22028508SToomas Soome * notice, this list of conditions and the following disclaimer.
13*22028508SToomas Soome * 2. Redistributions in binary form must reproduce the above copyright
14*22028508SToomas Soome * notice, this list of conditions and the following disclaimer in the
15*22028508SToomas Soome * documentation and/or other materials provided with the distribution.
16*22028508SToomas Soome *
17*22028508SToomas Soome * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18*22028508SToomas Soome * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19*22028508SToomas Soome * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20*22028508SToomas Soome * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21*22028508SToomas Soome * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22*22028508SToomas Soome * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23*22028508SToomas Soome * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24*22028508SToomas Soome * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25*22028508SToomas Soome * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26*22028508SToomas Soome * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27*22028508SToomas Soome * SUCH DAMAGE.
28*22028508SToomas Soome */
29*22028508SToomas Soome
30*22028508SToomas Soome #include <sys/cdefs.h>
31*22028508SToomas Soome __FBSDID("$FreeBSD$");
32*22028508SToomas Soome
33*22028508SToomas Soome #include <sys/types.h>
34*22028508SToomas Soome #include <machine/elf.h>
35*22028508SToomas Soome
36*22028508SToomas Soome #include <stand.h>
37*22028508SToomas Soome
38*22028508SToomas Soome #define FREEBSD_ELF
39*22028508SToomas Soome #include <link.h>
40*22028508SToomas Soome
41*22028508SToomas Soome #include "bootstrap.h"
42*22028508SToomas Soome
43*22028508SToomas Soome #define COPYOUT(s,d,l) archsw.arch_copyout((vm_offset_t)(s), d, l)
44*22028508SToomas Soome
45*22028508SToomas Soome /*
46*22028508SToomas Soome * Apply a single intra-module relocation to the data. `relbase' is the
47*22028508SToomas Soome * target relocation base for the section (i.e. it corresponds to where
48*22028508SToomas Soome * r_offset == 0). `dataaddr' is the relocated address corresponding to
49*22028508SToomas Soome * the start of the data, and `len' is the number of bytes.
50*22028508SToomas Soome */
51*22028508SToomas Soome int
__elfN(reloc)52*22028508SToomas Soome __elfN(reloc)(struct elf_file *ef, symaddr_fn *symaddr, const void *reldata,
53*22028508SToomas Soome int reltype, Elf_Addr relbase, Elf_Addr dataaddr, void *data, size_t len)
54*22028508SToomas Soome {
55*22028508SToomas Soome #ifdef __sparc__
56*22028508SToomas Soome Elf_Size w;
57*22028508SToomas Soome const Elf_Rela *a;
58*22028508SToomas Soome
59*22028508SToomas Soome switch (reltype) {
60*22028508SToomas Soome case ELF_RELOC_RELA:
61*22028508SToomas Soome a = reldata;
62*22028508SToomas Soome if (relbase + a->r_offset >= dataaddr &&
63*22028508SToomas Soome relbase + a->r_offset < dataaddr + len) {
64*22028508SToomas Soome switch (ELF_R_TYPE(a->r_info)) {
65*22028508SToomas Soome case R_SPARC_RELATIVE:
66*22028508SToomas Soome w = relbase + a->r_addend;
67*22028508SToomas Soome bcopy(&w, (u_char *)data + (relbase +
68*22028508SToomas Soome a->r_offset - dataaddr), sizeof(w));
69*22028508SToomas Soome break;
70*22028508SToomas Soome default:
71*22028508SToomas Soome printf("\nunhandled relocation type %u\n",
72*22028508SToomas Soome (u_int)ELF_R_TYPE(a->r_info));
73*22028508SToomas Soome return (EFTYPE);
74*22028508SToomas Soome }
75*22028508SToomas Soome }
76*22028508SToomas Soome break;
77*22028508SToomas Soome }
78*22028508SToomas Soome
79*22028508SToomas Soome return (0);
80*22028508SToomas Soome #elif (defined(__i386__) || defined(__amd64__)) && __ELF_WORD_SIZE == 64
81*22028508SToomas Soome Elf64_Addr *where, val;
82*22028508SToomas Soome Elf_Addr addend, addr;
83*22028508SToomas Soome Elf_Size rtype, symidx;
84*22028508SToomas Soome const Elf_Rel *rel;
85*22028508SToomas Soome const Elf_Rela *rela;
86*22028508SToomas Soome
87*22028508SToomas Soome switch (reltype) {
88*22028508SToomas Soome case ELF_RELOC_REL:
89*22028508SToomas Soome rel = (const Elf_Rel *)reldata;
90*22028508SToomas Soome where = (Elf_Addr *)((char *)data + relbase + rel->r_offset -
91*22028508SToomas Soome dataaddr);
92*22028508SToomas Soome addend = 0;
93*22028508SToomas Soome rtype = ELF_R_TYPE(rel->r_info);
94*22028508SToomas Soome symidx = ELF_R_SYM(rel->r_info);
95*22028508SToomas Soome addend = 0;
96*22028508SToomas Soome break;
97*22028508SToomas Soome case ELF_RELOC_RELA:
98*22028508SToomas Soome rela = (const Elf_Rela *)reldata;
99*22028508SToomas Soome where = (Elf_Addr *)((char *)data + relbase + rela->r_offset -
100*22028508SToomas Soome dataaddr);
101*22028508SToomas Soome addend = rela->r_addend;
102*22028508SToomas Soome rtype = ELF_R_TYPE(rela->r_info);
103*22028508SToomas Soome symidx = ELF_R_SYM(rela->r_info);
104*22028508SToomas Soome break;
105*22028508SToomas Soome default:
106*22028508SToomas Soome return (EINVAL);
107*22028508SToomas Soome }
108*22028508SToomas Soome
109*22028508SToomas Soome if ((char *)where < (char *)data || (char *)where >= (char *)data + len)
110*22028508SToomas Soome return (0);
111*22028508SToomas Soome
112*22028508SToomas Soome if (reltype == ELF_RELOC_REL)
113*22028508SToomas Soome addend = *where;
114*22028508SToomas Soome
115*22028508SToomas Soome /* XXX, definitions not available on i386. */
116*22028508SToomas Soome #define R_X86_64_64 1
117*22028508SToomas Soome #define R_X86_64_RELATIVE 8
118*22028508SToomas Soome
119*22028508SToomas Soome switch (rtype) {
120*22028508SToomas Soome case R_X86_64_64: /* S + A */
121*22028508SToomas Soome addr = symaddr(ef, symidx);
122*22028508SToomas Soome if (addr == 0)
123*22028508SToomas Soome return (ESRCH);
124*22028508SToomas Soome val = addr + addend;
125*22028508SToomas Soome *where = val;
126*22028508SToomas Soome break;
127*22028508SToomas Soome case R_X86_64_RELATIVE:
128*22028508SToomas Soome addr = (Elf_Addr)addend + relbase;
129*22028508SToomas Soome val = addr;
130*22028508SToomas Soome *where = val;
131*22028508SToomas Soome break;
132*22028508SToomas Soome default:
133*22028508SToomas Soome printf("\nunhandled relocation type %u\n", (u_int)rtype);
134*22028508SToomas Soome return (EFTYPE);
135*22028508SToomas Soome }
136*22028508SToomas Soome
137*22028508SToomas Soome return (0);
138*22028508SToomas Soome #elif defined(__i386__) && __ELF_WORD_SIZE == 32
139*22028508SToomas Soome Elf_Addr addend, addr, *where, val;
140*22028508SToomas Soome Elf_Size rtype, symidx;
141*22028508SToomas Soome const Elf_Rel *rel;
142*22028508SToomas Soome const Elf_Rela *rela;
143*22028508SToomas Soome
144*22028508SToomas Soome switch (reltype) {
145*22028508SToomas Soome case ELF_RELOC_REL:
146*22028508SToomas Soome rel = (const Elf_Rel *)reldata;
147*22028508SToomas Soome where = (Elf_Addr *)((char *)data + relbase + rel->r_offset -
148*22028508SToomas Soome dataaddr);
149*22028508SToomas Soome addend = 0;
150*22028508SToomas Soome rtype = ELF_R_TYPE(rel->r_info);
151*22028508SToomas Soome symidx = ELF_R_SYM(rel->r_info);
152*22028508SToomas Soome addend = 0;
153*22028508SToomas Soome break;
154*22028508SToomas Soome case ELF_RELOC_RELA:
155*22028508SToomas Soome rela = (const Elf_Rela *)reldata;
156*22028508SToomas Soome where = (Elf_Addr *)((char *)data + relbase + rela->r_offset -
157*22028508SToomas Soome dataaddr);
158*22028508SToomas Soome addend = rela->r_addend;
159*22028508SToomas Soome rtype = ELF_R_TYPE(rela->r_info);
160*22028508SToomas Soome symidx = ELF_R_SYM(rela->r_info);
161*22028508SToomas Soome break;
162*22028508SToomas Soome default:
163*22028508SToomas Soome return (EINVAL);
164*22028508SToomas Soome }
165*22028508SToomas Soome
166*22028508SToomas Soome if ((char *)where < (char *)data || (char *)where >= (char *)data + len)
167*22028508SToomas Soome return (0);
168*22028508SToomas Soome
169*22028508SToomas Soome if (reltype == ELF_RELOC_REL)
170*22028508SToomas Soome addend = *where;
171*22028508SToomas Soome
172*22028508SToomas Soome /* XXX, definitions not available on amd64. */
173*22028508SToomas Soome #define R_386_32 1 /* Add symbol value. */
174*22028508SToomas Soome #define R_386_GLOB_DAT 6 /* Set GOT entry to data address. */
175*22028508SToomas Soome #define R_386_RELATIVE 8 /* Add load address of shared object. */
176*22028508SToomas Soome
177*22028508SToomas Soome switch (rtype) {
178*22028508SToomas Soome case R_386_RELATIVE:
179*22028508SToomas Soome addr = addend + relbase;
180*22028508SToomas Soome *where = addr;
181*22028508SToomas Soome break;
182*22028508SToomas Soome case R_386_32: /* S + A */
183*22028508SToomas Soome addr = symaddr(ef, symidx);
184*22028508SToomas Soome if (addr == 0)
185*22028508SToomas Soome return (ESRCH);
186*22028508SToomas Soome val = addr + addend;
187*22028508SToomas Soome *where = val;
188*22028508SToomas Soome break;
189*22028508SToomas Soome default:
190*22028508SToomas Soome printf("\nunhandled relocation type %u\n", (u_int)rtype);
191*22028508SToomas Soome return (EFTYPE);
192*22028508SToomas Soome }
193*22028508SToomas Soome
194*22028508SToomas Soome return (0);
195*22028508SToomas Soome #elif defined(__powerpc__)
196*22028508SToomas Soome Elf_Size w;
197*22028508SToomas Soome const Elf_Rela *rela;
198*22028508SToomas Soome
199*22028508SToomas Soome switch (reltype) {
200*22028508SToomas Soome case ELF_RELOC_RELA:
201*22028508SToomas Soome rela = reldata;
202*22028508SToomas Soome if (relbase + rela->r_offset >= dataaddr &&
203*22028508SToomas Soome relbase + rela->r_offset < dataaddr + len) {
204*22028508SToomas Soome switch (ELF_R_TYPE(rela->r_info)) {
205*22028508SToomas Soome case R_PPC_RELATIVE:
206*22028508SToomas Soome w = relbase + rela->r_addend;
207*22028508SToomas Soome bcopy(&w, (u_char *)data + (relbase +
208*22028508SToomas Soome rela->r_offset - dataaddr), sizeof(w));
209*22028508SToomas Soome break;
210*22028508SToomas Soome default:
211*22028508SToomas Soome printf("\nunhandled relocation type %u\n",
212*22028508SToomas Soome (u_int)ELF_R_TYPE(rela->r_info));
213*22028508SToomas Soome return (EFTYPE);
214*22028508SToomas Soome }
215*22028508SToomas Soome }
216*22028508SToomas Soome break;
217*22028508SToomas Soome }
218*22028508SToomas Soome
219*22028508SToomas Soome return (0);
220*22028508SToomas Soome #else
221*22028508SToomas Soome (void)ef;
222*22028508SToomas Soome (void)symaddr;
223*22028508SToomas Soome (void)reldata;
224*22028508SToomas Soome (void)reltype;
225*22028508SToomas Soome (void)relbase;
226*22028508SToomas Soome (void)dataaddr;
227*22028508SToomas Soome (void)data;
228*22028508SToomas Soome (void)len;
229*22028508SToomas Soome return (EOPNOTSUPP);
230*22028508SToomas Soome #endif
231*22028508SToomas Soome }
232