File Manager

003 File Manager

Current Path: /usr/src/contrib/elftoolchain/libdwarf

usr / src / contrib / elftoolchain / libdwarf /

📁 ..
📄 Makefile(10.53 KB)
📄 Version.map(5.24 KB)
📄 _libdwarf.h(28.02 KB)
📄 dwarf.3(22.99 KB)
📄 dwarf.h(20.09 KB)
📄 dwarf_abbrev.c(3.67 KB)
📄 dwarf_add_AT_comp_dir.3(2.93 KB)
📄 dwarf_add_AT_const_value_string.3(3.79 KB)
📄 dwarf_add_AT_dataref.3(3.53 KB)
📄 dwarf_add_AT_flag.3(3.23 KB)
📄 dwarf_add_AT_location_expr.3(3.48 KB)
📄 dwarf_add_AT_name.3(2.89 KB)
📄 dwarf_add_AT_producer.3(2.94 KB)
📄 dwarf_add_AT_ref_address.3(3.37 KB)
📄 dwarf_add_AT_reference.3(3.44 KB)
📄 dwarf_add_AT_signed_const.3(3.78 KB)
📄 dwarf_add_AT_string.3(3.23 KB)
📄 dwarf_add_AT_targ_address.3(4.03 KB)
📄 dwarf_add_arange.3(4.38 KB)
📄 dwarf_add_die_to_debug.3(2.78 KB)
📄 dwarf_add_directory_decl.3(2.93 KB)
📄 dwarf_add_expr_addr.3(3.25 KB)
📄 dwarf_add_expr_gen.3(3.4 KB)
📄 dwarf_add_fde_inst.3(3.23 KB)
📄 dwarf_add_file_decl.3(3.45 KB)
📄 dwarf_add_frame_cie.3(3.45 KB)
📄 dwarf_add_frame_fde.3(5.54 KB)
📄 dwarf_add_funcname.3(2.96 KB)
📄 dwarf_add_line_entry.3(4.74 KB)
📄 dwarf_add_pubname.3(2.95 KB)
📄 dwarf_add_typename.3(2.97 KB)
📄 dwarf_add_varname.3(2.96 KB)
📄 dwarf_add_weakname.3(2.95 KB)
📄 dwarf_arange.c(4.24 KB)
📄 dwarf_attr.3(3.29 KB)
📄 dwarf_attr.c(7.19 KB)
📄 dwarf_attrlist.3(4.28 KB)
📄 dwarf_attroffset.3(2.52 KB)
📄 dwarf_attrval.c(5.27 KB)
📄 dwarf_attrval_signed.3(5.8 KB)
📄 dwarf_child.3(7.35 KB)
📄 dwarf_cu.c(4.72 KB)
📄 dwarf_dealloc.3(5.19 KB)
📄 dwarf_dealloc.c(3.68 KB)
📄 dwarf_def_macro.3(3.63 KB)
📄 dwarf_die.c(9.85 KB)
📄 dwarf_die_abbrev_code.3(2.04 KB)
📄 dwarf_die_link.3(3.19 KB)
📄 dwarf_diename.3(2.68 KB)
📄 dwarf_dieoffset.3(5.8 KB)
📄 dwarf_dump.c(37.44 KB)
📄 dwarf_end_macro_file.3(2.65 KB)
📄 dwarf_errmsg.3(2.07 KB)
📄 dwarf_errmsg.c(3.91 KB)
📄 dwarf_errno.3(1.9 KB)
📄 dwarf_expand_frame_instructions.3(5.08 KB)
📄 dwarf_expr_current_offset.3(2.64 KB)
📄 dwarf_expr_into_block.3(2.88 KB)
📄 dwarf_fde_cfa_offset.3(2.89 KB)
📄 dwarf_find_macro_value_start.3(2.42 KB)
📄 dwarf_finish.3(3.65 KB)
📄 dwarf_finish.c(1.81 KB)
📄 dwarf_form.c(10.87 KB)
📄 dwarf_formaddr.3(2.69 KB)
📄 dwarf_formblock.3(3.02 KB)
📄 dwarf_formexprloc.3(3.12 KB)
📄 dwarf_formflag.3(2.7 KB)
📄 dwarf_formref.3(3.56 KB)
📄 dwarf_formsig8.3(2.74 KB)
📄 dwarf_formstring.3(2.88 KB)
📄 dwarf_formudata.3(3.29 KB)
📄 dwarf_frame.c(15.45 KB)
📄 dwarf_funcs.m4(1.55 KB)
📄 dwarf_get_AT_name.3(5.4 KB)
📄 dwarf_get_abbrev.3(4.86 KB)
📄 dwarf_get_abbrev_children_flag.3(3.07 KB)
📄 dwarf_get_abbrev_code.3(2.55 KB)
📄 dwarf_get_abbrev_entry.3(4.3 KB)
📄 dwarf_get_abbrev_tag.3(2.51 KB)
📄 dwarf_get_address_size.3(2.52 KB)
📄 dwarf_get_arange.3(3.12 KB)
📄 dwarf_get_arange_info.3(3.73 KB)
📄 dwarf_get_aranges.3(3.98 KB)
📄 dwarf_get_cie_index.3(2.54 KB)
📄 dwarf_get_cie_info.3(4.15 KB)
📄 dwarf_get_cie_of_fde.3(2.51 KB)
📄 dwarf_get_cu_die_offset.3(3.05 KB)
📄 dwarf_get_die_infotypes_flag.3(2.35 KB)
📄 dwarf_get_elf.3(2.66 KB)
📄 dwarf_get_fde_at_pc.3(3.56 KB)
📄 dwarf_get_fde_info_for_all_regs.3(4.44 KB)
📄 dwarf_get_fde_info_for_all_regs3.3(5.23 KB)
📄 dwarf_get_fde_info_for_cfa_reg3.3(4.94 KB)
📄 dwarf_get_fde_info_for_reg.3(4.54 KB)
📄 dwarf_get_fde_info_for_reg3.3(6.17 KB)
📄 dwarf_get_fde_instr_bytes.3(3.32 KB)
📄 dwarf_get_fde_list.3(6.03 KB)
📄 dwarf_get_fde_n.3(3.16 KB)
📄 dwarf_get_fde_range.3(4.19 KB)
📄 dwarf_get_form_class.3(2.74 KB)
📄 dwarf_get_funcs.3(5.86 KB)
📄 dwarf_get_globals.3(5.87 KB)
📄 dwarf_get_loclist_entry.3(4.2 KB)
📄 dwarf_get_macro_details.3(5.41 KB)
📄 dwarf_get_pubtypes.3(6.61 KB)
📄 dwarf_get_ranges.3(6.71 KB)
📄 dwarf_get_relocation_info.3(6.73 KB)
📄 dwarf_get_relocation_info_count.3(3.38 KB)
📄 dwarf_get_section_bytes.3(4.63 KB)
📄 dwarf_get_section_max_offsets.3(3.75 KB)
📄 dwarf_get_str.3(3.73 KB)
📄 dwarf_get_types.3(6.29 KB)
📄 dwarf_get_vars.3(5.77 KB)
📄 dwarf_get_weaks.3(5.84 KB)
📄 dwarf_hasattr.3(2.71 KB)
📄 dwarf_hasform.3(3.48 KB)
📄 dwarf_highpc.3(4.78 KB)
📄 dwarf_init.3(4.49 KB)
📄 dwarf_init.c(4.09 KB)
📄 dwarf_lineno.3(5.39 KB)
📄 dwarf_lineno.c(6.75 KB)
📄 dwarf_lne_end_sequence.3(2.95 KB)
📄 dwarf_lne_set_address.3(3 KB)
📄 dwarf_loclist.3(6.09 KB)
📄 dwarf_loclist.c(8.32 KB)
📄 dwarf_loclist_from_expr.3(5.38 KB)
📄 dwarf_macinfo.c(2.62 KB)
📄 dwarf_nametbl.m4(3.89 KB)
📄 dwarf_new_die.3(4.33 KB)
📄 dwarf_new_expr.3(3.91 KB)
📄 dwarf_new_fde.3(2.58 KB)
📄 dwarf_next_cu_header.3(8.19 KB)
📄 dwarf_next_types_section.3(3.83 KB)
📄 dwarf_object_init.3(6.4 KB)
📄 dwarf_pro_arange.c(2.51 KB)
📄 dwarf_pro_attr.c(9.29 KB)
📄 dwarf_pro_die.c(3.09 KB)
📄 dwarf_pro_expr.c(5.69 KB)
📄 dwarf_pro_finish.c(1.67 KB)
📄 dwarf_pro_frame.c(5.37 KB)
📄 dwarf_pro_funcs.m4(1.54 KB)
📄 dwarf_pro_init.c(3.28 KB)
📄 dwarf_pro_lineno.c(5.06 KB)
📄 dwarf_pro_macinfo.c(3.96 KB)
📄 dwarf_pro_nametbl.m4(2.28 KB)
📄 dwarf_pro_pubnames.m4(1.54 KB)
📄 dwarf_pro_reloc.c(3.75 KB)
📄 dwarf_pro_sections.c(2.54 KB)
📄 dwarf_pro_types.m4(1.54 KB)
📄 dwarf_pro_vars.m4(1.54 KB)
📄 dwarf_pro_weaks.m4(1.54 KB)
📄 dwarf_producer_init.3(7.59 KB)
📄 dwarf_producer_set_isa.3(2.88 KB)
📄 dwarf_pubnames.m4(1.56 KB)
📄 dwarf_pubtypes.m4(1.56 KB)
📄 dwarf_ranges.c(2.91 KB)
📄 dwarf_reloc.c(1.56 KB)
📄 dwarf_reset_section_bytes.3(2.44 KB)
📄 dwarf_sections.c(3.79 KB)
📄 dwarf_set_frame_cfa_value.3(4.11 KB)
📄 dwarf_set_reloc_application.3(2.71 KB)
📄 dwarf_seterrarg.3(3.18 KB)
📄 dwarf_seterror.c(1.97 KB)
📄 dwarf_srcfiles.3(3.23 KB)
📄 dwarf_srclines.3(4.66 KB)
📄 dwarf_start_macro_file.3(3.09 KB)
📄 dwarf_str.c(2.13 KB)
📄 dwarf_tag.3(2.38 KB)
📄 dwarf_transform_to_disk_form.3(3.22 KB)
📄 dwarf_types.m4(1.55 KB)
📄 dwarf_undef_macro.3(3.38 KB)
📄 dwarf_vars.m4(1.55 KB)
📄 dwarf_vendor_ext.3(3.1 KB)
📄 dwarf_weaks.m4(1.55 KB)
📄 dwarf_whatattr.3(2.39 KB)
📄 libdwarf.c(1.5 KB)
📄 libdwarf.h(32.98 KB)
📄 libdwarf_abbrev.c(6.74 KB)
📄 libdwarf_arange.c(7.22 KB)
📄 libdwarf_attr.c(12.08 KB)
📄 libdwarf_die.c(10.49 KB)
📄 libdwarf_elf_access.c(3.52 KB)
📄 libdwarf_elf_init.c(9.21 KB)
📄 libdwarf_error.c(2.19 KB)
📄 libdwarf_frame.c(39.32 KB)
📄 libdwarf_info.c(9.22 KB)
📄 libdwarf_init.c(8.14 KB)
📄 libdwarf_lineno.c(18.27 KB)
📄 libdwarf_loc.c(14.79 KB)
📄 libdwarf_loclist.c(4.47 KB)
📄 libdwarf_macinfo.c(5.96 KB)
📄 libdwarf_nametbl.c(6.64 KB)
📄 libdwarf_ranges.c(3.88 KB)
📄 libdwarf_reloc.c(12.86 KB)
📄 libdwarf_rw.c(10.93 KB)
📄 libdwarf_sections.c(7.01 KB)
📄 libdwarf_str.c(4.29 KB)
📄 os.NetBSD.mk(74 B)

Editing: libdwarf_attr.c

/*-
 * Copyright (c) 2007 John Birrell (jb@freebsd.org)
 * 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: libdwarf_attr.c 3748 2019-06-28 01:11:13Z emaste $");

int
_dwarf_attr_alloc(Dwarf_Die die, Dwarf_Attribute *atp, Dwarf_Error *error)
{
	Dwarf_Attribute at;

assert(die != NULL);
	assert(atp != NULL);

if ((at = calloc(1, sizeof(struct _Dwarf_Attribute))) == NULL) {
		DWARF_SET_ERROR(die->die_dbg, error, DW_DLE_MEMORY);
		return (DW_DLE_MEMORY);
	}

*atp = at;

return (DW_DLE_NONE);
}

static int
_dwarf_attr_add(Dwarf_Die die, Dwarf_Attribute atref, Dwarf_Attribute *atp,
    Dwarf_Error *error)
{
	Dwarf_Attribute at;
	int ret;

if ((ret = _dwarf_attr_alloc(die, &at, error)) != DW_DLE_NONE)
		return (ret);

memcpy(at, atref, sizeof(struct _Dwarf_Attribute));

STAILQ_INSERT_TAIL(&die->die_attr, at, at_next);

/* Save a pointer to the attribute name if this is one. */
	if (at->at_attrib == DW_AT_name) {
		switch (at->at_form) {
		case DW_FORM_strp:
			die->die_name = at->u[1].s;
			break;
		case DW_FORM_string:
			die->die_name = at->u[0].s;
			break;
		default:
			break;
		}
	}

if (atp != NULL)
		*atp = at;

return (DW_DLE_NONE);
}

Dwarf_Attribute
_dwarf_attr_find(Dwarf_Die die, Dwarf_Half attr)
{
	Dwarf_Attribute at;

STAILQ_FOREACH(at, &die->die_attr, at_next) {
		if (at->at_attrib == attr)
			break;
	}

return (at);
}

int
_dwarf_attr_init(Dwarf_Debug dbg, Dwarf_Section *ds, uint64_t *offsetp,
    int dwarf_size, Dwarf_CU cu, Dwarf_Die die, Dwarf_AttrDef ad,
    uint64_t form, int indirect, Dwarf_Error *error)
{
	struct _Dwarf_Attribute atref;
	int ret;

ret = DW_DLE_NONE;
	memset(&atref, 0, sizeof(atref));
	atref.at_die = die;
	atref.at_offset = *offsetp;
	atref.at_attrib = ad->ad_attrib;
	atref.at_form = indirect ? form : ad->ad_form;
	atref.at_indirect = indirect;
	atref.at_ld = NULL;

switch (form) {
	case DW_FORM_addr:
		atref.u[0].u64 = dbg->read(ds->ds_data, offsetp,
		    cu->cu_pointer_size);
		break;
	case DW_FORM_block:
	case DW_FORM_exprloc:
		atref.u[0].u64 = _dwarf_read_uleb128(ds->ds_data, offsetp);
		atref.u[1].u8p = _dwarf_read_block(ds->ds_data, offsetp,
		    atref.u[0].u64);
		break;
	case DW_FORM_block1:
		atref.u[0].u64 = dbg->read(ds->ds_data, offsetp, 1);
		atref.u[1].u8p = _dwarf_read_block(ds->ds_data, offsetp,
		    atref.u[0].u64);
		break;
	case DW_FORM_block2:
		atref.u[0].u64 = dbg->read(ds->ds_data, offsetp, 2);
		atref.u[1].u8p = _dwarf_read_block(ds->ds_data, offsetp,
		    atref.u[0].u64);
		break;
	case DW_FORM_block4:
		atref.u[0].u64 = dbg->read(ds->ds_data, offsetp, 4);
		atref.u[1].u8p = _dwarf_read_block(ds->ds_data, offsetp,
		    atref.u[0].u64);
		break;
	case DW_FORM_data1:
	case DW_FORM_flag:
	case DW_FORM_ref1:
		atref.u[0].u64 = dbg->read(ds->ds_data, offsetp, 1);
		break;
	case DW_FORM_data2:
	case DW_FORM_ref2:
		atref.u[0].u64 = dbg->read(ds->ds_data, offsetp, 2);
		break;
	case DW_FORM_data4:
	case DW_FORM_ref4:
		atref.u[0].u64 = dbg->read(ds->ds_data, offsetp, 4);
		break;
	case DW_FORM_data8:
	case DW_FORM_ref8:
		atref.u[0].u64 = dbg->read(ds->ds_data, offsetp, 8);
		break;
	case DW_FORM_indirect:
		form = _dwarf_read_uleb128(ds->ds_data, offsetp);
		return (_dwarf_attr_init(dbg, ds, offsetp, dwarf_size, cu, die,
		    ad, form, 1, error));
	case DW_FORM_ref_addr:
		if (cu->cu_version == 2)
			atref.u[0].u64 = dbg->read(ds->ds_data, offsetp,
			    cu->cu_pointer_size);
		else
			atref.u[0].u64 = dbg->read(ds->ds_data, offsetp,
			    dwarf_size);
		break;
	case DW_FORM_ref_udata:
	case DW_FORM_udata:
		atref.u[0].u64 = _dwarf_read_uleb128(ds->ds_data, offsetp);
		break;
	case DW_FORM_sdata:
		atref.u[0].s64 = _dwarf_read_sleb128(ds->ds_data, offsetp);
		break;
	case DW_FORM_sec_offset:
		atref.u[0].u64 = dbg->read(ds->ds_data, offsetp, dwarf_size);
		break;
	case DW_FORM_string:
		atref.u[0].s = _dwarf_read_string(ds->ds_data, ds->ds_size,
		    offsetp);
		break;
	case DW_FORM_strp:
		atref.u[0].u64 = dbg->read(ds->ds_data, offsetp, dwarf_size);
		atref.u[1].s = _dwarf_strtab_get_table(dbg) + atref.u[0].u64;
		break;
	case DW_FORM_ref_sig8:
		atref.u[0].u64 = 8;
		atref.u[1].u8p = _dwarf_read_block(ds->ds_data, offsetp,
		    atref.u[0].u64);
		break;
	case DW_FORM_flag_present:
		/* This form has no value encoded in the DIE. */
		atref.u[0].u64 = 1;
		break;
	default:
		DWARF_SET_ERROR(dbg, error, DW_DLE_ATTR_FORM_BAD);
		ret = DW_DLE_ATTR_FORM_BAD;
		break;
	}

if (ret == DW_DLE_NONE) {
		if (form == DW_FORM_block || form == DW_FORM_block1 ||
		    form == DW_FORM_block2 || form == DW_FORM_block4) {
			atref.at_block.bl_len = atref.u[0].u64;
			atref.at_block.bl_data = atref.u[1].u8p;
		}
		ret = _dwarf_attr_add(die, &atref, NULL, error);
	}

return (ret);
}

static int
_dwarf_attr_write(Dwarf_P_Debug dbg, Dwarf_P_Section ds, Dwarf_Rel_Section drs,
    Dwarf_CU cu, Dwarf_Attribute at, int pass2, Dwarf_Error *error)
{
	struct _Dwarf_P_Expr_Entry *ee;
	uint64_t value, offset, bs;
	int ret;

assert(dbg != NULL && ds != NULL && cu != NULL && at != NULL);

/* Fill in reference to other DIE in the second pass. */
	if (pass2) {
		if (at->at_form != DW_FORM_ref4 && at->at_form != DW_FORM_ref8)
			return (DW_DLE_NONE);
		if (at->at_refdie == NULL || at->at_offset == 0)
			return (DW_DLE_NONE);
		offset = at->at_offset;
		dbg->write(ds->ds_data, &offset, at->at_refdie->die_offset,
		    at->at_form == DW_FORM_ref4 ? 4 : 8);
		return (DW_DLE_NONE);
	}

switch (at->at_form) {
	case DW_FORM_addr:
		if (at->at_relsym)
			ret = _dwarf_reloc_entry_add(dbg, drs, ds,
			    dwarf_drt_data_reloc, cu->cu_pointer_size,
			    ds->ds_size, at->at_relsym, at->u[0].u64, NULL,
			    error);
		else
			ret = WRITE_VALUE(at->u[0].u64, cu->cu_pointer_size);
		break;
	case DW_FORM_block:
	case DW_FORM_block1:
	case DW_FORM_block2:
	case DW_FORM_block4:
		/* Write block size. */
		if (at->at_form == DW_FORM_block) {
			ret = _dwarf_write_uleb128_alloc(&ds->ds_data,
			    &ds->ds_cap, &ds->ds_size, at->u[0].u64, error);
			if (ret != DW_DLE_NONE)
				break;
		} else {
			if (at->at_form == DW_FORM_block1)
				bs = 1;
			else if (at->at_form == DW_FORM_block2)
				bs = 2;
			else
				bs = 4;
			ret = WRITE_VALUE(at->u[0].u64, bs);
			if (ret != DW_DLE_NONE)
				break;
		}

/* Keep block data offset for later use. */
		offset = ds->ds_size;

/* Write block data. */
		ret = WRITE_BLOCK(at->u[1].u8p, at->u[0].u64);
		if (ret != DW_DLE_NONE)
			break;
		if (at->at_expr == NULL)
			break;

/* Generate relocation entry for DW_OP_addr expressions. */
		STAILQ_FOREACH(ee, &at->at_expr->pe_eelist, ee_next) {
			if (ee->ee_loc.lr_atom != DW_OP_addr || ee->ee_sym == 0)
				continue;
			ret = _dwarf_reloc_entry_add(dbg, drs, ds,
			    dwarf_drt_data_reloc, dbg->dbg_pointer_size,
			    offset + ee->ee_loc.lr_offset + 1, ee->ee_sym,
			    ee->ee_loc.lr_number, NULL, error);
			if (ret != DW_DLE_NONE)
				break;
		}
		break;
	case DW_FORM_data1:
	case DW_FORM_flag:
	case DW_FORM_ref1:
		ret = WRITE_VALUE(at->u[0].u64, 1);
		break;
	case DW_FORM_data2:
	case DW_FORM_ref2:
		ret = WRITE_VALUE(at->u[0].u64, 2);
		break;
	case DW_FORM_data4:
		if (at->at_relsym || at->at_relsec != NULL)
			ret = _dwarf_reloc_entry_add(dbg, drs, ds,
			    dwarf_drt_data_reloc, 4, ds->ds_size, at->at_relsym,
			    at->u[0].u64, at->at_relsec, error);
		else
			ret = WRITE_VALUE(at->u[0].u64, 4);
		break;
	case DW_FORM_data8:
		if (at->at_relsym || at->at_relsec != NULL)
			ret = _dwarf_reloc_entry_add(dbg, drs, ds,
			    dwarf_drt_data_reloc, 8, ds->ds_size, at->at_relsym,
			    at->u[0].u64, at->at_relsec, error);
		else
			ret = WRITE_VALUE(at->u[0].u64, 8);
		break;
	case DW_FORM_ref4:
	case DW_FORM_ref8:
		/*
		 * The value of ref4 and ref8 could be a reference to another
		 * DIE within the CU. And if we don't know the ref DIE's
		 * offset at the moement, then we remember at_offset and fill
		 * it in the second pass.
		 */
		if (at->at_refdie) {
			value = at->at_refdie->die_offset;
			if (value == 0) {
				cu->cu_pass2 = 1;
				at->at_offset = ds->ds_size;
			}
		} else
			value = at->u[0].u64;
		ret = WRITE_VALUE(value, at->at_form == DW_FORM_ref4 ? 4 : 8);
		break;
	case DW_FORM_indirect:
		/* TODO. */
		DWARF_SET_ERROR(dbg, error, DW_DLE_ATTR_FORM_BAD);
		ret = DW_DLE_ATTR_FORM_BAD;
		break;
	case DW_FORM_ref_addr:
		/* DWARF2 format. */
		if (at->at_relsym)
			ret = _dwarf_reloc_entry_add(dbg, drs, ds,
			    dwarf_drt_data_reloc, cu->cu_pointer_size,
			    ds->ds_size, at->at_relsym, at->u[0].u64, NULL,
			    error);
		else
			ret = WRITE_VALUE(at->u[0].u64, cu->cu_pointer_size);
		break;
	case DW_FORM_ref_udata:
	case DW_FORM_udata:
		ret = WRITE_ULEB128(at->u[0].u64);
		break;
	case DW_FORM_sdata:
		ret = WRITE_SLEB128(at->u[0].s64);
		break;
	case DW_FORM_string:
		assert(at->u[0].s != NULL);
		ret = WRITE_STRING(at->u[0].s);
		break;
	case DW_FORM_strp:
		ret = _dwarf_reloc_entry_add(dbg, drs, ds, dwarf_drt_data_reloc,
		    4, ds->ds_size, 0, at->u[0].u64, ".debug_str", error);
		break;
	default:
		DWARF_SET_ERROR(dbg, error, DW_DLE_ATTR_FORM_BAD);
		ret = DW_DLE_ATTR_FORM_BAD;
		break;
	}

return (ret);
}

int
_dwarf_add_AT_dataref(Dwarf_P_Debug dbg, Dwarf_P_Die die, Dwarf_Half attr,
    Dwarf_Unsigned pc_value, Dwarf_Unsigned sym_index, const char *secname,
    Dwarf_P_Attribute *atp, Dwarf_Error *error)
{
	Dwarf_Attribute at;
	int ret;

assert(dbg != NULL && die != NULL);

if ((ret = _dwarf_attr_alloc(die, &at, error)) != DW_DLE_NONE)
		return (ret);

at->at_die = die;
	at->at_attrib = attr;
	if (dbg->dbg_pointer_size == 4)
		at->at_form = DW_FORM_data4;
	else
		at->at_form = DW_FORM_data8;
	at->at_relsym = sym_index;
	at->at_relsec = secname;
	at->u[0].u64 = pc_value;

STAILQ_INSERT_TAIL(&die->die_attr, at, at_next);

if (atp)
		*atp = at;

return (DW_DLE_NONE);
}

int
_dwarf_add_string_attr(Dwarf_P_Die die, Dwarf_P_Attribute *atp, Dwarf_Half attr,
    char *string, Dwarf_Error *error)
{
	Dwarf_Attribute at;
	Dwarf_Debug dbg;
	int ret;

dbg = die != NULL ? die->die_dbg : NULL;

assert(atp != NULL);

if (die == NULL || string == NULL) {
		DWARF_SET_ERROR(dbg, error, DW_DLE_ARGUMENT);
		return (DW_DLE_ARGUMENT);
	}

if ((ret = _dwarf_attr_alloc(die, &at, error)) != DW_DLE_NONE)
		return (ret);

at->at_die = die;
	at->at_attrib = attr;
	at->at_form = DW_FORM_strp;
	if ((ret = _dwarf_strtab_add(dbg, string, &at->u[0].u64,
	    error)) != DW_DLE_NONE) {
		free(at);
		return (ret);
	}
	at->u[1].s = _dwarf_strtab_get_table(dbg) + at->u[0].u64;

*atp = at;

STAILQ_INSERT_TAIL(&die->die_attr, at, at_next);

return (DW_DLE_NONE);
}

int
_dwarf_attr_gen(Dwarf_P_Debug dbg, Dwarf_P_Section ds, Dwarf_Rel_Section drs,
    Dwarf_CU cu, Dwarf_Die die, int pass2, Dwarf_Error *error)
{
	Dwarf_Attribute at;
	int ret;

assert(dbg != NULL && ds != NULL && cu != NULL && die != NULL);

STAILQ_FOREACH(at, &die->die_attr, at_next) {
		ret = _dwarf_attr_write(dbg, ds, drs, cu, at, pass2, error);
		if (ret != DW_DLE_NONE)
			return (ret);
	}

return (DW_DLE_NONE);
}

003 File Manager

Editing: libdwarf_attr.c

Upload File

Create Folder