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