sme2: Extend SME tests to include SME2
authorLuis Machado <luis.machado@arm.com>
Fri, 16 Jun 2023 14:02:39 +0000 (15:02 +0100)
committerLuis Machado <luis.machado@arm.com>
Wed, 4 Oct 2023 15:23:41 +0000 (16:23 +0100)
Reusing the SME tests, this patch introduces additional tests to exercise
reading/writing ZT0, availability of the register set, signal context reading
for ZT0 and also core file generation.

Reviewed-by: Thiago Jung Bauermann <thiago.bauermann@linaro.org>
gdb/testsuite/gdb.arch/aarch64-sme-core.c
gdb/testsuite/gdb.arch/aarch64-sme-core.exp.tcl
gdb/testsuite/gdb.arch/aarch64-sme-regs-available.exp.tcl
gdb/testsuite/gdb.arch/aarch64-sme-regs-sigframe.c
gdb/testsuite/gdb.arch/aarch64-sme-regs-sigframe.exp.tcl
gdb/testsuite/gdb.arch/aarch64-sme-regs-unavailable.exp.tcl
gdb/testsuite/gdb.arch/aarch64-sme-sanity.c
gdb/testsuite/lib/aarch64-scalable.exp

index d71d18ebd3b98d83275684353bb12e076c03e53e..fcb14670e0d27ffe617ad20fed3a2dfbd76222a2 100644 (file)
 #define HWCAP2_SME (1 << 23)
 #endif
 
+#ifndef HWCAP2_SME2
+#define HWCAP2_SME2 (1UL << 37)
+#define HWCAP2_SME2P1 (1UL << 38)
+#endif
+
 #ifndef PR_SVE_SET_VL
 #define PR_SVE_SET_VL 50
 #define PR_SVE_GET_VL 51
@@ -145,6 +150,27 @@ initialize_za_state ()
   __asm __volatile ("bne loop");
 }
 
+static void
+initialize_zt_state ()
+{
+  unsigned long hwcap2 = getauxval (AT_HWCAP2);
+
+  if (!(hwcap2 & HWCAP2_SME2) && !(hwcap2 & HWCAP2_SME2P1))
+    return;
+
+  char buffer[64];
+
+  for (int i = 0; i < 64; i++)
+    buffer[i] = 0xff;
+
+  __asm __volatile ("mov x0, %0\n\t" \
+                   : : "r" (buffer));
+
+  /* Initialize ZT0.  */
+  /* ldr zt0, x0 */
+  __asm __volatile (".word 0xe11f8000");
+}
+
 static void
 initialize_tpidr2 ()
 {
@@ -273,8 +299,8 @@ static int set_svl_size (int new_svl)
    0 - FPSIMD
    1 - SVE
    2 - SSVE
-   3 - ZA
-   4 - ZA and SSVE.  */
+   3 - ZA (+ SME2 ZT0)
+   4 - ZA and SSVE (+ SME2 ZT0).  */
 
 void enable_states (int state)
 {
@@ -295,6 +321,7 @@ void enable_states (int state)
     {
       enable_za ();
       initialize_za_state ();
+      initialize_zt_state ();
     }
   else if (state == 4)
     {
@@ -302,6 +329,7 @@ void enable_states (int state)
       enable_sm ();
       initialize_sve_state ();
       initialize_za_state ();
+      initialize_zt_state ();
     }
 
   return;
index 02d8c13af81d9ab93cea7333ddb38b9b5d3aff1b..135f975261822ab544a6a1ae0cb0a0a4fa86dd52 100644 (file)
@@ -13,7 +13,7 @@
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 #
-# Exercise core file reading/writing in the presence of SME support.
+# Exercise core file reading/writing in the presence of SME and SME2 support.
 # This test exercises GDB's dumping/loading capability for Linux
 # Kernel core files and for gcore core files.
 
index a7b36402dff410cce308de01ba536977026172ca..c3deecaa5389f76f8976dbcc9b2427e6cac4b215 100644 (file)
@@ -14,6 +14,7 @@
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.
 
 # Exercise reading/writing ZA registers when there is ZA state.
+# Exercise reading/writing to ZT0 when there is ZA state available.
 
 load_lib aarch64-scalable.exp
 
@@ -119,6 +120,22 @@ proc check_regs { mode vl svl } {
        set last_slice [expr ($last_slice / 2)]
        set num_elements [expr $num_elements / 2]
     }
+
+    # Exercise reading/writing from/to SME2 registers.
+    if [is_sme2_available] {
+      # The target supports SME2.
+      set zt_size 64
+      gdb_test "print sizeof \$zt0" " = $zt_size"
+
+      # Initially, when ZA is activated, ZT0 will be all zeroes.
+      set zt_pattern [string_to_regexp [1d_array_value_pattern 0 $zt_size]]
+      gdb_test "print \$zt0" " = $zt_pattern" "validate zeroed zt0"
+
+      # Validate that writing to ZT0 does the right thing.
+      initialize_1d_array "\$zt0" 255 $zt_size
+      set zt_pattern [string_to_regexp [1d_array_value_pattern 255 $zt_size]]
+      gdb_test "print \$zt0" " = $zt_pattern" "read back from zt0"
+    }
 }
 
 #
index 9bc3e9c16fc9511663a65c6f679c82e0e4970b9f..8f0827cf83a639c40125cab6c866d62d491a1272 100644 (file)
 #define HWCAP2_SME (1 << 23)
 #endif
 
+#ifndef HWCAP2_SME2
+#define HWCAP2_SME2 (1UL << 37)
+#define HWCAP2_SME2P1 (1UL << 38)
+#endif
+
 #ifndef PR_SVE_SET_VL
 #define PR_SVE_SET_VL 50
 #define PR_SVE_GET_VL 51
@@ -152,6 +157,27 @@ initialize_za_state ()
   __asm __volatile ("bne loop");
 }
 
+static void
+initialize_zt_state ()
+{
+  unsigned long hwcap2 = getauxval (AT_HWCAP2);
+
+  if (!(hwcap2 & HWCAP2_SME2) && !(hwcap2 & HWCAP2_SME2P1))
+    return;
+
+  char buffer[64];
+
+  for (int i = 0; i < 64; i++)
+    buffer[i] = 0xff;
+
+  __asm __volatile ("mov x0, %0\n\t" \
+                   : : "r" (buffer));
+
+  /* Initialize ZT0.  */
+  /* ldr zt0, x0 */
+  __asm __volatile (".word 0xe11f8000");
+}
+
 static void
 initialize_sve_state ()
 {
@@ -271,8 +297,8 @@ static int set_svl_size (int new_svl)
    0 - FPSIMD
    1 - SVE
    2 - SSVE
-   3 - ZA
-   4 - ZA and SSVE.  */
+   3 - ZA (+ SME2 ZT0)
+   4 - ZA and SSVE (+ SME2 ZT0).  */
 
 void enable_states (int state)
 {
@@ -293,6 +319,7 @@ void enable_states (int state)
     {
       enable_za ();
       initialize_za_state ();
+      initialize_zt_state ();
     }
   else if (state == 4)
     {
@@ -300,6 +327,7 @@ void enable_states (int state)
       enable_sm ();
       initialize_sve_state ();
       initialize_za_state ();
+      initialize_zt_state ();
     }
 
   return;
index 62b90761c39c97c25e013665d071d823752db030..2dadcc684559941e5266bdec38b67d5e4eb22ee7 100644 (file)
@@ -98,10 +98,12 @@ proc test_sme_registers_sigframe { id_start id_end } {
            # Check the value of SVCR.
            gdb_test "print \$svcr" [get_svcr_value $state] "svcr before signal"
 
-           # Handle SME ZA initialization and state.
+           # Handle SME ZA and SME2 initialization and state.
            set byte 0
+           set sme2_byte 0
            if { $state == "za" || $state == "za_ssve" } {
                set byte 170
+               set sme2_byte 255
            }
 
            # Set the expected ZA pattern.
@@ -168,6 +170,15 @@ proc test_sme_registers_sigframe { id_start id_end } {
 
            # Check the value of TPIDR2 in the signal frame.
            gdb_test "print/x \$tpidr2" " = 0x102030405060708" "tpidr2 contents from signal frame"
+
+           # Check the value of SME2 ZT0 in the signal frame.
+           if [is_sme2_available] {
+               # The target supports SME2.
+               set zt_size 64
+               gdb_test "print sizeof \$zt0" " = $zt_size"
+               set zt_pattern [string_to_regexp [1d_array_value_pattern $sme2_byte $zt_size]]
+               gdb_test "print \$zt0" " = $zt_pattern" "zt contents from signal frame"
+           }
        }
     }
 }
index faeec4c2901a846cb55ee3322d0fcf2f82fe47eb..843f8c8d3c99a0414fd0e3896ef7a8832df6a9be 100644 (file)
@@ -17,6 +17,7 @@
 # - Printing ZA registers when there is no ZA state.
 # - Setting values of ZA registers when there is no ZA state.
 # - Validating ZA state is activated when we write to ZA registers.
+# - Validate that reading ZT0 without an active ZA state works as expected.
 
 load_lib aarch64-scalable.exp
 
@@ -89,6 +90,17 @@ proc_with_prefix check_regs { vl svl } {
        set expected_size [expr $expected_size / 2]
        set elements [expr ($elements / 2)]
     }
+
+    # Exercise reading from SME2 registers.
+    if [is_sme2_available] {
+       # The target supports SME2.
+       set zt_size 64
+       gdb_test "print sizeof \$zt0" " = $zt_size"
+
+       # If ZA is not active, ZT0 will always be zero.
+       set zt_pattern [string_to_regexp [1d_array_value_pattern 0 $zt_size]]
+       gdb_test "print \$zt0" " = $zt_pattern"
+    }
 }
 
 #
index 694de0626d2fe4b45689e01f6a196a6cc4c5155c..71b46b17855c3a0bd7cb31485767e5ed9f1db1f9 100644 (file)
 #define HWCAP2_SME (1 << 23)
 #endif
 
+#ifndef HWCAP2_SME2
+#define HWCAP2_SME2 (1UL << 37)
+#define HWCAP2_SME2P1 (1UL << 38)
+#endif
+
 static void
 enable_za ()
 {
@@ -131,6 +136,27 @@ initialize_za_state ()
   __asm __volatile ("bne loop");
 }
 
+static void
+initialize_zt_state ()
+{
+  unsigned long hwcap2 = getauxval (AT_HWCAP2);
+
+  if (!(hwcap2 & HWCAP2_SME2) && !(hwcap2 & HWCAP2_SME2P1))
+    return;
+
+  char buffer[64];
+
+  for (int i = 0; i < 64; i++)
+    buffer[i] = 0xff;
+
+  __asm __volatile ("mov x0, %0\n\t" \
+                   : : "r" (buffer));
+
+  /* Initialize ZT0.  */
+  /* ldr zt0, x0 */
+  __asm __volatile (".word 0xe11f8000");
+}
+
 static void
 initialize_sve_state ()
 {
@@ -190,8 +216,8 @@ initialize_sve_state ()
    0 - FPSIMD
    1 - SVE
    2 - SSVE
-   3 - ZA
-   4 - ZA and SSVE.  */
+   3 - ZA (+ SME2 ZT0)
+   4 - ZA and SSVE (+ SME2 ZT0).  */
 
 void enable_states (int state)
 {
@@ -212,6 +238,7 @@ void enable_states (int state)
     {
       enable_za ();
       initialize_za_state ();
+      initialize_zt_state ();
     }
   else if (state == 4)
     {
@@ -219,6 +246,7 @@ void enable_states (int state)
       enable_sm ();
       initialize_sve_state ();
       initialize_za_state ();
+      initialize_zt_state ();
     }
 
   return;
index 1be691949d2cbf3160b0dd22ab6e97fb4d0f493b..f77daec23086fb2bc22c0a4cf7276c9b02190f3f 100644 (file)
@@ -186,6 +186,18 @@ proc check_sme_regs { byte state svl } {
     gdb_test "print \$za" $za_pattern
 }
 
+#
+# Validate the values of the SME2 registers.
+#
+proc check_sme2_regs { byte } {
+    # The size of the ZT registers should always be fixed to 64 bytes.
+    set zt_size 64
+    gdb_test "print sizeof \$zt0" " = $zt_size"
+    # Check that we have the expected pattern of bytes for the ZT registers.
+    set zt_pattern [string_to_regexp [1d_array_value_pattern $byte $zt_size]]
+    gdb_test "print \$zt0" $zt_pattern
+}
+
 #
 # With register STATE, vector length VL and streaming vector length SVL,
 # run some register state checks to make sure the values are the expected
@@ -200,6 +212,9 @@ proc check_state { state vl svl } {
     #
     # The SME (ZA) register is initialized with a value of 0xaa (170) for
     # each byte.
+    #
+    # The SME2 (ZT) registers are initialized with a value of 0xff (255) for
+    # each byte.
 
     # Check VG to make sure it is correct
     set expected_vg [expr $vl / 8]
@@ -234,4 +249,35 @@ proc check_state { state vl svl } {
     check_sve_regs $sve_byte $state $vl $svl
     # Check SME registers
     check_sme_regs 170 $state $svl
+
+    # Check SME2 registers
+    if [is_sme2_available] {
+       # The SME2 ZT0 register will always be zero, except when ZA is active.
+       set sme2_byte 0
+       if {$state == "za" || $state == "za_ssve"} {
+           set sme2_byte 255
+       }
+
+       # The target supports SME2, so check the ZT register values.
+       check_sme2_regs $sme2_byte
+    }
+}
+
+#
+# Return 1 if SME2 is available (meaning the ZT0 register exists).
+# Return 0 otherwise.
+#
+proc is_sme2_available { } {
+
+    # Does the ZT0 register exist?
+    gdb_test_multiple "print \$zt0" "" {
+       -re " = void.*${::gdb_prompt} $" {
+           # SME2 is not available.
+           return 0
+       }
+       -re " = {.*}\r\n${::gdb_prompt} $" {
+           # SME2 is available.
+           return 1
+       }
+    }
 }