Home | History | Annotate | Line # | Download | only in libdwarf 
      1 /*	$NetBSD: dwarf_ranges.c,v 1.5 2024/03/03 17:37:32 christos Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2009,2011 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_ranges.c,v 1.5 2024/03/03 17:37:32 christos Exp $");
     32 ELFTC_VCSID("Id: dwarf_ranges.c 3029 2014-04-21 23:26:02Z kaiwang27");
     33 
     34 static int
     35 _dwarf_get_ranges(Dwarf_Debug dbg, Dwarf_CU cu, Dwarf_Off off,
     36     Dwarf_Ranges **ranges, Dwarf_Signed *ret_cnt, Dwarf_Unsigned *ret_byte_cnt,
     37     Dwarf_Error *error)
     38 {
     39 	Dwarf_Rangelist rl;
     40 	int ret;
     41 
     42 	assert(cu != NULL);
     43 	if (_dwarf_ranges_find(dbg, off, &rl) == DW_DLE_NO_ENTRY) {
     44 		ret = _dwarf_ranges_add(dbg, cu, off, &rl, error);
     45 		if (ret != DW_DLE_NONE)
     46 			return (DW_DLV_ERROR);
     47 	}
     48 
     49 	*ranges = rl->rl_rgarray;
     50 	*ret_cnt = rl->rl_rglen;
     51 
     52 	if (ret_byte_cnt != NULL)
     53 		*ret_byte_cnt = cu->cu_pointer_size * rl->rl_rglen * 2;
     54 
     55 	return (DW_DLV_OK);
     56 }
     57 
     58 int
     59 dwarf_get_ranges(Dwarf_Debug dbg, Dwarf_Off offset, Dwarf_Ranges **ranges,
     60     Dwarf_Signed *ret_cnt, Dwarf_Unsigned *ret_byte_cnt, Dwarf_Error *error)
     61 {
     62 
     63 	if (dbg == NULL || ranges == NULL || ret_cnt == NULL) {
     64 		DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
     65 		return (DW_DLV_ERROR);
     66 	}
     67 
     68 	if (!dbg->dbg_info_loaded) {
     69 		if (_dwarf_info_load(dbg, 1, 1, error) != DW_DLE_NONE)
     70 			return (DW_DLV_ERROR);
     71 	}
     72 
     73 	return (_dwarf_get_ranges(dbg, STAILQ_FIRST(&dbg->dbg_cu), offset,
     74 	    ranges, ret_cnt, ret_byte_cnt, error));
     75 }
     76 
     77 int
     78 dwarf_get_ranges_a(Dwarf_Debug dbg, Dwarf_Off offset, Dwarf_Die die,
     79     Dwarf_Ranges **ranges, Dwarf_Signed *ret_cnt, Dwarf_Unsigned *ret_byte_cnt,
     80     Dwarf_Error *error)
     81 {
     82 
     83 	if (dbg == NULL || die == NULL || ranges == NULL || ret_cnt == NULL) {
     84 		DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
     85 		return (DW_DLV_ERROR);
     86 	}
     87 
     88 	return (_dwarf_get_ranges(dbg, die->die_cu, offset, ranges, ret_cnt,
     89 	    ret_byte_cnt, error));
     90 }
     91