1 /* $NetBSD: dwarf_pro_die.c,v 1.3 2016/02/20 02:43:41 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.3 2016/02/20 02:43:41 christos Exp $"); 32 ELFTC_VCSID("Id: dwarf_pro_die.c 2074 2011-10-27 03:34:33Z jkoshy "); 33 34 Dwarf_Unsigned 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 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 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