From patchwork Wed Nov 16 10:20:28 2022 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Tom de Vries X-Patchwork-Id: 60688 Return-Path: X-Original-To: patchwork@sourceware.org Delivered-To: patchwork@sourceware.org Received: from server2.sourceware.org (localhost [IPv6:::1]) by sourceware.org (Postfix) with ESMTP id C76B63959C87 for ; Wed, 16 Nov 2022 10:20:55 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org C76B63959C87 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=sourceware.org; s=default; t=1668594055; bh=nBkn24IOITagtDHliRxyva3Q71tC8kETzSOJWSnzLM0=; h=To:Subject:Date:In-Reply-To:References:List-Id:List-Unsubscribe: List-Archive:List-Post:List-Help:List-Subscribe:From:Reply-To: From; b=G3ArswfVeU7sc9Oemmx8g7/cyBrPHHTYEeXMWWW9aEZSblO1uq9KzaNl5QaBippsT XcdjyIEn7hnVO6nOM2H2KTl7V+m1JcNfPvUxWbGQTrqRs5C6zjfCQLx9r8AvybWkxq T1u1S0PcS2qxBgetq5ouzt1/wJWky1zHl79crjmY= X-Original-To: gdb-patches@sourceware.org Delivered-To: gdb-patches@sourceware.org Received: from smtp-out1.suse.de (smtp-out1.suse.de [195.135.220.28]) by sourceware.org (Postfix) with ESMTPS id 0ADAF3954C63 for ; Wed, 16 Nov 2022 10:20:30 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org 0ADAF3954C63 Received: from imap2.suse-dmz.suse.de (imap2.suse-dmz.suse.de [192.168.254.74]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature ECDSA (P-521) server-digest SHA512) (No client certificate requested) by smtp-out1.suse.de (Postfix) with ESMTPS id 2F10F336EA for ; Wed, 16 Nov 2022 10:20:29 +0000 (UTC) Received: from imap2.suse-dmz.suse.de (imap2.suse-dmz.suse.de [192.168.254.74]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature ECDSA (P-521) server-digest SHA512) (No client certificate requested) by imap2.suse-dmz.suse.de (Postfix) with ESMTPS id 1712E13480 for ; Wed, 16 Nov 2022 10:20:29 +0000 (UTC) Received: from dovecot-director2.suse.de ([192.168.254.65]) by imap2.suse-dmz.suse.de with ESMTPSA id KKt4BG25dGO6TAAAMHmgww (envelope-from ) for ; Wed, 16 Nov 2022 10:20:29 +0000 To: gdb-patches@sourceware.org Subject: [pushed 2/2] [gdb/testsuite] Modernize gdb.arch/i386-biarch-core.exp Date: Wed, 16 Nov 2022 11:20:28 +0100 Message-Id: <20221116102028.18591-2-tdevries@suse.de> X-Mailer: git-send-email 2.35.3 In-Reply-To: <20221116102028.18591-1-tdevries@suse.de> References: <20221116102028.18591-1-tdevries@suse.de> MIME-Version: 1.0 X-Spam-Status: No, score=-12.6 required=5.0 tests=BAYES_00, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, GIT_PATCH_0, SPF_HELO_NONE, SPF_PASS, TXREP autolearn=ham autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) 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-Patchwork-Original-From: Tom de Vries via Gdb-patches From: Tom de Vries Reply-To: Tom de Vries Errors-To: gdb-patches-bounces+patchwork=sourceware.org@sourceware.org Sender: "Gdb-patches" I noticed in test-case gdb.arch/i386-biarch-core.exp that we run into the completion limit for "complete set gnutarget": ... set gnutarget vms-libtxt^M set gnutarget *** List may be truncated, max-completions reached. ***^M (gdb) PASS: gdb.arch/i386-biarch-core.exp: complete set gnutarget ... Fix this by using get_set_option_choices. Also use get_set_option_choices for "complete set architecture i386", which required extending get_set_option_choices to accept a second argument, such that we can do: ... set archs [get_set_option_choices "set architecture" "i386"] ... because this returns an empty list: ... set archs [get_set_option_choices "set architecture i386"] ... because it does "complete set architecture i386 ". Also clean up the explicit gdb_exit/gdb_start and use clean_restart instead. Tested on x86_64-linux. --- gdb/testsuite/gdb.arch/i386-biarch-core.exp | 29 +++++---------------- gdb/testsuite/lib/gdb.exp | 18 ++++++++++--- 2 files changed, 21 insertions(+), 26 deletions(-) diff --git a/gdb/testsuite/gdb.arch/i386-biarch-core.exp b/gdb/testsuite/gdb.arch/i386-biarch-core.exp index e1f65900379..95e60d0b552 100644 --- a/gdb/testsuite/gdb.arch/i386-biarch-core.exp +++ b/gdb/testsuite/gdb.arch/i386-biarch-core.exp @@ -28,20 +28,12 @@ if { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } then { standard_testfile -gdb_exit -gdb_start -gdb_reinitialize_dir $srcdir/$subdir +clean_restart -set test "complete set gnutarget" -gdb_test_multiple "complete set gnutarget " $test { - -re "set gnutarget elf64-little\r\n(.*\r\n)?$gdb_prompt $" { - pass $test - } - -re "\r\n$gdb_prompt $" { - pass $test - untested ".text is readable" - return - } +set gnutargets [get_set_option_choices "set gnutarget"] +if { [lsearch -exact $gnutargets elf64-little] == -1 } { + untested ".text is readable" + return } set corebz2file ${srcdir}/${subdir}/${testfile}.core.bz2 @@ -62,15 +54,8 @@ if {$corestat(size) != 102400} { # First check if this particular GDB supports i386, otherwise we should not # expect the i386 core file to be loaded successfully. -set supports_arch_i386 1 -set test "complete set architecture i386" -gdb_test_multiple $test $test { - -re "\r\nset architecture i386\r\n(.*\r\n)?$gdb_prompt $" { - } - -re "\r\n$gdb_prompt $" { - set supports_arch_i386 0 - } -} +set archs [get_set_option_choices "set architecture" "i386"] +set supports_arch_i386 [expr [lsearch -exact $archs i386] != -1] # Wrongly built GDB complains by: # "..." is not a core dump: File format not recognized diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index f540770189d..042d7ade59f 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -9146,13 +9146,23 @@ gdb_caching_proc has_hw_wp_support { return $has_hw_wp_support } -# Return a list of all the accepted values of the set command SET_CMD. +# Return a list of all the accepted values of the set command +# "SET_CMD SET_ARG". +# For example get_set_option_choices "set architecture" "i386". -proc get_set_option_choices {set_cmd} { +proc get_set_option_choices { set_cmd {set_arg ""} } { set values {} - set cmd "complete $set_cmd " - set test "complete $set_cmd" + if { $set_arg == "" } { + # Add trailing space to signal that we need completion of the choices, + # not of set_cmd itself. + set cmd "complete $set_cmd " + } else { + set cmd "complete $set_cmd $set_arg" + } + + # Set test name without trailing space. + set test [string trim $cmd] with_set max-completions unlimited { gdb_test_multiple $cmd $test {