From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from NAM12-DM6-obe.outbound.protection.outlook.com (mail-dm6nam12on20617.outbound.protection.outlook.com [IPv6:2a01:111:f400:fe59::617]) by sourceware.org (Postfix) with ESMTPS id 846E13858D37 for ; Wed, 19 Jan 2022 13:32:47 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org 846E13858D37 ARC-Seal: i=1; a=rsa-sha256; s=arcselector9901; d=microsoft.com; cv=none; b=EhdHXXzJ9MAD15zV3TT1VAWm5gKpRyKm+vpzxLFaGOVMBmearDWVFD/ULDKmnkCXv6X8JzJVhKd3XVIOksDCMYldTIgnAxi7R6puVe06PKWVQFHYu+VZ5qdxYrOrrmRIeWKIIoFbg7QxGRVcHshPG35N9CFNXI919muBO6WTaNb/HEZnrost/H3ZkE9O+7mBw97EN38Clt2oD0FGKXnbMxtOIyEoI5zgW1vuDCF9+wF+3I7JoI5oaHnhPV6d+j+JQKWKrwam7Z72xtKic+NPppoGwrJANf0AipR7fh75kRwhOQjhonjfR5HiPe8o3DqZyWIsU+dZ3yPHIqiYhdCJzg== ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=microsoft.com; s=arcselector9901; h=From:Date:Subject:Message-ID:Content-Type:MIME-Version:X-MS-Exchange-AntiSpam-MessageData-ChunkCount:X-MS-Exchange-AntiSpam-MessageData-0:X-MS-Exchange-AntiSpam-MessageData-1; bh=ix34ELbSbC4C424/dUQF0K09tBPXIJlTp/UWRPRdftA=; b=j/cCvzZTZTYj2bCxEtcz7h2wxXidvLWvW+BYSYHyROKx0+GPlLpzsIyLv4Akg8iXoQlV/GJ+bGoHfqbIU61bY2CQo2PnsQSHv5K+339FVmRDrzj1tVqBKDTfF68k6cn5mmNDAAS6fURr/LbdDBokEtlN+3kj+5K9tJ2xL6g0oinSjgK+6BKXb+l1qF0TuB7OkiEsO523TgMfIUGCsN2IPASODyQwzX7a41tiepYpfmL2BwTS+R4Lhe2cF9ABqg/3cpvcb7/Olwam4qPzQdH2ifGQ5+ax2GHRQMLYgk1PhD5tpNEQEHqySCEa4Y+ITyN28X8HvrZEZpdxzwXMvOcEDQ== ARC-Authentication-Results: i=1; mx.microsoft.com 1; spf=pass (sender ip is 165.204.84.17) smtp.rcpttodomain=sourceware.org smtp.mailfrom=amd.com; dmarc=pass (p=quarantine sp=quarantine pct=100) action=none header.from=amd.com; dkim=none (message not signed); arc=none Received: from BN8PR04CA0006.namprd04.prod.outlook.com (2603:10b6:408:70::19) by BN8PR12MB3236.namprd12.prod.outlook.com (2603:10b6:408:9a::19) with Microsoft SMTP Server (version=TLS1_2, cipher=TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384) id 15.20.4888.12; Wed, 19 Jan 2022 13:32:45 +0000 Received: from BN8NAM11FT062.eop-nam11.prod.protection.outlook.com (2603:10b6:408:70:cafe::b4) by BN8PR04CA0006.outlook.office365.com (2603:10b6:408:70::19) with Microsoft SMTP Server (version=TLS1_2, cipher=TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384) id 15.20.4888.10 via Frontend Transport; Wed, 19 Jan 2022 13:32:45 +0000 X-MS-Exchange-Authentication-Results: spf=pass (sender IP is 165.204.84.17) smtp.mailfrom=amd.com; dkim=none (message not signed) header.d=none;dmarc=pass action=none header.from=amd.com; Received-SPF: Pass (protection.outlook.com: domain of amd.com designates 165.204.84.17 as permitted sender) receiver=protection.outlook.com; client-ip=165.204.84.17; helo=SATLEXMB04.amd.com; Received: from SATLEXMB04.amd.com (165.204.84.17) by BN8NAM11FT062.mail.protection.outlook.com (10.13.177.34) with Microsoft SMTP Server (version=TLS1_2, cipher=TLS_ECDHE_RSA_WITH_AES_128_GCM_SHA256) id 15.20.4909.7 via Frontend Transport; Wed, 19 Jan 2022 13:32:45 +0000 Received: from node-bp126-r03c.amd.com (10.180.168.240) by SATLEXMB04.amd.com (10.181.40.145) with Microsoft SMTP Server (version=TLS1_2, cipher=TLS_ECDHE_RSA_WITH_AES_128_GCM_SHA256) id 15.1.2375.18; Wed, 19 Jan 2022 07:32:44 -0600 From: Lancelot SIX To: CC: Lancelot SIX Subject: [PATCH] gdb: Respect the DW_CC_nocall attribute Date: Wed, 19 Jan 2022 07:30:45 -0600 Message-ID: <20220119133045.117423-1-lancelot.six@amd.com> X-Mailer: git-send-email 2.17.1 MIME-Version: 1.0 Content-Type: text/plain X-Originating-IP: [10.180.168.240] X-ClientProxiedBy: SATLEXMB03.amd.com (10.181.40.144) To SATLEXMB04.amd.com (10.181.40.145) X-EOPAttributedMessage: 0 X-MS-PublicTrafficType: Email X-MS-Office365-Filtering-Correlation-Id: de027b4b-f41d-4829-7c2a-08d9db502d59 X-MS-TrafficTypeDiagnostic: BN8PR12MB3236:EE_ X-Microsoft-Antispam-PRVS: X-MS-Oob-TLC-OOBClassifiers: OLM:8882; X-MS-Exchange-SenderADCheck: 1 X-MS-Exchange-AntiSpam-Relay: 0 X-Microsoft-Antispam: BCL:0; X-Microsoft-Antispam-Message-Info: zdT3azO2Ig5CuXifApwF5L9TSC0zNrtVH6LXOAEKeef7FW/R/T4EJIYdh17u5Ebybzwlp8xbB1CrNH0arD4Mq46sXSkgrt5y8m+L1mcdntQnmZBgnfTi8PUC5sNnEhWw8WwMOXDHeNtRuJYgs6WIVCsZ4TVcxrZWVUd9u3BuFDjKXLrmn/l56ODidplYnYJiJimjJRjuAwVgjjO+cdzMS3iC9Q62dXFop6dme2wSS0bxI9Mo/74Q/FUHqtgAfmO9s6vDNvxsxgC34mxnyup0F+9H1Xgbv3afUcL5vFT/+keRy1G83lp31+8HA9+gu8mtUf+O2LoPmTtF7ajwmHu+Ikqokipe8sbSRl0lbf+qT8MpCIlZtZ1mGUKaDhosRbxNL0K4QCVwq3fCJ8dN5niXkTLpOwgYqYEPd3BYOW+qVvEptjZrMZ4mt3AHLInpf9THAys49WYWZeYU2ZheIfgVBiEdOgtDCUoB02iknaDoN6euXwZCvYG9bIIxsenUbdWPkQmjaJiROqwTu4q+1eWJFA7/jkDdazkhhgsQ35j6ySZ+R/jJz5E7dl34R5q7DbO78F5lONch2YGGnvpLGzTKK1hOPefNPXa4m6ObR0rnmEAW/OMyajtvYCPWXwv1QeJpA53Nv8cOs1Fbjgk3LCWlh3hx+5Xm3gSEvkJRfGlL0UhRlW2mXe03r16lXLoOJ9Hdc5hErWdbTv672hdRlr+n0EWGjQIM5tzOulfX172jpyaRUf8txRVfT+jOR2AD2tY6YdylsfdXFGfSpXEEUEmTxKO+J0lMewJ6XdbyKR9ooIPS6hejyPQoE3aQI1zfw95AUy6QLlGzuAiMJ4nxznn9tYzP4vqk4DpZjJXZ93ITsDpF9eoG/MUtXsJDPMYURxdc/lOz3c4W5iahvyosiASLCA== X-Forefront-Antispam-Report: CIP:165.204.84.17; CTRY:US; LANG:en; SCL:1; SRV:; IPV:CAL; SFV:NSPM; H:SATLEXMB04.amd.com; PTR:InfoDomainNonexistent; CAT:NONE; SFS:(4636009)(36840700001)(40470700002)(46966006)(16526019)(7696005)(4326008)(5660300002)(47076005)(83380400001)(81166007)(70206006)(186003)(336012)(6916009)(356005)(36756003)(1076003)(316002)(86362001)(2616005)(8676002)(508600001)(40460700001)(36860700001)(426003)(82310400004)(2906002)(70586007)(8936002)(26005)(2004002)(36900700001); DIR:OUT; SFP:1101; X-OriginatorOrg: amd.com X-MS-Exchange-CrossTenant-OriginalArrivalTime: 19 Jan 2022 13:32:45.3872 (UTC) X-MS-Exchange-CrossTenant-Network-Message-Id: de027b4b-f41d-4829-7c2a-08d9db502d59 X-MS-Exchange-CrossTenant-Id: 3dd8961f-e488-4e60-8e11-a82d994e183d X-MS-Exchange-CrossTenant-OriginalAttributedTenantConnectingIp: TenantId=3dd8961f-e488-4e60-8e11-a82d994e183d; Ip=[165.204.84.17]; Helo=[SATLEXMB04.amd.com] X-MS-Exchange-CrossTenant-AuthSource: BN8NAM11FT062.eop-nam11.prod.protection.outlook.com X-MS-Exchange-CrossTenant-AuthAs: Anonymous X-MS-Exchange-CrossTenant-FromEntityHeader: HybridOnPrem X-MS-Exchange-Transport-CrossTenantHeadersStamped: BN8PR12MB3236 X-Spam-Status: No, score=-11.4 required=5.0 tests=BAYES_00, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, GIT_PATCH_0, KAM_SHORT, SPF_HELO_PASS, SPF_PASS, TXREP autolearn=ham autolearn_force=no version=3.4.4 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on server2.sourceware.org X-BeenThere: gdb-patches@sourceware.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Gdb-patches mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Wed, 19 Jan 2022 13:32:50 -0000 It is possible for a compiler to optimize a function in a such ways that the function does not follow the calling convention of the target. In such situation, the compiler can use the DW_AT_calling_convention attribute with the value DW_CC_nocall to tell the debugger that it is unsafe to call the function. The DWARF5 standard states, in 3.3.1.1: > If the value of the calling convention attribute is the constant > DW_CC_nocall, the subroutine does not obey standard calling > conventions, and it may not be safe for the debugger to call this > subroutine. Non standard calling convention can affect GDB's assumptions in multiple ways, including how arguments are passed to the function, how values are returned, and so on. For this reason, it is unsafe for GDB to try to do the following operations on a function with marked with DW_CC_nocall: - call / print an expression requiring the function to be evaluated, - inspect the value a function returns using the 'finish' command, - force the value returned by a function using the 'return' command. This patch ensures that if a command which relies on GDB's knowledge of the target's calling convention is used on a function marked nocall, GDB prints an appropriate message to the user and does not proceed with the operation which is unreliable. Note that it is still possible for someone to use a vendor specific value for the DW_AT_calling_convention attribute for example to indicate the use of an alternative calling convention. This commit does not prevent this, and target dependent code can be adjusted if one wanted to support multiple calling conventions. Tested on x86_64-Linux, with no regression observed. Change-Id: I72970dae68234cb83edbc0cf71aa3d6002a4a540 --- gdb/gdbtypes.c | 11 +++ gdb/gdbtypes.h | 7 ++ gdb/infcall.c | 4 + gdb/infcmd.c | 15 +++- gdb/stack.c | 4 + gdb/testsuite/gdb.dwarf2/calling-convention.c | 36 +++++++++ .../gdb.dwarf2/calling-convention.exp | 73 +++++++++++++++++++ 7 files changed, 147 insertions(+), 3 deletions(-) create mode 100644 gdb/testsuite/gdb.dwarf2/calling-convention.c create mode 100644 gdb/testsuite/gdb.dwarf2/calling-convention.exp diff --git a/gdb/gdbtypes.c b/gdb/gdbtypes.c index 8af96c79e6c..0c2586e28f2 100644 --- a/gdb/gdbtypes.c +++ b/gdb/gdbtypes.c @@ -3903,6 +3903,17 @@ type_byte_order (const struct type *type) return byteorder; } +/* See gdbtypes.h. */ + +bool +is_nocall_function (const struct type *type) +{ + gdb_assert (type->code () == TYPE_CODE_FUNC + || type->code () == TYPE_CODE_METHOD); + + return TYPE_CALLING_CONVENTION (type) == DW_CC_nocall; +} + /* Overload resolution. */ diff --git a/gdb/gdbtypes.h b/gdb/gdbtypes.h index 7238873e4db..8c2828dd203 100644 --- a/gdb/gdbtypes.h +++ b/gdb/gdbtypes.h @@ -2852,4 +2852,11 @@ extern enum bfd_endian type_byte_order (const struct type *type); extern unsigned int overload_debug; +/* The function is marked as unsafe to call by the debugger. + + This usually indicates that the function does not follow the target's + standard calling convention. */ + +extern bool is_nocall_function (const struct type *type); + #endif /* GDBTYPES_H */ diff --git a/gdb/infcall.c b/gdb/infcall.c index a178051391c..332c5197f6c 100644 --- a/gdb/infcall.c +++ b/gdb/infcall.c @@ -813,6 +813,10 @@ call_function_by_hand_dummy (struct value *function, type *values_type; CORE_ADDR funaddr = find_function_addr (function, &values_type, &ftype); + if (is_nocall_function (ftype)) + error (_("Cannot call a function which does not follow the target " + "calling convention.")); + if (values_type == NULL) values_type = default_return_type; if (values_type == NULL) diff --git a/gdb/infcmd.c b/gdb/infcmd.c index af8b6c3eb46..60daa66175f 100644 --- a/gdb/infcmd.c +++ b/gdb/infcmd.c @@ -1434,9 +1434,18 @@ get_return_value (struct value *function, struct type *value_type) case RETURN_VALUE_REGISTER_CONVENTION: case RETURN_VALUE_ABI_RETURNS_ADDRESS: case RETURN_VALUE_ABI_PRESERVES_ADDRESS: - value = allocate_value (value_type); - gdbarch_return_value (gdbarch, function, value_type, stop_regs, - value_contents_raw (value).data (), NULL); + if (is_nocall_function (check_typedef (::value_type (function)))) + { + warning (_("Cannot access the return value of a function which " + "does not follow the target calling convention.")); + value = nullptr; + } + else + { + value = allocate_value (value_type); + gdbarch_return_value (gdbarch, function, value_type, stop_regs, + value_contents_raw (value).data (), NULL); + } break; case RETURN_VALUE_STRUCT_CONVENTION: value = NULL; diff --git a/gdb/stack.c b/gdb/stack.c index b81be2962d4..03eb51891ec 100644 --- a/gdb/stack.c +++ b/gdb/stack.c @@ -2796,6 +2796,10 @@ return_command (const char *retval_exp, int from_tty) return_value = NULL; else if (thisfun != NULL) { + if (is_nocall_function (check_typedef (value_type (function)))) + error (_("Cannot force the return value of a function which " + "does not follow the target calling convention.")); + rv_conv = struct_return_convention (gdbarch, function, return_type); if (rv_conv == RETURN_VALUE_STRUCT_CONVENTION || rv_conv == RETURN_VALUE_ABI_RETURNS_ADDRESS) diff --git a/gdb/testsuite/gdb.dwarf2/calling-convention.c b/gdb/testsuite/gdb.dwarf2/calling-convention.c new file mode 100644 index 00000000000..48c71185a1f --- /dev/null +++ b/gdb/testsuite/gdb.dwarf2/calling-convention.c @@ -0,0 +1,36 @@ +/* This testcase is part of GDB, the GNU debugger. + + Copyright 2022 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 . */ + +/* Dummy foo function. */ + +int +foo () +{ + asm ("foo_label: .globl foo_label"); + return 42; +} + +/* Dummy main function. */ + +int +main() +{ + asm ("main_label: .globl main_label"); + foo (); + return 0; +} + diff --git a/gdb/testsuite/gdb.dwarf2/calling-convention.exp b/gdb/testsuite/gdb.dwarf2/calling-convention.exp new file mode 100644 index 00000000000..eae935a961d --- /dev/null +++ b/gdb/testsuite/gdb.dwarf2/calling-convention.exp @@ -0,0 +1,73 @@ +# Copyright 2022 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 . +load_lib dwarf.exp + +# This test can only be run on targets which support DWARF-2 and use gas. +if {![dwarf2_support]} { + return 0 +} + +standard_testfile .c .S + +# Make some DWARF for the test. +set asm_file [standard_output_file $srcfile2] +Dwarf::assemble $asm_file { + cu {} { + compile_unit { + {language @DW_LANG_C} + {name "calling-convention"} + } { + declare_labels int_label + + int_label: base_type { + {byte_size 4 sdata} + {encoding @DW_ATE_signed} + {name "int"} + } + + subprogram { + {MACRO_AT_func { foo }} + {type :$int_label} + {calling_convention @DW_CC_nocall} + } + + subprogram { + {MACRO_AT_func { main }} + {type :$int_label} + } + } + } +} + +if { [prepare_for_testing "failed to prepare" ${testfile} \ + [list $srcfile $asm_file] {nodebug}] } { + return -1 +} + +if ![runto_main] { + return -1 +} + +gdb_test "call foo ()" \ + "Cannot call a function which does not follow the target calling convention." +gdb_breakpoint "foo" +gdb_continue_to_breakpoint "foo" +gdb_test "return 35" \ + "Cannot force the return value of a function which does not follow the target calling convention." +gdb_test "finish" [multi_line \ + "Run till exit from #0 $hex in foo \\(\\)" \ + "warning: Cannot access the return value of a function which does not follow the target calling convention." \ + "$hex in main \\(\\)" \ + "Value returned has type: int. Cannot determine contents"] -- 2.25.1