1 /* $NetBSD: dwarf_pro_die.c,v 1.2 2014/03/09 16:58:04 christos Exp $ */
2
3 /*-
4 * Copyright (c) 2009 Kai Wang
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include "_libdwarf.h"
30
31 __RCSID("$NetBSD: dwarf_pro_die.c,v 1.2 2014/03/09 16:58:04 christos Exp $");
32 ELFTC_VCSID("Id: dwarf_pro_die.c 2074 2011-10-27 03:34:33Z jkoshy ");
33
34 Dwarf_Unsigned
dwarf_add_die_to_debug(Dwarf_P_Debug dbg,Dwarf_P_Die first_die,Dwarf_Error * error)35 dwarf_add_die_to_debug(Dwarf_P_Debug dbg, Dwarf_P_Die first_die,
36 Dwarf_Error *error)
37 {
38
39 if (dbg == NULL || first_die == NULL) {
40 DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
41 return (DW_DLV_NOCOUNT);
42 }
43
44 dbg->dbgp_root_die = first_die;
45
46 return (DW_DLV_OK);
47 }
48
49 Dwarf_P_Die
dwarf_new_die(Dwarf_P_Debug dbg,Dwarf_Tag new_tag,Dwarf_P_Die parent,Dwarf_P_Die child,Dwarf_P_Die left_sibling,Dwarf_P_Die right_sibling,Dwarf_Error * error)50 dwarf_new_die(Dwarf_P_Debug dbg, Dwarf_Tag new_tag,
51 Dwarf_P_Die parent, Dwarf_P_Die child, Dwarf_P_Die left_sibling,
52 Dwarf_P_Die right_sibling, Dwarf_Error *error)
53 {
54 Dwarf_P_Die die;
55 int count;
56
57 if (dbg == NULL) {
58 DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
59 return (DW_DLV_BADADDR);
60 }
61
62 count = _dwarf_die_count_links(parent, child, left_sibling,
63 right_sibling);
64
65 if (count > 1) {
66 DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
67 return (DW_DLV_BADADDR);
68 }
69
70 if (_dwarf_die_alloc(dbg, &die, error) != DW_DLE_NONE)
71 return (DW_DLV_BADADDR);
72
73 die->die_dbg = dbg;
74 die->die_tag = new_tag;
75
76 STAILQ_INSERT_TAIL(&dbg->dbgp_dielist, die, die_pro_next);
77
78 if (count == 0)
79 return (die);
80
81 _dwarf_die_link(die, parent, child, left_sibling, right_sibling);
82
83 return (die);
84 }
85
86 Dwarf_P_Die
dwarf_die_link(Dwarf_P_Die die,Dwarf_P_Die parent,Dwarf_P_Die child,Dwarf_P_Die left_sibling,Dwarf_P_Die right_sibling,Dwarf_Error * error)87 dwarf_die_link(Dwarf_P_Die die, Dwarf_P_Die parent,
88 Dwarf_P_Die child, Dwarf_P_Die left_sibling, Dwarf_P_Die right_sibling,
89 Dwarf_Error *error)
90 {
91 Dwarf_Debug dbg;
92 int count;
93
94
95 if (die == NULL) {
96 DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
97 return (DW_DLV_BADADDR);
98 }
99
100 dbg = die->die_dbg;
101 count = _dwarf_die_count_links(parent, child, left_sibling,
102 right_sibling);
103
104 if (count > 1) {
105 DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
106 return (DW_DLV_BADADDR);
107 } else if (count == 0)
108 return (die);
109
110 _dwarf_die_link(die, parent, child, left_sibling, right_sibling);
111
112 return (die);
113 }
114