Branch data Line data Source code
1 : : /* Check whether given DIE has specific attribute. 2 : : Copyright (C) 2003, 2005, 2014, 2017 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 <dwarf.h> 35 : : #include "libdwP.h" 36 : : 37 : : 38 : : int 39 : 24715904 : dwarf_hasattr (Dwarf_Die *die, unsigned int search_name) 40 : : { 41 [ + - ]: 24715904 : if (die == NULL) 42 : : return 0; 43 : : 44 : : /* Find the abbreviation entry. */ 45 : 24715904 : Dwarf_Abbrev *abbrevp = __libdw_dieabbrev (die, NULL); 46 [ - + ]: 24715904 : if (unlikely (abbrevp == DWARF_END_ABBREV)) 47 : : { 48 : 0 : __libdw_seterrno (DWARF_E_INVALID_DWARF); 49 : 0 : return 0; 50 : : } 51 : : 52 : : /* Search the name attribute. Dwarf_Abbrev was checked when created, 53 : : so we can read unchecked here. */ 54 : 24715904 : const unsigned char *attrp = abbrevp->attrp; 55 : 122613052 : while (1) 56 : : { 57 : : /* Get attribute name and form. */ 58 : 122613052 : unsigned int attr_name; 59 : 122613052 : get_uleb128_unchecked (attr_name, attrp); 60 : 122613052 : unsigned int attr_form; 61 : 122613052 : get_uleb128_unchecked (attr_form, attrp); 62 : : 63 : : /* We can stop if we found the end of the attribute list. */ 64 [ + + ]: 122613052 : if (attr_name == 0 && attr_form == 0) 65 : : return 0; 66 : : 67 [ + + ]: 98082668 : if (attr_name == search_name) 68 : : return 1; 69 : : 70 [ + + ]: 97897148 : if (attr_form == DW_FORM_implicit_const) 71 : : { 72 : 439068 : int64_t attr_value __attribute__ ((unused)); 73 : 439068 : get_sleb128_unchecked (attr_value, attrp); 74 : : } 75 : : } 76 : : } 77 : : INTDEF (dwarf_hasattr)