http://sourceware.org/ml/gdb-patches/2014-07/msg00274.html Subject: [obv] Fix false argv0-symlink.exp FAIL running under a very long directory name Hi, checked in as obvious: Starting program: /home/jkratoch/redhat/gdb-test-fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff/gdb/testsuite/gdb.base/argv0-symlink-filelink ^M [...] (gdb) print argv[0]^M $1 = 0x7fffffffda39 "/home/jkratoch/redhat/gdb-test-", 'f' ...^M (gdb) FAIL: gdb.base/argv0-symlink.exp: kept file symbolic link name after "set print repeats 10000": print argv[0]^M $1 = 0x7fffffffda39 "/home/jkratoch/redhat/gdb-test-fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff"...^M (gdb) FAIL: gdb.base/argv0-symlink.exp: kept file symbolic link name after "set print elements 10000": print argv[0]^M $1 = 0x7fffffffda39 "/home/jkratoch/redhat/gdb-test-fffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff/gdb/testsuite/gdb.base/argv0-symlink-filelink"^M (gdb) PASS: gdb.base/argv0-symlink.exp: kept file symbolic link name commit 218c2655603748b844dcaf103e34fd14d8ee8aef Author: Jan Kratochvil Date: Fri Jul 11 17:26:42 2014 +0200 diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 74f7bce..253eeeb 100644 ### a/gdb/testsuite/ChangeLog ### b/gdb/testsuite/ChangeLog ## -1,3 +1,9 @@ +2014-07-11 Jan Kratochvil + + Fix false FAIL running under a very long directory name. + * gdb.base/argv0-symlink.exp: Add "set print repeats 10000" + and "set print elements 10000". Twice. + 2014-07-11 Yao Qi * gdb.base/exprs.exp: "set print symbol off". diff --git a/gdb/testsuite/gdb.base/argv0-symlink.exp b/gdb/testsuite/gdb.base/argv0-symlink.exp index 0e0202d..d849b4c 100644 --- a/gdb/testsuite/gdb.base/argv0-symlink.exp +++ b/gdb/testsuite/gdb.base/argv0-symlink.exp @@ -36,6 +36,9 @@ if ![runto_main] { return -1 } +gdb_test_no_output "set print repeats 10000" +gdb_test_no_output "set print elements 10000" + gdb_test {print argv[0]} "/$filelink\"" $test # For a link named /PATH/TO/DIR/LINK, we want to check the output @@ -67,6 +70,9 @@ if ![runto_main] { return -1 } +gdb_test_no_output "set print repeats 10000" +gdb_test_no_output "set print elements 10000" + # gdbserver does not have this issue. if ![is_remote target] { setup_kfail "*-*-*" gdb/15934 commit cac9b138f75c94c1256d054cbafdf208b8963ce1 Author: Jan Kratochvil Date: Mon Nov 24 18:05:04 2014 +0100 Reindent code (resolve_dynamic_type_internal). gdb/ChangeLog 2014-11-24 Jan Kratochvil * gdbtypes.c (resolve_dynamic_type_internal): Reindent the code. ### a/gdb/ChangeLog ### b/gdb/ChangeLog ## -1,3 +1,7 @@ +2014-11-24 Jan Kratochvil + + * gdbtypes.c (resolve_dynamic_type_internal): Reindent the code. + 2014-11-24 Samuel Thibault Pushed by Joel Brobecker --- a/gdb/gdbtypes.c +++ b/gdb/gdbtypes.c @@ -1877,31 +1877,31 @@ resolve_dynamic_type_internal (struct type *type, CORE_ADDR addr, switch (TYPE_CODE (type)) { - case TYPE_CODE_TYPEDEF: + case TYPE_CODE_TYPEDEF: + resolved_type = copy_type (type); + TYPE_TARGET_TYPE (resolved_type) + = resolve_dynamic_type_internal (TYPE_TARGET_TYPE (type), addr, + top_level); + break; + + case TYPE_CODE_REF: + { + CORE_ADDR target_addr = read_memory_typed_address (addr, type); + resolved_type = copy_type (type); TYPE_TARGET_TYPE (resolved_type) - = resolve_dynamic_type_internal (TYPE_TARGET_TYPE (type), addr, - top_level); + = resolve_dynamic_type_internal (TYPE_TARGET_TYPE (type), + target_addr, top_level); break; + } - case TYPE_CODE_REF: - { - CORE_ADDR target_addr = read_memory_typed_address (addr, type); - - resolved_type = copy_type (type); - TYPE_TARGET_TYPE (resolved_type) - = resolve_dynamic_type_internal (TYPE_TARGET_TYPE (type), - target_addr, top_level); - break; - } - - case TYPE_CODE_ARRAY: - resolved_type = resolve_dynamic_array (type); - break; + case TYPE_CODE_ARRAY: + resolved_type = resolve_dynamic_array (type); + break; - case TYPE_CODE_RANGE: - resolved_type = resolve_dynamic_range (type); - break; + case TYPE_CODE_RANGE: + resolved_type = resolve_dynamic_range (type); + break; case TYPE_CODE_UNION: resolved_type = resolve_dynamic_union (type, addr); commit 5537b577695dd5cd72395590d7ebd7aa92ee856a Author: Jan Kratochvil Date: Sat Dec 13 15:31:59 2014 +0100 Fix 7.8 regression: resolve_dynamic_struct: Assertion `TYPE_NFIELDS (type) > 0' (PR 17642) https://sourceware.org/bugzilla/show_bug.cgi?id=17642 Regression since: commit 012370f6818657a816df1463ee71ca4e4ee40b33 Author: Tom Tromey Date: Thu May 8 11:26:44 2014 -0600 handle VLA in a struct or union Bugreport: Regression with gdb scripts for Linux kernel https://sourceware.org/ml/gdb/2014-08/msg00127.html That big change after "else" is just reindentation. gdb/ChangeLog 2014-12-13 Jan Kratochvil PR symtab/17642 * gdbtypes.c (resolve_dynamic_type_internal): Apply check_typedef to TYPE if not TYPE_CODE_TYPEDEF. gdb/testsuite/ChangeLog 2014-12-13 Jan Kratochvil PR symtab/17642 * gdb.base/vla-stub-define.c: New file. * gdb.base/vla-stub.c: New file. * gdb.base/vla-stub.exp: New file. ### a/gdb/ChangeLog ### b/gdb/ChangeLog ## -1,3 +1,9 @@ +2014-12-13 Jan Kratochvil + + PR symtab/17642 + * gdbtypes.c (resolve_dynamic_type_internal): Apply check_typedef to + TYPE if not TYPE_CODE_TYPEDEF. + 2014-12-12 Doug Evans * valops.c (value_maybe_namespace_elt): Remove unnecessary test of --- a/gdb/gdbtypes.c +++ b/gdb/gdbtypes.c @@ -1888,41 +1888,47 @@ resolve_dynamic_type_internal (struct type *type, CORE_ADDR addr, if (!is_dynamic_type_internal (real_type, top_level)) return type; - switch (TYPE_CODE (type)) + if (TYPE_CODE (type) == TYPE_CODE_TYPEDEF) { - case TYPE_CODE_TYPEDEF: resolved_type = copy_type (type); TYPE_TARGET_TYPE (resolved_type) = resolve_dynamic_type_internal (TYPE_TARGET_TYPE (type), addr, top_level); - break; + } + else + { + /* Before trying to resolve TYPE, make sure it is not a stub. */ + type = real_type; - case TYPE_CODE_REF: - { - CORE_ADDR target_addr = read_memory_typed_address (addr, type); + switch (TYPE_CODE (type)) + { + case TYPE_CODE_REF: + { + CORE_ADDR target_addr = read_memory_typed_address (addr, type); - resolved_type = copy_type (type); - TYPE_TARGET_TYPE (resolved_type) - = resolve_dynamic_type_internal (TYPE_TARGET_TYPE (type), - target_addr, top_level); - break; - } + resolved_type = copy_type (type); + TYPE_TARGET_TYPE (resolved_type) + = resolve_dynamic_type_internal (TYPE_TARGET_TYPE (type), + target_addr, top_level); + break; + } - case TYPE_CODE_ARRAY: - resolved_type = resolve_dynamic_array (type); - break; + case TYPE_CODE_ARRAY: + resolved_type = resolve_dynamic_array (type); + break; - case TYPE_CODE_RANGE: - resolved_type = resolve_dynamic_range (type); - break; + case TYPE_CODE_RANGE: + resolved_type = resolve_dynamic_range (type); + break; - case TYPE_CODE_UNION: - resolved_type = resolve_dynamic_union (type, addr); - break; + case TYPE_CODE_UNION: + resolved_type = resolve_dynamic_union (type, addr); + break; - case TYPE_CODE_STRUCT: - resolved_type = resolve_dynamic_struct (type, addr); - break; + case TYPE_CODE_STRUCT: + resolved_type = resolve_dynamic_struct (type, addr); + break; + } } return resolved_type; ### a/gdb/testsuite/ChangeLog ### b/gdb/testsuite/ChangeLog ## -1,3 +1,10 @@ +2014-12-13 Jan Kratochvil + + PR symtab/17642 + * gdb.base/vla-stub-define.c: New file. + * gdb.base/vla-stub.c: New file. + * gdb.base/vla-stub.exp: New file. + 2014-12-12 Phil Muldoon Jan Kratochvil Tom Tromey --- /dev/null +++ b/gdb/testsuite/gdb.base/vla-stub-define.c @@ -0,0 +1,21 @@ +/* This testcase is part of GDB, the GNU debugger. + + Copyright 2014 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 . */ + +struct dynamic_struct +{ + int dynamic_field[0]; +} use_dynamic_struct; --- /dev/null +++ b/gdb/testsuite/gdb.base/vla-stub.c @@ -0,0 +1,37 @@ +/* This testcase is part of GDB, the GNU debugger. + + Copyright 2014 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 . */ + +struct dynamic_struct; +typedef struct dynamic_struct dynamic_struct_t; + +struct static_struct +{ + int field; +}; +typedef struct static_struct static_struct_t; + +struct local_struct +{ + static_struct_t here; + dynamic_struct_t *ptr; +} local_struct; + +int +main (void) +{ + return 0; +} --- /dev/null +++ b/gdb/testsuite/gdb.base/vla-stub.exp @@ -0,0 +1,25 @@ +# Copyright 2014 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 . + +standard_testfile .c vla-stub-define.c +if { [prepare_for_testing "failed to prepare for vla-stub.exp" \ + ${testfile} [list ${srcfile} ${srcfile2}]] } { + return -1 +} + +gdb_test "p *local_struct.ptr" { = {dynamic_field = 0x0}} + +gdb_test "whatis local_struct.here" "type = static_struct_t" +gdb_test "whatis *local_struct.ptr" "type = dynamic_struct_t"