Branch data Line data Source code
1 : : /* Retrieves the DWARF descriptor for debugaltlink data.
2 : : Copyright (C) 2014, 2018 Red Hat, Inc.
3 : : This file is part of elfutils.
4 : :
5 : : This file is free software; you can redistribute it and/or modify
6 : : it under the terms of either
7 : :
8 : : * the GNU Lesser General Public License as published by the Free
9 : : Software Foundation; either version 3 of the License, or (at
10 : : your option) any later version
11 : :
12 : : or
13 : :
14 : : * the GNU General Public License as published by the Free
15 : : Software Foundation; either version 2 of the License, or (at
16 : : your option) any later version
17 : :
18 : : or both in parallel, as here.
19 : :
20 : : elfutils is distributed in the hope that it will be useful, but
21 : : WITHOUT ANY WARRANTY; without even the implied warranty of
22 : : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
23 : : General Public License for more details.
24 : :
25 : : You should have received copies of the GNU General Public License and
26 : : the GNU Lesser General Public License along with this program. If
27 : : not, see <http://www.gnu.org/licenses/>. */
28 : :
29 : : #ifdef HAVE_CONFIG_H
30 : : # include <config.h>
31 : : #endif
32 : :
33 : : #include "libdwP.h"
34 : : #include "libelfP.h"
35 : : #include "libdwelfP.h"
36 : : #include "system.h"
37 : :
38 : : #include <inttypes.h>
39 : : #include <fcntl.h>
40 : : #include <limits.h>
41 : : #include <stdlib.h>
42 : : #include <stdio.h>
43 : : #include <string.h>
44 : : #include <sys/types.h>
45 : : #include <sys/stat.h>
46 : :
47 : :
48 : : char *
49 : : internal_function
50 : 342 : __libdw_filepath (const char *debugdir, const char *dir, const char *file)
51 : : {
52 [ + - ]: 342 : if (file == NULL)
53 : : return NULL;
54 : :
55 [ + + ]: 342 : if (file[0] == '/')
56 : 40 : return strdup (file);
57 : :
58 [ + + + - ]: 302 : if (dir != NULL && dir[0] == '/')
59 : : {
60 : 2 : size_t dirlen = strlen (dir);
61 : 2 : size_t filelen = strlen (file);
62 : 2 : size_t len = dirlen + 1 + filelen + 1;
63 : 2 : char *path = malloc (len);
64 [ + - ]: 2 : if (path != NULL)
65 : : {
66 [ + - ]: 2 : char *c = mempcpy (path, dir, dirlen);
67 [ + - ]: 2 : if (dir[dirlen - 1] != '/')
68 : 2 : *c++ = '/';
69 : 2 : mempcpy (c, file, filelen + 1);
70 : : }
71 : : return path;
72 : : }
73 : :
74 [ + + ]: 300 : if (debugdir != NULL)
75 : : {
76 : 120 : size_t debugdirlen = strlen (debugdir);
77 [ - + ]: 120 : size_t dirlen = dir != NULL ? strlen (dir) : 0;
78 : 120 : size_t filelen = strlen (file);
79 : 120 : size_t len = debugdirlen + 1 + dirlen + 1 + filelen + 1;
80 : 120 : char *path = malloc (len);
81 [ + - ]: 120 : if (path != NULL)
82 : : {
83 [ - + ]: 120 : char *c = mempcpy (path, debugdir, debugdirlen);
84 [ - + ]: 120 : if (dirlen > 0)
85 : : {
86 [ # # ]: 0 : c = mempcpy (c, dir, dirlen);
87 [ # # ]: 0 : if (dir[dirlen - 1] != '/')
88 : 0 : *c++ = '/';
89 : : }
90 : 120 : mempcpy (c, file, filelen + 1);
91 : 120 : return path;
92 : : }
93 : : }
94 : :
95 : : return NULL;
96 : : }
97 : :
98 : : static void
99 : 268 : find_debug_altlink (Dwarf *dbg)
100 : : {
101 : 268 : const char *altname;
102 : 268 : const void *build_id;
103 : 268 : ssize_t build_id_len = INTUSE(dwelf_dwarf_gnu_debugaltlink) (dbg,
104 : : &altname,
105 : : &build_id);
106 [ + + ]: 268 : if (build_id_len <= 0)
107 : : {
108 : 44 : uint8_t is_sup;
109 : 44 : build_id_len = INTUSE(dwelf_dwarf_debug_sup) (dbg, NULL, &is_sup,
110 : : &altname,
111 : : ((const uint8_t **)
112 : : &build_id));
113 : : /* Does the .debug_sup exist and is this a plain DWARF? */
114 [ + - + + : 44 : if (build_id_len < 0 || altname == NULL || is_sup != 0)
+ + ]
115 : 40 : return;
116 : : }
117 : :
118 : 228 : const uint8_t *id = (const uint8_t *) build_id;
119 : 228 : size_t id_len = build_id_len;
120 : 228 : int fd = -1;
121 : :
122 : : /* We only look in the standard path. And relative to the dbg file. */
123 : : #define DEBUGINFO_PATH "/usr/lib/debug"
124 : :
125 : : /* We don't handle very short or really large build-ids. We need at
126 : : at least 3 and allow for up to 64 (normally ids are 20 long). */
127 : : #define MIN_BUILD_ID_BYTES 3
128 : : #define MAX_BUILD_ID_BYTES 64
129 [ + - ]: 228 : if (id_len >= MIN_BUILD_ID_BYTES && id_len <= MAX_BUILD_ID_BYTES)
130 : : {
131 : : /* Note sizeof a string literal includes the trailing zero. */
132 : 228 : char id_path[sizeof DEBUGINFO_PATH - 1 + sizeof "/.build-id/" - 1
133 : : + 2 + 1 + (MAX_BUILD_ID_BYTES - 1) * 2 + sizeof ".debug"];
134 : 228 : sprintf (&id_path[0], "%s%s", DEBUGINFO_PATH, "/.build-id/");
135 : 228 : sprintf (&id_path[sizeof DEBUGINFO_PATH - 1 + sizeof "/.build-id/" - 1],
136 : 228 : "%02" PRIx8 "/", (uint8_t) id[0]);
137 [ + + ]: 4560 : for (size_t i = 1; i < id_len; ++i)
138 : 4332 : sprintf (&id_path[sizeof DEBUGINFO_PATH - 1 + sizeof "/.build-id/" - 1
139 : 4332 : + 3 + (i - 1) * 2], "%02" PRIx8, (uint8_t) id[i]);
140 : 228 : strcpy (&id_path[sizeof DEBUGINFO_PATH - 1 + sizeof "/.build-id/" - 1
141 : 228 : + 3 + (id_len - 1) * 2], ".debug");
142 : :
143 [ + - - + ]: 228 : fd = TEMP_FAILURE_RETRY (open (id_path, O_RDONLY));
144 : : }
145 : :
146 : : /* Fall back on (possible relative) alt file path. */
147 [ + - ]: 228 : if (fd < 0)
148 : : {
149 : 228 : char *altpath = __libdw_filepath (dbg->debugdir, NULL, altname);
150 [ + + ]: 228 : if (altpath != NULL)
151 : : {
152 [ + + - + ]: 48 : fd = TEMP_FAILURE_RETRY (open (altpath, O_RDONLY));
153 : 48 : free (altpath);
154 : : }
155 : : }
156 : :
157 [ + + ]: 228 : if (fd >= 0)
158 : : {
159 : 8 : Dwarf *alt = dwarf_begin (fd, O_RDONLY);
160 [ + - ]: 8 : if (alt != NULL)
161 : : {
162 : 8 : dbg->alt_dwarf = alt;
163 : 8 : dbg->alt_fd = fd;
164 : : }
165 : : else
166 : 0 : close (fd);
167 : : }
168 : : }
169 : :
170 : : /* find_debug_altlink() modifies "dbg->alt_dwarf".
171 : : dwarf_getalt() reads "main->alt_dwarf".
172 : : Mutual exclusion is enforced to prevent a race. */
173 : :
174 : : Dwarf *
175 : 850 : dwarf_getalt (Dwarf *main)
176 : : {
177 [ + - ]: 850 : if (main == NULL)
178 : : return NULL;
179 : :
180 : 850 : mutex_lock (main->dwarf_lock);
181 : :
182 : : /* Only try once. */
183 [ + + ]: 850 : if (main->alt_dwarf == (void *) -1)
184 : : {
185 : : mutex_unlock (main->dwarf_lock);
186 : : return NULL;
187 : : }
188 : :
189 : : /* Assign result before releasing the lock. */
190 : 554 : Dwarf *result;
191 : :
192 [ + + ]: 554 : if (main->alt_dwarf != NULL)
193 : : {
194 : : result = main->alt_dwarf;
195 : : mutex_unlock (main->dwarf_lock);
196 : : return result;
197 : : }
198 : :
199 : 268 : find_debug_altlink (main);
200 : :
201 : : /* If we found nothing, make sure we don't try again. */
202 [ + + ]: 268 : if (main->alt_dwarf == NULL)
203 : : {
204 : 260 : main->alt_dwarf = (void *) -1;
205 : 260 : mutex_unlock (main->dwarf_lock);
206 : 260 : return NULL;
207 : : }
208 : :
209 : : result = main->alt_dwarf;
210 : : mutex_unlock (main->dwarf_lock);
211 : :
212 : : return result;
213 : : }
214 : : INTDEF (dwarf_getalt)
|
