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