gdb/testsuite: make gdb.reverse/i386-avx-reverse.exp require also avx2

The test gdb.reverse/i386-avx-reverse.exp requires CPU to have AVX
instructions but it actually also uses AVX2 instructions (like
vpcmpeqd). This caused the test to fail on CPUs that have AVX but not
AVX2.

This commit adds check for AVX2.

Tested on Intel Xeon CPU E3-1265L (no AVX2) and Intel Core i7-1355U
(has AVX2).

diff --git a/gdb/testsuite/gdb.reverse/i386-avx-reverse.exp b/gdb/testsuite/gdb.reverse/i386-avx-reverse.exp
index 11532afe344b8eee05f9373e135aa0bd2f4a0a34..2b2371d2cd1ae0e2aedb820796c26ef0c0c51395 100644 (file)
--- a/gdb/testsuite/gdb.reverse/i386-avx-reverse.exp
+++ b/gdb/testsuite/gdb.reverse/i386-avx-reverse.exp
@@ -22,6 +22,7 @@
 
 require supports_reverse
 require have_avx
+require have_avx2
 
 # TODO: this is the case because I used xmm15 all over the test.
 # Some parts of the test require xmm15 to validate some code paths, but

diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp
index 85747b2beaa4ff8969e334ad0e20042c6df2a171..10d7a75631c1afbd4f820db232ba3856f04c2c61 100644 (file)
--- a/gdb/testsuite/lib/gdb.exp
+++ b/gdb/testsuite/lib/gdb.exp
@@ -10428,6 +10428,51 @@ gdb_caching_proc have_avx {} {
     return $status
 }
 
+# Return 1 if target supports avx2, otherwise return 0.
+gdb_caching_proc have_avx2 {} {
+       global srcdir
+
+       set me "have_avx2"
+       if { ![istarget "i?86-*-*"] && ![istarget "x86_64-*-*"] } {
+           verbose "$me: target does not support avx2, returning 0" 2
+           return 0
+       }
+
+       # Compile a test program.
+       set src {
+          #include "nat/x86-cpuid.h"
+
+           int main() {
+             unsigned int eax, ebx, ecx, edx;
+
+           if (!x86_cpuid_count (7, 0, &eax, &ebx, &ecx, &edx))
+             return 0;
+
+           if ((ebx & bit_AVX2) == bit_AVX2)
+             return 1;
+           else
+             return 0;
+           }
+       }
+       set compile_flags "incdir=${srcdir}/.."
+       if {![gdb_simple_compile $me $src executable $compile_flags]} {
+           return 0
+       }
+
+       set target_obj [gdb_remote_download target $obj]
+       set result [remote_exec target $target_obj]
+       set status [lindex $result 0]
+       set output [lindex $result 1]
+       if { $output != "" } {
+           set status 0
+       }
+
+       remote_file build delete $obj
+
+       verbose "$me: returning $status" 2
+       return $status
+}
+
 # Called as
 # - require ARG...
 #