diff options
Diffstat (limited to 'testsuite/systemtap.examples/general/varwatch.stp')
-rw-r--r-- | testsuite/systemtap.examples/general/varwatch.stp | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/testsuite/systemtap.examples/general/varwatch.stp b/testsuite/systemtap.examples/general/varwatch.stp new file mode 100644 index 00000000..845ca166 --- /dev/null +++ b/testsuite/systemtap.examples/general/varwatch.stp @@ -0,0 +1,28 @@ +#! /usr/bin/env stap + +global var, varerr + +probe $1 { + t=tid() # or t=0 for thread-agnostic checking + if (@defined($2)) { + try { + newvar = $2; + if (var[t] != newvar) { + printf("%s %s changed in thread %d from %s to %s\n", pp(), @2, t, sprint(var[t]), sprint(newvar)); + var[t] = newvar; + } + } catch { varerr ++ } # error during $2 resolution or perhaps var[] assignment + } +} + +probe kprocess.release { # if using per-thread checking + delete var[$p->pid] # thread +} + +probe never { + var[0]="" # assigns a type to var in case no probes match $1 above +} + +probe error,end { + if (varerr) printf("%s %s access errors: %d", @1, @2, varerr); +} |