#!/usr/bin/stap global opens, reads, writes, totals probe begin { printf("starting probe\n") } probe syscall.open { e=execname(); opens[e] <<< 1 # statistics array } probe syscall.read.return { count = $return if ( count >= 0 ) { e=execname(); reads[e] <<< count # statistics array totals[e] += count } } probe syscall.write.return { count = $return if (count >= 0 ) { e=execname(); writes[e] <<< count # statistics array totals[e] += count } } probe end { printf("\n%16s %8s %8s %8s %8s %8s %8s %8s\n", "", "", "", "read", "read", "", "write", "write") printf("%16s %8s %8s %8s %8s %8s %8s %8s\n", "name", "open", "read", "KB tot", "B avg", "write", "KB tot", "B avg") foreach (name in totals- limit 20) { # sort by total io printf("%16s %8d %8d %8d %8d %8d %8d %8d\n", name, @count(opens[name]), @count(reads[name]), (@count(reads[name]) ? @sum(reads[name])>>10 : 0 ), (@count(reads[name]) ? @avg(reads[name]) : 0 ), @count(writes[name]), (@count(writes[name]) ? @sum(writes[name])>>10 : 0 ), (@count(writes[name]) ? @avg(writes[name]) : 0 )) } }