Branch data Line data Source code
1 : : /* Return scope DIEs containing given DIE. 2 : : Copyright (C) 2005, 2015 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 : : #include "libdwP.h" 33 : : #include <assert.h> 34 : : #include <stdlib.h> 35 : : 36 : : static int 37 : 5489784 : scope_visitor (unsigned int depth, struct Dwarf_Die_Chain *die, void *arg) 38 : : { 39 [ + + ]: 5489784 : if (die->die.addr != *(void **) arg) 40 : : return 0; 41 : : 42 : 7562 : Dwarf_Die *scopes = malloc (depth * sizeof scopes[0]); 43 [ - + ]: 7562 : if (scopes == NULL) 44 : : { 45 : 0 : __libdw_seterrno (DWARF_E_NOMEM); 46 : 0 : return -1; 47 : : } 48 : : 49 : : unsigned int i = 0; 50 : 35663 : do 51 : : { 52 : 35663 : scopes[i++] = die->die; 53 : 35663 : die = die->parent; 54 : : } 55 [ + + ]: 35663 : while (die != NULL); 56 [ - + ]: 7562 : assert (i == depth); 57 : : 58 : 7562 : *(void **) arg = scopes; 59 : 7562 : return depth; 60 : : } 61 : : 62 : : int 63 : 7562 : dwarf_getscopes_die (Dwarf_Die *die, Dwarf_Die **scopes) 64 : : { 65 [ + - ]: 7562 : if (die == NULL) 66 : : return -1; 67 : : 68 : 7562 : struct Dwarf_Die_Chain cu = { .die = CUDIE (die->cu), .parent = NULL }; 69 : 7562 : void *info = die->addr; 70 : 7562 : int result = __libdw_visit_scopes (1, &cu, NULL, &scope_visitor, NULL, &info); 71 [ + - ]: 7562 : if (result > 0) 72 : 7562 : *scopes = info; 73 : : return result; 74 : : }