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