1 /* $NetBSD: libdwarf_ranges.c,v 1.2 2014/03/09 16:58:04 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: libdwarf_ranges.c,v 1.2 2014/03/09 16:58:04 christos Exp $"); 32 ELFTC_VCSID("Id: libdwarf_ranges.c 2972 2013-12-23 06:46:04Z kaiwang27 "); 33 34 static int 35 _dwarf_ranges_parse(Dwarf_Debug dbg, Dwarf_CU cu, Dwarf_Section *ds, 36 uint64_t off, Dwarf_Ranges *rg, Dwarf_Unsigned *cnt) 37 { 38 Dwarf_Unsigned start, end; 39 int i; 40 41 i = 0; 42 while (off < ds->ds_size) { 43 44 start = dbg->read(ds->ds_data, &off, cu->cu_pointer_size); 45 end = dbg->read(ds->ds_data, &off, cu->cu_pointer_size); 46 47 if (rg != NULL) { 48 rg[i].dwr_addr1 = start; 49 rg[i].dwr_addr2 = end; 50 if (start == 0 && end == 0) 51 rg[i].dwr_type = DW_RANGES_END; 52 else if ((start == ~0U && cu->cu_pointer_size == 4) || 53 (start == ~0ULL && cu->cu_pointer_size == 8)) 54 rg[i].dwr_type = DW_RANGES_ADDRESS_SELECTION; 55 else 56 rg[i].dwr_type = DW_RANGES_ENTRY; 57 } 58 59 i++; 60 61 if (start == 0 && end == 0) 62 break; 63 } 64 65 if (cnt != NULL) 66 *cnt = i; 67 68 return (DW_DLE_NONE); 69 } 70 71 int 72 _dwarf_ranges_find(Dwarf_Debug dbg, uint64_t off, Dwarf_Rangelist *ret_rl) 73 { 74 Dwarf_Rangelist rl; 75 76 STAILQ_FOREACH(rl, &dbg->dbg_rllist, rl_next) 77 if (rl->rl_offset == off) 78 break; 79 80 if (rl == NULL) 81 return (DW_DLE_NO_ENTRY); 82 83 if (ret_rl != NULL) 84 *ret_rl = rl; 85 86 return (DW_DLE_NONE); 87 } 88 89 void 90 _dwarf_ranges_cleanup(Dwarf_Debug dbg) 91 { 92 Dwarf_Rangelist rl, trl; 93 94 if (STAILQ_EMPTY(&dbg->dbg_rllist)) 95 return; 96 97 STAILQ_FOREACH_SAFE(rl, &dbg->dbg_rllist, rl_next, trl) { 98 STAILQ_REMOVE(&dbg->dbg_rllist, rl, _Dwarf_Rangelist, rl_next); 99 if (rl->rl_rgarray) 100 free(rl->rl_rgarray); 101 free(rl); 102 } 103 } 104 105 int 106 _dwarf_ranges_add(Dwarf_Debug dbg, Dwarf_CU cu, uint64_t off, 107 Dwarf_Rangelist *ret_rl, Dwarf_Error *error) 108 { 109 Dwarf_Section *ds; 110 Dwarf_Rangelist rl; 111 Dwarf_Unsigned cnt; 112 int ret; 113 114 if ((ds = _dwarf_find_section(dbg, ".debug_ranges")) == NULL) { 115 DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY); 116 return (DW_DLE_NO_ENTRY); 117 } 118 119 if ((rl = malloc(sizeof(struct _Dwarf_Rangelist))) == NULL) { 120 DWARF_SET_ERROR(dbg, error, DW_DLE_MEMORY); 121 return (DW_DLE_MEMORY); 122 } 123 124 rl->rl_offset = off; 125 126 ret = _dwarf_ranges_parse(dbg, cu, ds, off, NULL, &cnt); 127 if (ret != DW_DLE_NONE) { 128 free(rl); 129 return (ret); 130 } 131 132 rl->rl_rglen = cnt; 133 if (cnt != 0) { 134 if ((rl->rl_rgarray = calloc(cnt, sizeof(Dwarf_Ranges))) == 135 NULL) { 136 free(rl); 137 DWARF_SET_ERROR(dbg, error, DW_DLE_MEMORY); 138 return (DW_DLE_MEMORY); 139 } 140 141 ret = _dwarf_ranges_parse(dbg, cu, ds, off, rl->rl_rgarray, 142 NULL); 143 if (ret != DW_DLE_NONE) { 144 free(rl->rl_rgarray); 145 free(rl); 146 return (ret); 147 } 148 } else 149 rl->rl_rgarray = NULL; 150 151 STAILQ_INSERT_TAIL(&dbg->dbg_rllist, rl, rl_next); 152 *ret_rl = rl; 153 154 return (DW_DLE_NONE); 155 } 156