This is the mail archive of the
systemtap@sourceware.org
mailing list for the systemtap project.
Re: Results of systemtap-20080517 snapshot on ppc64
- From: Wenji Huang <wenji dot huang at oracle dot com>
- To: Srinivasa DS <srinivasa at in dot ibm dot com>
- Cc: systemtap at sources dot redhat dot com
- Date: Tue, 20 May 2008 09:51:34 +0800
- Subject: Re: Results of systemtap-20080517 snapshot on ppc64
- References: <48317377.8020302@in.ibm.com>
Srinivasa DS wrote:
Attaching results of systemtap-20080517 snapshot on ppc64. I have
applied one interim fix(present in bug#6429) and executed the tests.
Test Run By root on Mon May 19 15:43:30 2008
Native configuration is powerpc64-redhat-linux-gnu
=== systemtap tests ===
Host: Linux llm27lp1.in.ibm.com 2.6.26-rc3 #1 SMP Mon May 19 11:00:06
IST 2008 ppc64 ppc64ppc64 GNU/Linux
Snapshot: 277f2b79b02bf69a1d72d05b06086b07bcc6a113
FAIL: debugpath-bad (eof)
FAIL: PROCFS shutdown (eof)
FAIL: stmtvars
[...]
I found stmtvars failed due to regexp matching of expect. If we narrow
them, the test could pass. Like the following patch.
Best regards,
Wenji
diff --git a/testsuite/systemtap.base/stmtvars.exp b/testsuite/systemtap.base/stmtvars.exp
index 6e950ea..ee0dcf2 100644
--- a/testsuite/systemtap.base/stmtvars.exp
+++ b/testsuite/systemtap.base/stmtvars.exp
@@ -5,7 +5,7 @@ set pc 0
set vars ""
spawn stap -e "probe kernel.function(\"sys_open\") {\$foo}" -p4 -vv -u
expect {
- -re {probe sys_open.*pc=(0x.*)\r\n} { set pc $expect_out(1,string); exp_continue }
+ -re {probe sys_open.*pc=(0x.*)\r\nsemantic} { set pc $expect_out(1,string); exp_continue }
-re {alternatives: ([^\r\n]*) identifier [^\r\n]*\r\n} { set vars $expect_out(1,string)
exp_continue }
timeout { fail "$test (timeout)" }
@@ -19,7 +19,7 @@ set pc2 0
set vars2 ""
spawn stap -e "probe kernel.statement($pc) {\$foo}" -p4 -vv -u
expect {
- -re {probe sys_open.*pc=(0x.*)\r\n} { set pc2 $expect_out(1,string); exp_continue }
+ -re {probe sys_open.*pc=(0x.*)\r\nsemantic} { set pc2 $expect_out(1,string); exp_continue }
-re {alternatives: ([^\r\n]*) identifier [^\r\n]*\r\n} { set vars2 $expect_out(1,string)
exp_continue }
timeout { fail "$test (timeout)" }