#ifndef R2_BIN_DWARF_H
#define R2_BIN_DWARF_H

#include <r_types.h>
#include <r_util.h>

typedef struct r_bin_t RBin;
typedef struct r_bin_file_t RBinFile;

#ifdef __cplusplus
extern "C" {
#endif

#define DW_EXTENDED_OPCODE 0
#define LOP_EXTENDED 1
#define LOP_DISCARD  2
#define LOP_STANDARD 3
#define LOP_SPECIAL  4

#define DW_LNS_copy                     0x01
#define DW_LNS_advance_pc               0x02
#define DW_LNS_advance_line             0x03
#define DW_LNS_set_file                 0x04
#define DW_LNS_set_column               0x05
#define DW_LNS_negate_stmt              0x06
#define DW_LNS_set_basic_block          0x07
#define DW_LNS_const_add_pc             0x08
#define DW_LNS_fixed_advance_pc         0x09
#define DW_LNS_set_prologue_end         0x0a /* DWARF3 */
#define DW_LNS_set_epilogue_begin       0x0b /* DWARF3 */
#define DW_LNS_set_isa                  0x0c /* DWARF3 */
/* Line number extended opcode name. */
#define DW_LNE_end_sequence             0x01
#define DW_LNE_set_address              0x02
#define DW_LNE_define_file              0x03
#define DW_LNE_set_discriminator        0x04  /* DWARF4 */
#define DW_LNE_lo_user                  0x80
#define DW_LNE_hi_user                  0xff

/* HP extensions. */
#define DW_LNE_HP_negate_is_UV_update       0x11 /* 17 HP */
#define DW_LNE_HP_push_context              0x12 /* 18 HP */
#define DW_LNE_HP_pop_context               0x13 /* 19 HP */
#define DW_LNE_HP_set_file_line_column      0x14 /* 20 HP */
#define DW_LNE_HP_set_routine_name          0x15 /* 21 HP */
#define DW_LNE_HP_set_sequence              0x16 /* 22 HP */
#define DW_LNE_HP_negate_post_semantics     0x17 /* 23 HP */
#define DW_LNE_HP_negate_function_exit      0x18 /* 24 HP */
#define DW_LNE_HP_negate_front_end_logical  0x19 /* 25 HP */
#define DW_LNE_HP_define_proc               0x20 /* 32 HP */

#define DW_LNE_lo_user                  0x80 /* DWARF3 */
#define DW_LNE_hi_user                  0xff /* DWARF3 */

/* debug_info tags */
// this is not a real dwarf named entry, but I wanted to give it
// a name so it's more obvious and readable that it's just a type of entry
#define DW_TAG_null_entry               0x00
#define DW_TAG_array_type               0x01
#define DW_TAG_class_type               0x02
#define DW_TAG_entry_point              0x03
#define DW_TAG_enumeration_type         0x04
#define DW_TAG_formal_parameter         0x05
#define DW_TAG_imported_declaration     0x08
#define DW_TAG_label                    0x0a
#define DW_TAG_lexical_block            0x0b
#define DW_TAG_member                   0x0d
#define DW_TAG_pointer_type             0x0f
#define DW_TAG_reference_type           0x10
#define DW_TAG_compile_unit             0x11
#define DW_TAG_string_type              0x12
#define DW_TAG_structure_type           0x13
#define DW_TAG_subroutine_type          0x15
#define DW_TAG_typedef                  0x16
#define DW_TAG_union_type               0x17
#define DW_TAG_unspecified_parameters   0x18
#define DW_TAG_variant                  0x19
#define DW_TAG_common_block             0x1a
#define DW_TAG_common_inclusion         0x1b
#define DW_TAG_inheritance              0x1c
#define DW_TAG_inlined_subroutine       0x1d
#define DW_TAG_module                   0x1e
#define DW_TAG_ptr_to_member_type       0x1f
#define DW_TAG_set_type                 0x20
#define DW_TAG_subrange_type            0x21
#define DW_TAG_with_stmt                0x22
#define DW_TAG_access_declaration       0x23
#define DW_TAG_base_type                0x24
#define DW_TAG_catch_block              0x25
#define DW_TAG_const_type               0x26
#define DW_TAG_constant                 0x27
#define DW_TAG_enumerator               0x28
#define DW_TAG_file_type                0x29
#define DW_TAG_friend                   0x2a
#define DW_TAG_namelist                 0x2b
        /*  Early releases of this header had the following
            misspelled with a trailing 's' */
#define DW_TAG_namelist_item            0x2c /* DWARF3/2 spelling */
#define DW_TAG_namelist_items           0x2c /* SGI misspelling/typo */
#define DW_TAG_packed_type              0x2d
#define DW_TAG_subprogram               0x2e
        /*  The DWARF2 document had two spellings of the following
            two TAGs, DWARF3 specifies the longer spelling. */
#define DW_TAG_template_type_parameter  0x2f /* DWARF3/2 spelling*/
#define DW_TAG_template_type_param      0x2f /* DWARF2   spelling*/
#define DW_TAG_template_value_parameter 0x30 /* DWARF3/2 spelling*/
#define DW_TAG_template_value_param     0x30 /* DWARF2   spelling*/
#define DW_TAG_thrown_type              0x31
#define DW_TAG_try_block                0x32
#define DW_TAG_variant_part             0x33
#define DW_TAG_variable                 0x34
#define DW_TAG_volatile_type            0x35
#define DW_TAG_dwarf_procedure          0x36  /* DWARF3 */
#define DW_TAG_restrict_type            0x37  /* DWARF3 */
#define DW_TAG_interface_type           0x38  /* DWARF3 */
#define DW_TAG_namespace                0x39  /* DWARF3 */
#define DW_TAG_imported_module          0x3a  /* DWARF3 */
#define DW_TAG_unspecified_type         0x3b  /* DWARF3 */
#define DW_TAG_partial_unit             0x3c  /* DWARF3 */
#define DW_TAG_imported_unit            0x3d  /* DWARF3 */
        /*  Do not use DW_TAG_mutable_type */
#define DW_TAG_mutable_type 			0x3e /* Withdrawn from DWARF3 by DWARF3f. */
#define DW_TAG_condition                0x3f  /* DWARF3f */
#define DW_TAG_shared_type              0x40  /* DWARF3f */
#define DW_TAG_type_unit                0x41  /* DWARF4 */
#define DW_TAG_rvalue_reference_type    0x42  /* DWARF4 */
#define DW_TAG_template_alias           0x43  /* DWARF4 */
#define DW_TAG_coarray_type             0x44  /* DWARF5 */
#define DW_TAG_generic_subrange         0x45  /* DWARF5 */
#define DW_TAG_dynamic_type             0x46  /* DWARF5 */
#define DW_TAG_atomic_type              0x47  /* DWARF5 */
#define DW_TAG_call_site                0x48  /* DWARF5 */
#define DW_TAG_call_site_parameter      0x49  /* DWARF5 */
#define DW_TAG_skeleton_unit            0x4a  /* DWARF5 */
#define DW_TAG_immutable_type           0x4b  /* DWARF5 */

#define DW_TAG_LAST                     0x4c
/* <_lo_user ; _hi_user> Interval is reserved for vendor extensions */
#define DW_TAG_lo_user                  0x4080
#define DW_TAG_hi_user                  0xffff

#define DW_CHILDREN_no                  0x00
#define DW_CHILDREN_yes                 0x01

#define DW_AT_sibling                   0x01
#define DW_AT_location                  0x02
#define DW_AT_name                      0x03
#define DW_AT_ordering                  0x09
#define DW_AT_byte_size                 0x0b
#define DW_AT_bit_offset                0x0c
#define DW_AT_bit_size                  0x0d
#define DW_AT_stmt_list                 0x10
#define DW_AT_low_pc                    0x11
#define DW_AT_high_pc                   0x12
#define DW_AT_language                  0x13
#define DW_AT_discr                     0x15
#define DW_AT_discr_value               0x16
#define DW_AT_visibility                0x17
#define DW_AT_import                    0x18
#define DW_AT_string_length             0x19
#define DW_AT_common_reference          0x1a
#define DW_AT_comp_dir                  0x1b
#define DW_AT_const_value               0x1c
#define DW_AT_containing_type           0x1d
#define DW_AT_default_value             0x1e
#define DW_AT_inline                    0x20
#define DW_AT_is_optional               0x21
#define DW_AT_lower_bound               0x22
#define DW_AT_producer                  0x25
#define DW_AT_prototyped                0x27
#define DW_AT_return_addr               0x2a
#define DW_AT_start_scope               0x2c
#define DW_AT_stride_size               0x2e
#define DW_AT_upper_bound               0x2f
#define DW_AT_abstract_origin           0x31
#define DW_AT_accessibility             0x32
#define DW_AT_address_class             0x33
#define DW_AT_artificial                0x34
#define DW_AT_base_types                0x35
#define DW_AT_calling_convention        0x36
#define DW_AT_count                     0x37
#define DW_AT_data_member_location      0x38
#define DW_AT_decl_column               0x39
#define DW_AT_decl_file                 0x3a
#define DW_AT_decl_line                 0x3b
#define DW_AT_declaration               0x3c
#define DW_AT_discr_list                0x3d
#define DW_AT_encoding                  0x3e
#define DW_AT_external                  0x3f
#define DW_AT_frame_base                0x40
#define DW_AT_friend                    0x41
#define DW_AT_identifier_case           0x42
#define DW_AT_macro_info                0x43
#define DW_AT_namelist_item             0x44
#define DW_AT_priority                  0x45
#define DW_AT_segment                   0x46
#define DW_AT_specification             0x47
#define DW_AT_static_link               0x48
#define DW_AT_type                      0x49
#define DW_AT_use_location              0x4a
#define DW_AT_variable_parameter        0x4b
#define DW_AT_virtuality                0x4c
#define DW_AT_vtable_elem_location      0x4d
#define DW_AT_allocated                 0x4e // DWARF 3 additions start
#define DW_AT_associated                0x4f
#define DW_AT_data_location             0x50
#define DW_AT_byte_stride               0x51
#define DW_AT_entry_pc                  0x52
#define DW_AT_use_UTF8                  0x53
#define DW_AT_extension                 0x54
#define DW_AT_ranges                    0x55
#define DW_AT_trampoline                0x56
#define DW_AT_call_column               0x57
#define DW_AT_call_file                 0x58
#define DW_AT_call_line                 0x59
#define DW_AT_description               0x5a
#define DW_AT_binary_scale              0x5b
#define DW_AT_decimal_scale             0x5c
#define DW_AT_small                     0x5d
#define DW_AT_decimal_sign              0x5e
#define DW_AT_digit_count               0x5f
#define DW_AT_picture_string            0x60
#define DW_AT_mutable                   0x61
#define DW_AT_threads_scaled            0x62
#define DW_AT_explicit                  0x63
#define DW_AT_object_pointer            0x64
#define DW_AT_endianity                 0x65
#define DW_AT_elemental                 0x66
#define DW_AT_pure                      0x67
#define DW_AT_recursive                 0x68 // DWARF 3 additions end
#define DW_AT_signature                 0x69
#define DW_AT_main_subprogram           0x6a
#define DW_AT_data_bit_offset           0x6b
#define DW_AT_const_expr                0x6c
#define DW_AT_enum_class                0x6d
#define DW_AT_linkage_name              0x6e

#define DW_AT_string_length_bit_size    0x6f
#define DW_AT_string_length_byte_size   0x70
#define DW_AT_rank                      0x71
#define DW_AT_str_offsets_base          0x72
#define DW_AT_addr_base                 0x73
#define DW_AT_rnglists_base             0x74
// #define Reserved 0x75 Unused
#define DW_AT_dwo_name                  0x76
#define DW_AT_reference                 0x77
#define DW_AT_rvalue_reference          0x78
#define DW_AT_macros                    0x79
#define DW_AT_call_all_calls            0x7a
#define DW_AT_call_all_source_calls     0x7b
#define DW_AT_call_all_tail_calls       0x7c
#define DW_AT_call_return_pc            0x7d
#define DW_AT_call_value                0x7e
#define DW_AT_call_origin               0x7f
#define DW_AT_call_parameter            0x80
#define DW_AT_call_pc                   0x81
#define DW_AT_call_tail_call            0x82
#define DW_AT_call_target               0x83
#define DW_AT_call_target_clobbered     0x84
#define DW_AT_call_data_location        0x85
#define DW_AT_call_data_value           0x86
#define DW_AT_noreturn                  0x87
#define DW_AT_alignment                 0x88
#define DW_AT_export_symbols            0x89
#define DW_AT_deleted                   0x8a
#define DW_AT_defaulted                 0x8b
#define DW_AT_loclists_base             0x8c

/* <_lo_user ; _hi_user> Interval is reserved for vendor extensions */
#define DW_AT_lo_user                   0x2000
// extensions:
#define DW_AT_MIPS_linkage_name         0x2007 // Same as DWARF4 DW_AT_linkage_name
#define DW_AT_GNU_call_site_value       0x2111
#define DW_AT_GNU_call_site_data_value  0x2112
#define DW_AT_GNU_call_site_target      0x2113
#define DW_AT_GNU_call_site_target_clobbered   0x2114
#define DW_AT_GNU_tail_call             0x2115
#define DW_AT_GNU_all_tail_call_sites   0x2116
#define DW_AT_GNU_all_call_sites        0x2117
#define DW_AT_GNU_all_source_call_sites 0x2118
#define DW_AT_GNU_macros                0x2119
#define DW_AT_GNU_deleted               0x211a
#define DW_AT_GNU_dwo_name              0x2130
#define DW_AT_GNU_dwo_id                0x2131
#define DW_AT_GNU_ranges_base           0x2132
#define DW_AT_GNU_addr_base             0x2133
#define DW_AT_GNU_pubnames              0x2134
#define DW_AT_GNU_pubtypes              0x2135
#define DW_AT_hi_user                   0x3fff

#define DW_FORM_addr                    0x01
#define DW_FORM_block2                  0x03
#define DW_FORM_block4                  0x04
#define DW_FORM_data2                   0x05
#define DW_FORM_data4                   0x06
#define DW_FORM_data8                   0x07
#define DW_FORM_string                  0x08
#define DW_FORM_block                   0x09
#define DW_FORM_block1                  0x0a
#define DW_FORM_data1                   0x0b
#define DW_FORM_flag                    0x0c
#define DW_FORM_sdata                   0x0d
#define DW_FORM_strp                    0x0e
#define DW_FORM_udata                   0x0f
#define DW_FORM_ref_addr                0x10
#define DW_FORM_ref1                    0x11
#define DW_FORM_ref2                    0x12
#define DW_FORM_ref4                    0x13
#define DW_FORM_ref8                    0x14
#define DW_FORM_ref_udata               0x15
#define DW_FORM_indirect                0x16
#define DW_FORM_sec_offset              0x17 // DWARF 4 new attribute for section offset
#define DW_FORM_exprloc                 0x18
#define DW_FORM_flag_present            0x19
#define DW_FORM_strx                    0x1a
#define DW_FORM_addrx                   0x1b
#define DW_FORM_ref_sup4                0x1c
#define DW_FORM_strp_sup                0x1d
#define DW_FORM_data16                  0x1e
#define DW_FORM_line_strp               0x1f
#define DW_FORM_ref_sig8                0x20
#define DW_FORM_implicit_const          0x21
#define DW_FORM_loclistx                0x22
#define DW_FORM_rnglistx                0x23
#define DW_FORM_ref_sup8                0x24
#define DW_FORM_strx1                   0x25
#define DW_FORM_strx2                   0x26
#define DW_FORM_strx3                   0x27
#define DW_FORM_strx4                   0x28
#define DW_FORM_addrx1                  0x29
#define DW_FORM_addrx2                  0x2a
#define DW_FORM_addrx3                  0x2b
#define DW_FORM_addrx4                  0x2c

#define DW_OP_addr                      0x03
#define DW_OP_deref                     0x06
#define DW_OP_const1u                   0x08
#define DW_OP_const1s                   0x09
#define DW_OP_const2u                   0x0a
#define DW_OP_const2s                   0x0b
#define DW_OP_const4u                   0x0c
#define DW_OP_const4s                   0x0d
#define DW_OP_const8u                   0x0e
#define DW_OP_const8s                   0x0f
#define DW_OP_constu                    0x10
#define DW_OP_consts                    0x11
#define DW_OP_dup                       0x12
#define DW_OP_drop                      0x13
#define DW_OP_over                      0x14
#define DW_OP_pick                      0x15
#define DW_OP_swap                      0x16
#define DW_OP_rot                       0x17
#define DW_OP_xderef                    0x18
#define DW_OP_abs                       0x19
#define DW_OP_and                       0x1a
#define DW_OP_div                       0x1b
#define DW_OP_minus                     0x1c
#define DW_OP_mod                       0x1d
#define DW_OP_mul                       0x1e
#define DW_OP_neg                       0x1f
#define DW_OP_not                       0x20
#define DW_OP_or                        0x21
#define DW_OP_plus                      0x22
#define DW_OP_plus_uconst               0x23
#define DW_OP_shl                       0x24
#define DW_OP_shr                       0x25
#define DW_OP_shra                      0x26
#define DW_OP_xor                       0x27
#define DW_OP_skip                      0x2f
#define DW_OP_bra                       0x28
#define DW_OP_eq                        0x29
#define DW_OP_ge                        0x2a
#define DW_OP_gt                        0x2b
#define DW_OP_le                        0x2c
#define DW_OP_lt                        0x2d
#define DW_OP_ne                        0x2e
#define DW_OP_lit0                      0x30
#define DW_OP_lit1                      0x31
#define DW_OP_lit2                      0x32
#define DW_OP_lit3                      0x33
#define DW_OP_lit4                      0x34
#define DW_OP_lit5                      0x35
#define DW_OP_lit6                      0x36
#define DW_OP_lit7                      0x37
#define DW_OP_lit8                      0x38
#define DW_OP_lit9                      0x39
#define DW_OP_lit10                     0x3a
#define DW_OP_lit11                     0x3b
#define DW_OP_lit12                     0x3c
#define DW_OP_lit13                     0x3d
#define DW_OP_lit14                     0x3e
#define DW_OP_lit15                     0x3f
#define DW_OP_lit16                     0x40
#define DW_OP_lit17                     0x41
#define DW_OP_lit18                     0x42
#define DW_OP_lit19                     0x43
#define DW_OP_lit20                     0x44
#define DW_OP_lit21                     0x45
#define DW_OP_lit22                     0x46
#define DW_OP_lit23                     0x47
#define DW_OP_lit24                     0x48
#define DW_OP_lit25                     0x49
#define DW_OP_lit26                     0x4a
#define DW_OP_lit27                     0x4b
#define DW_OP_lit28                     0x4c
#define DW_OP_lit29                     0x4d
#define DW_OP_lit30                     0x4e
#define DW_OP_lit31                     0x4f
#define DW_OP_reg0                      0x50
#define DW_OP_reg1                      0x51
#define DW_OP_reg2                      0x52
#define DW_OP_reg3                      0x53
#define DW_OP_reg4                      0x54
#define DW_OP_reg5                      0x55
#define DW_OP_reg6                      0x56
#define DW_OP_reg7                      0x57
#define DW_OP_reg8                      0x58
#define DW_OP_reg9                      0x59
#define DW_OP_reg10                     0x5a
#define DW_OP_reg11                     0x5b
#define DW_OP_reg12                     0x5c
#define DW_OP_reg13                     0x5d
#define DW_OP_reg14                     0x5e
#define DW_OP_reg15                     0x5f
#define DW_OP_reg16                     0x60
#define DW_OP_reg17                     0x61
#define DW_OP_reg18                     0x62
#define DW_OP_reg19                     0x63
#define DW_OP_reg20                     0x64
#define DW_OP_reg21                     0x65
#define DW_OP_reg22                     0x66
#define DW_OP_reg23                     0x67
#define DW_OP_reg24                     0x68
#define DW_OP_reg25                     0x69
#define DW_OP_reg26                     0x6a
#define DW_OP_reg27                     0x6b
#define DW_OP_reg28                     0x6c
#define DW_OP_reg29                     0x6d
#define DW_OP_reg30                     0x6e
#define DW_OP_reg31                     0x6f
#define DW_OP_breg0                     0x70
#define DW_OP_breg1                     0x71
#define DW_OP_breg2                     0x72
#define DW_OP_breg3                     0x73
#define DW_OP_breg4                     0x74
#define DW_OP_breg5                     0x75
#define DW_OP_breg6                     0x76
#define DW_OP_breg7                     0x77
#define DW_OP_breg8                     0x78
#define DW_OP_breg9                     0x79
#define DW_OP_breg10                    0x7a
#define DW_OP_breg11                    0x7b
#define DW_OP_breg12                    0x7c
#define DW_OP_breg13                    0x7d
#define DW_OP_breg14                    0x7e
#define DW_OP_breg15                    0x7f
#define DW_OP_breg16                    0x80
#define DW_OP_breg17                    0x81
#define DW_OP_breg18                    0x82
#define DW_OP_breg19                    0x83
#define DW_OP_breg20                    0x84
#define DW_OP_breg21                    0x85
#define DW_OP_breg22                    0x86
#define DW_OP_breg23                    0x87
#define DW_OP_breg24                    0x88
#define DW_OP_breg25                    0x89
#define DW_OP_breg26                    0x8a
#define DW_OP_breg27                    0x8b
#define DW_OP_breg28                    0x8c
#define DW_OP_breg29                    0x8d
#define DW_OP_breg30                    0x8e
#define DW_OP_breg31                    0x8f
#define DW_OP_regx                      0x90
#define DW_OP_fbreg                     0x91
#define DW_OP_bregx                     0x92
#define DW_OP_piece                     0x93
#define DW_OP_deref_size                0x94
#define DW_OP_xderef_size               0x95
#define DW_OP_nop                       0x96
#define DW_OP_push_object_address       0x97
#define DW_OP_call2                     0x98
#define DW_OP_call4                     0x99
#define DW_OP_call_ref                  0x9a
#define DW_OP_form_tls_address          0x9b
#define DW_OP_call_frame_cfa            0x9c
#define DW_OP_bit_piece                 0x9d
#define DW_OP_implicit_value            0x9e
#define DW_OP_stack_value               0x9f
#define DW_OP_addrx                     0xa1

/* <_lo_user ; _hi_user> Interval is reserved for vendor extensions */
#define DW_OP_lo_user                   0xe0
#define DW_OP_hi_user                   0xff


#define DW_ATE_address                  0x01
#define DW_ATE_boolean                  0x02
#define DW_ATE_complex_float            0x03
#define DW_ATE_float                    0x04
#define DW_ATE_signed                   0x05
#define DW_ATE_signed_char              0x06
#define DW_ATE_unsigned                 0x07
#define DW_ATE_unsigned_char            0x08
#define DW_ATE_imaginary_float          0x09
#define DW_ATE_packed_decimal           0x0a
#define DW_ATE_numeric_string           0x0b
#define DW_ATE_edited                   0x0c
#define DW_ATE_signed_fixed             0x0d
#define DW_ATE_unsigned_fixed           0x0e
#define DW_ATE_decimal_float            0x0f
#define DW_ATE_UTF                      0x10

/* <_lo_user ; _hi_user> Interval is reserved for vendor extensions */
#define DW_ATE_lo_user                  0x80
#define DW_ATE_hi_user                  0xff

#define DW_DS_unsigned                  0x01
#define DW_DS_leading_overpunch         0x02
#define DW_DS_trailing_overpunch        0x03
#define DW_DS_leading_separate          0x04
#define DW_DS_trailing_separate         0x05

#define DW_END_default                  0x00
#define DW_END_big                      0x01
#define DW_END_little                   0x02

/* <_lo_user ; _hi_user> Interval is reserved for vendor extensions */
#define DW_END_lo_user                  0x40
#define DW_END_hi_user                  0xff

#define DW_ACCESS_public                0x01
#define DW_ACCESS_protected             0x02
#define DW_ACCESS_private               0x03

#define DW_VIS_local                    0x01
#define DW_VIS_exported                 0x02
#define DW_VIS_qualified                0x03

#define DW_VIRTUALITY_none              0x00
#define DW_VIRTUALITY_virtual           0x01
#define DW_VIRTUALITY_pure_virtual      0x02

#define DW_LANG_C89                     0x0001
#define DW_LANG_C                       0x0002
#define DW_LANG_Ada83                   0x0003
#define DW_LANG_C_plus_plus             0x0004
#define DW_LANG_Cobol74                 0x0005
#define DW_LANG_Cobol85                 0x0006
#define DW_LANG_Fortran77               0x0007
#define DW_LANG_Fortran90               0x0008
#define DW_LANG_Pascal83                0x0009
#define DW_LANG_Modula2                 0x000a
#define DW_LANG_Java                    0x000b
#define DW_LANG_C99                     0x000c
#define DW_LANG_Ada95                   0x000d
#define DW_LANG_Fortran95               0x000e
#define DW_LANG_C_plus_plus_03          0x0019
#define DW_LANG_C_plus_plus_11          0x001a
#define DW_LANG_PLI                     0x000f
#define DW_LANG_ObjC                    0x0010
#define DW_LANG_ObjC_plus_plus          0x0011
#define DW_LANG_UPC                     0x0012
#define DW_LANG_D                       0x0013
#define DW_LANG_Python                  0x0014
#define DW_LANG_OpenCL                  0x0015
#define DW_LANG_Modula3                 0x0016
#define DW_LANG_Rust                    0x001c
#define DW_LANG_C11                     0x001d
#define DW_LANG_Swift                   0x001e
#define DW_LANG_Julia                   0x001f
#define DW_LANG_Dylan                   0x0020
#define DW_LANG_C_plus_plus_14          0x0021
#define DW_LANG_Fortran03               0x0022
#define DW_LANG_Fortran08               0x0023
#define DW_LANG_lo_user                 0x8000
#define DW_LANG_hi_user                 0xffff


#define DW_LANG_Kotlin 0x0026
#define DW_LANG_Zig 0x0027
#define DW_LANG_Crystal 0x0028
#define DW_LANG_C_plus_plus_17 0x002a
#define DW_LANG_C_plus_plus_20 0x002b
#define DW_LANG_C17 0x002c
#define DW_LANG_Fortran18 0x002d
#define DW_LANG_Ada2005 0x002e
#define DW_LANG_Ada2012 0x002f
#define DW_LANG_HIP 0x0030
#define DW_LANG_Assembly 0x0031
#define DW_LANG_C_sharp 0x0032
#define DW_LANG_Mojo 0x0033
#define DW_LANG_GLSL 0x0034
#define DW_LANG_GLSL_ES 0x0035
#define DW_LANG_HLSL 0x0036
#define DW_LANG_OpenCL_CPP 0x0037
#define DW_LANG_CPP_for_OpenCL 0x0038
#define DW_LANG_SYCL 0x0039
#define DW_LANG_C_plus_plus_23 0x003a
#define DW_LANG_Odin 0x003b
#define DW_LANG_P4 0x003c
#define DW_LANG_Metal 0x003d
#define DW_LANG_C23 0x003e
#define DW_LANG_Fortran23 0x003f
#define DW_LANG_Ruby 0x0040
#define DW_LANG_Move 0x0041
#define DW_LANG_Hylo 0x0042
#define DW_LANG_V 0x0043

#define DW_ID_case_sensitive            0x00
#define DW_ID_up_case                   0x01
#define DW_ID_down_case                 0x02
#define DW_ID_case_insensitive          0x03

#define DW_CC_normal                    0x01
#define DW_CC_program                   0x02
#define DW_CC_nocall                    0x03
#define DW_CC_lo_user                   0x40
#define DW_CC_hi_user                   0xff

#define DW_INL_not_inlined              0x00
#define DW_INL_inlined                  0x01
#define DW_INL_declared_not_inlined     0x02
#define DW_INL_declared_inlined         0x03

#define DW_ORD_row_major                0x00
#define DW_ORD_col_major                0x01

#define DW_DSC_label                    0x00
#define DW_DSC_range                    0x01

#define DW_MACINFO_define               0x01
#define DW_MACINFO_undef                0x02
#define DW_MACINFO_start_file           0x03
#define DW_MACINFO_end_file             0x04
#define DW_MACINFO_vendor_ext           0xff

#define DW_CFA_advance_loc              0x40
#define DW_CFA_offset                   0x80
#define DW_CFA_restore                  0xc0

#define DW_CFA_nop                      0x00
#define DW_CFA_set_loc                  0x01
#define DW_CFA_advance_loc1             0x02
#define DW_CFA_advance_loc2             0x03
#define DW_CFA_advance_loc4             0x04
#define DW_CFA_offse_extended           0x05
#define DW_CFA_restore_extended         0x06
#define DW_CFA_undefined                0x07
#define DW_CFA_same_value               0x08
#define DW_CFA_register                 0x09
#define DW_CFA_remember_state           0x0a
#define DW_CFA_restore_state            0x0b
#define DW_CFA_def_cfa                  0x0c
#define DW_CFA_def_cfa_register         0x0d
#define DW_CFA_def_cfa_offset           0x0e
#define DW_CFA_def_cfa_expression       0x0f
#define DW_CFA_expression               0x10
#define DW_CFA_offset_extended_sf       0x11
#define DW_CFA_def_cfa_sf               0x12
#define DW_CFA_def_cfa_offset_sf        0x13
#define DW_CFA_val_offset               0x14
#define DW_CFA_val_offset_sf            0x15
#define DW_CFA_val_expression           0x16
#define DW_CFA_lo_user                  0x1c
#define DW_CFA_hi_user                  0x3f

#define DW_UT_compile                   0x01
#define DW_UT_type                      0x02
#define DW_UT_partial                   0x03
#define DW_UT_skeleton                  0x04
#define DW_UT_split_compile             0x05
#define DW_UT_split_type                0x06
#define DW_UT_lo_user                   0x80
#define DW_UT_hi_user                   0xff

#define DW_LLE_end_of_list              0x00
#define DW_LLE_base_addressx            0x01
#define DW_LLE_startx_endx              0x02
#define DW_LLE_startx_length            0x03
#define DW_LLE_offset_pair              0x04
#define DW_LLE_default_location         0x05
#define DW_LLE_base_address             0x06
#define DW_LLE_start_end                0x07
#define DW_LLE_start_length             0x08

#define DW_LNCT_path            0x0001
#define DW_LNCT_directory_index 0x0002
#define DW_LNCT_timestamp       0x0003
#define DW_LNCT_size            0x0004
#define DW_LNCT_MD5             0x0005
#define DW_LNCT_lo_user         0x2000
#define DW_LNCT_hi_user         0x3fff

typedef struct {
	ut32 total_length;
	ut16 version;
	ut32 plen;
	ut8 mininstlen;
	ut8 is_stmt;
	char line_base;
	ut8 line_range;
	ut8 opcode_base;
	ut32 oplentable[12];
	const char **incdirs;
	const char *file[128];
} RBinDwarfInfoHeader;
#define R_BIN_DWARF_INFO_HEADER_FILE_LENGTH(x) (sizeof (x->file)/sizeof (*(x->file)))

typedef struct {
	ut64 address;
	unsigned int file;
	unsigned int line;
	unsigned int column;
	int is_stmt;
	int basic_block;
	int end_sequence;
} RBinDwarfState;

typedef struct {
	ut64 addr;
	ut32 file; // index into strpool (UT32_MAX if unset)
	ut32 path; // index into strpool (UT32_MAX if unset)
	ut32 line;
	ut32 column;
} RBinAddrline;

#define DWARF_INIT_LEN_64	0xffffffff
typedef union {
	ut32 offset32;
	ut64 offset64;
} section_offset;

typedef struct {
	ut64 unit_length;
	ut16 version;
	section_offset debug_abbrev_offset;
	ut8 address_size;
	ut64 type_signature;
	section_offset type_offset;
} RBinDwarfTypeUnitHeader;

typedef struct {
	ut64 unit_length;
	ut16 version;
	section_offset debug_info_offset;
	ut8 address_size;
	ut8 segment_size;
} RBinDwarfAddressRangeTable;

typedef struct {
	ut64	attr_name;
	ut64	attr_form;
	st64	special; // Used for values coded directly into abbrev
} RBinDwarfAttrDef;

typedef struct {
	ut64 length;
	const ut8 *data;
} RBinDwarfBlock;

// https://www.dwarfstd.org/doc/DWARF4.pdf#page=29http://www.dwarfstd.org/doc/DWARF4.pdf#page=29&zoom=100,0,0zoom=100,0,0
typedef enum {
	DW_AT_KIND_ADDRESS,
	DW_AT_KIND_BLOCK,
	DW_AT_KIND_CONSTANT,
	DW_AT_KIND_EXPRLOC,
	DW_AT_KIND_FLAG,
	DW_AT_KIND_LINEPTR,
	DW_AT_KIND_LOCLISTPTR,
	DW_AT_KIND_MACPTR,
	DW_AT_KIND_RANGELISTPTR,
	DW_AT_KIND_REFERENCE,
	DW_AT_KIND_STRING,
	// Raw DWARF 5 indexes that could not be resolved in this object.
	DW_AT_KIND_ADDRESS_INDEX,
	DW_AT_KIND_STRING_INDEX,
	DW_AT_KIND_LOCLIST_INDEX, // DW_FORM_loclistx before the unit resolves it
} RBinDwarfAttrKind;

typedef struct dwarf_attr_kind {
	ut16 attr_name;
	ut16 attr_form;
	RBinDwarfAttrKind kind;
	/* This is subideal, as dw_form_data can be anything
	   we could lose information example: encoding signed
	   2 byte int into ut64 and then interpreting it as st64 TODO*/
	union {
		ut64 address;
		ut64 uconstant;
		st64 sconstant;
		ut8 flag;
		ut64 reference;
		RBinDwarfBlock block;
		struct {
			ut64 offset;
			const char *content;
		} string;
	};
} RBinDwarfAttrValue;

typedef struct {
	// A 4-byte (or 8 byte for 64bit dwarf) unsigned length of the .debug_info contribution
	// for that compilation unit, not including the length field itself.
	ut64 length;
	ut16 version;
	// A 4-byte unsigned offset into the .debug_abbrev section.
	ut64 abbrev_offset;
	// A 1 - byte size of an address on the target architecture.If the system uses
	//  segmented addressing, this value represents the size of the offset portion of an address.
	ut8 address_size;
	ut8 unit_type; // DWARF 5 addition
	ut64 dwo_id; // DWARF 5 addition
	ut64 type_sig; // DWARF 5 addition
	ut64 type_offset; // DWARF 5 addition
	ut64 header_size; // excluding length field
	ut64 unit_offset;
	bool is_64bit;
} RBinDwarfCompUnitHdr;

R_VEC_TYPE(RVecDwarfAttrValue, RBinDwarfAttrValue);

typedef struct {
	ut64 offset; // important for parsing types
	ut32 attr_idx;
	ut32 abbrev_code;
	ut16 attr_count;
	ut16 tag;
	bool has_children; // important for parsing types
} RBinDwarfDie;

R_VEC_TYPE(RVecDwarfDie, RBinDwarfDie);

typedef struct {
	RBinDwarfCompUnitHdr hdr;
	ut64 offset;
	RVecDwarfDie *dies;
	RVecDwarfAttrValue *attrs;
} RBinDwarfCompUnit;

static inline RBinDwarfAttrValue *r_bin_dwarf_die_attr(const RBinDwarfCompUnit *cu, const RBinDwarfDie *die, size_t i) {
	return die && i < die->attr_count? RVecDwarfAttrValue_at (cu->attrs, die->attr_idx + i): NULL;
}

#define R_BIN_DWARF_DIE_FOREACH_ATTR(cu, die, it) \
	for (it = r_bin_dwarf_die_attr (cu, die, 0); it && it < (cu)->attrs->_start + (die)->attr_idx + (die)->attr_count; it++)

static inline RBinDwarfAttrValue *r_bin_dwarf_die_find_attr(const RBinDwarfCompUnit *cu, const RBinDwarfDie *die, ut16 name) {
	RBinDwarfAttrValue *value;
	R_BIN_DWARF_DIE_FOREACH_ATTR (cu, die, value) {
		if (value->attr_name == name) {
			return value;
		}
	}
	return NULL;
}

R_VEC_TYPE(RVecDwarfCompUnit, RBinDwarfCompUnit);

typedef struct {
  RVecDwarfCompUnit *comp_units;
} RBinDwarfDebugInfo;

static inline int r_bin_dwarf_comp_unit_offset_cmp(const RBinDwarfCompUnit *a, const RBinDwarfCompUnit *b) {
	return (a->offset > b->offset) - (a->offset < b->offset);
}

static inline int r_bin_dwarf_die_offset_cmp(const RBinDwarfDie *a, const RBinDwarfDie *b) {
	return (a->offset > b->offset) - (a->offset < b->offset);
}

// units and their dies are stored in section order, so no index is needed
static inline RBinDwarfDie *r_bin_dwarf_find_die(const RBinDwarfDebugInfo *info, ut64 offset, R_OUT RBinDwarfCompUnit ** R_NULLABLE unit) {
	R_RETURN_VAL_IF_FAIL (info && info->comp_units, NULL);
	RBinDwarfCompUnit unit_key;
	memset (&unit_key, 0, sizeof (unit_key));
	unit_key.offset = offset;
	size_t next = RVecDwarfCompUnit_upper_bound (info->comp_units, &unit_key, r_bin_dwarf_comp_unit_offset_cmp);
	if (!next) {
		return NULL;
	}
	RBinDwarfCompUnit *cu = RVecDwarfCompUnit_at (info->comp_units, next - 1);
	RBinDwarfDie die_key;
	memset (&die_key, 0, sizeof (die_key));
	die_key.offset = offset;
	size_t pos = RVecDwarfDie_lower_bound (cu->dies, &die_key, r_bin_dwarf_die_offset_cmp);
	RBinDwarfDie *die = RVecDwarfDie_at (cu->dies, pos);
	if (!die || die->offset != offset) {
		return NULL;
	}
	if (unit) {
		*unit = cu;
	}
	return die;
}

R_VEC_TYPE(RVecDwarfAttrDef, RBinDwarfAttrDef);

typedef struct {
	ut64 code;
	ut64 tag;
	ut64 offset;
	ut8 has_children;
	RVecDwarfAttrDef *defs;
} RBinDwarfAbbrevDecl;

static inline void abbrev_decl_fini(RBinDwarfAbbrevDecl *decl) {
	RVecDwarfAttrDef_free (decl->defs);
}

R_VEC_TYPE_WITH_FINI(RVecDwarfAbbrevDecl, RBinDwarfAbbrevDecl, abbrev_decl_fini);

typedef struct {
	ut64 address;
	ut64 op_index;
	ut64 file;
	ut64 line;
	ut64 column;
	bool is_stmt;
	bool basic_block;
	bool end_sequence;
	bool prologue_end;
	bool epilogue_begin;
	ut64 isa;
	ut64 discriminator;
} RBinDwarfSMRegisters;

typedef struct {
	const char *name;
	ut32 id_idx, mod_time, file_len;
	bool has_checksum;
	ut8 md5sum[16];
} file_entry;

typedef struct {
	ut64 unit_length;
	ut16 version;
	ut64 header_length;
	ut8 min_inst_len;
	ut8 max_ops_per_inst;
	ut8 default_is_stmt;
	st32 line_base;
	ut8 line_range;
	ut8 opcode_base;
	ut8 address_size;
	ut8 segment_selector_size;
	bool is_64bit;

	ut8 *std_opcode_lengths;
	char **include_directories;
	file_entry *file_names;
	size_t file_names_count;
} RBinDwarfLineHeader;

typedef struct r_bin_dwarf_loc_entry_t {
	ut64 start;
	ut64 end;
	RBinDwarfBlock *expression;
} RBinDwarfLocRange;

typedef struct r_bin_dwarf_loc_list_t {
	RList/*<RBinDwarfLocRange>*/  *list;
	ut64 offset;
} RBinDwarfLocList;

#define r_bin_dwarf_line_new(o,a,f,l) o->address=a, o->file = strdup (r_str_get (f)), o->line = l, o->column =0,o

R_API R_OWNED char *r_bin_dwarf_print_aranges(RBinFile *bf);
// Optional line text is owned by the caller.
R_API RList *r_bin_dwarf_parse_line(RBinFile *bf, int mode, char **text);
R_API ut64 r_bin_dwarf_line_size(RBinFile *bf, const char **section_name);
R_API RList *r_bin_dwarf_parse_line_files(RBinFile *bf);
R_API RVecDwarfAbbrevDecl *r_bin_dwarf_parse_abbrev(RBinFile *bf);
R_API bool r_bin_dwarf_parse_comp_dirs(RBinFile *bf, RVecDwarfAbbrevDecl *da);
R_API RList *r_bin_dwarf_parse_comp_unit_files(RBinFile *bf, RVecDwarfAbbrevDecl *da);
R_API R_OWNED char *r_bin_dwarf_print_abbrev(const RVecDwarfAbbrevDecl *da);
R_API R_OWNED char *r_bin_dwarf_print_info(RBinFile *bf, RVecDwarfAbbrevDecl *da);
R_API RBinDwarfDebugInfo *r_bin_dwarf_parse_info(RBinFile *bf, RVecDwarfAbbrevDecl *da);
R_API HtUP/*<offset, RBinDwarfLocList*>*/  *r_bin_dwarf_parse_loc(RBinFile *bf, int addr_size);
R_API R_OWNED char *r_bin_dwarf_print_loc(HtUP /*<offset, RBinDwarfLocList*>*/  *loc_table, int addr_size);
R_API R_OWNED char *r_bin_dwarf_print_loc_stream(RBinFile *bf, int addr_size);
typedef struct r_bin_dwarf_loclists_t RBinDwarfLocLists;
typedef bool (*RBinDwarfLocEntryCb)(void *user, ut64 start, ut64 end, const RBinDwarfBlock *expr, bool is_default);
typedef bool (*RBinDwarfLocListForeach)(RBinDwarfLocLists *lists, const RBinDwarfCompUnit *unit, ut64 offset, RBinDwarfLocEntryCb cb, void *user);
R_API RBinDwarfLocLists *r_bin_dwarf_loclists_new(RBinFile *bf);
R_API bool r_bin_dwarf_loclists_foreach(RBinDwarfLocLists *lists, const RBinDwarfCompUnit *unit, ut64 offset, RBinDwarfLocEntryCb cb, void *user);
R_API void r_bin_dwarf_loclists_free(RBinDwarfLocLists *lists);
R_API R_OWNED char *r_bin_dwarf_print_loclists_stream(RBinFile *bf);
R_API void r_bin_dwarf_free_loc(HtUP /*<offset, RBinDwarfLocList*>*/  *loc_table);
R_API void r_bin_dwarf_free_debug_info(RBinDwarfDebugInfo *inf);
R_API void r_bin_dwarf_free_debug_abbrev(RVecDwarfAbbrevDecl *da);

#ifdef __cplusplus
}
#endif

#endif
