DTrace script to measure total I/O time

sambamba_iotime.d

#!/usr/sbin/dtrace -s

syscall::read:entry
/execname == "sambamba"/
{
  self->ts = timestamp;
  self->fd = arg0;
}

syscall::read:return
/self->ts/
{
  @time["read", fds[self->fd].fi_pathname] = sum(timestamp - self->ts);
  self->ts = 0;
  self->fd = 0;
}

syscall::write:entry
/execname == "sambamba"/
{
  self->ts = timestamp;
  self->fd = arg0;
}

syscall::write:return
/self->ts/
{
  @time["write", fds[self->fd].fi_pathname] = sum(timestamp - self->ts);
  self->ts = 0;
  self->fd = 0;
}

syscall::write_nocancel:entry
/execname == "sambamba"/
{
  self->ts = timestamp;
  self->fd = arg0;
}

syscall::write_nocancel:return
/self->ts/
{
  /* @time["write", fds[self->fd].fi_pathname] = sum(timestamp - self->ts); */
  @time["write", "-"] = sum(timestamp - self->ts);
  self->ts = 0;
  self->fd = 0;
}

profile:::tick-1sec
{
  normalize(@time, 1000000);
  printa(@time);
}