|
0
|
1 /*
|
|
|
2 Taken from another list:
|
|
|
3
|
|
|
4 _Changing_ is a little tricky, but the attached program strips rpaths
|
|
|
5 from executables (I find it essential for debugging the binutils).
|
|
|
6 It's endian-dependent, if you want this for x86 you can just change
|
|
|
7 the occurrences of 'MSB' to 'LSB' and compile (I should really fix
|
|
|
8 that).
|
|
|
9
|
|
|
10 --
|
|
|
11 Geoffrey Keating <geoffk@ozemail.com.au>
|
|
|
12 */
|
|
|
13
|
|
|
14 #ifdef HAVE_CONFIG_H
|
|
|
15 # include "config.h"
|
|
|
16 #endif
|
|
|
17
|
|
|
18 #include <stdio.h>
|
|
|
19 #include <unistd.h>
|
|
|
20 #include <fcntl.h>
|
|
|
21 #include <elf.h>
|
|
|
22 #if defined(HAVE_LINK_H)
|
|
|
23 # include <link.h>
|
|
|
24 #endif /* HAVE_LINK_H */
|
|
|
25 #include <stdlib.h>
|
|
|
26 #include "protos.h"
|
|
|
27 #include <string.h>
|
|
|
28
|
|
|
29 /* Reads an ELF file, nukes all the RPATH entries. */
|
|
|
30
|
|
|
31 int
|
|
|
32 killrpath(const char *filename)
|
|
|
33 {
|
|
|
34 int fd;
|
|
|
35 Elf_Ehdr ehdr;
|
|
|
36 int i;
|
|
|
37 Elf_Phdr phdr;
|
|
|
38 Elf_Dyn *dyns;
|
|
|
39 int dynpos;
|
|
|
40
|
|
|
41 fd = elf_open(filename, O_RDWR, &ehdr);
|
|
|
42
|
|
|
43 if (fd == -1)
|
|
|
44 {
|
|
|
45 perror ("elf_open");
|
|
|
46 return 1;
|
|
|
47 }
|
|
|
48
|
|
|
49 if (0 != elf_find_dynamic_section(fd, &ehdr, &phdr))
|
|
|
50 {
|
|
|
51 perror("found no dynamic section");
|
|
|
52 return 1;
|
|
|
53 }
|
|
|
54
|
|
|
55 dyns = malloc(phdr.p_memsz);
|
|
|
56 if (dyns == NULL)
|
|
|
57 {
|
|
|
58 perror ("allocating memory for dynamic section");
|
|
|
59 return 1;
|
|
|
60 }
|
|
|
61 memset(dyns, 0, phdr.p_memsz);
|
|
|
62 if (lseek(fd, phdr.p_offset, SEEK_SET) == -1
|
|
|
63 || read(fd, dyns, phdr.p_filesz) != (int)phdr.p_filesz)
|
|
|
64 {
|
|
|
65 perror ("reading dynamic section");
|
|
|
66 return 1;
|
|
|
67 }
|
|
|
68
|
|
|
69 dynpos = 0;
|
|
|
70 for (i = 0; dyns[i].d_tag != DT_NULL; i++)
|
|
|
71 {
|
|
|
72 dyns[dynpos] = dyns[i];
|
|
|
73 if ( ! elf_dynpath_tag(dyns[i].d_tag) )
|
|
|
74 dynpos++;
|
|
|
75 }
|
|
|
76 for (; dynpos < i; dynpos++)
|
|
|
77 dyns[dynpos].d_tag = DT_NULL;
|
|
|
78
|
|
|
79 if (lseek(fd, phdr.p_offset, SEEK_SET) == -1
|
|
|
80 || write(fd, dyns, phdr.p_filesz) != (int)phdr.p_filesz)
|
|
|
81 {
|
|
|
82 perror ("writing dynamic section");
|
|
|
83 return 1;
|
|
|
84 }
|
|
|
85
|
|
|
86 elf_close(fd);
|
|
|
87
|
|
|
88 return 0;
|
|
|
89 }
|
