2012-12-09 18:35:42 +01:00
|
|
|
/* This testcase is part of GDB, the GNU debugger.
|
|
|
|
|
|
2017-01-01 07:50:51 +01:00
|
|
|
Copyright 2012-2017 Free Software Foundation, Inc.
|
2012-12-09 18:35:42 +01:00
|
|
|
|
|
|
|
|
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/>. */
|
|
|
|
|
|
testsuite: Define and use gdb_target_symbol_prefix_flags_asm.
Some of the source code for the test cases in the GDB testsuite
reside in .S files containing assembly code. These files typically
define a symbol - such as main - which may, depending on the target,
require a prefix such as underscore.
For example, gdb.dwarf2/dw-compdir-oldgcc.S defines the symbol main:
main: .globl main
Some targets, such as rx-elf, require main to have an underscore
prefix. (If it doesn't, a linker error results due to not being able
to find _main required by crt0.o.) So, instead, the above should look
like this for rx-elf and other targets with this same requirement:
_main: .globl _main
This patch defines a new tcl proc in lib/gdb named
gdb_target_symbol_prefix_flags_asm. This proc returns a string
which will - assuming everything else is wired up correctly - cause
-DSYMBOL_PREFIX=_ to be passed on the command line to the compiler.
The test cases are augmented with a macro definition for SYMBOL
as follows:
#define CONCAT1(a, b) CONCAT2(a, b)
#define CONCAT2(a, b) a ## b
#ifdef SYMBOL_PREFIX
# define SYMBOL(str) CONCAT1(SYMBOL_PREFIX, str)
#else
# define SYMBOL(str) str
#endif
Symbols, such as main shown in the example earlier are then wrapped
with SYMBOL like this:
SYMBOL(main): .globl SYMBOL(main)
The net effect will be to add a prefix for those targets which need
it and add no prefix for those targets which do not.
It should be noted that there was already a proc in lib/gdb.exp
called gdb_target_symbol_prefix_flags. It still exists, but has
been significantly rewritten. (There is only one small difference
between the two versions.)
That proc used to explicitly list targets which were known to
require an underscore prefix. This is no longer done; the recently
added proc, gdb_target_symbol_prefix, is now invoked to dynamically
discover whether or not a prefix is required for that particular
target.
The difference between gdb_target_symbol_prefix_flags_asm
and gdb_target_symbol_prefix_flags is that the former returns
a bare prefix while the latter returns the prefix enclosed in
double quotes. I.e. assuming that the discovered prefix is
underscore, gdb_target_symbol_prefix_flags_asm returns:
additional_flags=-DSYMBOL_PREFIX=_
while gdb_target_symbol_prefix_flags returns:
additional_flags=-DSYMBOL_PREFIX="_"
The double-quoted version is not suitable for using with .S files
containing assembly code; there is no way to strip the double quotes
using C preprocessor constructs.
It would be possible to use the bare (non double quoted) version in
C source code. However, the supporting macros become more complicated
and therefore more difficult to maintain.
gdb/testsuite/ChangeLog:
* lib/gdb (gdb_target_symbol_prefix_flags_asm): New proc.
(gdb_target_symbol_prefix_flags): Define in terms of _asm
version.
* gdb.arch/i386-float.exp, gdb.arch/i386-permbkpt.exp,
gdb.dwarf2/dw2-canonicalize-type.exp,
gdb.dwarf2/dw2-compdir-oldgcc.exp, gdb.dwarf2/dw2-minsym-in-cu.exp,
gdb.dwarf2/dw2-op-stack-value.exp, gdb.dwarf2/dw2-unresolved.exp,
gdb.dwarf2/fission-reread.exp, gdb.dwarf2/pr13961.exp: Use flags
provided by gdb_target_symbol_prefix_flags_asm.
* gdb.dwarf2/dw2-canonicalize-type.S, gdb.dwarf2/dw2-compdir-oldgcc.S,
testsuite/gdb.dwarf2/dw2-minsym-in-cu.S,
testsuite/gdb.dwarf2/dw2-unresolved-main.c,
testsuite/gdb.dwarf2/dw2-unresolved.S, gdb.dwarf2/fission-reread.S,
gdb.dwarf2/pr13961.S: Define and use SYMBOL macro (and supporting
macros where needed). Use this macro for symbols which require
the prefix provided by SYMBOL_PREFIX.
2015-11-06 05:40:53 +01:00
|
|
|
#define CONCAT1(a, b) CONCAT2(a, b)
|
|
|
|
|
#define CONCAT2(a, b) a ## b
|
|
|
|
|
|
|
|
|
|
#ifdef SYMBOL_PREFIX
|
|
|
|
|
# define SYMBOL(str) CONCAT1(SYMBOL_PREFIX, str)
|
|
|
|
|
#else
|
|
|
|
|
# define SYMBOL(str) str
|
|
|
|
|
#endif
|
|
|
|
|
|
2012-12-09 18:35:42 +01:00
|
|
|
.text
|
testsuite: Define and use gdb_target_symbol_prefix_flags_asm.
Some of the source code for the test cases in the GDB testsuite
reside in .S files containing assembly code. These files typically
define a symbol - such as main - which may, depending on the target,
require a prefix such as underscore.
For example, gdb.dwarf2/dw-compdir-oldgcc.S defines the symbol main:
main: .globl main
Some targets, such as rx-elf, require main to have an underscore
prefix. (If it doesn't, a linker error results due to not being able
to find _main required by crt0.o.) So, instead, the above should look
like this for rx-elf and other targets with this same requirement:
_main: .globl _main
This patch defines a new tcl proc in lib/gdb named
gdb_target_symbol_prefix_flags_asm. This proc returns a string
which will - assuming everything else is wired up correctly - cause
-DSYMBOL_PREFIX=_ to be passed on the command line to the compiler.
The test cases are augmented with a macro definition for SYMBOL
as follows:
#define CONCAT1(a, b) CONCAT2(a, b)
#define CONCAT2(a, b) a ## b
#ifdef SYMBOL_PREFIX
# define SYMBOL(str) CONCAT1(SYMBOL_PREFIX, str)
#else
# define SYMBOL(str) str
#endif
Symbols, such as main shown in the example earlier are then wrapped
with SYMBOL like this:
SYMBOL(main): .globl SYMBOL(main)
The net effect will be to add a prefix for those targets which need
it and add no prefix for those targets which do not.
It should be noted that there was already a proc in lib/gdb.exp
called gdb_target_symbol_prefix_flags. It still exists, but has
been significantly rewritten. (There is only one small difference
between the two versions.)
That proc used to explicitly list targets which were known to
require an underscore prefix. This is no longer done; the recently
added proc, gdb_target_symbol_prefix, is now invoked to dynamically
discover whether or not a prefix is required for that particular
target.
The difference between gdb_target_symbol_prefix_flags_asm
and gdb_target_symbol_prefix_flags is that the former returns
a bare prefix while the latter returns the prefix enclosed in
double quotes. I.e. assuming that the discovered prefix is
underscore, gdb_target_symbol_prefix_flags_asm returns:
additional_flags=-DSYMBOL_PREFIX=_
while gdb_target_symbol_prefix_flags returns:
additional_flags=-DSYMBOL_PREFIX="_"
The double-quoted version is not suitable for using with .S files
containing assembly code; there is no way to strip the double quotes
using C preprocessor constructs.
It would be possible to use the bare (non double quoted) version in
C source code. However, the supporting macros become more complicated
and therefore more difficult to maintain.
gdb/testsuite/ChangeLog:
* lib/gdb (gdb_target_symbol_prefix_flags_asm): New proc.
(gdb_target_symbol_prefix_flags): Define in terms of _asm
version.
* gdb.arch/i386-float.exp, gdb.arch/i386-permbkpt.exp,
gdb.dwarf2/dw2-canonicalize-type.exp,
gdb.dwarf2/dw2-compdir-oldgcc.exp, gdb.dwarf2/dw2-minsym-in-cu.exp,
gdb.dwarf2/dw2-op-stack-value.exp, gdb.dwarf2/dw2-unresolved.exp,
gdb.dwarf2/fission-reread.exp, gdb.dwarf2/pr13961.exp: Use flags
provided by gdb_target_symbol_prefix_flags_asm.
* gdb.dwarf2/dw2-canonicalize-type.S, gdb.dwarf2/dw2-compdir-oldgcc.S,
testsuite/gdb.dwarf2/dw2-minsym-in-cu.S,
testsuite/gdb.dwarf2/dw2-unresolved-main.c,
testsuite/gdb.dwarf2/dw2-unresolved.S, gdb.dwarf2/fission-reread.S,
gdb.dwarf2/pr13961.S: Define and use SYMBOL macro (and supporting
macros where needed). Use this macro for symbols which require
the prefix provided by SYMBOL_PREFIX.
2015-11-06 05:40:53 +01:00
|
|
|
SYMBOL(main): .globl SYMBOL(main)
|
2012-12-09 18:35:42 +01:00
|
|
|
|
|
|
|
|
gcc42: .globl gcc42
|
2014-11-22 14:22:01 +01:00
|
|
|
.Lgcc42_procstart:
|
2012-12-09 18:35:42 +01:00
|
|
|
.int 0
|
|
|
|
|
.type gcc42, %function
|
|
|
|
|
.size gcc42, . - gcc42
|
|
|
|
|
.Lgcc42_procend:
|
|
|
|
|
|
|
|
|
|
gcc43: .globl gcc43
|
2014-11-22 14:22:01 +01:00
|
|
|
.Lgcc43_procstart:
|
2012-12-09 18:35:42 +01:00
|
|
|
.int 0
|
|
|
|
|
.type gcc43, %function
|
|
|
|
|
.size gcc43, . - gcc43
|
|
|
|
|
.Lgcc43_procend:
|
|
|
|
|
|
|
|
|
|
/* 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 */
|
|
|
|
|
|
|
|
|
|
.uleb128 1 /* Abbrev: DW_TAG_compile_unit */
|
|
|
|
|
.4byte .Lgcc42_begin /* DW_AT_stmt_list */
|
2014-11-22 14:22:01 +01:00
|
|
|
.4byte .Lgcc42_procstart /* DW_AT_low_pc */
|
2012-12-09 18:35:42 +01:00
|
|
|
.4byte .Lgcc42_procend /* DW_AT_high_pc */
|
|
|
|
|
.ascii "/dir/d/dw2-compdir-oldgcc42.S\0" /* DW_AT_name */
|
|
|
|
|
.ascii "GNU C 4.2.0\0" /* DW_AT_producer */
|
|
|
|
|
.byte 1 /* DW_AT_language (C) */
|
|
|
|
|
|
|
|
|
|
.uleb128 2 /* Abbrev: DW_TAG_subprogram */
|
|
|
|
|
.byte 1 /* DW_AT_external */
|
|
|
|
|
.byte 1 /* DW_AT_decl_file */
|
|
|
|
|
.byte 1 /* DW_AT_decl_line */
|
|
|
|
|
.ascii "gcc42\0" /* DW_AT_name */
|
2014-11-22 14:22:01 +01:00
|
|
|
.4byte .Lgcc42_procstart /* DW_AT_low_pc */
|
2012-12-09 18:35:42 +01:00
|
|
|
.4byte .Lgcc42_procend /* DW_AT_high_pc */
|
|
|
|
|
|
|
|
|
|
.byte 0 /* End of children of CU */
|
|
|
|
|
.Lcu1_end:
|
|
|
|
|
|
|
|
|
|
.Lcu2_begin:
|
|
|
|
|
/* CU header */
|
|
|
|
|
.4byte .Lcu2_end - .Lcu2_start /* Length of Compilation Unit */
|
|
|
|
|
.Lcu2_start:
|
|
|
|
|
.2byte 2 /* DWARF Version */
|
|
|
|
|
.4byte .Labbrev1_begin /* Offset into abbrev section */
|
|
|
|
|
.byte 4 /* Pointer size */
|
|
|
|
|
|
|
|
|
|
.uleb128 1 /* Abbrev: DW_TAG_compile_unit */
|
|
|
|
|
.4byte .Lgcc43_begin /* DW_AT_stmt_list */
|
2014-11-22 14:22:01 +01:00
|
|
|
.4byte .Lgcc43_procstart /* DW_AT_low_pc */
|
2012-12-09 18:35:42 +01:00
|
|
|
.4byte .Lgcc43_procend /* DW_AT_high_pc */
|
|
|
|
|
.ascii "/dir/d/dw2-compdir-oldgcc43.S\0" /* DW_AT_name */
|
|
|
|
|
.ascii "GNU C 4.3.0\0" /* DW_AT_producer */
|
|
|
|
|
.byte 1 /* DW_AT_language (C) */
|
|
|
|
|
|
|
|
|
|
.uleb128 2 /* Abbrev: DW_TAG_subprogram */
|
|
|
|
|
.byte 1 /* DW_AT_external */
|
|
|
|
|
.byte 1 /* DW_AT_decl_file */
|
|
|
|
|
.byte 1 /* DW_AT_decl_line */
|
|
|
|
|
.ascii "gcc43\0" /* DW_AT_name */
|
2014-11-22 14:22:01 +01:00
|
|
|
.4byte .Lgcc43_procstart /* DW_AT_low_pc */
|
2012-12-09 18:35:42 +01:00
|
|
|
.4byte .Lgcc43_procend /* DW_AT_high_pc */
|
|
|
|
|
|
|
|
|
|
.byte 0 /* End of children of CU */
|
|
|
|
|
.Lcu2_end:
|
|
|
|
|
|
|
|
|
|
/* Abbrev table */
|
|
|
|
|
.section .debug_abbrev
|
|
|
|
|
.Labbrev1_begin:
|
|
|
|
|
.uleb128 1 /* Abbrev code */
|
|
|
|
|
.uleb128 0x11 /* DW_TAG_compile_unit */
|
|
|
|
|
.byte 1 /* has_children */
|
|
|
|
|
.uleb128 0x10 /* DW_AT_stmt_list */
|
|
|
|
|
.uleb128 0x6 /* DW_FORM_data4 */
|
|
|
|
|
.uleb128 0x11 /* DW_AT_low_pc */
|
|
|
|
|
.uleb128 0x1 /* DW_FORM_addr */
|
|
|
|
|
.uleb128 0x12 /* DW_AT_high_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 2 /* Abbrev code */
|
|
|
|
|
.uleb128 0x2e /* DW_TAG_subprogram */
|
|
|
|
|
.byte 0 /* has_children */
|
|
|
|
|
.uleb128 0x3f /* DW_AT_external */
|
|
|
|
|
.uleb128 0xc /* DW_FORM_flag */
|
|
|
|
|
.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 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 */
|
|
|
|
|
|
|
|
|
|
.byte 0x0 /* Terminator */
|
|
|
|
|
.byte 0x0 /* Terminator */
|
|
|
|
|
|
|
|
|
|
/* Line table */
|
|
|
|
|
.section .debug_line
|
|
|
|
|
.Lgcc42_begin:
|
|
|
|
|
.4byte .Lgcc42_end - .Lgcc42_start /* Initial length */
|
|
|
|
|
.Lgcc42_start:
|
|
|
|
|
.2byte 2 /* Version */
|
|
|
|
|
.4byte .Lgcc42_lines - .Lgcc42_hdr /* header_length */
|
|
|
|
|
.Lgcc42_hdr:
|
|
|
|
|
.byte 1 /* Minimum insn length */
|
|
|
|
|
.byte 1 /* default_is_stmt */
|
|
|
|
|
.byte 1 /* line_base */
|
|
|
|
|
.byte 1 /* line_range */
|
|
|
|
|
.byte 4 /* opcode_base */
|
|
|
|
|
|
|
|
|
|
/* Standard lengths */
|
|
|
|
|
.byte 0
|
|
|
|
|
.byte 1
|
|
|
|
|
.byte 1
|
|
|
|
|
|
|
|
|
|
/* Include directories */
|
|
|
|
|
.byte 0
|
|
|
|
|
|
|
|
|
|
/* File names */
|
|
|
|
|
.ascii "dw2-compdir-oldgcc42.S\0"
|
|
|
|
|
.uleb128 0 /* directory */
|
|
|
|
|
.uleb128 0
|
|
|
|
|
.uleb128 0
|
|
|
|
|
|
|
|
|
|
.byte 0
|
|
|
|
|
|
|
|
|
|
.Lgcc42_lines:
|
|
|
|
|
.byte 0 /* DW_LNE_set_address */
|
|
|
|
|
.uleb128 5
|
|
|
|
|
.byte 2
|
|
|
|
|
.4byte gcc42
|
|
|
|
|
|
|
|
|
|
.byte 3 /* DW_LNS_advance_line */
|
|
|
|
|
.sleb128 41 /* ... to 42 */
|
|
|
|
|
|
|
|
|
|
.byte 1 /* DW_LNS_copy */
|
|
|
|
|
|
|
|
|
|
.byte 0 /* DW_LNE_set_address */
|
|
|
|
|
.uleb128 5
|
|
|
|
|
.byte 2
|
|
|
|
|
.4byte .Lgcc42_procend
|
|
|
|
|
|
|
|
|
|
.byte 0 /* DW_LNE_end_of_sequence */
|
|
|
|
|
.uleb128 1
|
|
|
|
|
.byte 1
|
|
|
|
|
.Lgcc42_end:
|
|
|
|
|
|
|
|
|
|
.Lgcc43_begin:
|
|
|
|
|
.4byte .Lgcc43_end - .Lgcc43_start /* Initial length */
|
|
|
|
|
.Lgcc43_start:
|
|
|
|
|
.2byte 2 /* Version */
|
|
|
|
|
.4byte .Lgcc43_lines - .Lgcc43_hdr /* header_length */
|
|
|
|
|
.Lgcc43_hdr:
|
|
|
|
|
.byte 1 /* Minimum insn length */
|
|
|
|
|
.byte 1 /* default_is_stmt */
|
|
|
|
|
.byte 1 /* line_base */
|
|
|
|
|
.byte 1 /* line_range */
|
|
|
|
|
.byte 4 /* opcode_base */
|
|
|
|
|
|
|
|
|
|
/* Standard lengths */
|
|
|
|
|
.byte 0
|
|
|
|
|
.byte 1
|
|
|
|
|
.byte 1
|
|
|
|
|
|
|
|
|
|
/* Include directories */
|
|
|
|
|
.byte 0
|
|
|
|
|
|
|
|
|
|
/* File names */
|
|
|
|
|
.ascii "dw2-compdir-oldgcc43.S\0"
|
|
|
|
|
.uleb128 0 /* directory */
|
|
|
|
|
.uleb128 0
|
|
|
|
|
.uleb128 0
|
|
|
|
|
|
|
|
|
|
.byte 0
|
|
|
|
|
|
|
|
|
|
.Lgcc43_lines:
|
|
|
|
|
.byte 0 /* DW_LNE_set_address */
|
|
|
|
|
.uleb128 5
|
|
|
|
|
.byte 2
|
|
|
|
|
.4byte gcc43
|
|
|
|
|
|
|
|
|
|
.byte 3 /* DW_LNS_advance_line */
|
|
|
|
|
.sleb128 42 /* ... to 43 */
|
|
|
|
|
|
|
|
|
|
.byte 1 /* DW_LNS_copy */
|
|
|
|
|
|
|
|
|
|
.byte 0 /* DW_LNE_set_address */
|
|
|
|
|
.uleb128 5
|
|
|
|
|
.byte 2
|
|
|
|
|
.4byte .Lgcc43_procend
|
|
|
|
|
|
|
|
|
|
.byte 0 /* DW_LNE_end_of_sequence */
|
|
|
|
|
.uleb128 1
|
|
|
|
|
.byte 1
|
|
|
|
|
.Lgcc43_end:
|