#!/usr/sbin/dtrace -s

#pragma D option quiet

ts_tick:entry
/ execname != "dtrace" /
{
	self->left   = (tsproc_t *)args[0]->t_cldata->ts_timeleft;
	self->procp  = (struct proc *)args[0]->t_procp;
	self->exec   = stringof(self->procp->p_exec->v_path);
	self->pid    = self->procp->p_pidp->pid_id;
	self->lwpid  = args[0]->t_tid;

	@[self->pid, self->lwpid, self->left] = count();
}

END
{
	printf("%-8s %-8s %-12s %-8s\n","PID","LWPID","TICKS LEFT","CNT");
	printa("%-8d %-8d %-12d %-8@d\n",@);
}