Branch data Line data Source code
1 : : /* Iterate through DWARF compilation units across all modules.
2 : : Copyright (C) 2005-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 : : #include "libdwflP.h"
30 : :
31 : : Dwarf_Die *
32 : 4417 : dwfl_nextcu (Dwfl *dwfl, Dwarf_Die *lastcu, Dwarf_Addr *bias)
33 : : {
34 [ + - ]: 4417 : if (dwfl == NULL)
35 : : return NULL;
36 : :
37 : 4417 : struct dwfl_cu *cu = (struct dwfl_cu *) lastcu;
38 : : Dwfl_Module *mod;
39 : :
40 [ + + ]: 4417 : if (cu == NULL)
41 : : {
42 : 18 : mod = dwfl->modulelist;
43 : 18 : goto nextmod;
44 : : }
45 : : else
46 : 4399 : mod = cu->mod;
47 : :
48 : : Dwfl_Error error;
49 : : do
50 : : {
51 : 4425 : error = __libdwfl_nextcu (mod, cu, &cu);
52 [ + - ]: 4425 : if (error != DWFL_E_NOERROR)
53 : : break;
54 : :
55 [ + + ]: 4425 : if (cu != NULL)
56 : : {
57 : 4399 : *bias = dwfl_adjusted_dwarf_addr (mod, 0);
58 : 4399 : return &cu->die;
59 : : }
60 : :
61 : : do
62 : : {
63 : 26 : mod = mod->next;
64 : :
65 : : nextmod:
66 [ + + ]: 44 : if (mod == NULL)
67 : : return NULL;
68 : :
69 [ + - ]: 26 : if (mod->dwerr == DWFL_E_NOERROR
70 [ + - ]: 26 : && (mod->dw != NULL
71 [ - + ]: 26 : || INTUSE(dwfl_module_getdwarf) (mod, bias) != NULL))
72 : : break;
73 : : }
74 [ # # ]: 0 : while (mod->dwerr == DWFL_E_NO_DWARF);
75 : 26 : error = mod->dwerr;
76 : : }
77 [ + - ]: 26 : while (error == DWFL_E_NOERROR);
78 : :
79 : 4417 : __libdwfl_seterrno (error);
80 : : return NULL;
81 : : }
82 : 4399 : INTDEF (dwfl_nextcu)
|