blob: a49a9f06650dd189211eac7cc2a834693cded073 [file] [log] [blame]
Ben Cheng25b3c042013-11-20 14:45:36 -08001/* Get CFI from DWARF file.
2 Copyright (C) 2009 Red Hat, Inc.
Elliott Hughes03333822015-02-18 22:19:45 -08003 This file is part of elfutils.
Ben Cheng25b3c042013-11-20 14:45:36 -08004
Elliott Hughes03333822015-02-18 22:19:45 -08005 This file is free software; you can redistribute it and/or modify
6 it under the terms of either
Ben Cheng25b3c042013-11-20 14:45:36 -08007
Elliott Hughes03333822015-02-18 22:19:45 -08008 * 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
Ben Cheng25b3c042013-11-20 14:45:36 -080021 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
Elliott Hughes03333822015-02-18 22:19:45 -080025 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/>. */
Ben Cheng25b3c042013-11-20 14:45:36 -080028
29#ifdef HAVE_CONFIG_H
30# include <config.h>
31#endif
32
33#include "libdwP.h"
34#include "cfi.h"
35#include <dwarf.h>
36
37Dwarf_CFI *
38dwarf_getcfi (dbg)
39 Dwarf *dbg;
40{
41 if (dbg == NULL)
42 return NULL;
43
44 if (dbg->cfi == NULL && dbg->sectiondata[IDX_debug_frame] != NULL)
45 {
46 Dwarf_CFI *cfi = libdw_typed_alloc (dbg, Dwarf_CFI);
47
48 cfi->dbg = dbg;
49 cfi->data = (Elf_Data_Scn *) dbg->sectiondata[IDX_debug_frame];
50
51 cfi->search_table = NULL;
52 cfi->search_table_vaddr = 0;
53 cfi->search_table_entries = 0;
54 cfi->search_table_encoding = DW_EH_PE_omit;
55
56 cfi->frame_vaddr = 0;
57 cfi->textrel = 0;
58 cfi->datarel = 0;
59
60 cfi->e_ident = (unsigned char *) elf_getident (dbg->elf, NULL);
61 cfi->other_byte_order = dbg->other_byte_order;
62
63 cfi->next_offset = 0;
64 cfi->cie_tree = cfi->fde_tree = cfi->expr_tree = NULL;
65
66 cfi->ebl = NULL;
67
68 dbg->cfi = cfi;
69 }
70
71 return dbg->cfi;
72}
73INTDEF (dwarf_getcfi)