From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from simark.ca by simark.ca with LMTP id 1pJmN5+k62lTBTkAWB0awg (envelope-from ) for ; Fri, 24 Apr 2026 13:13:03 -0400 Authentication-Results: simark.ca; dkim=pass (1024-bit key; unprotected) header.d=redhat.com header.i=@redhat.com header.a=rsa-sha256 header.s=mimecast20190719 header.b=ZoRlrOtR; dkim-atps=neutral Received: by simark.ca (Postfix, from userid 112) id D1E261E093; Fri, 24 Apr 2026 13:13:03 -0400 (EDT) X-Spam-Checker-Version: SpamAssassin 4.0.1 (2024-03-25) on simark.ca X-Spam-Level: X-Spam-Status: No, score=-3.4 required=5.0 tests=ARC_SIGNED,ARC_VALID,BAYES_00, DKIMWL_WL_HIGH,DKIM_SIGNED,DKIM_VALID,DKIM_VALID_AU,MAILING_LIST_MULTI, RCVD_IN_DNSWL_MED,RCVD_IN_VALIDITY_CERTIFIED_BLOCKED, RCVD_IN_VALIDITY_RPBL_BLOCKED,RCVD_IN_VALIDITY_SAFE_BLOCKED autolearn=ham autolearn_force=no version=4.0.1 Received: from vm01.sourceware.org (vm01.sourceware.org [38.145.34.32]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange x25519 server-signature ECDSA (prime256v1) server-digest SHA256) (No client certificate requested) by simark.ca (Postfix) with ESMTPS id C3FFF1E093 for ; Fri, 24 Apr 2026 13:13:02 -0400 (EDT) Received: from vm01.sourceware.org (localhost [127.0.0.1]) by sourceware.org (Postfix) with ESMTP id 4C9244BB593E for ; Fri, 24 Apr 2026 17:13:02 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 4C9244BB593E Authentication-Results: sourceware.org; dkim=pass (1024-bit key, unprotected) header.d=redhat.com header.i=@redhat.com header.a=rsa-sha256 header.s=mimecast20190719 header.b=ZoRlrOtR Received: from us-smtp-delivery-124.mimecast.com (us-smtp-delivery-124.mimecast.com [170.10.129.124]) by sourceware.org (Postfix) with ESMTP id 6539D4BAD14F for ; Fri, 24 Apr 2026 17:12:34 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.2 sourceware.org 6539D4BAD14F Authentication-Results: sourceware.org; dmarc=pass (p=quarantine dis=none) header.from=redhat.com Authentication-Results: sourceware.org; spf=pass smtp.mailfrom=redhat.com ARC-Filter: OpenARC Filter v1.0.0 sourceware.org 6539D4BAD14F Authentication-Results: server2.sourceware.org; arc=none smtp.remote-ip=170.10.129.124 ARC-Seal: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1777050754; cv=none; b=uPCEQrJLGhyoXo7qwqeEYY3UQWMITXF7LQmTZVOAMhc59hnGhgXRiL0nV7cFitdLRxr6G4GYsQU/0DU3Ex9sLpsp7YEV3IaNzSs0tFjkty3W1QMq/VjAkhurC5Trz3lTcUXb5jTrgJ9x1QCn0+VfWKsqUTokoU2/C1+j/V53mGQ= ARC-Message-Signature: i=1; a=rsa-sha256; d=sourceware.org; s=key; t=1777050754; c=relaxed/simple; bh=cZ2h72mgziBRfEByppvu7o41kE4beT/Zwp8H1ovFofM=; h=DKIM-Signature:Message-ID:Date:MIME-Version:Subject:To:From; b=Om/oBG+EKsA2FPWigzMAxDq/XOPxGkcVjYwdprUKi3gNjhv0oRqQXiq5kyyTOAMHR6mIGnyz8YHiG6jhnxEaec1i3qz4jjpnI501jao2Gi1rAvYv7Tm5v6KssZiEnmd19rFzTfYo0zqdc/9fXXMQp/XmM9FhgHRWWWX+F+ubdSo= ARC-Authentication-Results: i=1; server2.sourceware.org DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org 6539D4BAD14F DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=redhat.com; s=mimecast20190719; t=1777050753; h=from:from:reply-to:subject:subject:date:date:message-id:message-id: to:to:cc:cc:mime-version:mime-version:content-type:content-type: content-transfer-encoding:content-transfer-encoding: in-reply-to:in-reply-to:references:references; bh=qVjVICOnsyLENwi96DoWWNV72pBLAan0TvtfVqc3Pf8=; b=ZoRlrOtRVHGf4q93Tfuaf7wo41zpTMdpd9jmwY4S77Asrt6WToSm/AxJ3mSTqCnAyRS5GJ rf/qjlXWOtoQIv94aM248SgJV3BDtuW+vKiLqE3GVeIG+uBbRvbHrg69kIopMQT9386LeP 48TO/6rjZaBpiipvBX7N/z8d7wGjnko= Received: from mail-vk1-f198.google.com (mail-vk1-f198.google.com [209.85.221.198]) by relay.mimecast.com with ESMTP with STARTTLS (version=TLSv1.3, cipher=TLS_AES_256_GCM_SHA384) id us-mta-385-8B6PflU2PdeJuZnfA1EXRA-1; Fri, 24 Apr 2026 13:12:32 -0400 X-MC-Unique: 8B6PflU2PdeJuZnfA1EXRA-1 X-Mimecast-MFC-AGG-ID: 8B6PflU2PdeJuZnfA1EXRA_1777050752 Received: by mail-vk1-f198.google.com with SMTP id 71dfb90a1353d-56b6751339fso8152506e0c.1 for ; Fri, 24 Apr 2026 10:12:32 -0700 (PDT) X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20251104; t=1777050752; x=1777655552; h=content-transfer-encoding:in-reply-to:from:content-language :references:cc:to:subject:user-agent:mime-version:date:message-id :x-gm-gg:x-gm-message-state:from:to:cc:subject:date:message-id :reply-to; bh=qVjVICOnsyLENwi96DoWWNV72pBLAan0TvtfVqc3Pf8=; b=UTH9y7iMqV+/cohYMErZA7GFGHUukmue2bupVjyHkwXz8w8/zeYOdCxiSQgCASVJiW 0KEYgrGeptLRHz/AKKstWZkpKoDE1TJXxWlorCOOu7fshwBUue9AE2gsP7IjsNJiVnOq LAtFdkYQHGCPL0JSvTqAg7vGDBkBjbISgDClrt9OGLjF9hbrT+TDlIMW5tbqJ3wCn3yu 02mwc0E8umvVru2SWaaNtBmtiBE7pdv9jANBrOFCfvxA8hAmR8OgSKoYW6sJr1W5Qh3b vOeyIWntcGmH8XGhtMymSxtiWLZJ5sCnBeMIyYnn4wDLZWLAs1po9swPnR4IH+f5gB1N lpaA== X-Forwarded-Encrypted: i=1; AFNElJ+2S5E2ihimhnesH6W+W3lx7i6vFes9P4mUWL7V5LtzMP4NkOuGwUAJI/uLjh8lGYW0hJL2oVeSHQ3RXA==@sourceware.org X-Gm-Message-State: AOJu0YxLGyBBC27r3EiY71Vr5BNcdyOs95S8gljeamOtbMxmzzVpzzgE DxaOFPcAXhDd0je/1Rnu4Y+XMMBVNYh/Kd5uq4dz76IFlJIXs85+hsHOZXIiPSVQCt606Nt+y/+ a5qyVn1vu5CMwwB6HGCGP92SiMaFyqAJw0tSRBooRc5yosoO/2DBSwB/b9P6zJaHmyZyobg4= X-Gm-Gg: AeBDievtR21wT/HZGyTnLmQ4ohQX4mym15j/iSAFNLxeBJ3PHxtsFyuOnaQC5R80cZd JD7UX7pyRUgQ62c+yvVZV86CVRf4QUnWGK68aTtXu+KjzC4OBhK8oEUmQvRkYFU9qsTFNaBfgxU Sin06LzMwFIZ5HFWHlSpTtmskuyFRexQFza0yB7UVPvFO1Uk/y0zBEeEnasauHGGVsdRbE7VutG tktB6DwB6fCDl4XgVfPKT8ueWmi7iEQXBzVq54rQRH8O6Z9IYD0vs3KwLb4tSgHiwV4pWH3heA/ kzqqOmKWZg6RelQYJPqxSMNZ4YCs7h+JNUiWmDcAylgL4dqCZv/fwd8xCzW7sRL6bboP1qx/Yaz imOH+xghS1qJhjo4YWigXe6hD3Id3j9to4HSTy7Lg/Q== X-Received: by 2002:a05:6122:83f3:b0:56f:696a:4fec with SMTP id 71dfb90a1353d-56fa66aeb06mr12032892e0c.5.1777050751681; Fri, 24 Apr 2026 10:12:31 -0700 (PDT) X-Received: by 2002:a05:6122:83f3:b0:56f:696a:4fec with SMTP id 71dfb90a1353d-56fa66aeb06mr12032883e0c.5.1777050751073; Fri, 24 Apr 2026 10:12:31 -0700 (PDT) Received: from ?IPV6:2804:14d:8084:993e::75d? ([2804:14d:8084:993e::75d]) by smtp.gmail.com with ESMTPSA id 71dfb90a1353d-56fa92078adsm13285268e0c.7.2026.04.24.10.12.27 (version=TLS1_3 cipher=TLS_AES_128_GCM_SHA256 bits=128/128); Fri, 24 Apr 2026 10:12:30 -0700 (PDT) Message-ID: <8eff7331-d77d-400a-a1e0-5bde5e9219c0@redhat.com> Date: Fri, 24 Apr 2026 14:12:25 -0300 MIME-Version: 1.0 User-Agent: Mozilla Thunderbird Subject: Re: [PATCH 4/4] gdb/aarch64: record/replay support for LSE128 To: Ezra.Sitorus@arm.com, gdb-patches@sourceware.org Cc: luis.machado.foss@gmail.com, thiago.bauermann@linaro.org References: <20260420215232.68675-1-Ezra.Sitorus@arm.com> <20260420215232.68675-5-Ezra.Sitorus@arm.com> From: Guinevere Larsen In-Reply-To: <20260420215232.68675-5-Ezra.Sitorus@arm.com> X-Mimecast-Spam-Score: 0 X-Mimecast-MFC-PROC-ID: 48o0JEJjP05pwMOgEzusiXmXPNiK199k89mxWDJ6oSQ_1777050752 X-Mimecast-Originator: redhat.com Content-Language: en-US Content-Type: text/plain; charset=UTF-8; format=flowed Content-Transfer-Encoding: 7bit X-BeenThere: gdb-patches@sourceware.org X-Mailman-Version: 2.1.30 Precedence: list List-Id: Gdb-patches mailing list List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: gdb-patches-bounces~public-inbox=simark.ca@sourceware.org On 4/20/26 6:52 PM, Ezra.Sitorus@arm.com wrote: > From: Ezra Sitorus > > FEAT_LSE128 introduces support for 128-bit atomic instructions. This > patch teaches GDB to decode these instructions for recording and > reversing. > > Regression tested on aarch64-none-linux-gnu on QEMU with LSE128 support. > I observe unrelated regressions that appear to be environmental rather > than caused by this patch. Hi Ezra! Thanks for working on this :) Once again, my only feedback is the use of the register keyword > --- > gdb/aarch64-tdep.c | 13 ++ > gdb/testsuite/gdb.reverse/aarch64-lse128.c | 139 +++++++++++++++++++ > gdb/testsuite/gdb.reverse/aarch64-lse128.exp | 138 ++++++++++++++++++ > gdb/testsuite/lib/gdb.exp | 56 ++++++++ > 4 files changed, 346 insertions(+) > create mode 100644 gdb/testsuite/gdb.reverse/aarch64-lse128.c > create mode 100644 gdb/testsuite/gdb.reverse/aarch64-lse128.exp > > diff --git a/gdb/aarch64-tdep.c b/gdb/aarch64-tdep.c > index 61c462979b3..aff8b294bd5 100644 > --- a/gdb/aarch64-tdep.c > +++ b/gdb/aarch64-tdep.c > @@ -6004,6 +6004,19 @@ aarch64_record_load_store (aarch64_insn_decode_record *aarch64_insn_r) > else if ((insn_bits24_27 & 1) == 1 && insn_bits28_29 == 1 > && insn_bits10_11 == 1 && !insn_bit21) > return aarch64_record_memcopy_memset (aarch64_insn_r); > + /* Large System Extension 128 (LSE128) instructions. */ > + else if (vector_flag == 0 && insn_bits10_11 == 0 && insn_bit21 > + && size_bits == 0 && !bit (aarch64_insn_r->aarch64_insn, 29) > + && bits (aarch64_insn_r->aarch64_insn, 24, 25) == 0x1) > + { > + regcache_raw_read_unsigned (aarch64_insn_r->regcache, reg_rn, &address); > + record_buf_mem[0] = 128 >> 3; > + record_buf_mem[1] = address; > + aarch64_insn_r->mem_rec_count = 1; > + record_buf[0] = reg_rt; > + record_buf[1] = bits (aarch64_insn_r->aarch64_insn, 16, 20); > + aarch64_insn_r->reg_rec_count = 2; > + } > /* Advanced SIMD load/store instructions. */ > else > return aarch64_record_asimd_load_store (aarch64_insn_r); > diff --git a/gdb/testsuite/gdb.reverse/aarch64-lse128.c b/gdb/testsuite/gdb.reverse/aarch64-lse128.c > new file mode 100644 > index 00000000000..906c303d904 > --- /dev/null > +++ b/gdb/testsuite/gdb.reverse/aarch64-lse128.c > @@ -0,0 +1,139 @@ > +/* This test program is part of GDB, the GNU debugger. > + > + Copyright 2024-2026 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 . */ > + > +#include > +#include > +#include > + > +#define INITIAL_STRING "This is just some string." > +#define BUF_SIZE sizeof (INITIAL_STRING) > + > +#define PREPARE_REGS(X, Y) \ > + strcpy (src, INITIAL_STRING); \ > + __asm__ volatile ("mov %0, %1\n" : "=r"(xa): "r"(X):); \ > + __asm__ volatile ("mov %0, %1\n" : "=r"(xb): "r"(Y):); \ > + ptr = (uint64_t *)src; \ > + > +int > +main (void) > +{ > + alignas(16) char src[BUF_SIZE]; > + > + register uint64_t xa asm ("x19"); > + register uint64_t xb asm ("x20"); > + register uint64_t *ptr asm ("x21"); > + uint64_t a = 0x0123456789abcdef; > + uint64_t b = 0xfedbca9876543210; > + > + PREPARE_REGS (a, b); > + /* Before ldclrp. */ > + __asm__ volatile ("ldclrp %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After ldclrp. */ > + > + PREPARE_REGS (a, b); > + /* Before ldclrpa. */ > + __asm__ volatile ("ldclrpa %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After ldclrpa. */ > + > + PREPARE_REGS (a, b); > + /* Before ldclrpal. */ > + __asm__ volatile ("ldclrpal %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After ldclrpal. */ > + > + PREPARE_REGS (a, b); > + /* Before ldclrpl. */ > + __asm__ volatile ("ldclrpl %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After ldclrpl. */ > + > + PREPARE_REGS (a, b); > + /* Before ldsetp. */ > + __asm__ volatile ("ldsetp %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After ldsetp. */ > + > + PREPARE_REGS (a, b); > + /* Before ldsetpa. */ > + __asm__ volatile ("ldsetpa %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After ldsetpa. */ > + > + PREPARE_REGS (a, b); > + /* Before ldsetpal. */ > + __asm__ volatile ("ldsetpal %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After ldsetpal. */ > + > + PREPARE_REGS (a, b); > + /* Before ldsetpl. */ > + __asm__ volatile ("ldsetpl %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After ldsetpl. */ > + > + PREPARE_REGS (a, b); > + /* Before swpp. */ > + __asm__ volatile ("swpp %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After swpp. */ > + > + PREPARE_REGS (a, b); > + /* Before swppa. */ > + __asm__ volatile ("swppa %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After swppa. */ > + > + PREPARE_REGS (a, b); > + /* Before swppal. */ > + __asm__ volatile ("swppal %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After swppal. */ > + > + PREPARE_REGS (a, b); > + /* Before swppl. */ > + __asm__ volatile ("swppl %0, %1, [%2]\n" > + : "+r"(xa), "+r"(xb) > + : "r"(ptr) > + : "memory"); > + /* After swppl. */ > + > + return 0; > +} > diff --git a/gdb/testsuite/gdb.reverse/aarch64-lse128.exp b/gdb/testsuite/gdb.reverse/aarch64-lse128.exp > new file mode 100644 > index 00000000000..273e239ec66 > --- /dev/null > +++ b/gdb/testsuite/gdb.reverse/aarch64-lse128.exp > @@ -0,0 +1,138 @@ > +# Copyright 2024-2026 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 . > + > +# Test instruction record for AArch64 FEAT_LSE128 instructions. > +# Based on gdb.reverse/aarch64-mops.exp > +# > +# The basic flow of the record tests are: > +# 1) Stop before executing the instructions of interest. Record > +# the initial value of the registers that the instruction will > +# change, i.e. the destination register. > +# 2) Execute the instructions. Record the new value of the > +# registers that changed. > +# 3) Reverse the direction of the execution and execute back to > +# just before the instructions of interest. Record the final > +# value of the registers of interest. > +# 4) Check that the initial and new values of the registers are > +# different, i.e. the instruction changed the registers as expected. > +# 5) Check that the initial and final values of the registers are > +# the same, i.e. GDB record restored the registers to their > +# original values. > + > +standard_testfile > + > +require allow_aarch64_lse128_tests > + > +if { > + [prepare_for_testing "failed to prepare" ${testfile} ${srcfile} \ > + [list debug additional_flags=-march=armv8-a+lse128]] > +} { > + return -1 > +} > + > +if {![runto_main]} { > + return -1 > +} > + > +gdb_test_no_output "record full" > + > +proc test_single_asm {insn} { > + global decimal hex > + > + set before_seq [gdb_get_line_number "Before ${insn}"] > + set after_seq [gdb_get_line_number "After ${insn}"] > + set regs { x19 x20 } > + > + gdb_test "break $before_seq" \ > + "Breakpoint $decimal at $hex: file .*/aarch64-lse128.c, line $decimal\\." \ > + "$insn: break before instruction sequence" > + gdb_continue_to_breakpoint "$insn: about to execute instruction sequence" \ > + [multi_line ".*/aarch64-lse128.c:$decimal" \ > + "$decimal\[ \t\]+__asm__ volatile \\(\"${insn} \[^\r\n\]+\""] > + > + # Depending on the compiler, the line number information may put GDB a few > + # instructions before the beginning of the asm statement. > + arrive_at_instruction $insn > + # Add a breakpoint that we're sure is at the prologue instruction. > + gdb_test "break *\$pc" \ > + "Breakpoint $decimal at $hex: file .*/aarch64-lse128.c, line $decimal\\." \ > + "$insn: break at prologue instruction" > + > + # Record the initial memory and register values. > + foreach r $regs { > + set ${r}_initial [capture_command_output "info register $r" ""] > + } > + set ptr_initial [capture_command_output "x/4gwx ptr" ""] > + > + gdb_test "break $after_seq" \ > + "Breakpoint $decimal at $hex: file .*/aarch64-lse128.c, line $decimal\\." \ > + "$insn: break after instruction sequence" > + gdb_continue_to_breakpoint "$insn: executed instruction sequence" \ > + [multi_line ".*/aarch64-lse128.c:$decimal" ".*"] > + > + # Record the new memory and register values. > + foreach r $regs { > + set ${r}_new [capture_command_output "info register $r" ""] > + } > + set ptr_new [capture_command_output "x/4gwx ptr" ""] > + > + # Execute in reverse to before the instruction sequence. > + gdb_test_no_output "set exec-direction reverse" > + > + gdb_continue_to_breakpoint "reversed execution of instruction sequence" \ > + [multi_line ".*/aarch64-lse128.c:$decimal" \ > + "$decimal\[ \t\]+__asm__ volatile \\(\"${insn} \[^\r\n\]+\""] > + > + # Record the final memory and register values. > + foreach r $regs { > + set ${r}_final [capture_command_output "info register $r" ""] > + } > + set ptr_final [capture_command_output "x/4gwx ptr" ""] > + > + foreach v [concat $regs {ptr}] { > + gdb_assert ![string compare [set ${v}_initial] [set ${v}_final]] \ > + "$insn: check $v initial value versus $v final value" > + gdb_assert [string compare [set ${v}_initial] [set ${v}_new]] \ > + "$insn: check $v initial value versus $v new value" > + } > + > + # Restore forward execution and go to end of recording. > + gdb_test_no_output "set exec-direction forward" > + gdb_test "record goto end" \ > + [multi_line \ > + "Go forward to insn number $decimal" \ > + "#0 main \\(\\) at .*/aarch64-lse128.c:$decimal" \ > + ".*"] > +} > + > +set cases { > + { ldclrp } > + { ldclrpa } > + { ldclrpal } > + { ldclrpl } > + { ldsetp } > + { ldsetpa } > + { ldsetpal } > + { ldsetpl } > + { swpp } > + { swppa } > + { swppal } > + { swppl } > +} > + > +foreach c $cases { > + lassign $c insn > + test_single_asm $insn > +} > diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp > index 7d400e9028a..d5f9008470a 100644 > --- a/gdb/testsuite/lib/gdb.exp > +++ b/gdb/testsuite/lib/gdb.exp > @@ -5402,6 +5402,62 @@ gdb_caching_proc allow_aarch64_cssc_tests {} { > return $allow_cssc_tests > } > > +# Run a test on the target to see if it supports the AArch64 LSE128 feature. > +# Return 1 if so, 0 if it does not. Note this causes a restart of GDB. > + > +gdb_caching_proc allow_aarch64_lse128_tests {} { > + global srcdir subdir gdb_prompt inferior_exited_re > + > + set me "allow_aarch64_lse128_tests" > + > + if { ![is_aarch64_target]} { > + return 0 > + } > + > + set compile_flags "{additional_flags=-march=armv8-a+lse128}" > + > + # Compile a test program reading LSE128. > + set src { > + #include > + > + int main() { > + __attribute__((aligned(16))) uint64_t mem[2] = { 0x0, 0x1 }; > + uint64_t *ptr = mem; > + __asm__ volatile ("ldclrp x0, x1, [%0]\n" :: "r"(ptr) : "x0", "x1", "memory"); > + return 0; > + } > + } > + > + if {![gdb_simple_compile $me $src executable $compile_flags]} { > + return 0 > + } > + > + # Compilation succeeded so now run it via gdb. > + clean_restart > + gdb_load $obj > + gdb_run_cmd > + > + gdb_expect { > + -re ".*Illegal instruction.*${gdb_prompt} $" { > + verbose -log "\n$me lse128 support not detected" > + set allow_lse128_tests 0 > + } > + -re ".*$inferior_exited_re normally.*${gdb_prompt} $" { > + verbose -log "\n$me: lse128 support detected" > + set allow_lse128_tests 1 > + } > + default { > + warning "\n$me: default case taken" > + set allow_lse128_tests 0 > + } > + } > + gdb_exit > + remote_file build delete $obj > + > + verbose "$me: returning $allow_lse128_tests" 2 > + return $allow_lse128_tests > +} > + > # Run a test on the target to see if it supports AArch64 MOPS (Memory > # Operations) extensions. Return 1 if so, 0 if it does not. Note this > # causes a restart of GDB. -- Cheers, Guinevere Larsen It/she