blob: ce09bad5dd1b3d884eb0ccb99c022ccbf55dc4a4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
|
# This testcase is based on pr10568. It ensures that when an alias
# causes a tapset file to be included, the entire files gets included.
set test alias_tapset
set never_found 0
set kernel_function_found 0
set timer_found 0
set cmd "stap -p2 -I $srcdir/$subdir/${test} $srcdir/$subdir/${test}.stp"
verbose -log "running $cmd"
eval spawn $cmd
expect {
-timeout 60
-re {^never[^\r\n]+\r\n} { incr never_found; exp_continue }
-re {^kernel\.function[^\r\n]+\r\n} { incr kernel_function_found; exp_continue }
-re {^timer[^\r\n]+\r\n} { incr timer_found; exp_continue }
-re {^[^\r\n]+\r\n} {
# ignore output we're not interested in
exp_continue }
timeout { verbose -log "TIMEOUT" }
}
catch { close }
# get the return code of the process
set rc [lindex [wait -i $spawn_id] 3]
if { $rc == 0 && $never_found == 1 && $kernel_function_found == 1
&& $timer_found == 1 } {
pass $test
} else {
fail "$test ($rc, $never_found, $kernel_function_found, $timer_found)"
}
|
