diff options
| author | Josh Stone <jistone@redhat.com> | 2010-03-31 15:53:25 -0700 |
|---|---|---|
| committer | Josh Stone <jistone@redhat.com> | 2010-03-31 15:53:25 -0700 |
| commit | 7ddf5daac0d632ec2a1868d8c0e69bee086f25ee (patch) | |
| tree | 1f7dca6d0522c9abfff75c998363b3158d7b632f /testsuite/lib/systemtap.exp | |
| parent | 8a5f80d8b69c9d3497887c21dba64b5604651d17 (diff) | |
| download | systemtap-steved-7ddf5daac0d632ec2a1868d8c0e69bee086f25ee.tar.gz systemtap-steved-7ddf5daac0d632ec2a1868d8c0e69bee086f25ee.tar.xz systemtap-steved-7ddf5daac0d632ec2a1868d8c0e69bee086f25ee.zip | |
Make sure that the testsuite can find its server
* testsuite/lib/systemtap.exp (setup_server): Use stap-find-servers to
check that the firewall is letting us through to the server.
Diffstat (limited to 'testsuite/lib/systemtap.exp')
| -rw-r--r-- | testsuite/lib/systemtap.exp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/testsuite/lib/systemtap.exp b/testsuite/lib/systemtap.exp index 03170081..eaa921c6 100644 --- a/testsuite/lib/systemtap.exp +++ b/testsuite/lib/systemtap.exp @@ -162,6 +162,13 @@ proc setup_server {} { print "Started a systemtap server as PID==$server_pid" } + # Make sure we can actually talk to the server + if {[catch {exec stap-find-servers} dummy]} then { + print "Unable to find a systemtap server -- check firewall settings" + shutdown_server + return 0 + } + # Make a copy of 'stap-client' as 'stap' and make sure it's at the # beginning of the $PATH. Do this after starting the server so that # The server does not call this instance of 'stap' |