Branch data Line data Source code
1 : : /* Release debugging handling context. 2 : : Copyright (C) 2002-2011, 2014, 2018 Red Hat, Inc. 3 : : This file is part of elfutils. 4 : : Written by Ulrich Drepper <drepper@redhat.com>, 2002. 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 <search.h> 35 : : #include <stdlib.h> 36 : : #include <assert.h> 37 : : #include <string.h> 38 : : 39 : : #include "libdwP.h" 40 : : #include "cfi.h" 41 : : 42 : : 43 : : static void 44 : 23432 : dwarf_package_index_free (Dwarf_Package_Index *index) 45 : : { 46 [ + + ]: 23432 : if (index != NULL) 47 : : { 48 : 52 : free (index->debug_info_offsets); 49 : 52 : free (index); 50 : : } 51 : 23432 : } 52 : : 53 : : 54 : : static void 55 : 1219704 : noop_free (void *arg __attribute__ ((unused))) 56 : : { 57 : 1219704 : } 58 : : 59 : : 60 : : static void 61 : 82102 : cu_free (void *arg) 62 : : { 63 : 82102 : struct Dwarf_CU *p = (struct Dwarf_CU *) arg; 64 : : 65 : 82102 : tdestroy (p->locs, noop_free); 66 : : 67 : : /* Only free the CU internals if its not a fake CU. */ 68 [ + + + + ]: 82102 : if(p != p->dbg->fake_loc_cu && p != p->dbg->fake_loclists_cu 69 [ + + ]: 71372 : && p != p->dbg->fake_addr_cu) 70 : : { 71 : 71240 : Dwarf_Abbrev_Hash_free (&p->abbrev_hash); 72 : : 73 : : /* Free split dwarf one way (from skeleton to split). */ 74 [ + + ]: 71240 : if (p->unit_type == DW_UT_skeleton 75 [ + + + + ]: 244 : && p->split != NULL && p->split != (void *)-1) 76 : : { 77 : : /* The fake_addr_cu might be shared, only release one. */ 78 [ + + ]: 170 : if (p->dbg->fake_addr_cu == p->split->dbg->fake_addr_cu) 79 : 126 : p->split->dbg->fake_addr_cu = NULL; 80 : : /* There is only one DWP file. We free it later. */ 81 [ + + ]: 170 : if (p->split->dbg != p->dbg->dwp_dwarf) 82 : 104 : INTUSE(dwarf_end) (p->split->dbg); 83 : : } 84 : : } 85 : 82102 : } 86 : : 87 : : 88 : : int 89 : 11736 : dwarf_end (Dwarf *dwarf) 90 : : { 91 [ + + ]: 11736 : if (dwarf != NULL) 92 : : { 93 : 11716 : dwarf_package_index_free (dwarf->tu_index); 94 : 11716 : dwarf_package_index_free (dwarf->cu_index); 95 : : 96 [ + + ]: 11716 : if (dwarf->cfi != NULL) 97 : : /* Clean up the CFI cache. */ 98 : 36 : __libdw_destroy_frame_cache (dwarf->cfi); 99 : : 100 : 11716 : Dwarf_Sig8_Hash_free (&dwarf->sig8_hash); 101 : : 102 : : /* The search tree for the CUs. NB: the CU data itself is 103 : : allocated separately, but the abbreviation hash tables need 104 : : to be handled. */ 105 : 11716 : tdestroy (dwarf->cu_tree, cu_free); 106 : 11716 : tdestroy (dwarf->tu_tree, cu_free); 107 : : 108 : : /* Search tree for macro opcode tables. */ 109 : 11716 : tdestroy (dwarf->macro_ops, noop_free); 110 : : 111 : : /* Search tree for decoded .debug_lines units. */ 112 : 11716 : tdestroy (dwarf->files_lines, noop_free); 113 : : 114 : : /* And the split Dwarf. */ 115 : 11716 : tdestroy (dwarf->split_tree, noop_free); 116 : : 117 : : /* Free the internally allocated memory. */ 118 [ + + ]: 13468 : for (size_t i = 0; i < dwarf->mem_stacks; i++) 119 : : { 120 : 1752 : struct libdw_memblock *memp = dwarf->mem_tails[i]; 121 [ + + ]: 52836 : while (memp != NULL) 122 : : { 123 : 51084 : struct libdw_memblock *prevp = memp->prev; 124 : 51084 : free (memp); 125 : 51084 : memp = prevp; 126 : : } 127 : : } 128 [ + + ]: 11716 : if (dwarf->mem_tails != NULL) 129 : 1580 : free (dwarf->mem_tails); 130 : 11716 : pthread_rwlock_destroy (&dwarf->mem_rwl); 131 : : 132 : : /* Free the pubnames helper structure. */ 133 : 11716 : free (dwarf->pubnames_sets); 134 : : 135 : : /* Free the ELF descriptor if necessary. */ 136 [ + + ]: 11716 : if (dwarf->free_elf) 137 : 546 : elf_end (dwarf->elf); 138 : : 139 : : /* Free the fake location list CU. */ 140 [ + + ]: 11716 : if (dwarf->fake_loc_cu != NULL) 141 : : { 142 : 324 : cu_free (dwarf->fake_loc_cu); 143 : 324 : free (dwarf->fake_loc_cu); 144 : : } 145 [ + + ]: 11716 : if (dwarf->fake_loclists_cu != NULL) 146 : : { 147 : 10406 : cu_free (dwarf->fake_loclists_cu); 148 : 10406 : free (dwarf->fake_loclists_cu); 149 : : } 150 [ + + ]: 11716 : if (dwarf->fake_addr_cu != NULL) 151 : : { 152 : 132 : cu_free (dwarf->fake_addr_cu); 153 : 132 : free (dwarf->fake_addr_cu); 154 : : } 155 : : 156 : : /* Did we find and allocate the alt Dwarf ourselves? */ 157 [ + + ]: 11716 : if (dwarf->alt_fd != -1) 158 : : { 159 : 4 : INTUSE(dwarf_end) (dwarf->alt_dwarf); 160 : 4 : close (dwarf->alt_fd); 161 : : } 162 : : 163 [ + + ]: 11716 : if (dwarf->dwp_fd != -1) 164 : : { 165 : 22 : INTUSE(dwarf_end) (dwarf->dwp_dwarf); 166 : 22 : close (dwarf->dwp_fd); 167 : : } 168 : : 169 : : /* The cached path and dir we found the Dwarf ELF file in. */ 170 : 11716 : free (dwarf->elfpath); 171 : 11716 : free (dwarf->debugdir); 172 : : 173 : : /* Free the context descriptor. */ 174 : 11716 : free (dwarf); 175 : : } 176 : : 177 : 11736 : return 0; 178 : : } 179 : : INTDEF(dwarf_end)