summaryrefslogtreecommitdiffstats
path: root/testsuite/systemtap.syscall/test.tcl
diff options
context:
space:
mode:
authordsmith <dsmith>2006-09-26 21:35:34 +0000
committerdsmith <dsmith>2006-09-26 21:35:34 +0000
commit8d4399dde2bdd7a1b8dff3d09aed5f696e7e248f (patch)
tree8591032892a9de64df93fdfd2cea774787aea84e /testsuite/systemtap.syscall/test.tcl
parent79435bf0960e407b41fd54dd5632cf55c75f3254 (diff)
downloadsystemtap-steved-8d4399dde2bdd7a1b8dff3d09aed5f696e7e248f.tar.gz
systemtap-steved-8d4399dde2bdd7a1b8dff3d09aed5f696e7e248f.tar.xz
systemtap-steved-8d4399dde2bdd7a1b8dff3d09aed5f696e7e248f.zip
2006-09-26 David Smith <dsmith@redhat.com>
* test.tcl: Looks for 'staprun' instead of 'stpd'.
Diffstat (limited to 'testsuite/systemtap.syscall/test.tcl')
-rwxr-xr-xtestsuite/systemtap.syscall/test.tcl19
1 files changed, 8 insertions, 11 deletions
diff --git a/testsuite/systemtap.syscall/test.tcl b/testsuite/systemtap.syscall/test.tcl
index a73e22c9..ee797565 100755
--- a/testsuite/systemtap.syscall/test.tcl
+++ b/testsuite/systemtap.syscall/test.tcl
@@ -34,20 +34,17 @@ set filename "${testname}.c"
if {$modname == ""} {
set cmd "stap -c ../${testname} ../sys.stp"
} else {
- set stpd ""
- set stpd_list "/usr/local/libexec/systemtap/stpd /usr/libexec/systemtap/stpd"
- foreach path $stpd_list {
- if {[file exists $path]} {
- set stpd $path
- break
- }
- }
- if {$stpd == ""} {
- puts "stpd not found!"
+ set ccmd "which staprun"
+ catch {eval exec $ccmd} output
+ if {[file exists $output]} {
+ set staprun $output
+ } else {
+ puts "staprun not found!"
exit
}
+
set user $::tcl_platform(user)
- set cmd "sudo $stpd -rmq -u $user -c ../${testname} ${modname}"
+ set cmd "sudo $staprun -rmq -u $user -c ../${testname} ${modname}"
}
# Extract the expected results