mirror of
https://github.com/freebsd/freebsd-src
synced 2024-07-22 10:48:02 +00:00
137 lines
3.7 KiB
C
137 lines
3.7 KiB
C
/*-
|
|
* Copyright (c) 2009,2011 Kai Wang
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*/
|
|
|
|
#include "_libdwarf.h"
|
|
|
|
ELFTC_VCSID("$Id: dwarf_abbrev.c 2072 2011-10-27 03:26:49Z jkoshy $");
|
|
|
|
int
|
|
dwarf_get_abbrev(Dwarf_Debug dbg, Dwarf_Unsigned offset,
|
|
Dwarf_Abbrev *return_abbrev, Dwarf_Unsigned *length,
|
|
Dwarf_Unsigned *attr_count, Dwarf_Error *error)
|
|
{
|
|
Dwarf_Abbrev ab;
|
|
int ret;
|
|
|
|
if (dbg == NULL || return_abbrev == NULL || length == NULL ||
|
|
attr_count == NULL) {
|
|
DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
|
|
return (DW_DLV_ERROR);
|
|
}
|
|
|
|
ret = _dwarf_abbrev_parse(dbg, NULL, &offset, &ab, error);
|
|
if (ret != DW_DLE_NONE) {
|
|
if (ret == DW_DLE_NO_ENTRY) {
|
|
DWARF_SET_ERROR(dbg, error, DW_DLE_NO_ENTRY);
|
|
return (DW_DLV_NO_ENTRY);
|
|
} else
|
|
return (DW_DLV_ERROR);
|
|
}
|
|
|
|
*return_abbrev = ab;
|
|
*length = ab->ab_length;
|
|
*attr_count = ab->ab_atnum;
|
|
|
|
return (DW_DLV_OK);
|
|
}
|
|
|
|
int
|
|
dwarf_get_abbrev_tag(Dwarf_Abbrev abbrev, Dwarf_Half *return_tag,
|
|
Dwarf_Error *error)
|
|
{
|
|
|
|
if (abbrev == NULL || return_tag == NULL) {
|
|
DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
|
|
return (DW_DLV_ERROR);
|
|
}
|
|
|
|
*return_tag = (Dwarf_Half) abbrev->ab_tag;
|
|
|
|
return (DW_DLV_OK);
|
|
}
|
|
|
|
int
|
|
dwarf_get_abbrev_code(Dwarf_Abbrev abbrev, Dwarf_Unsigned *return_code,
|
|
Dwarf_Error *error)
|
|
{
|
|
|
|
if (abbrev == NULL || return_code == NULL) {
|
|
DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
|
|
return (DW_DLV_ERROR);
|
|
}
|
|
|
|
*return_code = abbrev->ab_entry;
|
|
|
|
return (DW_DLV_OK);
|
|
}
|
|
|
|
int
|
|
dwarf_get_abbrev_children_flag(Dwarf_Abbrev abbrev, Dwarf_Signed *return_flag,
|
|
Dwarf_Error *error)
|
|
{
|
|
|
|
if (abbrev == NULL || return_flag == NULL) {
|
|
DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
|
|
return (DW_DLV_ERROR);
|
|
}
|
|
|
|
*return_flag = (Dwarf_Signed) abbrev->ab_children;
|
|
|
|
return (DW_DLV_OK);
|
|
}
|
|
|
|
int
|
|
dwarf_get_abbrev_entry(Dwarf_Abbrev abbrev, Dwarf_Signed ndx,
|
|
Dwarf_Half *attr_num, Dwarf_Signed *form, Dwarf_Off *offset,
|
|
Dwarf_Error *error)
|
|
{
|
|
Dwarf_AttrDef ad;
|
|
int i;
|
|
|
|
if (abbrev == NULL || attr_num == NULL || form == NULL ||
|
|
offset == NULL) {
|
|
DWARF_SET_ERROR(NULL, error, DW_DLE_ARGUMENT);
|
|
return (DW_DLV_ERROR);
|
|
}
|
|
|
|
if (ndx < 0 || (uint64_t) ndx >= abbrev->ab_atnum) {
|
|
DWARF_SET_ERROR(NULL, error, DW_DLE_NO_ENTRY);
|
|
return (DW_DLV_NO_ENTRY);
|
|
}
|
|
|
|
ad = STAILQ_FIRST(&abbrev->ab_attrdef);
|
|
for (i = 0; i < ndx && ad != NULL; i++)
|
|
ad = STAILQ_NEXT(ad, ad_next);
|
|
|
|
assert(ad != NULL);
|
|
|
|
*attr_num = ad->ad_attrib;
|
|
*form = ad->ad_form;
|
|
*offset = ad->ad_offset;
|
|
|
|
return (DW_DLV_OK);
|
|
}
|