12de3b87aSKai Wang /*-
22de3b87aSKai Wang * Copyright (c) 2007 John Birrell (jb@freebsd.org)
32de3b87aSKai Wang * Copyright (c) 2009,2011,2014 Kai Wang
42de3b87aSKai Wang * All rights reserved.
52de3b87aSKai Wang *
62de3b87aSKai Wang * Redistribution and use in source and binary forms, with or without
72de3b87aSKai Wang * modification, are permitted provided that the following conditions
82de3b87aSKai Wang * are met:
92de3b87aSKai Wang * 1. Redistributions of source code must retain the above copyright
102de3b87aSKai Wang * notice, this list of conditions and the following disclaimer.
112de3b87aSKai Wang * 2. Redistributions in binary form must reproduce the above copyright
122de3b87aSKai Wang * notice, this list of conditions and the following disclaimer in the
132de3b87aSKai Wang * documentation and/or other materials provided with the distribution.
142de3b87aSKai Wang *
152de3b87aSKai Wang * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
162de3b87aSKai Wang * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
172de3b87aSKai Wang * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
182de3b87aSKai Wang * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
192de3b87aSKai Wang * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
202de3b87aSKai Wang * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
212de3b87aSKai Wang * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
222de3b87aSKai Wang * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
232de3b87aSKai Wang * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
242de3b87aSKai Wang * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
252de3b87aSKai Wang * SUCH DAMAGE.
262de3b87aSKai Wang */
272de3b87aSKai Wang
282de3b87aSKai Wang #include "_libdwarf.h"
292de3b87aSKai Wang
302de3b87aSKai Wang ELFTC_VCSID("$Id: dwarf_die.c 3039 2014-05-18 15:10:56Z kaiwang27 $");
312de3b87aSKai Wang
322de3b87aSKai Wang int
dwarf_child(Dwarf_Die die,Dwarf_Die * ret_die,Dwarf_Error * error)332de3b87aSKai Wang dwarf_child(Dwarf_Die die, Dwarf_Die *ret_die, Dwarf_Error *error)
342de3b87aSKai Wang {
352de3b87aSKai Wang Dwarf_Debug dbg;
362de3b87aSKai Wang Dwarf_Section *ds;
372de3b87aSKai Wang Dwarf_CU cu;
382de3b87aSKai Wang int ret;
392de3b87aSKai Wang
402de3b87aSKai Wang dbg = die != NULL ? die->die_dbg : NULL;
412de3b87aSKai Wang
422de3b87aSKai Wang if (die == NULL || ret_die == NULL) {
432de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
442de3b87aSKai Wang return (DW_DLV_ERROR);
452de3b87aSKai Wang }
462de3b87aSKai Wang
471201c6fdSKai Wang if (die->die_ab->ab_children == DW_CHILDREN_no)
482de3b87aSKai Wang return (DW_DLV_NO_ENTRY);
492de3b87aSKai Wang
502de3b87aSKai Wang dbg = die->die_dbg;
512de3b87aSKai Wang cu = die->die_cu;
522de3b87aSKai Wang ds = cu->cu_is_info ? dbg->dbg_info_sec : dbg->dbg_types_sec;
532de3b87aSKai Wang ret = _dwarf_die_parse(die->die_dbg, ds, cu, cu->cu_dwarf_size,
542de3b87aSKai Wang die->die_next_off, cu->cu_next_offset, ret_die, 0, error);
552de3b87aSKai Wang
562de3b87aSKai Wang if (ret == DW_DLE_NO_ENTRY) {
572de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
582de3b87aSKai Wang return (DW_DLV_NO_ENTRY);
592de3b87aSKai Wang } else if (ret != DW_DLE_NONE)
602de3b87aSKai Wang return (DW_DLV_ERROR);
612de3b87aSKai Wang
622de3b87aSKai Wang return (DW_DLV_OK);
632de3b87aSKai Wang }
642de3b87aSKai Wang
652de3b87aSKai Wang int
dwarf_siblingof_b(Dwarf_Debug dbg,Dwarf_Die die,Dwarf_Die * ret_die,Dwarf_Bool is_info,Dwarf_Error * error)662de3b87aSKai Wang dwarf_siblingof_b(Dwarf_Debug dbg, Dwarf_Die die, Dwarf_Die *ret_die,
672de3b87aSKai Wang Dwarf_Bool is_info, Dwarf_Error *error)
682de3b87aSKai Wang {
692de3b87aSKai Wang Dwarf_CU cu;
702de3b87aSKai Wang Dwarf_Attribute at;
712de3b87aSKai Wang Dwarf_Section *ds;
722de3b87aSKai Wang uint64_t offset;
732de3b87aSKai Wang int ret, search_sibling;
742de3b87aSKai Wang
752de3b87aSKai Wang if (dbg == NULL || ret_die == NULL) {
762de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
772de3b87aSKai Wang return (DW_DLV_ERROR);
782de3b87aSKai Wang }
792de3b87aSKai Wang
802de3b87aSKai Wang ds = is_info ? dbg->dbg_info_sec : dbg->dbg_types_sec;
812de3b87aSKai Wang cu = is_info ? dbg->dbg_cu_current : dbg->dbg_tu_current;
822de3b87aSKai Wang
832de3b87aSKai Wang if (cu == NULL) {
842de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_DIE_NO_CU_CONTEXT);
852de3b87aSKai Wang return (DW_DLV_ERROR);
862de3b87aSKai Wang }
872de3b87aSKai Wang
882de3b87aSKai Wang /* Application requests the first DIE in this CU. */
892de3b87aSKai Wang if (die == NULL)
902de3b87aSKai Wang return (dwarf_offdie_b(dbg, cu->cu_1st_offset, is_info,
912de3b87aSKai Wang ret_die, error));
922de3b87aSKai Wang
932de3b87aSKai Wang /*
942de3b87aSKai Wang * Check if the `is_info' flag matches the debug section the
952de3b87aSKai Wang * DIE belongs to.
962de3b87aSKai Wang */
972de3b87aSKai Wang if (is_info != die->die_cu->cu_is_info) {
982de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
992de3b87aSKai Wang return (DW_DLV_ERROR);
1002de3b87aSKai Wang }
1012de3b87aSKai Wang
1022de3b87aSKai Wang /*
1032de3b87aSKai Wang * If the DIE doesn't have any children, its sibling sits next
1042de3b87aSKai Wang * right to it.
1052de3b87aSKai Wang */
1062de3b87aSKai Wang search_sibling = 0;
1072de3b87aSKai Wang if (die->die_ab->ab_children == DW_CHILDREN_no)
1082de3b87aSKai Wang offset = die->die_next_off;
1092de3b87aSKai Wang else {
1102de3b87aSKai Wang /*
1112de3b87aSKai Wang * Look for DW_AT_sibling attribute for the offset of
1122de3b87aSKai Wang * its sibling.
1132de3b87aSKai Wang */
1142de3b87aSKai Wang if ((at = _dwarf_attr_find(die, DW_AT_sibling)) != NULL) {
1152de3b87aSKai Wang if (at->at_form != DW_FORM_ref_addr)
1162de3b87aSKai Wang offset = at->u[0].u64 + cu->cu_offset;
1172de3b87aSKai Wang else
1182de3b87aSKai Wang offset = at->u[0].u64;
1192de3b87aSKai Wang } else {
1202de3b87aSKai Wang offset = die->die_next_off;
1212de3b87aSKai Wang search_sibling = 1;
1222de3b87aSKai Wang }
1232de3b87aSKai Wang }
1242de3b87aSKai Wang
1252de3b87aSKai Wang ret = _dwarf_die_parse(die->die_dbg, ds, cu, cu->cu_dwarf_size, offset,
1262de3b87aSKai Wang cu->cu_next_offset, ret_die, search_sibling, error);
1272de3b87aSKai Wang
1282de3b87aSKai Wang if (ret == DW_DLE_NO_ENTRY) {
1292de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
1302de3b87aSKai Wang return (DW_DLV_NO_ENTRY);
1312de3b87aSKai Wang } else if (ret != DW_DLE_NONE)
1322de3b87aSKai Wang return (DW_DLV_ERROR);
1332de3b87aSKai Wang
1342de3b87aSKai Wang return (DW_DLV_OK);
1352de3b87aSKai Wang }
1362de3b87aSKai Wang
1372de3b87aSKai Wang
1382de3b87aSKai Wang int
dwarf_siblingof(Dwarf_Debug dbg,Dwarf_Die die,Dwarf_Die * ret_die,Dwarf_Error * error)1392de3b87aSKai Wang dwarf_siblingof(Dwarf_Debug dbg, Dwarf_Die die, Dwarf_Die *ret_die,
1402de3b87aSKai Wang Dwarf_Error *error)
1412de3b87aSKai Wang {
1422de3b87aSKai Wang
1432de3b87aSKai Wang return (dwarf_siblingof_b(dbg, die, ret_die, 1, error));
1442de3b87aSKai Wang }
1452de3b87aSKai Wang
1462de3b87aSKai Wang static int
_dwarf_search_die_within_cu(Dwarf_Debug dbg,Dwarf_Section * s,Dwarf_CU cu,Dwarf_Off offset,Dwarf_Die * ret_die,Dwarf_Error * error)1472de3b87aSKai Wang _dwarf_search_die_within_cu(Dwarf_Debug dbg, Dwarf_Section *s, Dwarf_CU cu,
1482de3b87aSKai Wang Dwarf_Off offset, Dwarf_Die *ret_die, Dwarf_Error *error)
1492de3b87aSKai Wang {
1502de3b87aSKai Wang
1512de3b87aSKai Wang assert(dbg != NULL && cu != NULL && ret_die != NULL);
1522de3b87aSKai Wang
1532de3b87aSKai Wang return (_dwarf_die_parse(dbg, s, cu, cu->cu_dwarf_size,
1542de3b87aSKai Wang offset, cu->cu_next_offset, ret_die, 0, error));
1552de3b87aSKai Wang }
1562de3b87aSKai Wang
1572de3b87aSKai Wang int
dwarf_offdie_b(Dwarf_Debug dbg,Dwarf_Off offset,Dwarf_Bool is_info,Dwarf_Die * ret_die,Dwarf_Error * error)1582de3b87aSKai Wang dwarf_offdie_b(Dwarf_Debug dbg, Dwarf_Off offset, Dwarf_Bool is_info,
1592de3b87aSKai Wang Dwarf_Die *ret_die, Dwarf_Error *error)
1602de3b87aSKai Wang {
1612de3b87aSKai Wang Dwarf_Section *ds;
1622de3b87aSKai Wang Dwarf_CU cu;
1632de3b87aSKai Wang int ret;
1642de3b87aSKai Wang
1652de3b87aSKai Wang if (dbg == NULL || ret_die == NULL) {
1662de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
1672de3b87aSKai Wang return (DW_DLV_ERROR);
1682de3b87aSKai Wang }
1692de3b87aSKai Wang
1702de3b87aSKai Wang ds = is_info ? dbg->dbg_info_sec : dbg->dbg_types_sec;
1712de3b87aSKai Wang cu = is_info ? dbg->dbg_cu_current : dbg->dbg_tu_current;
1722de3b87aSKai Wang
1732de3b87aSKai Wang /* First search the current CU. */
1742de3b87aSKai Wang if (cu != NULL) {
1752de3b87aSKai Wang if (offset > cu->cu_offset && offset < cu->cu_next_offset) {
1762de3b87aSKai Wang ret = _dwarf_search_die_within_cu(dbg, ds, cu, offset,
1772de3b87aSKai Wang ret_die, error);
1782de3b87aSKai Wang if (ret == DW_DLE_NO_ENTRY) {
1792de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
1802de3b87aSKai Wang return (DW_DLV_NO_ENTRY);
1812de3b87aSKai Wang } else if (ret != DW_DLE_NONE)
1822de3b87aSKai Wang return (DW_DLV_ERROR);
1832de3b87aSKai Wang return (DW_DLV_OK);
1842de3b87aSKai Wang }
1852de3b87aSKai Wang }
1862de3b87aSKai Wang
1872de3b87aSKai Wang /* Search other CUs. */
1882de3b87aSKai Wang ret = _dwarf_info_load(dbg, 1, is_info, error);
1892de3b87aSKai Wang if (ret != DW_DLE_NONE)
1902de3b87aSKai Wang return (DW_DLV_ERROR);
1912de3b87aSKai Wang
1922de3b87aSKai Wang if (is_info) {
1932de3b87aSKai Wang STAILQ_FOREACH(cu, &dbg->dbg_cu, cu_next) {
1942de3b87aSKai Wang if (offset < cu->cu_offset ||
1952de3b87aSKai Wang offset > cu->cu_next_offset)
1962de3b87aSKai Wang continue;
1972de3b87aSKai Wang ret = _dwarf_search_die_within_cu(dbg, ds, cu, offset,
1982de3b87aSKai Wang ret_die, error);
1992de3b87aSKai Wang if (ret == DW_DLE_NO_ENTRY) {
2002de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
2012de3b87aSKai Wang return (DW_DLV_NO_ENTRY);
2022de3b87aSKai Wang } else if (ret != DW_DLE_NONE)
2032de3b87aSKai Wang return (DW_DLV_ERROR);
2042de3b87aSKai Wang return (DW_DLV_OK);
2052de3b87aSKai Wang }
2062de3b87aSKai Wang } else {
2072de3b87aSKai Wang STAILQ_FOREACH(cu, &dbg->dbg_tu, cu_next) {
2082de3b87aSKai Wang if (offset < cu->cu_offset ||
2092de3b87aSKai Wang offset > cu->cu_next_offset)
2102de3b87aSKai Wang continue;
2112de3b87aSKai Wang ret = _dwarf_search_die_within_cu(dbg, ds, cu, offset,
2122de3b87aSKai Wang ret_die, error);
2132de3b87aSKai Wang if (ret == DW_DLE_NO_ENTRY) {
2142de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
2152de3b87aSKai Wang return (DW_DLV_NO_ENTRY);
2162de3b87aSKai Wang } else if (ret != DW_DLE_NONE)
2172de3b87aSKai Wang return (DW_DLV_ERROR);
2182de3b87aSKai Wang return (DW_DLV_OK);
2192de3b87aSKai Wang }
2202de3b87aSKai Wang }
2212de3b87aSKai Wang
2222de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
2232de3b87aSKai Wang return (DW_DLV_NO_ENTRY);
2242de3b87aSKai Wang }
2252de3b87aSKai Wang
2262de3b87aSKai Wang int
dwarf_offdie(Dwarf_Debug dbg,Dwarf_Off offset,Dwarf_Die * ret_die,Dwarf_Error * error)2272de3b87aSKai Wang dwarf_offdie(Dwarf_Debug dbg, Dwarf_Off offset, Dwarf_Die *ret_die,
2282de3b87aSKai Wang Dwarf_Error *error)
2292de3b87aSKai Wang {
2302de3b87aSKai Wang
2312de3b87aSKai Wang return (dwarf_offdie_b(dbg, offset, 1, ret_die, error));
2322de3b87aSKai Wang }
2332de3b87aSKai Wang
2342de3b87aSKai Wang int
dwarf_tag(Dwarf_Die die,Dwarf_Half * tag,Dwarf_Error * error)2352de3b87aSKai Wang dwarf_tag(Dwarf_Die die, Dwarf_Half *tag, Dwarf_Error *error)
2362de3b87aSKai Wang {
2372de3b87aSKai Wang Dwarf_Debug dbg;
2382de3b87aSKai Wang
2392de3b87aSKai Wang dbg = die != NULL ? die->die_dbg : NULL;
2402de3b87aSKai Wang
2412de3b87aSKai Wang if (die == NULL || tag == NULL) {
2422de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
2432de3b87aSKai Wang return (DW_DLV_ERROR);
2442de3b87aSKai Wang }
2452de3b87aSKai Wang
2462de3b87aSKai Wang assert(die->die_ab != NULL);
2472de3b87aSKai Wang
2482de3b87aSKai Wang *tag = (Dwarf_Half) die->die_ab->ab_tag;
2492de3b87aSKai Wang
2502de3b87aSKai Wang return (DW_DLV_OK);
2512de3b87aSKai Wang }
2522de3b87aSKai Wang
2532de3b87aSKai Wang int
dwarf_dieoffset(Dwarf_Die die,Dwarf_Off * ret_offset,Dwarf_Error * error)2542de3b87aSKai Wang dwarf_dieoffset(Dwarf_Die die, Dwarf_Off *ret_offset, Dwarf_Error *error)
2552de3b87aSKai Wang {
2562de3b87aSKai Wang Dwarf_Debug dbg;
2572de3b87aSKai Wang
2582de3b87aSKai Wang dbg = die != NULL ? die->die_dbg : NULL;
2592de3b87aSKai Wang
2602de3b87aSKai Wang if (die == NULL || ret_offset == NULL) {
2612de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
2622de3b87aSKai Wang return (DW_DLV_ERROR);
2632de3b87aSKai Wang }
2642de3b87aSKai Wang
2652de3b87aSKai Wang *ret_offset = die->die_offset;
2662de3b87aSKai Wang
2672de3b87aSKai Wang return (DW_DLV_OK);
2682de3b87aSKai Wang }
2692de3b87aSKai Wang
2702de3b87aSKai Wang int
dwarf_die_CU_offset(Dwarf_Die die,Dwarf_Off * ret_offset,Dwarf_Error * error)2712de3b87aSKai Wang dwarf_die_CU_offset(Dwarf_Die die, Dwarf_Off *ret_offset, Dwarf_Error *error)
2722de3b87aSKai Wang {
2732de3b87aSKai Wang Dwarf_Debug dbg;
2742de3b87aSKai Wang Dwarf_CU cu;
2752de3b87aSKai Wang
2762de3b87aSKai Wang dbg = die != NULL ? die->die_dbg : NULL;
2772de3b87aSKai Wang
2782de3b87aSKai Wang if (die == NULL || ret_offset == NULL) {
2792de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
2802de3b87aSKai Wang return (DW_DLV_ERROR);
2812de3b87aSKai Wang }
2822de3b87aSKai Wang
2832de3b87aSKai Wang cu = die->die_cu;
2842de3b87aSKai Wang assert(cu != NULL);
2852de3b87aSKai Wang
2862de3b87aSKai Wang *ret_offset = die->die_offset - cu->cu_offset;
2872de3b87aSKai Wang
2882de3b87aSKai Wang return (DW_DLV_OK);
2892de3b87aSKai Wang }
2902de3b87aSKai Wang
2912de3b87aSKai Wang int
dwarf_die_CU_offset_range(Dwarf_Die die,Dwarf_Off * cu_offset,Dwarf_Off * cu_length,Dwarf_Error * error)2922de3b87aSKai Wang dwarf_die_CU_offset_range(Dwarf_Die die, Dwarf_Off *cu_offset,
2932de3b87aSKai Wang Dwarf_Off *cu_length, Dwarf_Error *error)
2942de3b87aSKai Wang {
2952de3b87aSKai Wang Dwarf_Debug dbg;
2962de3b87aSKai Wang Dwarf_CU cu;
2972de3b87aSKai Wang
2982de3b87aSKai Wang dbg = die != NULL ? die->die_dbg : NULL;
2992de3b87aSKai Wang
3002de3b87aSKai Wang if (die == NULL || cu_offset == NULL || cu_length == NULL) {
3012de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
3022de3b87aSKai Wang return (DW_DLV_ERROR);
3032de3b87aSKai Wang }
3042de3b87aSKai Wang
3052de3b87aSKai Wang cu = die->die_cu;
3062de3b87aSKai Wang assert(cu != NULL);
3072de3b87aSKai Wang
3082de3b87aSKai Wang *cu_offset = cu->cu_offset;
3092de3b87aSKai Wang *cu_length = cu->cu_length + cu->cu_length_size;
3102de3b87aSKai Wang
3112de3b87aSKai Wang return (DW_DLV_OK);
3122de3b87aSKai Wang }
3132de3b87aSKai Wang
3142de3b87aSKai Wang int
dwarf_diename(Dwarf_Die die,char ** ret_name,Dwarf_Error * error)3152de3b87aSKai Wang dwarf_diename(Dwarf_Die die, char **ret_name, Dwarf_Error *error)
3162de3b87aSKai Wang {
3172de3b87aSKai Wang Dwarf_Debug dbg;
3182de3b87aSKai Wang
3192de3b87aSKai Wang dbg = die != NULL ? die->die_dbg : NULL;
3202de3b87aSKai Wang
3212de3b87aSKai Wang if (die == NULL || ret_name == NULL) {
3222de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
3232de3b87aSKai Wang return (DW_DLV_ERROR);
3242de3b87aSKai Wang }
3252de3b87aSKai Wang
3262de3b87aSKai Wang if (die->die_name == NULL) {
3272de3b87aSKai Wang DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
3282de3b87aSKai Wang return (DW_DLV_NO_ENTRY);
3292de3b87aSKai Wang }
3302de3b87aSKai Wang
3312de3b87aSKai Wang *ret_name = die->die_name;
3322de3b87aSKai Wang
3332de3b87aSKai Wang return (DW_DLV_OK);
3342de3b87aSKai Wang }
3352de3b87aSKai Wang
336 int
dwarf_die_abbrev_code(Dwarf_Die die)337 dwarf_die_abbrev_code(Dwarf_Die die)
338 {
339
340 assert(die != NULL);
341
342 return (die->die_abnum);
343 }
344
345 int
dwarf_get_cu_die_offset_given_cu_header_offset_b(Dwarf_Debug dbg,Dwarf_Off in_cu_header_offset,Dwarf_Bool is_info,Dwarf_Off * out_cu_die_offset,Dwarf_Error * error)346 dwarf_get_cu_die_offset_given_cu_header_offset_b(Dwarf_Debug dbg,
347 Dwarf_Off in_cu_header_offset, Dwarf_Bool is_info,
348 Dwarf_Off *out_cu_die_offset, Dwarf_Error *error)
349 {
350 Dwarf_CU cu;
351
352 if (dbg == NULL || out_cu_die_offset == NULL) {
353 DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
354 return (DW_DLV_ERROR);
355 }
356
357 if (is_info) {
358 STAILQ_FOREACH(cu, &dbg->dbg_cu, cu_next) {
359 if (cu->cu_offset == in_cu_header_offset) {
360 *out_cu_die_offset = cu->cu_1st_offset;
361 break;
362 }
363 }
364 } else {
365 STAILQ_FOREACH(cu, &dbg->dbg_tu, cu_next) {
366 if (cu->cu_offset == in_cu_header_offset) {
367 *out_cu_die_offset = cu->cu_1st_offset;
368 break;
369 }
370 }
371 }
372
373 if (cu == NULL) {
374 DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
375 return (DW_DLV_NO_ENTRY);
376 }
377
378 return (DW_DLV_OK);
379 }
380
381 int
dwarf_get_cu_die_offset_given_cu_header_offset(Dwarf_Debug dbg,Dwarf_Off in_cu_header_offset,Dwarf_Off * out_cu_die_offset,Dwarf_Error * error)382 dwarf_get_cu_die_offset_given_cu_header_offset(Dwarf_Debug dbg,
383 Dwarf_Off in_cu_header_offset, Dwarf_Off *out_cu_die_offset,
384 Dwarf_Error *error)
385 {
386
387 return (dwarf_get_cu_die_offset_given_cu_header_offset_b(dbg,
388 in_cu_header_offset, 1, out_cu_die_offset, error));
389 }
390
391 int
dwarf_get_address_size(Dwarf_Debug dbg,Dwarf_Half * addr_size,Dwarf_Error * error)392 dwarf_get_address_size(Dwarf_Debug dbg, Dwarf_Half *addr_size,
393 Dwarf_Error *error)
394 {
395
396 if (dbg == NULL || addr_size == NULL) {
397 DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
398 return (DW_DLV_ERROR);
399 }
400
401 *addr_size = dbg->dbg_pointer_size;
402
403 return (DW_DLV_OK);
404 }
405
406 Dwarf_Bool
dwarf_get_die_infotypes_flag(Dwarf_Die die)407 dwarf_get_die_infotypes_flag(Dwarf_Die die)
408 {
409
410 assert(die != NULL);
411
412 return (die->die_cu->cu_is_info);
413 }
414