Branch data Line data Source code
1 : : /* Return sibling of given DIE. 2 : : Copyright (C) 2003-2010, 2014, 2015 Red Hat, Inc. 3 : : This file is part of elfutils. 4 : : Written by Ulrich Drepper <drepper@redhat.com>, 2003. 5 : : 6 : : This file is free software; you can redistribute it and/or modify 7 : : it under the terms of either 8 : : 9 : : * the GNU Lesser General Public License as published by the Free 10 : : Software Foundation; either version 3 of the License, or (at 11 : : your option) any later version 12 : : 13 : : or 14 : : 15 : : * the GNU General Public License as published by the Free 16 : : Software Foundation; either version 2 of the License, or (at 17 : : your option) any later version 18 : : 19 : : or both in parallel, as here. 20 : : 21 : : elfutils is distributed in the hope that it will be useful, but 22 : : WITHOUT ANY WARRANTY; without even the implied warranty of 23 : : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 24 : : General Public License for more details. 25 : : 26 : : You should have received copies of the GNU General Public License and 27 : : the GNU Lesser General Public License along with this program. If 28 : : not, see <http://www.gnu.org/licenses/>. */ 29 : : 30 : : #ifdef HAVE_CONFIG_H 31 : : # include <config.h> 32 : : #endif 33 : : 34 : : #include "libdwP.h" 35 : : #include <dwarf.h> 36 : : #include <string.h> 37 : : 38 : : 39 : : int 40 : 24365236 : dwarf_siblingof (Dwarf_Die *die, Dwarf_Die *result) 41 : : { 42 : : /* Ignore previous errors. */ 43 [ - + ]: 24365236 : if (die == NULL) 44 : : return -1; 45 : : 46 : : /* result is declared NN */ 47 : : 48 [ + + ]: 24365236 : if (result != die) 49 : 2574250 : result->addr = NULL; 50 : : 51 : 24365236 : unsigned int level = 0; 52 : : 53 : : /* Copy of the current DIE. */ 54 : 24365236 : Dwarf_Die this_die = *die; 55 : : /* Temporary attributes we create. */ 56 : 24365236 : Dwarf_Attribute sibattr; 57 : : /* Copy of the CU in the request. */ 58 : 24365236 : sibattr.cu = this_die.cu; 59 : : /* That's the address we start looking. */ 60 : 30284674 : unsigned char *addr; 61 : : 62 : : /* Search for the beginning of the next die on this level. We 63 : : must not return the dies for children of the given die. */ 64 : 30284674 : do 65 : : { 66 : : /* Find the end of the DIE or the sibling attribute. */ 67 : 30284674 : addr = __libdw_find_attr (&this_die, DW_AT_sibling, &sibattr.code, 68 : : &sibattr.form); 69 [ + + + + ]: 30284674 : if (addr != NULL && sibattr.code == DW_AT_sibling) 70 : 4868450 : { 71 : 4868450 : Dwarf_Off offset; 72 : 4868450 : sibattr.valp = addr; 73 [ + - ]: 4868450 : if (unlikely (__libdw_formref (&sibattr, &offset) != 0)) 74 : : /* Something went wrong. */ 75 : 0 : return -1; 76 : : 77 : : /* The sibling attribute should point after this DIE in the CU. 78 : : But not after the end of the CU. */ 79 : 4868450 : size_t size = sibattr.cu->endp - sibattr.cu->startp; 80 : 4868450 : size_t die_off = this_die.addr - this_die.cu->startp; 81 [ + - - + ]: 4868450 : if (unlikely (offset >= size || offset <= die_off)) 82 : : { 83 : 0 : __libdw_seterrno (DWARF_E_INVALID_DWARF); 84 : 0 : return -1; 85 : : } 86 : : 87 : : /* Compute the next address. */ 88 : 4868450 : addr = sibattr.cu->startp + offset; 89 : : } 90 [ + + ]: 25416224 : else if (unlikely (addr == NULL) 91 [ - + ]: 25413932 : || unlikely (this_die.abbrev == DWARF_END_ABBREV)) 92 : : return -1; 93 [ + + ]: 25413932 : else if (this_die.abbrev->has_children) 94 : : /* This abbreviation has children. */ 95 : 1926830 : ++level; 96 : : 97 : : /* End of the buffer. */ 98 : 30282382 : unsigned char *endp = sibattr.cu->endp; 99 : : 100 : 34136042 : while (1) 101 : : { 102 : : /* Make sure we are still in range. Some producers might skip 103 : : the trailing NUL bytes. */ 104 [ + + ]: 32209212 : if (addr >= endp) 105 : : return 1; 106 : : 107 [ + + ]: 32201012 : if (*addr != '\0') 108 : : break; 109 : : 110 [ + + ]: 5365948 : if (level-- == 0) 111 : : { 112 [ + + ]: 3439118 : if (result != die) 113 : 351326 : result->addr = addr; 114 : : /* No more sibling at all. */ 115 : 3439118 : return 1; 116 : : } 117 : : 118 : 1926830 : ++addr; 119 : : } 120 : : 121 : : /* Initialize the 'current DIE'. */ 122 : 26835064 : this_die.addr = addr; 123 : 26835064 : this_die.abbrev = NULL; 124 : : } 125 [ + + ]: 26835064 : while (level > 0); 126 : : 127 : : /* Maybe we reached the end of the CU. */ 128 : 20915626 : unsigned char *endp = sibattr.cu->endp; 129 : 20915626 : if (addr >= endp) 130 : : return 1; 131 : : 132 : : /* Clear the entire DIE structure. This signals we have not yet 133 : : determined any of the information. */ 134 : 20915626 : memset (result, '\0', sizeof (Dwarf_Die)); 135 : : 136 : : /* We have the address. */ 137 : 20915626 : result->addr = addr; 138 : : 139 : : /* Same CU as the parent. */ 140 : 20915626 : result->cu = sibattr.cu; 141 : : 142 : 20915626 : return 0; 143 : : } 144 : : INTDEF(dwarf_siblingof)