]>
Commit | Line | Data |
---|---|---|
814bc89d | 1 | set self semok |
b05fd589 | 2 | |
8c94efa7 DS |
3 | proc dyninst_kfails {test} { |
4 | # Use setup_kfail <pr number> <target triplet> for known bugs. | |
5 | # | |
6 | # (Note that tcl doesn't like comments directly inside the switch | |
7 | # statement, but comments can go in sub-blocks.) | |
8 | switch $test { | |
9 | semok/badvar.stp - | |
7c8f1ccc DS |
10 | semok/badvar_undefined.stp - |
11 | semok/bz10475.stp - | |
12 | semok/context-globals.stp - | |
13 | semok/defined_list_vars.stp - | |
8c94efa7 DS |
14 | semok/doubleglob.stp - |
15 | semok/entry01.stp - | |
16 | semok/entry02.stp - | |
17 | semok/entry03.stp - | |
18 | semok/entry04.stp - | |
19 | semok/gurufunc.stp - | |
20 | semok/kretprobe-data.stp - | |
21 | semok/nodwf01.stp - | |
22 | semok/nodwf02.stp - | |
23 | semok/nodwf03.stp - | |
24 | semok/nodwf04.stp - | |
25 | semok/nodwf05.stp - | |
26 | semok/nodwf06.stp - | |
27 | semok/nodwf07.stp - | |
7c8f1ccc | 28 | semok/netfilter01.stp - |
8c94efa7 DS |
29 | semok/pretty.stp - |
30 | semok/pretty2.stp - | |
7c8f1ccc DS |
31 | semok/seventeen.stp - |
32 | semok/target_addr.stp - | |
33 | semok/thirteen.stp - | |
34 | semok/thirtyeight.stp - | |
35 | semok/thirtyfive.stp - | |
36 | semok/thirtyfour.stp - | |
37 | semok/thirtynine.stp - | |
38 | semok/thirtyone.stp - | |
8c94efa7 | 39 | semok/thirtysix.stp - |
7c8f1ccc | 40 | semok/thirtythree.stp - |
8c94efa7 | 41 | semok/thirtytwo.stp - |
7c8f1ccc DS |
42 | semok/twelve.stp - |
43 | semok/twentyeight.stp - | |
8c94efa7 | 44 | semok/twentyfive.stp - |
7c8f1ccc DS |
45 | semok/twentyfour.stp - |
46 | semok/twentynine.stp - | |
47 | semok/twentyseven.stp { | |
8c94efa7 DS |
48 | # Use setup_kfail DYNINST <target triplet> for known |
49 | # failures when running with the dyninst runtime (scripts | |
50 | # that use kernel features or kernel-only tapset | |
51 | # functions). | |
52 | setup_kfail DYNINST *-*-* | |
53 | } | |
7c8f1ccc DS |
54 | |
55 | semok/thirtysix-utrace.stp { | |
56 | # Use setup_kfail 14708 <target triplet> for known | |
57 | # failures when running with the dyninst runtime (scripts | |
58 | # that use utrace-like probes) | |
59 | setup_kfail 14708 *-*-* | |
60 | } | |
1233444d | 61 | } |
8c94efa7 | 62 | } |
1233444d | 63 | |
8c94efa7 DS |
64 | set uprobes_p [uprobes_p] |
65 | set utrace_p [utrace_p] | |
1cd0bda2 | 66 | set plt_probes_p [plt_probes_p] |
8c94efa7 DS |
67 | foreach runtime [get_runtime_list] { |
68 | foreach file [lsort [glob -nocomplain $srcdir/$self/*.stp]] { | |
69 | set test $self/[file tail $file] | |
70 | if {$runtime != ""} { | |
71 | verbose -log "Running $file ($runtime)" | |
72 | set rc [stap_run_batch $file --runtime=$runtime] | |
73 | if {$rc != 0} { ${runtime}_kfails $test } | |
74 | lappend test "($runtime)" | |
75 | } else { | |
76 | switch $test { | |
77 | semok/thirtysix-utrace.stp - | |
78 | semok/utrace01.stp { | |
79 | # These tests need utrace | |
80 | if {!$utrace_p} { untested $test; continue } } | |
81 | ||
82 | semok/bz11911.stp - | |
83 | semok/mangled.stp - | |
84 | semok/pretty-uprobes.stp { | |
85 | # These tests need uprobes | |
86 | if {!$uprobes_p} { untested $test; continue } } | |
87 | ||
88 | semok/plt1.stp - | |
89 | semok/plt2.stp { | |
1cd0bda2 | 90 | if {!$plt_probes_p} { untested $test; continue } } |
8c94efa7 DS |
91 | } |
92 | verbose -log "Running $file" | |
93 | set rc [stap_run_batch $file] | |
94 | } | |
95 | if {$rc == 0} { pass $test } else { fail $test } | |
96 | } | |
814bc89d | 97 | } |