+++ /dev/null
-/* This testcase is part of GDB, the GNU debugger.
-
- Copyright 2007-2024 Free Software Foundation, Inc.
-
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 3 of the License, or
- (at your option) any later version.
-
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with this program. If not, see <http://www.gnu.org/licenses/>. */
-
- .data
-
- .globl file_locaddr_resolvable
-file_locaddr_resolvable:
- .globl file_locempty_resolvable
-file_locempty_resolvable:
- .globl file_locno_resolvable
-file_locno_resolvable:
- .globl file_extern_locaddr_resolvable
-file_extern_locaddr_resolvable:
- .globl file_extern_locempty_resolvable
-file_extern_locempty_resolvable:
- .globl file_extern_locno_resolvable
-file_extern_locno_resolvable:
- .globl main_local_locaddr_resolvable
-main_local_locaddr_resolvable:
- .globl main_local_locempty_resolvable
-main_local_locempty_resolvable:
- .globl main_local_locno_resolvable
-main_local_locno_resolvable:
- .globl main_extern_locaddr_resolvable
-main_extern_locaddr_resolvable:
- .globl main_extern_locno_resolvable
-main_extern_locno_resolvable:
- .globl main_extern_locempty_resolvable
-main_extern_locempty_resolvable:
-
-resolvable:
- .4byte 1234567890
-
-/* Debug information */
-
- .section .debug_info
-.Lcu1_begin:
- /* CU header */
- .4byte .Lcu1_end - .Lcu1_start /* Length of Compilation Unit */
-.Lcu1_start:
- .2byte 2 /* DWARF Version */
- .4byte .Labbrev1_begin /* Offset into abbrev section */
- .byte 4 /* Pointer size */
-
- /* CU die */
- .uleb128 1 /* Abbrev: DW_TAG_compile_unit */
- .4byte cu_text_end /* DW_AT_high_pc */
- .4byte cu_text_start /* DW_AT_low_pc */
- .ascii "file1.txt\0" /* DW_AT_name */
- .ascii "GNU C 3.3.3\0" /* DW_AT_producer */
- .byte 1 /* DW_AT_language (C) */
-
-.Ltype_int:
- .uleb128 3 /* Abbrev: DW_TAG_base_type */
- .ascii "int\0" /* DW_AT_name */
- .byte 4 /* DW_AT_byte_size */
- .byte 5 /* DW_AT_encoding */
-
- .uleb128 7 /* Abbrev: DW_TAG_variable (location) */
- .ascii "file_locaddr_resolvable\0" /* DW_AT_name */
- .byte 2f - 1f /* DW_AT_location */
-1: .byte 3 /* DW_OP_addr */
- .4byte resolvable /* <addr> */
-2: .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 7 /* Abbrev: DW_TAG_variable (location) */
- .ascii "file_locaddr_unresolvable\0" /* DW_AT_name */
- .byte 2f - 1f /* DW_AT_location */
-1: .byte 3 /* DW_OP_addr */
- .4byte resolvable /* <addr> */
-2: .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 7 /* Abbrev: DW_TAG_variable (location) */
- .ascii "file_locempty_resolvable\0" /* DW_AT_name */
- .byte 0 /* DW_AT_location */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 7 /* Abbrev: DW_TAG_variable (location) */
- .ascii "file_locempty_unresolvable\0" /* DW_AT_name */
- .byte 0 /* DW_AT_location */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 5 /* Abbrev: DW_TAG_variable (bare) */
- .ascii "file_locno_resolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 5 /* Abbrev: DW_TAG_variable (bare) */
- .ascii "file_locno_unresolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 8 /* Abbrev: DW_TAG_variable (location+extern) */
- .ascii "file_extern_locaddr_resolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 2f - 1f /* DW_AT_location */
-1: .byte 3 /* DW_OP_addr */
- .4byte resolvable /* <addr> */
-2: .byte 1 /* DW_AT_external */
-
- .uleb128 8 /* Abbrev: DW_TAG_variable (location+extern) */
- .ascii "file_extern_locaddr_unresolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 2f - 1f /* DW_AT_location */
-1: .byte 3 /* DW_OP_addr */
- .4byte resolvable /* <addr> */
-2: .byte 1 /* DW_AT_external */
-
- .uleb128 8 /* Abbrev: DW_TAG_variable (location+extern) */
- .ascii "file_extern_locempty_resolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 0 /* DW_AT_location */
- .byte 1 /* DW_AT_external */
-
- .uleb128 8 /* Abbrev: DW_TAG_variable (location+extern) */
- .ascii "file_extern_locempty_unresolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 0 /* DW_AT_location */
- .byte 1 /* DW_AT_external */
-
- .uleb128 4 /* Abbrev: DW_TAG_variable (extern) */
- .ascii "file_extern_locno_resolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 1 /* DW_AT_external */
-
- .uleb128 4 /* Abbrev: DW_TAG_variable (extern) */
- .ascii "file_extern_locno_unresolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 1 /* DW_AT_external */
-
- /* main */
- .uleb128 6 /* Abbrev: DW_TAG_subprogram */
- .byte 1 /* DW_AT_decl_file */
- .byte 2 /* DW_AT_decl_line */
- .ascii "main\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .4byte cu_text_start /* DW_AT_low_pc */
- .4byte cu_text_end /* DW_AT_high_pc */
-
- .uleb128 7 /* Abbrev: DW_TAG_variable (location) */
- .ascii "main_local_locaddr_resolvable\0" /* DW_AT_name */
- .byte 2f - 1f /* DW_AT_location */
-1: .byte 3 /* DW_OP_addr */
- .4byte resolvable /* <addr> */
-2: .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 7 /* Abbrev: DW_TAG_variable (location) */
- .ascii "main_local_locaddr_unresolvable\0" /* DW_AT_name */
- .byte 2f - 1f /* DW_AT_location */
-1: .byte 3 /* DW_OP_addr */
- .4byte resolvable /* <addr> */
-2: .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 7 /* Abbrev: DW_TAG_variable (location) */
- .ascii "main_local_locempty_resolvable\0" /* DW_AT_name */
- .byte 0 /* DW_AT_location */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 7 /* Abbrev: DW_TAG_variable (location) */
- .ascii "main_local_locempty_unresolvable\0" /* DW_AT_name */
- .byte 0 /* DW_AT_location */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 5 /* Abbrev: DW_TAG_variable (bare) */
- .ascii "main_local_locno_resolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 5 /* Abbrev: DW_TAG_variable (bare) */
- .ascii "main_local_locno_unresolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
-
- .uleb128 8 /* Abbrev: DW_TAG_variable (location+extern) */
- .ascii "main_extern_locaddr_resolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 2f - 1f /* DW_AT_location */
-1: .byte 3 /* DW_OP_addr */
- .4byte resolvable /* <addr> */
-2: .byte 1 /* DW_AT_external */
-
- .uleb128 8 /* Abbrev: DW_TAG_variable (location+extern) */
- .ascii "main_extern_locaddr_unresolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 2f - 1f /* DW_AT_location */
-1: .byte 3 /* DW_OP_addr */
- .4byte resolvable /* <addr> */
-2: .byte 1 /* DW_AT_external */
-
- .uleb128 8 /* Abbrev: DW_TAG_variable (location+extern) */
- .ascii "main_extern_locempty_resolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 0 /* DW_AT_location */
- .byte 1 /* DW_AT_external */
-
- .uleb128 8 /* Abbrev: DW_TAG_variable (location+extern) */
- .ascii "main_extern_locempty_unresolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 0 /* DW_AT_location */
- .byte 1 /* DW_AT_external */
-
- .uleb128 4 /* Abbrev: DW_TAG_variable (extern) */
- .ascii "main_extern_locno_resolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 1 /* DW_AT_external */
-
- .uleb128 4 /* Abbrev: DW_TAG_variable (extern) */
- .ascii "main_extern_locno_unresolvable\0" /* DW_AT_name */
- .4byte .Ltype_int-.Lcu1_begin /* DW_AT_type */
- .byte 1 /* DW_AT_external */
-
- .byte 0 /* End of children of main */
-
- .byte 0 /* End of children of CU */
-
-.Lcu1_end:
-
-/* Abbrev table */
- .section .debug_abbrev
-.Labbrev1_begin:
- .uleb128 1 /* Abbrev code */
- .uleb128 0x11 /* DW_TAG_compile_unit */
- .byte 1 /* has_children */
- .uleb128 0x12 /* DW_AT_high_pc */
- .uleb128 0x1 /* DW_FORM_addr */
- .uleb128 0x11 /* DW_AT_low_pc */
- .uleb128 0x1 /* DW_FORM_addr */
- .uleb128 0x3 /* DW_AT_name */
- .uleb128 0x8 /* DW_FORM_string */
- .uleb128 0x25 /* DW_AT_producer */
- .uleb128 0x8 /* DW_FORM_string */
- .uleb128 0x13 /* DW_AT_language */
- .uleb128 0xb /* DW_FORM_data1 */
- .byte 0x0 /* Terminator */
- .byte 0x0 /* Terminator */
-
- .uleb128 3 /* Abbrev code */
- .uleb128 0x24 /* DW_TAG_base_type */
- .byte 0 /* has_children */
- .uleb128 0x3 /* DW_AT_name */
- .uleb128 0x8 /* DW_FORM_string */
- .uleb128 0xb /* DW_AT_byte_size */
- .uleb128 0xb /* DW_FORM_data1 */
- .uleb128 0x3e /* DW_AT_encoding */
- .uleb128 0xb /* DW_FORM_data1 */
- .byte 0x0 /* Terminator */
- .byte 0x0 /* Terminator */
-
- .uleb128 4 /* Abbrev code (extern) */
- .uleb128 0x34 /* DW_TAG_variable */
- .byte 0 /* has_children */
- .uleb128 0x3 /* DW_AT_name */
- .uleb128 0x8 /* DW_FORM_string */
- .uleb128 0x49 /* DW_AT_type */
- .uleb128 0x13 /* DW_FORM_ref4 */
- .uleb128 0x3f /* DW_AT_external */
- .uleb128 0xc /* DW_FORM_flag */
- .byte 0x0 /* Terminator */
- .byte 0x0 /* Terminator */
-
- .uleb128 5 /* Abbrev code (bare) */
- .uleb128 0x34 /* DW_TAG_variable */
- .byte 0 /* has_children */
- .uleb128 0x3 /* DW_AT_name */
- .uleb128 0x8 /* DW_FORM_string */
- .uleb128 0x49 /* DW_AT_type */
- .uleb128 0x13 /* DW_FORM_ref4 */
- .byte 0x0 /* Terminator */
- .byte 0x0 /* Terminator */
-
- .uleb128 6 /* Abbrev code */
- .uleb128 0x2e /* DW_TAG_subprogram */
- .byte 1 /* has_children */
- .uleb128 0x3a /* DW_AT_decl_file */
- .uleb128 0xb /* DW_FORM_data1 */
- .uleb128 0x3b /* DW_AT_decl_line */
- .uleb128 0xb /* DW_FORM_data1 */
- .uleb128 0x3 /* DW_AT_name */
- .uleb128 0x8 /* DW_FORM_string */
- .uleb128 0x49 /* DW_AT_type */
- .uleb128 0x13 /* DW_FORM_ref4 */
- .uleb128 0x11 /* DW_AT_low_pc */
- .uleb128 0x1 /* DW_FORM_addr */
- .uleb128 0x12 /* DW_AT_high_pc */
- .uleb128 0x1 /* DW_FORM_addr */
- .byte 0x0 /* Terminator */
- .byte 0x0 /* Terminator */
-
- .uleb128 7 /* Abbrev code (location) */
- .uleb128 0x34 /* DW_TAG_variable */
- .byte 0 /* has_children */
- .uleb128 0x3 /* DW_AT_name */
- .uleb128 0x8 /* DW_FORM_string */
- .uleb128 0x2 /* DW_AT_location */
- .uleb128 0xa /* DW_FORM_block1 */
- .uleb128 0x49 /* DW_AT_type */
- .uleb128 0x13 /* DW_FORM_ref4 */
- .byte 0x0 /* Terminator */
- .byte 0x0 /* Terminator */
-
- .uleb128 8 /* Abbrev code (location+extern) */
- .uleb128 0x34 /* DW_TAG_variable */
- .byte 0 /* has_children */
- .uleb128 0x3 /* DW_AT_name */
- .uleb128 0x8 /* DW_FORM_string */
- .uleb128 0x49 /* DW_AT_type */
- .uleb128 0x13 /* DW_FORM_ref4 */
- .uleb128 0x2 /* DW_AT_location */
- .uleb128 0xa /* DW_FORM_block1 */
- .uleb128 0x3f /* DW_AT_external */
- .uleb128 0xc /* DW_FORM_flag */
- .byte 0x0 /* Terminator */
- .byte 0x0 /* Terminator */
-
- .byte 0x0 /* Terminator */
- .byte 0x0 /* Terminator */
-#ifdef __arm__
- .section .note.GNU-stack,"",%progbits
-#else
- .section .note.GNU-stack,"",@progbits
-#endif
# This test can only be run on targets which support DWARF-2 and use gas.
require dwarf2_support
-if { [prepare_for_testing "failed to prepare" "dw2-noloc" {dw2-noloc-main.c dw2-noloc.S} {nodebug}] } {
+standard_testfile .c .S
+set asm_file [standard_output_file $srcfile2]
+
+Dwarf::assemble $asm_file {
+ global srcdir subdir srcfile srcfile2
+ declare_labels lines_label
+
+ get_func_info main
+
+ cu {} {
+ compile_unit {
+ {language @DW_LANG_C}
+ {name $srcfile}
+ {stmt_list ${lines_label} DW_FORM_sec_offset}
+ } {
+ declare_labels integer_label
+ set int_size [get_sizeof "int" 4]
+ integer_label: DW_TAG_base_type {
+ {DW_AT_byte_size $int_size DW_FORM_sdata}
+ {DW_AT_encoding @DW_ATE_signed}
+ {DW_AT_name int}
+ }
+
+ DW_TAG_subprogram {
+ {external 1 flag}
+ {name main}
+ {low_pc $main_start addr}
+ {high_pc "$main_start + $main_len" addr}
+ }
+
+ DW_TAG_variable {
+ {DW_AT_name file_locno_resolvable}
+ {DW_AT_type :$integer_label}
+ }
+ DW_TAG_variable {
+ {DW_AT_name file_locno_unresolvable}
+ {DW_AT_type :$integer_label}
+ }
+ DW_TAG_variable {
+ {DW_AT_name file_locempty_resolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_location {} DW_FORM_block1}
+ }
+ DW_TAG_variable {
+ {DW_AT_name file_locempty_unresolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_location {} DW_FORM_block1}
+ }
+ DW_TAG_variable {
+ {DW_AT_name file_locaddr_resolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_location {
+ DW_OP_addr [gdb_target_symbol file_locaddr_resolvable]
+ } SPECIAL_expr}
+ }
+ DW_TAG_variable {
+ {DW_AT_name file_locaddr_unresolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_location {
+ DW_OP_addr [gdb_target_symbol file_locaddr_resolvable]
+ } SPECIAL_expr}
+ }
+
+ DW_TAG_variable {
+ {DW_AT_name file_extern_locno_resolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ }
+ DW_TAG_variable {
+ {DW_AT_name file_extern_locno_unresolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ }
+ DW_TAG_variable {
+ {DW_AT_name file_extern_locempty_resolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ {DW_AT_location {} DW_FORM_block1}
+ }
+ DW_TAG_variable {
+ {DW_AT_name file_extern_locempty_unresolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ {DW_AT_location {} DW_FORM_block1}
+ }
+ DW_TAG_variable {
+ {DW_AT_name file_extern_locaddr_resolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ {DW_AT_location {
+ DW_OP_addr [gdb_target_symbol file_extern_locaddr_resolvable]
+ } SPECIAL_expr}
+ }
+ DW_TAG_variable {
+ {DW_AT_name file_extern_locaddr_unresolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ {DW_AT_location {
+ DW_OP_addr [gdb_target_symbol file_extern_locaddr_resolvable]
+ } SPECIAL_expr}
+ }
+
+ DW_TAG_variable {
+ {DW_AT_name main_local_locno_resolvable}
+ {DW_AT_type :$integer_label}
+ }
+ DW_TAG_variable {
+ {DW_AT_name main_local_locno_unresolvable}
+ {DW_AT_type :$integer_label}
+ }
+ DW_TAG_variable {
+ {DW_AT_name main_local_locempty_resolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_location {} DW_FORM_block1}
+ }
+ DW_TAG_variable {
+ {DW_AT_name main_local_locempty_unresolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_location {} DW_FORM_block1}
+ }
+ DW_TAG_variable {
+ {DW_AT_name main_local_locaddr_resolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_location {
+ DW_OP_addr [gdb_target_symbol main_local_locaddr_resolvable]
+ } SPECIAL_expr}
+ }
+ DW_TAG_variable {
+ {DW_AT_name main_local_locaddr_unresolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_location {
+ DW_OP_addr [gdb_target_symbol main_local_locaddr_resolvable]
+ } SPECIAL_expr}
+ }
+
+ DW_TAG_variable {
+ {DW_AT_name main_extern_locno_resolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ }
+ DW_TAG_variable {
+ {DW_AT_name main_extern_locno_unresolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ }
+ DW_TAG_variable {
+ {DW_AT_name main_extern_locempty_resolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ {DW_AT_location {} DW_FORM_block1}
+ }
+ DW_TAG_variable {
+ {DW_AT_name main_extern_locempty_unresolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ {DW_AT_location {} DW_FORM_block1}
+ }
+ DW_TAG_variable {
+ {DW_AT_name main_extern_locaddr_resolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ {DW_AT_location {
+ DW_OP_addr [gdb_target_symbol main_extern_locaddr_resolvable]
+ } SPECIAL_expr}
+ }
+ DW_TAG_variable {
+ {DW_AT_name main_extern_locaddr_unresolvable}
+ {DW_AT_type :$integer_label}
+ {DW_AT_external 1 flag}
+ {DW_AT_location {
+ DW_OP_addr [gdb_target_symbol main_extern_locaddr_resolvable]
+ } SPECIAL_expr}
+ }
+ }
+ }
+
+ lines {version 5} lines_label {
+ set diridx [include_dir "${srcdir}/${subdir}"]
+ file_name "$srcfile" $diridx
+
+ program {
+ DW_LNS_set_file $diridx
+ DW_LNE_set_address $main_start
+ line [gdb_get_line_number "main start"]
+ DW_LNS_set_prologue_end
+ DW_LNS_copy
+ }
+ }
+}
+
+if { [prepare_for_testing "failed to prepare" ${testfile} [list $srcfile $asm_file] {nodebug}] } {
return -1
}
projects / thirdparty / binutils-gdb.git / commitdiff
