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