xref: /netbsd-src/sys/arch/arm/arm32/kobj_machdep.c (revision a5847cc334d9a7029f6352b847e9e8d71a0f9e0c)
1 /*	$NetBSD: kobj_machdep.c,v 1.3 2009/08/17 19:44:32 dsl Exp $	*/
2 
3 /*-
4  * Copyright (c) 2008 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
17  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
18  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
20  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26  * POSSIBILITY OF SUCH DAMAGE.
27  */
28 
29 /*-
30  * Copyright 1996-1998 John D. Polstra.
31  * All rights reserved.
32  *
33  * Redistribution and use in source and binary forms, with or without
34  * modification, are permitted provided that the following conditions
35  * are met:
36  * 1. Redistributions of source code must retain the above copyright
37  *    notice, this list of conditions and the following disclaimer.
38  * 2. Redistributions in binary form must reproduce the above copyright
39  *    notice, this list of conditions and the following disclaimer in the
40  *    documentation and/or other materials provided with the distribution.
41  *
42  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
43  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
44  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
45  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
46  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
47  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
48  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
49  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
50  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
51  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
52  */
53 
54 #include <sys/cdefs.h>
55 __KERNEL_RCSID(0, "$NetBSD: kobj_machdep.c,v 1.3 2009/08/17 19:44:32 dsl Exp $");
56 
57 #define	ELFSIZE		ARCH_ELFSIZE
58 
59 #include <sys/param.h>
60 #include <sys/systm.h>
61 #include <sys/kobj.h>
62 #include <sys/exec.h>
63 #include <sys/exec_elf.h>
64 
65 #include <arm/cpufunc.h>
66 
67 int
68 kobj_reloc(kobj_t ko, uintptr_t relocbase, const void *data,
69 	   bool isrela, bool local)
70 {
71 	Elf_Addr *where;
72 	Elf_Addr addr;
73 	Elf_Addr addend;
74 	Elf_Word rtype, symidx;
75 	const Elf_Rel *rel;
76 	const Elf_Rela *rela;
77 
78 	if (isrela) {
79 		rela = (const Elf_Rela *)data;
80 		where = (Elf_Addr *) (relocbase + rela->r_offset);
81 		addend = rela->r_addend;
82 		rtype = ELF_R_TYPE(rela->r_info);
83 		symidx = ELF_R_SYM(rela->r_info);
84 	} else {
85 		rel = (const Elf_Rel *)data;
86 		where = (Elf_Addr *) (relocbase + rel->r_offset);
87 		addend = *where;
88 		rtype = ELF_R_TYPE(rel->r_info);
89 		symidx = ELF_R_SYM(rel->r_info);
90 	}
91 
92 	switch (rtype) {
93 	case R_ARM_NONE:	/* none */
94 		return 0;
95 
96 	case R_ARM_ABS32:
97 		addr = kobj_sym_lookup(ko, symidx);
98 		if (addr == 0)
99 			break;
100 		*where = addr + addend;
101 		return 0;
102 
103 	case R_ARM_COPY:	/* none */
104 		/* There shouldn't be copy relocations in kernel objects. */
105 		break;
106 
107 	case R_ARM_JUMP_SLOT:
108 		addr = kobj_sym_lookup(ko, symidx);
109 		if (addr == 0)
110 			break;
111 		*where = addr;
112 		return 0;
113 
114 	case R_ARM_RELATIVE:	/* A + B */
115 		addr = relocbase + addend;
116 		if (*where != addr)
117 			*where = addr;
118 		return 0;
119 
120 	case R_ARM_PC24:
121 		if (local)
122 			return 0;
123 
124 		/* Remove the instruction from the 24 bit offset */
125 		addend &= 0x00ffffff;
126 
127 		/* Sign extend if necessary */
128 		if (addend & 0x00800000)
129 			addend |= 0xff000000;
130 
131 		addr = kobj_sym_lookup(ko, symidx);
132 		if (addr == 0)
133 			break;
134 
135 		addend += ((uint32_t *)addr - (uint32_t *)where);
136 
137 		if ((addend & 0xff800000) != 0x00000000 &&
138 		    (addend & 0xff800000) != 0xff800000) {
139 			printf ("Relocation %x too far @ %p\n", addend, where);
140 			return -1;
141 		}
142 		*where = (*where & 0xff000000) | (addend & 0x00ffffff);
143 		return 0;
144 
145 	default:
146 		break;
147 	}
148 
149 	printf("kobj_reloc: unexpected/invalid relocation type %d @ %p symidx %u\n",
150 	    rtype, where, symidx);
151 	return -1;
152 }
153 
154 int
155 kobj_machdep(kobj_t ko, void *base, size_t size, bool load)
156 {
157 
158 	if (load) {
159 		cpu_idcache_wbinv_all();
160 		cpu_tlb_flushID();
161 	}
162 
163 	return 0;
164 }
165