https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=185337 2008-02-24 Jan Kratochvil Port to GDB-6.8pre. currently for trivial nonthreaded helloworld with no debug info up to -ggdb2 you will get: (gdb) p errno [some error] * with -ggdb2 and less "errno" in fact does not exist anywhere as it was compiled to "(*__errno_location ())" and the macro definition is not present. Unfortunately gdb will find the TLS symbol and it will try to access it but as the program has been compiled without -lpthread the TLS base register (%gs on i386) is not setup and it will result in: Cannot access memory at address 0x8 Attached suggestion patch how to deal with the most common "errno" symbol for the most common under-ggdb3 compiled programs. 2007-11-03 Jan Kratochvil * ./gdb/dwarf2read.c (read_partial_die, dwarf2_linkage_name): Prefer DW_AT_MIPS_linkage_name over DW_AT_name now only for non-C. glibc-debuginfo-2.7-2.x86_64: /usr/lib/debug/lib64/libc.so.6.debug: <81a2> DW_AT_name : (indirect string, offset: 0x280e): __errno_location <81a8> DW_AT_MIPS_linkage_name: (indirect string, offset: 0x2808): *__GI___errno_location Index: gdb-6.8.50.20081128/gdb/dwarf2read.c =================================================================== --- gdb-6.8.50.20081128.orig/gdb/dwarf2read.c 2008-12-04 10:26:18.000000000 +0100 +++ gdb-6.8.50.20081128/gdb/dwarf2read.c 2008-12-04 10:26:40.000000000 +0100 @@ -5886,8 +5886,8 @@ read_partial_die (struct partial_die_inf { case DW_AT_name: - /* Prefer DW_AT_MIPS_linkage_name over DW_AT_name. */ - if (part_die->name == NULL) + /* Prefer DW_AT_MIPS_linkage_name over DW_AT_name for non-C. */ + if (cu->language == language_c || part_die->name == NULL) part_die->name = DW_STRING (&attr); break; case DW_AT_comp_dir: @@ -5895,7 +5895,9 @@ read_partial_die (struct partial_die_inf part_die->dirname = DW_STRING (&attr); break; case DW_AT_MIPS_linkage_name: - part_die->name = DW_STRING (&attr); + /* Prefer DW_AT_MIPS_linkage_name over DW_AT_name for non-C. */ + if (cu->language != language_c || part_die->name == NULL) + part_die->name = DW_STRING (&attr); break; case DW_AT_low_pc: has_low_pc_attr = 1; @@ -8129,9 +8131,13 @@ dwarf2_linkage_name (struct die_info *di { struct attribute *attr; - attr = dwarf2_attr (die, DW_AT_MIPS_linkage_name, cu); - if (attr && DW_STRING (attr)) - return DW_STRING (attr); + /* Prefer DW_AT_MIPS_linkage_name over DW_AT_name for non-C. */ + if (cu->language != language_c) + { + attr = dwarf2_attr (die, DW_AT_MIPS_linkage_name, cu); + if (attr && DW_STRING (attr)) + return DW_STRING (attr); + } attr = dwarf2_attr (die, DW_AT_name, cu); if (attr && DW_STRING (attr)) return DW_STRING (attr); Index: gdb-6.8.50.20081128/gdb/gdbtypes.c =================================================================== --- gdb-6.8.50.20081128.orig/gdb/gdbtypes.c 2008-11-10 21:53:43.000000000 +0100 +++ gdb-6.8.50.20081128/gdb/gdbtypes.c 2008-12-04 10:26:40.000000000 +0100 @@ -3141,6 +3141,8 @@ gdbtypes_post_init (struct gdbarch *gdba init_type (TYPE_CODE_INT, gdbarch_int_bit (gdbarch) / TARGET_CHAR_BIT, 0, "int", (struct objfile *) NULL); + builtin_type->builtin_int_ptr = + make_pointer_type (builtin_type->builtin_int, NULL); builtin_type->builtin_unsigned_int = init_type (TYPE_CODE_INT, gdbarch_int_bit (gdbarch) / TARGET_CHAR_BIT, @@ -3250,6 +3252,11 @@ gdbtypes_post_init (struct gdbarch *gdba "", NULL); TYPE_TARGET_TYPE (builtin_type->nodebug_text_symbol) = builtin_type->builtin_int; + builtin_type->nodebug_text_symbol_errno_location = + init_type (TYPE_CODE_FUNC, 1, 0, + "", NULL); + TYPE_TARGET_TYPE (builtin_type->nodebug_text_symbol_errno_location) = + builtin_type->builtin_int_ptr; builtin_type->nodebug_data_symbol = init_type (TYPE_CODE_INT, gdbarch_int_bit (gdbarch) / HOST_CHAR_BIT, 0, Index: gdb-6.8.50.20081128/gdb/gdbtypes.h =================================================================== --- gdb-6.8.50.20081128.orig/gdb/gdbtypes.h 2008-10-28 18:19:56.000000000 +0100 +++ gdb-6.8.50.20081128/gdb/gdbtypes.h 2008-12-04 10:26:40.000000000 +0100 @@ -975,6 +975,7 @@ struct builtin_type /* Types used for symbols with no debug information. */ struct type *nodebug_text_symbol; + struct type *nodebug_text_symbol_errno_location; struct type *nodebug_data_symbol; struct type *nodebug_unknown_symbol; struct type *nodebug_tls_symbol; @@ -987,6 +988,7 @@ struct builtin_type struct type *builtin_char; struct type *builtin_short; struct type *builtin_int; + struct type *builtin_int_ptr; struct type *builtin_long; struct type *builtin_signed_char; struct type *builtin_unsigned_char; Index: gdb-6.8.50.20081128/gdb/parse.c =================================================================== --- gdb-6.8.50.20081128.orig/gdb/parse.c 2008-11-24 18:05:43.000000000 +0100 +++ gdb-6.8.50.20081128/gdb/parse.c 2008-12-04 10:26:40.000000000 +0100 @@ -449,7 +449,12 @@ write_exp_msymbol (struct minimal_symbol case mst_text: case mst_file_text: case mst_solib_trampoline: - write_exp_elt_type (builtin_type (gdbarch)->nodebug_text_symbol); + if (builtin_type (gdbarch)->nodebug_text_symbol_errno_location != NULL + && strcmp (SYMBOL_LINKAGE_NAME (msymbol), "__errno_location") == 0) + write_exp_elt_type (builtin_type (gdbarch) + ->nodebug_text_symbol_errno_location); + else + write_exp_elt_type (builtin_type (gdbarch)->nodebug_text_symbol); break; case mst_data: Index: gdb-6.8.50.20081128/gdb/target.c =================================================================== --- gdb-6.8.50.20081128.orig/gdb/target.c 2008-12-04 10:24:58.000000000 +0100 +++ gdb-6.8.50.20081128/gdb/target.c 2008-12-04 10:29:07.000000000 +0100 @@ -850,6 +850,25 @@ pop_all_targets (int quitting) pop_all_targets_above (dummy_stratum, quitting); } +static int +resolve_errno (void *arg) +{ + CORE_ADDR *arg_addr = arg; + struct expression *expr; + struct cleanup *old_chain = 0; + struct value *val; + + expr = parse_expression ("__errno_location()"); + old_chain = make_cleanup (free_current_contents, &expr); + val = evaluate_expression (expr); + *arg_addr = value_as_address (val); + release_value (val); + value_free (val); + do_cleanups (old_chain); + + return 1; +} + /* Using the objfile specified in OBJFILE, find the address for the current thread's thread-local storage with offset OFFSET. */ CORE_ADDR @@ -931,7 +950,28 @@ target_translate_tls_address (struct obj /* It wouldn't be wrong here to try a gdbarch method, too; finding TLS is an ABI-specific thing. But we don't do that yet. */ else - error (_("Cannot find thread-local variables on this target")); + { + struct minimal_symbol *msymbol; + + msymbol = lookup_minimal_symbol ("errno", NULL, NULL); + if (msymbol != NULL + && SYMBOL_VALUE_ADDRESS (msymbol) == offset + && (SYMBOL_OBJ_SECTION (msymbol)->objfile == objfile + || (objfile->separate_debug_objfile != NULL + && SYMBOL_OBJ_SECTION (msymbol)->objfile + == objfile->separate_debug_objfile) + || (objfile->separate_debug_objfile_backlink != NULL + && SYMBOL_OBJ_SECTION (msymbol)->objfile + == objfile->separate_debug_objfile_backlink))) + { + if (!catch_errors (resolve_errno, (void *) &addr, "", + RETURN_MASK_ALL)) + error (_("TLS symbol `errno' not resolved for non-TLS program." + " You should compile the program with `gcc -pthread'.")); + } + else + error (_("Cannot find thread-local variables on this target")); + } return addr; } Index: gdb-6.8.50.20081128/gdb/testsuite/gdb.dwarf2/dw2-errno.c =================================================================== --- /dev/null 1970-01-01 00:00:00.000000000 +0000 +++ gdb-6.8.50.20081128/gdb/testsuite/gdb.dwarf2/dw2-errno.c 2008-12-04 10:26:40.000000000 +0100 @@ -0,0 +1,28 @@ +/* This testcase is part of GDB, the GNU debugger. + + Copyright 2005, 2007 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 . + + Please email any bugs, comments, and/or additions to this file to: + bug-gdb@prep.ai.mit.edu */ + +#include + +int main() +{ + errno = 42; + + return 0; /* breakpoint */ +} Index: gdb-6.8.50.20081128/gdb/testsuite/gdb.dwarf2/dw2-errno.exp =================================================================== --- /dev/null 1970-01-01 00:00:00.000000000 +0000 +++ gdb-6.8.50.20081128/gdb/testsuite/gdb.dwarf2/dw2-errno.exp 2008-12-04 10:26:40.000000000 +0100 @@ -0,0 +1,67 @@ +# Copyright 2007 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 . + +if $tracelevel then { + strace $tracelevel +} + +set prms_id 0 +set bug_id 0 + +set testfile dw2-errno +set srcfile ${testfile}.c +set binfile ${objdir}/${subdir}/${testfile} + +proc prep {} { + global srcdir subdir binfile + gdb_exit + gdb_start + gdb_reinitialize_dir $srcdir/$subdir + gdb_load ${binfile} + + runto_main + + gdb_breakpoint [gdb_get_line_number "breakpoint"] + gdb_continue_to_breakpoint "breakpoint" +} + +if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable "additional_flags=-g2"] != "" } { + untested "Couldn't compile test program" + return -1 +} +prep +gdb_test "print errno" ".* = 42" "errno with macros=N threads=N" + +if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable "additional_flags=-g3"] != "" } { + untested "Couldn't compile test program" + return -1 +} +prep +gdb_test "print errno" ".* = 42" "errno with macros=Y threads=N" + +if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable "additional_flags=-g2"] != "" } { + return -1 +} +prep +gdb_test "print errno" ".* = 42" "errno with macros=N threads=Y" + +if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable "additional_flags=-g3"] != "" } { + return -1 +} +prep +gdb_test "print errno" ".* = 42" "errno with macros=Y threads=Y" + +# TODO: Test the error on resolving ERRNO with only libc loaded. +# Just how to find the current libc filename?