source: mainline/uspace/lib/c/arch/ia32/src/rtld/reloc.c@ aaae6d9

lfn serial ticket/834-toolchain-update topic/msim-upgrade topic/simplify-dev-export
Last change on this file since aaae6d9 was 58563585, checked in by Martin Decky <martin@…>, 9 years ago

code review and cstyle cleanup (no change in functionality)
  • Property mode set to 100644
File size: 5.3 KB
Line 
1/*
2 * Copyright (c) 2008 Jiri Svoboda
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 *
9 * - Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * - Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * - The name of the author may not be used to endorse or promote products
15 * derived from this software without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29/** @addtogroup libcia32
30 * @brief
31 * @{
32 */
33/**
34 * @file
35 */
36
37#include <stdio.h>
38#include <stdlib.h>
39
40#include <libarch/rtld/elf_dyn.h>
41#include <rtld/symbol.h>
42#include <rtld/rtld.h>
43#include <rtld/rtld_debug.h>
44#include <rtld/rtld_arch.h>
45
46void module_process_pre_arch(module_t *m)
47{
48 /* Unused */
49}
50
51
52/**
53 * Process (fixup) all relocations in a relocation table.
54 */
55void rel_table_process(module_t *m, elf_rel_t *rt, size_t rt_size)
56{
57 unsigned i;
58
59 size_t rt_entries;
60 size_t r_offset;
61 elf_word r_info;
62 unsigned rel_type;
63 elf_word sym_idx;
64 uint32_t sym_addr;
65
66 elf_symbol_t *sym_table;
67 elf_symbol_t *sym;
68 uint32_t *r_ptr;
69 uint32_t sym_size;
70 char *str_tab;
71
72 elf_symbol_t *sym_def;
73 module_t *dest;
74
75 DPRINTF("parse relocation table\n");
76
77 sym_table = m->dyn.sym_tab;
78 rt_entries = rt_size / sizeof(elf_rel_t);
79 str_tab = m->dyn.str_tab;
80
81 DPRINTF("address: 0x%x, entries: %d\n", (uintptr_t)rt, rt_entries);
82
83 for (i = 0; i < rt_entries; ++i) {
84// DPRINTF("symbol %d: ", i);
85 r_offset = rt[i].r_offset;
86 r_info = rt[i].r_info;
87
88 sym_idx = ELF32_R_SYM(r_info);
89 sym = &sym_table[sym_idx];
90
91/* DPRINTF("name '%s', value 0x%x, size 0x%x\n",
92 str_tab + sym->st_name,
93 sym->st_value,
94 sym->st_size);
95*/
96 rel_type = ELF32_R_TYPE(r_info);
97 r_ptr = (uint32_t *)(r_offset + m->bias);
98
99 if (sym->st_name != 0) {
100// DPRINTF("rel_type: %x, rel_offset: 0x%x\n", rel_type, r_offset);
101 sym_def = symbol_def_find(str_tab + sym->st_name,
102 m, ssf_none, &dest);
103 DPRINTF("dest name: '%s'\n", dest->dyn.soname);
104// DPRINTF("dest bias: 0x%x\n", dest->bias);
105 if (sym_def) {
106 sym_addr = (uint32_t)
107 symbol_get_addr(sym_def, dest, NULL);
108// DPRINTF("symbol definition found, addr=0x%x\n", sym_addr);
109 } else {
110 printf("Definition of '%s' not found.\n",
111 str_tab + sym->st_name);
112 continue;
113 }
114 } else {
115 sym_addr = 0;
116 sym_def = NULL;
117
118 /*
119 * DTPMOD with null st_name should return the index
120 * of the current module.
121 */
122 dest = m;
123 }
124
125 switch (rel_type) {
126 case R_386_GLOB_DAT:
127 case R_386_JUMP_SLOT:
128 DPRINTF("fixup R_386_GLOB_DAT/JUMP_SLOT (b+v)\n");
129 *r_ptr = sym_addr;
130 break;
131
132 case R_386_32:
133 DPRINTF("fixup R_386_32 (b+v+a)\n");
134 *r_ptr += sym_addr;
135 break;
136
137 case R_386_PC32:
138 DPRINTF("fixup R_386_PC32 (b+v+a-p)\n");
139 *r_ptr += sym_addr - (uint32_t) r_ptr;
140 break;
141
142 case R_386_COPY:
143 /*
144 * Copy symbol data from shared object to specified
145 * location. Need to find the 'source', i.e. the
146 * other instance of the object than the one in the
147 * executable program.
148 */
149 DPRINTF("fixup R_386_COPY (s)\n");
150
151 sym_def = symbol_def_find(str_tab + sym->st_name,
152 m, ssf_noexec, &dest);
153
154 if (sym_def) {
155 sym_addr = (uint32_t)
156 symbol_get_addr(sym_def, dest, NULL);
157 } else {
158 printf("Source definition of '%s' not found.\n",
159 str_tab + sym->st_name);
160 continue;
161 }
162
163 sym_size = sym->st_size;
164 if (sym_size != sym_def->st_size) {
165 printf("Warning: Mismatched symbol sizes.\n");
166 /* Take the lower value. */
167 if (sym_size > sym_def->st_size)
168 sym_size = sym_def->st_size;
169 }
170
171 memcpy(r_ptr, (const void *)sym_addr, sym_size);
172 break;
173
174 case R_386_RELATIVE:
175 DPRINTF("fixup R_386_RELATIVE (b+a)\n");
176 *r_ptr += m->bias;
177 break;
178
179 case R_386_TLS_TPOFF:
180 DPRINTF("fixup R_386_TLS_TPOFF\n");
181 *r_ptr = (dest->ioffs + sym_def->st_value) - dest->rtld->tls_size;
182 break;
183
184 case R_386_TLS_DTPOFF32:
185 DPRINTF("fixup R_386_TLS_DTPOFF32\n");
186 *r_ptr = sym_def->st_value;
187 break;
188
189 case R_386_TLS_DTPMOD32:
190 DPRINTF("fixup R_386_TLS_DTPMOD32\n");
191 *r_ptr = dest->id;
192 break;
193
194 default:
195 printf("Error: Unknown relocation type %d\n",
196 rel_type);
197 exit(1);
198 }
199
200 }
201
202}
203
204void rela_table_process(module_t *m, elf_rela_t *rt, size_t rt_size)
205{
206 /* Unused */
207 (void)m; (void)rt; (void)rt_size;
208}
209
210/** @}
211 */
Note: See TracBrowser for help on using the repository browser.