/usr/share/systemtap/examples/io
NameSizeModeActions
capture_ssl_master_secrets.meta6640644editdlrm
capture_ssl_master_secrets.stp10900755editdlrm
capture_ssl_master_secrets.txt19070644editdlrm
deviceseeks.meta4900644editdlrm
deviceseeks.stp12920755editdlrm
deviceseeks.txt53950644editdlrm
disktop.meta3810644editdlrm
disktop.stp17940755editdlrm
eatmydata.meta3370644editdlrm
eatmydata.stp11880755editdlrm
eatmydata.txt3040644editdlrm
enospc.meta3320644editdlrm
enospc.stp23180755editdlrm
inodewatch.meta4750644editdlrm
inodewatch.stp2450755editdlrm
inodewatch2.meta5040644editdlrm
inodewatch2.stp3900755editdlrm
ioblktime.meta7690644editdlrm
ioblktime.stp7880755editdlrm
iodevstats.meta7380644editdlrm
iodevstats.stp11520755editdlrm
iodevstats.txt5280644editdlrm
iostat-scsi.meta6080644editdlrm
iostat-scsi.stp43660755editdlrm
iostat-scsi.txt4810644editdlrm
iostats.meta6710644editdlrm
iostats.stp11540755editdlrm
iostats.txt3610644editdlrm
iotime.meta10240644editdlrm
iotime.stp28930755editdlrm
iotop.meta4100644editdlrm
iotop.stp6240755editdlrm
io_submit.meta5080644editdlrm
io_submit.stp19060755editdlrm
io_submit.tcl1400644editdlrm
mbrwatch.meta5590644editdlrm
mbrwatch.stp2340755editdlrm
mbrwatch.tcl1400644editdlrm
mbrwatch.txt7880644editdlrm
nfs_func_users.meta6650644editdlrm
nfs_func_users.stp3410755editdlrm
slowvfs.meta4260644editdlrm
slowvfs.stp2810755editdlrm
switchfile.meta3300644editdlrm
switchfile.stp2310644editdlrm
traceaio.c26240644editdlrm
traceaio.meta3310644editdlrm
traceaio.stp18250755editdlrm
traceaio.txt27610644editdlrm
traceio.meta4030644editdlrm
traceio.stp13840755editdlrm
traceio2.meta4000644editdlrm
traceio2.stp4940755editdlrm
ttyspy.meta5210644editdlrm
ttyspy.stp17500755editdlrm
ttyspy.txt4550644editdlrm
Edit: /usr/share/systemtap/examples/io/deviceseeks.stp (1292B)
#!/usr/bin/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 @define q_cast(var) %( @cast(@var, "request_queue", "kernel") %) probe ioblock_trace.request { if (size == 0) next %( $# == 1 %? if (devname !~ @1) next %) // reject mismatching device names # Newer kernels remove the $q parameter from tracepoint # For 5.12 and newer get the q from $bio->bi_bdev->bd_disk->queue # For 5.11 get queue from $bio->bi_disk->queue queue = @defined ($q) ? $q : @choose_defined($bio->bi_bdev->bd_disk->queue, $bio->bi_disk->queue) sectorsize = (@defined(@q_cast(queue)->limits->logical_block_size) ? @q_cast(queue)->limits->logical_block_size : (@defined(@q_cast(queue)->logical_block_size) ? @q_cast(queue)->logical_block_size : @q_cast(queue)->hardsect_size )) # printf("%s %s\n", devname, rw ? "w" : "r") sec = sector seeks[devname] <<< sec - oldsec[devname] oldsec[devname] = sector + (size/sectorsize) } probe timer.s(10), end, error { printf("\n") foreach ([devname] in seeks- limit 5) { printf("Device: %s\n", devname) println(@hist_log(seeks[devname])) } delete seeks }