dwarf_ranges.c revision 1.2.8.2
1 1.2.8.2 tls /* $NetBSD: dwarf_ranges.c,v 1.2.8.2 2014/08/19 23:46:44 tls Exp $ */ 2 1.2.8.2 tls 3 1.2.8.2 tls /*- 4 1.2.8.2 tls * Copyright (c) 2009,2011 Kai Wang 5 1.2.8.2 tls * All rights reserved. 6 1.2.8.2 tls * 7 1.2.8.2 tls * Redistribution and use in source and binary forms, with or without 8 1.2.8.2 tls * modification, are permitted provided that the following conditions 9 1.2.8.2 tls * are met: 10 1.2.8.2 tls * 1. Redistributions of source code must retain the above copyright 11 1.2.8.2 tls * notice, this list of conditions and the following disclaimer. 12 1.2.8.2 tls * 2. Redistributions in binary form must reproduce the above copyright 13 1.2.8.2 tls * notice, this list of conditions and the following disclaimer in the 14 1.2.8.2 tls * documentation and/or other materials provided with the distribution. 15 1.2.8.2 tls * 16 1.2.8.2 tls * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 17 1.2.8.2 tls * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 1.2.8.2 tls * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 1.2.8.2 tls * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20 1.2.8.2 tls * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 1.2.8.2 tls * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 1.2.8.2 tls * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 1.2.8.2 tls * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 1.2.8.2 tls * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 1.2.8.2 tls * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 1.2.8.2 tls * SUCH DAMAGE. 27 1.2.8.2 tls */ 28 1.2.8.2 tls 29 1.2.8.2 tls #include "_libdwarf.h" 30 1.2.8.2 tls 31 1.2.8.2 tls __RCSID("$NetBSD: dwarf_ranges.c,v 1.2.8.2 2014/08/19 23:46:44 tls Exp $"); 32 1.2.8.2 tls ELFTC_VCSID("Id: dwarf_ranges.c 2075 2011-10-27 03:47:28Z jkoshy "); 33 1.2.8.2 tls 34 1.2.8.2 tls static int 35 1.2.8.2 tls _dwarf_get_ranges(Dwarf_Debug dbg, Dwarf_CU cu, Dwarf_Off off, 36 1.2.8.2 tls Dwarf_Ranges **ranges, Dwarf_Signed *ret_cnt, Dwarf_Unsigned *ret_byte_cnt, 37 1.2.8.2 tls Dwarf_Error *error) 38 1.2.8.2 tls { 39 1.2.8.2 tls Dwarf_Rangelist rl; 40 1.2.8.2 tls int ret; 41 1.2.8.2 tls 42 1.2.8.2 tls assert(cu != NULL); 43 1.2.8.2 tls if (_dwarf_ranges_find(dbg, off, &rl) == DW_DLE_NO_ENTRY) { 44 1.2.8.2 tls ret = _dwarf_ranges_add(dbg, cu, off, &rl, error); 45 1.2.8.2 tls if (ret != DW_DLE_NONE) 46 1.2.8.2 tls return (DW_DLV_ERROR); 47 1.2.8.2 tls } 48 1.2.8.2 tls 49 1.2.8.2 tls *ranges = rl->rl_rgarray; 50 1.2.8.2 tls *ret_cnt = rl->rl_rglen; 51 1.2.8.2 tls 52 1.2.8.2 tls if (ret_byte_cnt != NULL) 53 1.2.8.2 tls *ret_byte_cnt = cu->cu_pointer_size * rl->rl_rglen * 2; 54 1.2.8.2 tls 55 1.2.8.2 tls return (DW_DLV_OK); 56 1.2.8.2 tls } 57 1.2.8.2 tls 58 1.2.8.2 tls int 59 1.2.8.2 tls dwarf_get_ranges(Dwarf_Debug dbg, Dwarf_Off offset, Dwarf_Ranges **ranges, 60 1.2.8.2 tls Dwarf_Signed *ret_cnt, Dwarf_Unsigned *ret_byte_cnt, Dwarf_Error *error) 61 1.2.8.2 tls { 62 1.2.8.2 tls 63 1.2.8.2 tls if (dbg == NULL || ranges == NULL || ret_cnt == NULL) { 64 1.2.8.2 tls DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT); 65 1.2.8.2 tls return (DW_DLV_ERROR); 66 1.2.8.2 tls } 67 1.2.8.2 tls 68 1.2.8.2 tls if (!dbg->dbg_info_loaded) { 69 1.2.8.2 tls if (_dwarf_info_load(dbg, 1, error) != DW_DLE_NONE) 70 1.2.8.2 tls return (DW_DLV_ERROR); 71 1.2.8.2 tls } 72 1.2.8.2 tls 73 1.2.8.2 tls return (_dwarf_get_ranges(dbg, STAILQ_FIRST(&dbg->dbg_cu), offset, 74 1.2.8.2 tls ranges, ret_cnt, ret_byte_cnt, error)); 75 1.2.8.2 tls } 76 1.2.8.2 tls 77 1.2.8.2 tls int 78 1.2.8.2 tls dwarf_get_ranges_a(Dwarf_Debug dbg, Dwarf_Off offset, Dwarf_Die die, 79 1.2.8.2 tls Dwarf_Ranges **ranges, Dwarf_Signed *ret_cnt, Dwarf_Unsigned *ret_byte_cnt, 80 1.2.8.2 tls Dwarf_Error *error) 81 1.2.8.2 tls { 82 1.2.8.2 tls 83 1.2.8.2 tls if (dbg == NULL || die == NULL || ranges == NULL || ret_cnt == NULL) { 84 1.2.8.2 tls DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT); 85 1.2.8.2 tls return (DW_DLV_ERROR); 86 1.2.8.2 tls } 87 1.2.8.2 tls 88 1.2.8.2 tls return (_dwarf_get_ranges(dbg, die->die_cu, offset, ranges, ret_cnt, 89 1.2.8.2 tls ret_byte_cnt, error)); 90 1.2.8.2 tls } 91
Indexes created Mon Oct 26 00:26:21 UTC 2026