diff options
author | hunt <hunt> | 2006-03-20 16:05:24 +0000 |
---|---|---|
committer | hunt <hunt> | 2006-03-20 16:05:24 +0000 |
commit | e1d96810d0c2c1da6ec36eb81c642bcc6cf420c8 (patch) | |
tree | 19f67a6fb6f6d2573484192eb651a9ff70408c39 /examples/small_demos/key.stp | |
parent | 743e6b49d92c1ef9c6d3a174be8130731b60019e (diff) | |
download | systemtap-steved-e1d96810d0c2c1da6ec36eb81c642bcc6cf420c8.tar.gz systemtap-steved-e1d96810d0c2c1da6ec36eb81c642bcc6cf420c8.tar.xz systemtap-steved-e1d96810d0c2c1da6ec36eb81c642bcc6cf420c8.zip |
*** empty log message ***
Diffstat (limited to 'examples/small_demos/key.stp')
-rwxr-xr-x | examples/small_demos/key.stp | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/examples/small_demos/key.stp b/examples/small_demos/key.stp new file mode 100755 index 00000000..0489524a --- /dev/null +++ b/examples/small_demos/key.stp @@ -0,0 +1,22 @@ +#! /usr/bin/env stap + +# Useless, but amusing. Based on an idea I saw on a +# dtrace site. (wav files are from emacs). + +// KEY_ENTER = 28 +probe kernel.function("kbd_event") { + if ($event_type == 1 && $value) { + if ($event_code == 28) + system("play return.wav") + else + system("play click.wav") + } +} + +probe begin { + printf("TYPEWRITER ON\n") +} + +probe end { + printf("DONE\n") +} |