elftoolchain/libdwarf/dwarf_form.c

33 dwarf_hasform(Dwarf_Attribute at, Dwarf_Half form, Dwarf_Bool *return_hasform,
38 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
40 	if (at == NULL || return_hasform == NULL) {
45 	*return_hasform = (at->at_form == form);
51 dwarf_whatform(Dwarf_Attribute at, Dwarf_Half *return_form, Dwarf_Error *error)
55 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
57 	if (at == NULL || return_form == NULL) {
62 	*return_form = at->at_form;
68 dwarf_whatform_direct(Dwarf_Attribute at, Dwarf_Half *return_form,
73 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
75 	if (at == NULL || return_form == NULL) {
80 	if (at->at_indirect)
83 		*return_form = (Dwarf_Half) at->at_form;
89 dwarf_whatattr(Dwarf_Attribute at, Dwarf_Half *return_attr, Dwarf_Error *error)
93 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
95 	if (at == NULL || return_attr == NULL) {
100 	*return_attr = (Dwarf_Half) at->at_attrib;
106 dwarf_formref(Dwarf_Attribute at, Dwarf_Off *return_offset, Dwarf_Error *error)
111 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
113 	if (at == NULL || return_offset == NULL) {
118 	switch (at->at_form) {
124 		*return_offset = (Dwarf_Off) at->u[0].u64;
136 dwarf_global_formref(Dwarf_Attribute at, Dwarf_Off *return_offset,
142 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
144 	if (at == NULL || return_offset == NULL) {
149 	switch (at->at_form) {
152 		*return_offset = (Dwarf_Off) at->u[0].u64;
160 		*return_offset = (Dwarf_Off) at->u[0].u64 +
161 			at->at_die->die_cu->cu_offset;
173 dwarf_formaddr(Dwarf_Attribute at, Dwarf_Addr *return_addr, Dwarf_Error *error)
178 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
180 	if (at == NULL || return_addr == NULL) {
185 	if (at->at_form == DW_FORM_addr) {
186 		*return_addr = at->u[0].u64;
197 dwarf_formflag(Dwarf_Attribute at, Dwarf_Bool *return_bool, Dwarf_Error *error)
202 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
204 	if (at == NULL || return_bool == NULL) {
209 	if (at->at_form == DW_FORM_flag ||
210 	    at->at_form == DW_FORM_flag_present) {
211 		*return_bool = (Dwarf_Bool) (!!at->u[0].u64);
222 dwarf_formudata(Dwarf_Attribute at, Dwarf_Unsigned *return_uvalue,
228 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
230 	if (at == NULL || return_uvalue == NULL) {
235 	switch (at->at_form) {
241 		*return_uvalue = at->u[0].u64;
253 dwarf_formsdata(Dwarf_Attribute at, Dwarf_Signed *return_svalue,
259 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
261 	if (at == NULL || return_svalue == NULL) {
266 	switch (at->at_form) {
268 		*return_svalue = (int8_t) at->u[0].s64;
272 		*return_svalue = (int16_t) at->u[0].s64;
276 		*return_svalue = (int32_t) at->u[0].s64;
281 		*return_svalue = at->u[0].s64;
293 dwarf_formblock(Dwarf_Attribute at, Dwarf_Block **return_block,
299 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
301 	if (at == NULL || return_block == NULL) {
306 	switch (at->at_form) {
311 		*return_block = &at->at_block;
323 dwarf_formsig8(Dwarf_Attribute at, Dwarf_Sig8 *return_sig8, Dwarf_Error *error)
327 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
329 	if (at == NULL || return_sig8 == NULL) {
334 	if (at->at_form != DW_FORM_ref_sig8) {
339 	assert(at->u[0].u64 == 8);
340 	memcpy(return_sig8->signature, at->u[1].u8p, at->u[0].u64);
346 dwarf_formexprloc(Dwarf_Attribute at, Dwarf_Unsigned *return_exprlen,
352 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
354 	if (at == NULL || return_exprlen == NULL || return_expr == NULL) {
359 	if (at->at_form != DW_FORM_exprloc) {
364 	*return_exprlen = at->u[0].u64;
365 	*return_expr = (void *) at->u[1].u8p;
371 dwarf_formstring(Dwarf_Attribute at, char **return_string,
377 	dbg = at != NULL ? at->at_die->die_dbg : NULL;
379 	if (at == NULL || return_string == NULL) {
384 	switch (at->at_form) {
386 		*return_string = (char *) at->u[0].s;
390 		*return_string = (char *) at->u[1].s;
451 		 * to also look at the attribute number.