#! /usr/bin/env stap # # Copyright (C) 2010 Red Hat, Inc. # By Dominic Duval, Red Hat Inc. # dduval@redhat.com # # Keeps track of seeks on devices. # Shows how to use hist_log. # # USAGE: stap deviceseeks.stp # global seeks, oldsec probe ioblock.request { sec = sector seeks[devname] <<< sec - oldsec[devname] oldsec[devname] = sector } probe end { printf("\n") foreach ([devname] in seeks- limit 5) { printf("Device: %s\n", devname) println(@hist_log(seeks[devname])) } }