-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathsym_translator.c
341 lines (276 loc) · 7.2 KB
/
sym_translator.c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
/*
* Copyright 2010 Red Hat Inc.
* Author: Michal Schmidt
* License: GPLv2
*/
#include <sys/mman.h>
#include <sys/types.h>
#include <assert.h>
#include <errno.h>
#include <limits.h>
#include <malloc.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "sym_translator.h"
#include "rbtree.h"
#include "lat_translator.h"
struct symbol {
struct rb_node rb_node;
unsigned long addr;
ptrdiff_t name_offset; /* relative to all_names */
};
struct symbol_slab {
struct symbol_slab *next;
unsigned long fill_count;
struct symbol symbols[];
};
#define SLAB_SIZE (1024*1024)
#define SYMBOLS_PER_SLAB ((SLAB_SIZE - sizeof(struct symbol_slab)) / sizeof(struct symbol))
#define NAMES_INCREMENT (128*1024)
static struct symbol_slab *first_slab, *current_slab;
/* tree of symbols, only used during kallsyms parsing */
static struct rb_root addr2fun = RB_ROOT;
static char *addr_name_arrays; /* storage for both addr_array and name_array */
static unsigned long *addr_array; /* sorted for binary search */
static char **name_array; /* pointers into all_names */
static char *all_names; /* storage for all names: "name\0second_name\0third_name\0..." */
static size_t all_names_alloc, all_names_end;
static unsigned n_symbols;
static struct symbol *__insert_symbol(unsigned long addr, struct symbol *s)
{
struct rb_node **p = &addr2fun.rb_node;
struct rb_node *parent = NULL;
struct symbol *symbol;
while (*p) {
parent = *p;
symbol = rb_entry(parent, struct symbol, rb_node);
if (addr < symbol->addr)
p = &(*p)->rb_left;
else if (addr > symbol->addr)
p = &(*p)->rb_right;
else
return symbol;
}
rb_link_node(&s->rb_node, parent, p);
return NULL;
}
static struct symbol *insert_symbol(unsigned long addr, struct symbol *s)
{
struct symbol *ret;
ret = __insert_symbol(addr, s);
if (ret)
/* we already know this address. some alias? */
return ret;
rb_insert_color(&s->rb_node, &addr2fun);
return NULL;
}
static void delete_slabs(void)
{
struct symbol_slab *ss, *next;
for (ss = first_slab; ss; ss = next) {
next = ss->next;
munmap(ss, SLAB_SIZE);
}
current_slab = first_slab = NULL;
}
static struct symbol_slab *new_slab(void)
{
struct symbol_slab *ss;
ss = mmap(NULL, SLAB_SIZE, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0);
if (ss == MAP_FAILED)
return NULL;
ss->fill_count = 0;
ss->next = NULL;
return ss;
}
static struct symbol *new_symbol(unsigned long addr, ptrdiff_t name_offset)
{
struct symbol_slab *ss;
struct symbol *s;
if (!first_slab || current_slab->fill_count == SYMBOLS_PER_SLAB) {
ss = new_slab();
if (!ss)
return NULL;
if (!first_slab)
current_slab = first_slab = ss;
else {
current_slab->next = ss;
current_slab = ss;
}
}
s = ¤t_slab->symbols[current_slab->fill_count++];
s->addr = addr;
s->name_offset = name_offset;
return s;
}
static void undo_new_symbol(struct symbol *s)
{
assert(current_slab->fill_count > 0);
current_slab->fill_count--;
assert(¤t_slab->symbols[current_slab->fill_count] == s);
}
static int parse_kallsyms(void)
{
FILE *f;
char *line = NULL;
size_t len = 0;
ssize_t read;
unsigned long addr;
char type;
struct symbol *s, *old;
char *new_names;
char *name;
int r = 0;
f = fopen("/proc/kallsyms", "re");
if (!f) {
r = -errno;
perror("/proc/kallsyms");
goto err;
}
new_names = mmap(NULL, NAMES_INCREMENT, PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0);
if (new_names == MAP_FAILED) {
perror("Allocating memory for symbol names");
r = -ENOMEM;
goto err;
}
all_names = new_names;
all_names_alloc = NAMES_INCREMENT;
while ((read = getline(&line, &len, f)) != -1) {
if (all_names_alloc - all_names_end < 1024) {
new_names = mremap(all_names, all_names_alloc, all_names_alloc + NAMES_INCREMENT, MREMAP_MAYMOVE);
if (new_names == MAP_FAILED) {
perror("Allocating memory for symbol names");
r = -ENOMEM;
goto err;
}
all_names = new_names;
all_names_alloc += NAMES_INCREMENT;
}
name = all_names + all_names_end;
if (sscanf(line, "%lx %c %1023s", &addr, &type, name) != 3) {
fprintf(stderr, "Failed to parse line: %s", line);
continue;
}
/* only interested in code */
if (type != 't' && type != 'T')
continue;
s = new_symbol(addr, name - all_names);
if (!s) {
perror("Allocating memory for symbols");
r = -ENOMEM;
goto err;
}
old = insert_symbol(addr, s);
if (!old) {
all_names_end += strlen(name) + 1;
n_symbols++;
} else {
const char *translation;
int prio;
/* prefer symbol names that have a translation defined */
if (lat_translator_lookup(name, &translation, &prio) == 0 &&
lat_translator_lookup(all_names + old->name_offset, &translation, &prio) < 0) {
/* Replace the old symbol name with the better one.
* Note that the old name is leaked inside all_names, but
* this is sufficiently rare that it hardly matters. */
old->name_offset = name - all_names;
all_names_end += strlen(name) + 1;
}
undo_new_symbol(s);
}
}
if (all_names_end == 0)
goto err;
/* trim all_names to minimal required size */
all_names = mremap(all_names, all_names_alloc, all_names_end, 0);
assert(all_names != MAP_FAILED);
all_names_alloc = all_names_end;
mprotect(all_names, all_names_alloc, PROT_READ);
free(line);
fclose(f);
return 0;
err:
free(line);
if (f)
fclose(f);
return r;
}
static void delete_arrays(void)
{
if (all_names) {
munmap(all_names, all_names_alloc);
all_names = NULL;
}
if (addr_name_arrays) {
munmap(addr_name_arrays, n_symbols * (sizeof(unsigned long) + sizeof(char*)));
addr_array = NULL;
name_array = NULL;
addr_name_arrays = NULL;
}
}
static int build_arrays(void)
{
void *new_alloc;
struct rb_node *node;
unsigned i;
new_alloc = mmap(NULL, n_symbols * (sizeof(unsigned long) + sizeof(char*)),
PROT_READ|PROT_WRITE, MAP_PRIVATE|MAP_ANONYMOUS, -1, 0);
if (new_alloc == MAP_FAILED)
return -ENOMEM;
addr_name_arrays = new_alloc;
addr_array = (unsigned long*) addr_name_arrays;
name_array = (char**)(addr_name_arrays + n_symbols * sizeof(unsigned long));
i = 0;
for (node = rb_first(&addr2fun); node; node = rb_next(node)) {
struct symbol *symbol = rb_entry(node, struct symbol, rb_node);
addr_array[i] = symbol->addr;
name_array[i] = all_names + symbol->name_offset;
i++;
}
assert(i == n_symbols);
mprotect(addr_name_arrays, n_symbols * (sizeof(unsigned long) + sizeof(char*)), PROT_READ);
/* the tree is not needed anymore */
delete_slabs();
return 0;
}
const char *sym_translator_lookup(unsigned long ip)
{
unsigned low, high, middle;
if (!addr_array || !name_array || !all_names || n_symbols == 0)
return NULL;
low = 0;
high = n_symbols - 1;
if (ip < addr_array[low])
return NULL;
if (ip >= addr_array[high])
return name_array[high];
/* Invariant: addr_array[low] <= ip < addr_array[high] */
while (high - low > 1) {
middle = (low + high) / 2;
if (addr_array[middle] <= ip)
low = middle;
else
high = middle;
}
return name_array[low];
}
int sym_translator_init(void)
{
int r;
r = parse_kallsyms();
if (r)
goto err;
r = build_arrays();
if (r)
goto err;
return 0;
err:
sym_translator_fini();
return r;
}
void sym_translator_fini(void)
{
delete_slabs();
delete_arrays();
}