/src/elfutils/libdw/dwarf_attr_integrate.c
Line | Count | Source (jump to first uncovered line) |
1 | | /* Return specific DWARF attribute of a DIE, integrating indirections. |
2 | | Copyright (C) 2005, 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 <dwarf.h> |
34 | | #include "libdwP.h" |
35 | | |
36 | | Dwarf_Attribute * |
37 | | dwarf_attr_integrate (Dwarf_Die *die, unsigned int search_name, |
38 | | Dwarf_Attribute *result) |
39 | 0 | { |
40 | 0 | Dwarf_Die die_mem; |
41 | 0 | int chain = 16; /* Largest DIE ref chain we will follow. */ |
42 | 0 | do |
43 | 0 | { |
44 | 0 | Dwarf_Attribute *attr = INTUSE(dwarf_attr) (die, search_name, result); |
45 | 0 | if (attr != NULL) |
46 | 0 | return attr; |
47 | | |
48 | 0 | attr = INTUSE(dwarf_attr) (die, DW_AT_abstract_origin, result); |
49 | 0 | if (attr == NULL) |
50 | 0 | attr = INTUSE(dwarf_attr) (die, DW_AT_specification, result); |
51 | 0 | if (attr == NULL) |
52 | 0 | break; |
53 | | |
54 | 0 | die = INTUSE(dwarf_formref_die) (attr, &die_mem); |
55 | 0 | } |
56 | 0 | while (die != NULL && chain-- != 0); |
57 | | |
58 | | /* Not NULL if it didn't have abstract_origin and specification |
59 | | attributes. If it is a split CU then see if the skeleton |
60 | | has it. */ |
61 | 0 | if (die != NULL && is_cudie (die) |
62 | 0 | && die->cu->unit_type == DW_UT_split_compile) |
63 | 0 | { |
64 | 0 | Dwarf_CU *skel_cu = __libdw_find_split_unit (die->cu); |
65 | 0 | if (skel_cu != NULL) |
66 | 0 | { |
67 | 0 | Dwarf_Die skel_die = CUDIE (skel_cu); |
68 | 0 | return INTUSE(dwarf_attr) (&skel_die, search_name, result); |
69 | 0 | } |
70 | 0 | } |
71 | 0 | return NULL; |
72 | 0 | } |
73 | | INTDEF (dwarf_attr_integrate) |