testsuite/systemtap.maps/pmap_agg_overflow.exp


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
34
35
36

# function to test error handling of pmap aggregation

set test "pmap_agg_overflow"
if {![installtest_p]} { untested $test; return }

set pass1 "^ERROR: \[^\r\]*overflow\[^\r\]*\r\n"
set pass2 "WARNING: Number of errors: 2, skipped probes: 0\r\n"
set skip_result "^WARNING: This test only applies to smp systems\.\.\.\r\n"

set pass 0

spawn stap -DMAXERRORS=1 -g $srcdir/$subdir/$test.stp
expect {
  -timeout 240
    -re  $pass1 {incr pass; exp_continue}
    -re  $pass2 {incr pass; exp_continue}
    -re $skip_result {
	unsupported "$test requires smp"
    }
    timeout {
	send "\003"
	fail "$test timed out"
    }
    eof {}
    -re "semantic error:" { fail "$test compilation" }
}
catch { close }
wait

if {$pass == 3} {
    pass $test
} else {
    fail "$test ($pass)"
}