From 1a6f01b5dc7cd231df50ea282519eb7031142475 Mon Sep 17 00:00:00 2001 From: Jan Kratochvil Date: Sun, 28 Sep 2008 11:39:45 +0000 Subject: [PATCH] gdb/testsuite/ * gdb.threads/attachstop-mt.exp: Note a real testcase name this testcase is derived from. Fix racy dependency on an expected PID number. No longer support the testcase on Linux kernel 2.4.x. --- gdb/testsuite/ChangeLog | 6 +++++ gdb/testsuite/gdb.threads/attachstop-mt.exp | 29 +++++++++++++-------- 2 files changed, 24 insertions(+), 11 deletions(-) diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index dec9671c477..32210f2fff4 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,9 @@ +2008-09-28 Jan Kratochvil + + * gdb.threads/attachstop-mt.exp: Note a real testcase name this + testcase is derived from. Fix racy dependency on an expected PID + number. No longer support the testcase on Linux kernel 2.4.x. + 2008-09-27 Tom Tromey * gdb.base/macscp.exp: Add tests for stringification, splicing, diff --git a/gdb/testsuite/gdb.threads/attachstop-mt.exp b/gdb/testsuite/gdb.threads/attachstop-mt.exp index 167f05260c4..aa2fe647901 100644 --- a/gdb/testsuite/gdb.threads/attachstop-mt.exp +++ b/gdb/testsuite/gdb.threads/attachstop-mt.exp @@ -14,9 +14,8 @@ # You should have received a copy of the GNU General Public License # along with this program. If not, see . -# This test was created by modifying gdb.threads/attachstop. -# This file was created by Jan Kratochvil . -# Regression for: https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=197584 +# This test is based on gdb.base/attach.exp with modifications by Jeff Johnston +# and Jan Kratochvil . # This test only works on Linux if { ![isnative] || [is_remote host] || ![istarget *-linux*] } { @@ -52,17 +51,25 @@ set testpid [eval exec $binfile &] # No race sleep 2 -# Do not: set testpid2 [expr $testpid + 1] -# as it will not exist on Red Hat 2.6.9-34.0.2.ELsmp -set testpid2 [expr $testpid + 2] - -set status2 /proc/${testpid}/task/${testpid2}/status -if {[expr ! [file exists $status2]]} { - # kernel-2.4 - set status2 /proc/${testpid2}/status +# The testcase has three threads, find some other thread TID for $testpid2. +set tids [exec sh -c "echo /proc/$testpid/task/*"] +regsub -all /proc/$testpid/task/ $tids {} tids +if {$tids == "*"} { + unresolved "/proc/PID/task is not supported (kernel-2.4?)" + remote_exec build "kill -9 ${testpid}" + return -1 } +set tids [lsort -integer [split $tids]] +if {[llength $tids] != 3 || [lindex $tids 0] != $testpid} { + verbose -log "Invalid TIDs <$tids> for PID $testpid" + fail "Invalid TIDs found" + remote_exec build "kill -9 ${testpid}" + return -1 +} +set testpid2 [lindex $tids 2] # Initial sanity test it is normally sleeping +set status2 /proc/${testpid}/task/${testpid2}/status set fileid0 [open $status2 r]; gets $fileid0 line1; gets $fileid0 line2; -- 2.30.2