Commit | Line | Data |
---|---|---|
4317cf95 | 1 | // SPDX-License-Identifier: GPL-2.0-only |
81d3858d JR |
2 | /* |
3 | * recordmcount.c: construct a table of the locations of calls to 'mcount' | |
4 | * so that ftrace can find them quickly. | |
5 | * Copyright 2009 John F. Reiser <jreiser@BitWagon.com>. All rights reserved. | |
81d3858d JR |
6 | * |
7 | * Restructured to fit Linux format, as well as other updates: | |
8 | * Copyright 2010 Steven Rostedt <srostedt@redhat.com>, Red Hat Inc. | |
9 | */ | |
10 | ||
11 | /* | |
12 | * Strategy: alter the .o file in-place. | |
13 | * | |
14 | * Append a new STRTAB that has the new section names, followed by a new array | |
15 | * ElfXX_Shdr[] that has the new section headers, followed by the section | |
16 | * contents for __mcount_loc and its relocations. The old shstrtab strings, | |
17 | * and the old ElfXX_Shdr[] array, remain as "garbage" (commonly, a couple | |
18 | * kilobytes.) Subsequent processing by /bin/ld (or the kernel module loader) | |
19 | * will ignore the garbage regions, because they are not designated by the | |
20 | * new .e_shoff nor the new ElfXX_Shdr[]. [In order to remove the garbage, | |
21 | * then use "ld -r" to create a new file that omits the garbage.] | |
22 | */ | |
23 | ||
24 | #include <sys/types.h> | |
25 | #include <sys/mman.h> | |
26 | #include <sys/stat.h> | |
dfad3d59 | 27 | #include <getopt.h> |
81d3858d JR |
28 | #include <elf.h> |
29 | #include <fcntl.h> | |
81d3858d JR |
30 | #include <stdio.h> |
31 | #include <stdlib.h> | |
32 | #include <string.h> | |
33 | #include <unistd.h> | |
34 | ||
af64d2aa AT |
35 | #ifndef EM_AARCH64 |
36 | #define EM_AARCH64 183 | |
2ee8a74f | 37 | #define R_AARCH64_NONE 0 |
af64d2aa AT |
38 | #define R_AARCH64_ABS64 257 |
39 | #endif | |
40 | ||
a0a458fb QZ |
41 | #ifndef EM_LOONGARCH |
42 | #define EM_LOONGARCH 258 | |
43 | #define R_LARCH_32 1 | |
44 | #define R_LARCH_64 2 | |
45 | #define R_LARCH_MARK_LA 20 | |
46 | #define R_LARCH_SOP_PUSH_PLT_PCREL 29 | |
47 | #endif | |
48 | ||
927d780e AS |
49 | #define R_ARM_PC24 1 |
50 | #define R_ARM_THM_CALL 10 | |
51 | #define R_ARM_CALL 28 | |
52 | ||
3df14264 CL |
53 | #define R_AARCH64_CALL26 283 |
54 | ||
81d3858d JR |
55 | static int fd_map; /* File descriptor for file being modified. */ |
56 | static int mmap_failed; /* Boolean flag. */ | |
81d3858d JR |
57 | static char gpfx; /* prefix for global symbol name (sometimes '_') */ |
58 | static struct stat sb; /* Remember .st_size, etc. */ | |
ed60453f | 59 | static const char *altmcount; /* alternate mcount symbol name */ |
dfad3d59 | 60 | static int warn_on_notrace_sect; /* warn when section has mcount not being recorded */ |
a50bd439 SRRH |
61 | static void *file_map; /* pointer of the mapped file */ |
62 | static void *file_end; /* pointer to the end of the mapped file */ | |
63 | static int file_updated; /* flag to state file was changed */ | |
64 | static void *file_ptr; /* current file pointer location */ | |
4fbcf074 | 65 | |
a50bd439 SRRH |
66 | static void *file_append; /* added to the end of the file */ |
67 | static size_t file_append_size; /* how much is added to end of file */ | |
81d3858d | 68 | |
81d3858d | 69 | /* Per-file resource cleanup when multiple files. */ |
4fbcf074 MH |
70 | static void file_append_cleanup(void) |
71 | { | |
72 | free(file_append); | |
73 | file_append = NULL; | |
74 | file_append_size = 0; | |
75 | file_updated = 0; | |
76 | } | |
77 | ||
78 | static void mmap_cleanup(void) | |
81d3858d JR |
79 | { |
80 | if (!mmap_failed) | |
a50bd439 | 81 | munmap(file_map, sb.st_size); |
81d3858d | 82 | else |
a50bd439 SRRH |
83 | free(file_map); |
84 | file_map = NULL; | |
81d3858d JR |
85 | } |
86 | ||
a1462079 | 87 | /* ulseek, uwrite, ...: Check return value for errors. */ |
81d3858d | 88 | |
3aec8638 | 89 | static off_t ulseek(off_t const offset, int const whence) |
81d3858d | 90 | { |
a50bd439 SRRH |
91 | switch (whence) { |
92 | case SEEK_SET: | |
93 | file_ptr = file_map + offset; | |
94 | break; | |
95 | case SEEK_CUR: | |
96 | file_ptr += offset; | |
97 | break; | |
98 | case SEEK_END: | |
99 | file_ptr = file_map + (sb.st_size - offset); | |
100 | break; | |
101 | } | |
102 | if (file_ptr < file_map) { | |
103 | fprintf(stderr, "lseek: seek before file\n"); | |
3f1df120 | 104 | return -1; |
81d3858d | 105 | } |
a50bd439 | 106 | return file_ptr - file_map; |
81d3858d JR |
107 | } |
108 | ||
3aec8638 | 109 | static ssize_t uwrite(void const *const buf, size_t const count) |
81d3858d | 110 | { |
a50bd439 SRRH |
111 | size_t cnt = count; |
112 | off_t idx = 0; | |
fa359d06 | 113 | void *p = NULL; |
a50bd439 SRRH |
114 | |
115 | file_updated = 1; | |
116 | ||
117 | if (file_ptr + count >= file_end) { | |
118 | off_t aoffset = (file_ptr + count) - file_end; | |
119 | ||
120 | if (aoffset > file_append_size) { | |
fa359d06 HZ |
121 | p = realloc(file_append, aoffset); |
122 | if (!p) | |
123 | free(file_append); | |
124 | file_append = p; | |
a50bd439 SRRH |
125 | file_append_size = aoffset; |
126 | } | |
127 | if (!file_append) { | |
128 | perror("write"); | |
4fbcf074 MH |
129 | file_append_cleanup(); |
130 | mmap_cleanup(); | |
3f1df120 | 131 | return -1; |
a50bd439 SRRH |
132 | } |
133 | if (file_ptr < file_end) { | |
134 | cnt = file_end - file_ptr; | |
135 | } else { | |
136 | cnt = 0; | |
137 | idx = aoffset - count; | |
138 | } | |
81d3858d | 139 | } |
a50bd439 SRRH |
140 | |
141 | if (cnt) | |
142 | memcpy(file_ptr, buf, cnt); | |
143 | ||
144 | if (cnt < count) | |
145 | memcpy(file_append + idx, buf + cnt, count - cnt); | |
146 | ||
147 | file_ptr += count; | |
148 | return count; | |
81d3858d JR |
149 | } |
150 | ||
3aec8638 | 151 | static void * umalloc(size_t size) |
81d3858d JR |
152 | { |
153 | void *const addr = malloc(size); | |
dd5477ff | 154 | if (addr == 0) { |
81d3858d | 155 | fprintf(stderr, "malloc failed: %zu bytes\n", size); |
4fbcf074 MH |
156 | file_append_cleanup(); |
157 | mmap_cleanup(); | |
3f1df120 | 158 | return NULL; |
81d3858d JR |
159 | } |
160 | return addr; | |
161 | } | |
162 | ||
4fbcf074 MH |
163 | /* |
164 | * Get the whole file as a programming convenience in order to avoid | |
165 | * malloc+lseek+read+free of many pieces. If successful, then mmap | |
166 | * avoids copying unused pieces; else just read the whole file. | |
167 | * Open for both read and write; new info will be appended to the file. | |
168 | * Use MAP_PRIVATE so that a few changes to the in-memory ElfXX_Ehdr | |
169 | * do not propagate to the file until an explicit overwrite at the last. | |
170 | * This preserves most aspects of consistency (all except .st_size) | |
171 | * for simultaneous readers of the file while we are appending to it. | |
172 | * However, multiple writers still are bad. We choose not to use | |
173 | * locking because it is expensive and the use case of kernel build | |
174 | * makes multiple writers unlikely. | |
175 | */ | |
176 | static void *mmap_file(char const *fname) | |
177 | { | |
178 | /* Avoid problems if early cleanup() */ | |
179 | fd_map = -1; | |
180 | mmap_failed = 1; | |
181 | file_map = NULL; | |
182 | file_ptr = NULL; | |
183 | file_updated = 0; | |
184 | sb.st_size = 0; | |
185 | ||
186 | fd_map = open(fname, O_RDONLY); | |
187 | if (fd_map < 0) { | |
188 | perror(fname); | |
189 | return NULL; | |
190 | } | |
191 | if (fstat(fd_map, &sb) < 0) { | |
192 | perror(fname); | |
193 | goto out; | |
194 | } | |
195 | if (!S_ISREG(sb.st_mode)) { | |
196 | fprintf(stderr, "not a regular file: %s\n", fname); | |
197 | goto out; | |
198 | } | |
199 | file_map = mmap(0, sb.st_size, PROT_READ|PROT_WRITE, MAP_PRIVATE, | |
200 | fd_map, 0); | |
201 | if (file_map == MAP_FAILED) { | |
202 | mmap_failed = 1; | |
203 | file_map = umalloc(sb.st_size); | |
204 | if (!file_map) { | |
205 | perror(fname); | |
206 | goto out; | |
207 | } | |
208 | if (read(fd_map, file_map, sb.st_size) != sb.st_size) { | |
209 | perror(fname); | |
210 | free(file_map); | |
211 | file_map = NULL; | |
212 | goto out; | |
213 | } | |
214 | } else | |
215 | mmap_failed = 0; | |
216 | out: | |
217 | close(fd_map); | |
218 | fd_map = -1; | |
219 | ||
220 | file_end = file_map + sb.st_size; | |
221 | ||
222 | return file_map; | |
223 | } | |
224 | ||
225 | ||
ffd618fa SR |
226 | static unsigned char ideal_nop5_x86_64[5] = { 0x0f, 0x1f, 0x44, 0x00, 0x00 }; |
227 | static unsigned char ideal_nop5_x86_32[5] = { 0x3e, 0x8d, 0x74, 0x26, 0x00 }; | |
228 | static unsigned char *ideal_nop; | |
229 | ||
230 | static char rel_type_nop; | |
231 | ||
232 | static int (*make_nop)(void *map, size_t const offset); | |
233 | ||
234 | static int make_nop_x86(void *map, size_t const offset) | |
235 | { | |
236 | uint32_t *ptr; | |
237 | unsigned char *op; | |
238 | ||
239 | /* Confirm we have 0xe8 0x0 0x0 0x0 0x0 */ | |
240 | ptr = map + offset; | |
241 | if (*ptr != 0) | |
242 | return -1; | |
243 | ||
244 | op = map + offset - 1; | |
245 | if (*op != 0xe8) | |
246 | return -1; | |
247 | ||
248 | /* convert to nop */ | |
3f1df120 MH |
249 | if (ulseek(offset - 1, SEEK_SET) < 0) |
250 | return -1; | |
251 | if (uwrite(ideal_nop, 5) < 0) | |
252 | return -1; | |
ffd618fa SR |
253 | return 0; |
254 | } | |
255 | ||
9648dc15 SB |
256 | static unsigned char ideal_nop4_arm_le[4] = { 0x00, 0x00, 0xa0, 0xe1 }; /* mov r0, r0 */ |
257 | static unsigned char ideal_nop4_arm_be[4] = { 0xe1, 0xa0, 0x00, 0x00 }; /* mov r0, r0 */ | |
258 | static unsigned char *ideal_nop4_arm; | |
259 | ||
260 | static unsigned char bl_mcount_arm_le[4] = { 0xfe, 0xff, 0xff, 0xeb }; /* bl */ | |
261 | static unsigned char bl_mcount_arm_be[4] = { 0xeb, 0xff, 0xff, 0xfe }; /* bl */ | |
262 | static unsigned char *bl_mcount_arm; | |
263 | ||
264 | static unsigned char push_arm_le[4] = { 0x04, 0xe0, 0x2d, 0xe5 }; /* push {lr} */ | |
265 | static unsigned char push_arm_be[4] = { 0xe5, 0x2d, 0xe0, 0x04 }; /* push {lr} */ | |
266 | static unsigned char *push_arm; | |
267 | ||
268 | static unsigned char ideal_nop2_thumb_le[2] = { 0x00, 0xbf }; /* nop */ | |
269 | static unsigned char ideal_nop2_thumb_be[2] = { 0xbf, 0x00 }; /* nop */ | |
270 | static unsigned char *ideal_nop2_thumb; | |
271 | ||
272 | static unsigned char push_bl_mcount_thumb_le[6] = { 0x00, 0xb5, 0xff, 0xf7, 0xfe, 0xff }; /* push {lr}, bl */ | |
273 | static unsigned char push_bl_mcount_thumb_be[6] = { 0xb5, 0x00, 0xf7, 0xff, 0xff, 0xfe }; /* push {lr}, bl */ | |
274 | static unsigned char *push_bl_mcount_thumb; | |
275 | ||
276 | static int make_nop_arm(void *map, size_t const offset) | |
277 | { | |
278 | char *ptr; | |
279 | int cnt = 1; | |
280 | int nop_size; | |
281 | size_t off = offset; | |
282 | ||
283 | ptr = map + offset; | |
284 | if (memcmp(ptr, bl_mcount_arm, 4) == 0) { | |
285 | if (memcmp(ptr - 4, push_arm, 4) == 0) { | |
286 | off -= 4; | |
287 | cnt = 2; | |
288 | } | |
289 | ideal_nop = ideal_nop4_arm; | |
290 | nop_size = 4; | |
291 | } else if (memcmp(ptr - 2, push_bl_mcount_thumb, 6) == 0) { | |
292 | cnt = 3; | |
293 | nop_size = 2; | |
294 | off -= 2; | |
295 | ideal_nop = ideal_nop2_thumb; | |
296 | } else | |
297 | return -1; | |
298 | ||
299 | /* Convert to nop */ | |
3f1df120 MH |
300 | if (ulseek(off, SEEK_SET) < 0) |
301 | return -1; | |
9648dc15 SB |
302 | |
303 | do { | |
3f1df120 MH |
304 | if (uwrite(ideal_nop, nop_size) < 0) |
305 | return -1; | |
9648dc15 SB |
306 | } while (--cnt > 0); |
307 | ||
308 | return 0; | |
309 | } | |
310 | ||
2ee8a74f LB |
311 | static unsigned char ideal_nop4_arm64[4] = {0x1f, 0x20, 0x03, 0xd5}; |
312 | static int make_nop_arm64(void *map, size_t const offset) | |
313 | { | |
314 | uint32_t *ptr; | |
315 | ||
316 | ptr = map + offset; | |
317 | /* bl <_mcount> is 0x94000000 before relocation */ | |
318 | if (*ptr != 0x94000000) | |
319 | return -1; | |
320 | ||
321 | /* Convert to nop */ | |
3f1df120 MH |
322 | if (ulseek(offset, SEEK_SET) < 0) |
323 | return -1; | |
324 | if (uwrite(ideal_nop, 4) < 0) | |
325 | return -1; | |
2ee8a74f LB |
326 | return 0; |
327 | } | |
328 | ||
3f1df120 | 329 | static int write_file(const char *fname) |
a50bd439 SRRH |
330 | { |
331 | char tmp_file[strlen(fname) + 4]; | |
332 | size_t n; | |
333 | ||
334 | if (!file_updated) | |
3f1df120 | 335 | return 0; |
a50bd439 SRRH |
336 | |
337 | sprintf(tmp_file, "%s.rc", fname); | |
338 | ||
339 | /* | |
340 | * After reading the entire file into memory, delete it | |
341 | * and write it back, to prevent weird side effects of modifying | |
342 | * an object file in place. | |
343 | */ | |
344 | fd_map = open(tmp_file, O_WRONLY | O_TRUNC | O_CREAT, sb.st_mode); | |
345 | if (fd_map < 0) { | |
346 | perror(fname); | |
3f1df120 | 347 | return -1; |
a50bd439 SRRH |
348 | } |
349 | n = write(fd_map, file_map, sb.st_size); | |
350 | if (n != sb.st_size) { | |
351 | perror("write"); | |
3f1df120 MH |
352 | close(fd_map); |
353 | return -1; | |
a50bd439 SRRH |
354 | } |
355 | if (file_append_size) { | |
356 | n = write(fd_map, file_append, file_append_size); | |
357 | if (n != file_append_size) { | |
358 | perror("write"); | |
3f1df120 MH |
359 | close(fd_map); |
360 | return -1; | |
dd39a265 | 361 | } |
dd39a265 | 362 | } |
a50bd439 SRRH |
363 | close(fd_map); |
364 | if (rename(tmp_file, fname) < 0) { | |
365 | perror(fname); | |
3f1df120 | 366 | return -1; |
a50bd439 | 367 | } |
3f1df120 | 368 | return 0; |
81d3858d JR |
369 | } |
370 | ||
371 | /* w8rev, w8nat, ...: Handle endianness. */ | |
372 | ||
373 | static uint64_t w8rev(uint64_t const x) | |
374 | { | |
375 | return ((0xff & (x >> (0 * 8))) << (7 * 8)) | |
376 | | ((0xff & (x >> (1 * 8))) << (6 * 8)) | |
377 | | ((0xff & (x >> (2 * 8))) << (5 * 8)) | |
378 | | ((0xff & (x >> (3 * 8))) << (4 * 8)) | |
379 | | ((0xff & (x >> (4 * 8))) << (3 * 8)) | |
380 | | ((0xff & (x >> (5 * 8))) << (2 * 8)) | |
381 | | ((0xff & (x >> (6 * 8))) << (1 * 8)) | |
382 | | ((0xff & (x >> (7 * 8))) << (0 * 8)); | |
383 | } | |
384 | ||
385 | static uint32_t w4rev(uint32_t const x) | |
386 | { | |
387 | return ((0xff & (x >> (0 * 8))) << (3 * 8)) | |
388 | | ((0xff & (x >> (1 * 8))) << (2 * 8)) | |
389 | | ((0xff & (x >> (2 * 8))) << (1 * 8)) | |
390 | | ((0xff & (x >> (3 * 8))) << (0 * 8)); | |
391 | } | |
392 | ||
393 | static uint32_t w2rev(uint16_t const x) | |
394 | { | |
395 | return ((0xff & (x >> (0 * 8))) << (1 * 8)) | |
396 | | ((0xff & (x >> (1 * 8))) << (0 * 8)); | |
397 | } | |
398 | ||
399 | static uint64_t w8nat(uint64_t const x) | |
400 | { | |
401 | return x; | |
402 | } | |
403 | ||
404 | static uint32_t w4nat(uint32_t const x) | |
405 | { | |
406 | return x; | |
407 | } | |
408 | ||
409 | static uint32_t w2nat(uint16_t const x) | |
410 | { | |
411 | return x; | |
412 | } | |
413 | ||
414 | static uint64_t (*w8)(uint64_t); | |
415 | static uint32_t (*w)(uint32_t); | |
416 | static uint32_t (*w2)(uint16_t); | |
417 | ||
418 | /* Names of the sections that could contain calls to mcount. */ | |
3aec8638 | 419 | static int is_mcounted_section_name(char const *const txtname) |
81d3858d | 420 | { |
9c8e2f6d | 421 | return strncmp(".text", txtname, 5) == 0 || |
42c269c8 | 422 | strcmp(".init.text", txtname) == 0 || |
dd5477ff SR |
423 | strcmp(".ref.text", txtname) == 0 || |
424 | strcmp(".sched.text", txtname) == 0 || | |
425 | strcmp(".spinlock.text", txtname) == 0 || | |
426 | strcmp(".irqentry.text", txtname) == 0 || | |
e436fd61 | 427 | strcmp(".softirqentry.text", txtname) == 0 || |
9f087e76 | 428 | strcmp(".kprobes.text", txtname) == 0 || |
1bd95be2 | 429 | strcmp(".cpuidle.text", txtname) == 0; |
81d3858d JR |
430 | } |
431 | ||
3f1df120 MH |
432 | static char const *already_has_rel_mcount = "success"; /* our work here is done! */ |
433 | ||
c28d5077 SR |
434 | /* 32 bit and 64 bit are very similar */ |
435 | #include "recordmcount.h" | |
436 | #define RECORD_MCOUNT_64 | |
437 | #include "recordmcount.h" | |
81d3858d | 438 | |
927d780e AS |
439 | static int arm_is_fake_mcount(Elf32_Rel const *rp) |
440 | { | |
441 | switch (ELF32_R_TYPE(w(rp->r_info))) { | |
442 | case R_ARM_THM_CALL: | |
443 | case R_ARM_CALL: | |
444 | case R_ARM_PC24: | |
445 | return 0; | |
446 | } | |
447 | ||
448 | return 1; | |
449 | } | |
450 | ||
ea0eada4 GH |
451 | static int arm64_is_fake_mcount(Elf64_Rel const *rp) |
452 | { | |
999340d5 | 453 | return ELF64_R_TYPE(w8(rp->r_info)) != R_AARCH64_CALL26; |
ea0eada4 GH |
454 | } |
455 | ||
a0a458fb QZ |
456 | static int LARCH32_is_fake_mcount(Elf32_Rel const *rp) |
457 | { | |
458 | switch (ELF64_R_TYPE(w(rp->r_info))) { | |
459 | case R_LARCH_MARK_LA: | |
460 | case R_LARCH_SOP_PUSH_PLT_PCREL: | |
461 | return 0; | |
462 | } | |
463 | ||
464 | return 1; | |
465 | } | |
466 | ||
467 | static int LARCH64_is_fake_mcount(Elf64_Rel const *rp) | |
468 | { | |
469 | switch (ELF64_R_TYPE(w(rp->r_info))) { | |
470 | case R_LARCH_MARK_LA: | |
471 | case R_LARCH_SOP_PUSH_PLT_PCREL: | |
472 | return 0; | |
473 | } | |
474 | ||
475 | return 1; | |
476 | } | |
477 | ||
a2d49358 JR |
478 | /* 64-bit EM_MIPS has weird ELF64_Rela.r_info. |
479 | * http://techpubs.sgi.com/library/manuals/4000/007-4658-001/pdf/007-4658-001.pdf | |
480 | * We interpret Table 29 Relocation Operation (Elf64_Rel, Elf64_Rela) [p.40] | |
481 | * to imply the order of the members; the spec does not say so. | |
482 | * typedef unsigned char Elf64_Byte; | |
483 | * fails on MIPS64 because their <elf.h> already has it! | |
484 | */ | |
485 | ||
486 | typedef uint8_t myElf64_Byte; /* Type for a 8-bit quantity. */ | |
487 | ||
488 | union mips_r_info { | |
489 | Elf64_Xword r_info; | |
490 | struct { | |
491 | Elf64_Word r_sym; /* Symbol index. */ | |
492 | myElf64_Byte r_ssym; /* Special symbol. */ | |
493 | myElf64_Byte r_type3; /* Third relocation. */ | |
494 | myElf64_Byte r_type2; /* Second relocation. */ | |
495 | myElf64_Byte r_type; /* First relocation. */ | |
496 | } r_mips; | |
497 | }; | |
498 | ||
499 | static uint64_t MIPS64_r_sym(Elf64_Rel const *rp) | |
500 | { | |
501 | return w(((union mips_r_info){ .r_info = rp->r_info }).r_mips.r_sym); | |
502 | } | |
503 | ||
504 | static void MIPS64_r_info(Elf64_Rel *const rp, unsigned sym, unsigned type) | |
505 | { | |
506 | rp->r_info = ((union mips_r_info){ | |
507 | .r_mips = { .r_sym = w(sym), .r_type = type } | |
508 | }).r_info; | |
509 | } | |
510 | ||
3aec8638 | 511 | static int do_file(char const *const fname) |
81d3858d | 512 | { |
81d3858d | 513 | unsigned int reltype = 0; |
4fbcf074 | 514 | Elf32_Ehdr *ehdr; |
3f1df120 MH |
515 | int rc = -1; |
516 | ||
4fbcf074 | 517 | ehdr = mmap_file(fname); |
3f1df120 MH |
518 | if (!ehdr) |
519 | goto out; | |
81d3858d | 520 | |
81d3858d JR |
521 | w = w4nat; |
522 | w2 = w2nat; | |
523 | w8 = w8nat; | |
524 | switch (ehdr->e_ident[EI_DATA]) { | |
525 | static unsigned int const endian = 1; | |
e90b0c8b | 526 | default: |
81d3858d JR |
527 | fprintf(stderr, "unrecognized ELF data encoding %d: %s\n", |
528 | ehdr->e_ident[EI_DATA], fname); | |
3f1df120 | 529 | goto out; |
e90b0c8b | 530 | case ELFDATA2LSB: |
dd5477ff | 531 | if (*(unsigned char const *)&endian != 1) { |
81d3858d JR |
532 | /* main() is big endian, file.o is little endian. */ |
533 | w = w4rev; | |
534 | w2 = w2rev; | |
535 | w8 = w8rev; | |
536 | } | |
9648dc15 SB |
537 | ideal_nop4_arm = ideal_nop4_arm_le; |
538 | bl_mcount_arm = bl_mcount_arm_le; | |
539 | push_arm = push_arm_le; | |
540 | ideal_nop2_thumb = ideal_nop2_thumb_le; | |
541 | push_bl_mcount_thumb = push_bl_mcount_thumb_le; | |
e90b0c8b SR |
542 | break; |
543 | case ELFDATA2MSB: | |
dd5477ff | 544 | if (*(unsigned char const *)&endian != 0) { |
81d3858d JR |
545 | /* main() is little endian, file.o is big endian. */ |
546 | w = w4rev; | |
547 | w2 = w2rev; | |
548 | w8 = w8rev; | |
549 | } | |
9648dc15 SB |
550 | ideal_nop4_arm = ideal_nop4_arm_be; |
551 | bl_mcount_arm = bl_mcount_arm_be; | |
552 | push_arm = push_arm_be; | |
553 | ideal_nop2_thumb = ideal_nop2_thumb_be; | |
554 | push_bl_mcount_thumb = push_bl_mcount_thumb_be; | |
e90b0c8b | 555 | break; |
81d3858d | 556 | } /* end switch */ |
2e63152b MH |
557 | if (memcmp(ELFMAG, ehdr->e_ident, SELFMAG) != 0 || |
558 | w2(ehdr->e_type) != ET_REL || | |
559 | ehdr->e_ident[EI_VERSION] != EV_CURRENT) { | |
81d3858d | 560 | fprintf(stderr, "unrecognized ET_REL file %s\n", fname); |
3f1df120 | 561 | goto out; |
81d3858d JR |
562 | } |
563 | ||
2e63152b | 564 | gpfx = '_'; |
81d3858d | 565 | switch (w2(ehdr->e_machine)) { |
e90b0c8b | 566 | default: |
ac5db1fc | 567 | fprintf(stderr, "unrecognized e_machine %u %s\n", |
81d3858d | 568 | w2(ehdr->e_machine), fname); |
3f1df120 | 569 | goto out; |
ffd618fa SR |
570 | case EM_386: |
571 | reltype = R_386_32; | |
46a2b61e | 572 | rel_type_nop = R_386_NONE; |
ffd618fa SR |
573 | make_nop = make_nop_x86; |
574 | ideal_nop = ideal_nop5_x86_32; | |
521ccb5c | 575 | mcount_adjust_32 = -1; |
2e63152b MH |
576 | gpfx = 0; |
577 | break; | |
578 | case EM_ARM: | |
579 | reltype = R_ARM_ABS32; | |
580 | altmcount = "__gnu_mcount_nc"; | |
581 | make_nop = make_nop_arm; | |
582 | rel_type_nop = R_ARM_NONE; | |
927d780e | 583 | is_fake_mcount32 = arm_is_fake_mcount; |
2e63152b | 584 | gpfx = 0; |
ffd618fa | 585 | break; |
af64d2aa | 586 | case EM_AARCH64: |
2e63152b MH |
587 | reltype = R_AARCH64_ABS64; |
588 | make_nop = make_nop_arm64; | |
589 | rel_type_nop = R_AARCH64_NONE; | |
590 | ideal_nop = ideal_nop4_arm64; | |
ea0eada4 | 591 | is_fake_mcount64 = arm64_is_fake_mcount; |
2e63152b | 592 | break; |
2e63152b | 593 | case EM_MIPS: /* reltype: e_class */ break; |
a0a458fb | 594 | case EM_LOONGARCH: /* reltype: e_class */ break; |
2e63152b MH |
595 | case EM_PPC: reltype = R_PPC_ADDR32; break; |
596 | case EM_PPC64: reltype = R_PPC64_ADDR64; break; | |
597 | case EM_S390: /* reltype: e_class */ break; | |
598 | case EM_SH: reltype = R_SH_DIR32; gpfx = 0; break; | |
599 | case EM_SPARCV9: reltype = R_SPARC_64; break; | |
ffd618fa SR |
600 | case EM_X86_64: |
601 | make_nop = make_nop_x86; | |
602 | ideal_nop = ideal_nop5_x86_64; | |
603 | reltype = R_X86_64_64; | |
46a2b61e | 604 | rel_type_nop = R_X86_64_NONE; |
521ccb5c | 605 | mcount_adjust_64 = -1; |
2e63152b | 606 | gpfx = 0; |
ffd618fa | 607 | break; |
81d3858d JR |
608 | } /* end switch */ |
609 | ||
610 | switch (ehdr->e_ident[EI_CLASS]) { | |
e90b0c8b | 611 | default: |
81d3858d JR |
612 | fprintf(stderr, "unrecognized ELF class %d %s\n", |
613 | ehdr->e_ident[EI_CLASS], fname); | |
3f1df120 | 614 | goto out; |
e90b0c8b | 615 | case ELFCLASS32: |
dd5477ff SR |
616 | if (w2(ehdr->e_ehsize) != sizeof(Elf32_Ehdr) |
617 | || w2(ehdr->e_shentsize) != sizeof(Elf32_Shdr)) { | |
81d3858d JR |
618 | fprintf(stderr, |
619 | "unrecognized ET_REL file: %s\n", fname); | |
3f1df120 | 620 | goto out; |
81d3858d | 621 | } |
dd5477ff | 622 | if (w2(ehdr->e_machine) == EM_MIPS) { |
a2d49358 | 623 | reltype = R_MIPS_32; |
412910cd WZ |
624 | is_fake_mcount32 = MIPS32_is_fake_mcount; |
625 | } | |
a0a458fb QZ |
626 | if (w2(ehdr->e_machine) == EM_LOONGARCH) { |
627 | reltype = R_LARCH_32; | |
628 | is_fake_mcount32 = LARCH32_is_fake_mcount; | |
629 | } | |
3f1df120 MH |
630 | if (do32(ehdr, fname, reltype) < 0) |
631 | goto out; | |
e90b0c8b | 632 | break; |
81d3858d JR |
633 | case ELFCLASS64: { |
634 | Elf64_Ehdr *const ghdr = (Elf64_Ehdr *)ehdr; | |
dd5477ff SR |
635 | if (w2(ghdr->e_ehsize) != sizeof(Elf64_Ehdr) |
636 | || w2(ghdr->e_shentsize) != sizeof(Elf64_Shdr)) { | |
81d3858d JR |
637 | fprintf(stderr, |
638 | "unrecognized ET_REL file: %s\n", fname); | |
3f1df120 | 639 | goto out; |
81d3858d | 640 | } |
f2963886 | 641 | if (w2(ghdr->e_machine) == EM_S390) { |
81d3858d | 642 | reltype = R_390_64; |
c933146a | 643 | mcount_adjust_64 = -14; |
f2963886 | 644 | } |
dd5477ff | 645 | if (w2(ghdr->e_machine) == EM_MIPS) { |
a2d49358 JR |
646 | reltype = R_MIPS_64; |
647 | Elf64_r_sym = MIPS64_r_sym; | |
648 | Elf64_r_info = MIPS64_r_info; | |
412910cd | 649 | is_fake_mcount64 = MIPS64_is_fake_mcount; |
a2d49358 | 650 | } |
a0a458fb QZ |
651 | if (w2(ghdr->e_machine) == EM_LOONGARCH) { |
652 | reltype = R_LARCH_64; | |
653 | is_fake_mcount64 = LARCH64_is_fake_mcount; | |
654 | } | |
3f1df120 MH |
655 | if (do64(ghdr, fname, reltype) < 0) |
656 | goto out; | |
e90b0c8b SR |
657 | break; |
658 | } | |
81d3858d JR |
659 | } /* end switch */ |
660 | ||
3f1df120 MH |
661 | rc = write_file(fname); |
662 | out: | |
4fbcf074 MH |
663 | file_append_cleanup(); |
664 | mmap_cleanup(); | |
3f1df120 | 665 | return rc; |
81d3858d JR |
666 | } |
667 | ||
3aec8638 | 668 | int main(int argc, char *argv[]) |
81d3858d | 669 | { |
cd3478f2 | 670 | const char ftrace[] = "/ftrace.o"; |
44475863 | 671 | int ftrace_size = sizeof(ftrace) - 1; |
81d3858d | 672 | int n_error = 0; /* gcc-4.3.0 false positive complaint */ |
dfad3d59 SR |
673 | int c; |
674 | int i; | |
44475863 | 675 | |
dfad3d59 SR |
676 | while ((c = getopt(argc, argv, "w")) >= 0) { |
677 | switch (c) { | |
678 | case 'w': | |
679 | warn_on_notrace_sect = 1; | |
680 | break; | |
681 | default: | |
682 | fprintf(stderr, "usage: recordmcount [-w] file.o...\n"); | |
683 | return 0; | |
684 | } | |
685 | } | |
686 | ||
687 | if ((argc - optind) < 1) { | |
688 | fprintf(stderr, "usage: recordmcount [-w] file.o...\n"); | |
44475863 SR |
689 | return 0; |
690 | } | |
691 | ||
692 | /* Process each file in turn, allowing deep failure. */ | |
dfad3d59 SR |
693 | for (i = optind; i < argc; i++) { |
694 | char *file = argv[i]; | |
44475863 SR |
695 | int len; |
696 | ||
697 | /* | |
698 | * The file kernel/trace/ftrace.o references the mcount | |
699 | * function but does not call it. Since ftrace.o should | |
700 | * not be traced anyway, we just skip it. | |
701 | */ | |
dfad3d59 | 702 | len = strlen(file); |
44475863 | 703 | if (len >= ftrace_size && |
dfad3d59 | 704 | strcmp(file + (len - ftrace_size), ftrace) == 0) |
44475863 SR |
705 | continue; |
706 | ||
3f1df120 | 707 | if (do_file(file)) { |
713a3e4d | 708 | fprintf(stderr, "%s: failed\n", file); |
81d3858d | 709 | ++n_error; |
3f1df120 | 710 | } |
81d3858d JR |
711 | } |
712 | return !!n_error; | |
713 | } |