Branch data Line data Source code
1 : : /* Find DWARF CFI for a module in libdwfl. 2 : : Copyright (C) 2009-2010 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 "libdwflP.h" 34 : : #include "cfi.h" 35 : : 36 : : Dwarf_CFI * 37 : : internal_function 38 : 2447 : __libdwfl_set_cfi (Dwfl_Module *mod, Dwarf_CFI **slot, Dwarf_CFI *cfi) 39 : : { 40 [ + + + - ]: 2447 : if (cfi != NULL && cfi->ebl == NULL) 41 : : { 42 : 86 : Dwfl_Error error = __libdwfl_module_getebl (mod); 43 [ + - ]: 86 : if (error == DWFL_E_NOERROR) 44 : 86 : cfi->ebl = mod->ebl; 45 : : else 46 : : { 47 [ # # ]: 0 : if (slot == &mod->eh_cfi) 48 : 0 : INTUSE(dwarf_cfi_end) (cfi); 49 : 0 : __libdwfl_seterrno (error); 50 : 0 : return NULL; 51 : : } 52 : : } 53 : : 54 : 2447 : return *slot = cfi; 55 : : } 56 : : 57 : : Dwarf_CFI * 58 : 2389 : dwfl_module_dwarf_cfi (Dwfl_Module *mod, Dwarf_Addr *bias) 59 : : { 60 [ + - ]: 2389 : if (mod == NULL) 61 : : return NULL; 62 : : 63 [ + + ]: 2389 : if (mod->dwarf_cfi != NULL) 64 : : { 65 : 32 : *bias = dwfl_adjusted_dwarf_addr (mod, 0); 66 : 32 : return mod->dwarf_cfi; 67 : : } 68 : : 69 : 2357 : return __libdwfl_set_cfi (mod, &mod->dwarf_cfi, 70 : : INTUSE(dwarf_getcfi) 71 : : (INTUSE(dwfl_module_getdwarf) (mod, bias))); 72 : : } 73 : : INTDEF (dwfl_module_dwarf_cfi)