3 files changed, 76 insertions, 0 deletions
diff --git a/testsuite/systemtap.base/vta-test.c b/testsuite/systemtap.base/vta-test.c
new file mode 100644
index 00000000..70d965c4
--- /dev/null
+++ b/testsuite/systemtap.base/vta-test.c
@@ -0,0 +1,41 @@
+#include <stdlib.h>
+#include <sys/sdt.h>
+
+void
+t1 (int i)
+{
+  srandom (i);
+  i = 6;
+  srandom (i);
+  STAP_PROBE(test, t1);
+  srandom (i + 4);
+}
+
+void
+t2 (unsigned int i)
+{
+  srandom (i);
+  i = 0xdeadbeef;
+  srandom (i);
+  STAP_PROBE(test, t2);
+  srandom (i + 4);
+}
+
+void
+t3 (unsigned long long i)
+{
+  srandom (i);
+  i = 0xdeadbeef87654321LL;
+  srandom (i);
+  STAP_PROBE(test, t3);
+  srandom (i + 4);
+}
+
+int
+main (int argc, char **argv)
+{
+  t1 (42);
+  t2 (42);
+  t3 (42);
+  return 0;
+}
diff --git a/testsuite/systemtap.base/vta-test.exp b/testsuite/systemtap.base/vta-test.exp
new file mode 100644
index 00000000..d1fadb6a
--- /dev/null
+++ b/testsuite/systemtap.base/vta-test.exp
@@ -0,0 +1,34 @@
+set test "vta-test"
+set ::result_string {i: 0x6
+i: 0xdeadbeef
+i: 0xdeadbeef87654321}
+
+set test_flags "additional_flags=-g"
+set test_flags "$test_flags additional_flags=-O2"
+set test_flags "$test_flags additional_flags=-I$srcdir/../includes/sys"
+
+set res [target_compile $srcdir/$subdir/$test.c $test.exe executable "$test_flags"]
+if { $res != "" } {
+  verbose "target_compile failed: $res" 2
+  fail "$test.c compile"
+  untested "$test"
+  return
+} else {
+  pass "$test.c compile"
+}
+
+# Test only when we are running an install test (can execute) and when gcc
+# vta generated DW_OP_{stack|implicit}_values for us. See PR10417.
+if {[installtest_p] && [uprobes_p]} {
+  # See if GCC produce DW_OP_implicit_value and/or DW_OP_stack_value for us.
+  set regexp {[stack|implicit]_value}
+  if {![catch {exec readelf --debug-dump=loc vta-test.exe | egrep "$regexp"}]} {
+    setup_xfail 10417 "*-*-*"
+    stap_run $srcdir/$subdir/$test.stp -c ./$test.exe
+  } {
+    untested "$test (no-gcc-vta)"
+  }
+} else {
+  untested "$test"
+}
+catch {exec rm -f $test.exe}
diff --git a/testsuite/systemtap.base/vta-test.stp b/testsuite/systemtap.base/vta-test.stp
new file mode 100644
index 00000000..9f8527ee
--- /dev/null
+++ b/testsuite/systemtap.base/vta-test.stp
@@ -0,0 +1 @@
+probe process("vta-test.exe").mark("t1") { printf("i: 0x%x\n", $i) }