Branch data Line data Source code
1 : : /* Finish a session using libdwfl.
2 : : Copyright (C) 2005, 2008, 2012-2013, 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 : :
33 : : #include "libdwflP.h"
34 : : #include <unistd.h>
35 : :
36 : : void
37 : 5806 : dwfl_end (Dwfl *dwfl)
38 : : {
39 [ + + ]: 5806 : if (dwfl == NULL)
40 : : return;
41 : :
42 : : #ifdef ENABLE_LIBDEBUGINFOD
43 : 5598 : __libdwfl_debuginfod_end (dwfl->debuginfod);
44 : : #endif
45 : :
46 [ + + ]: 5598 : if (dwfl->process)
47 : 48 : __libdwfl_process_free (dwfl->process);
48 : :
49 : 5598 : free (dwfl->lookup_addr);
50 : 5598 : free (dwfl->lookup_module);
51 : 5598 : free (dwfl->lookup_segndx);
52 : :
53 : 5598 : Dwfl_Module *next = dwfl->modulelist;
54 [ + + ]: 56357 : while (next != NULL)
55 : : {
56 : 50759 : Dwfl_Module *dead = next;
57 : 50759 : next = dead->next;
58 : 50759 : __libdwfl_module_free (dead);
59 : : }
60 : :
61 [ + + ]: 5598 : if (dwfl->user_core != NULL)
62 : : {
63 : 36 : free (dwfl->user_core->executable_for_core);
64 : 36 : elf_end (dwfl->user_core->core);
65 [ + + ]: 36 : if (dwfl->user_core->fd != -1)
66 : 24 : close (dwfl->user_core->fd);
67 : 36 : free (dwfl->user_core);
68 : : }
69 : 5598 : free (dwfl);
70 : : }
|