#!/usr/sbin/dtrace -s

#pragma D option quiet

sched:::sleep
/ curthread->t_state == 0x01 && curlwpsinfo->pr_stype == SOBJ_CV /
{
	@w[execname,tid,ustack(1)] = count();
}

END
{
	printf("%-10s %-20s %-8s %-10s\n","CNT", "NAME","TID","Sleeping On...");
	printa("%-@10d %-20s %-8d %-30k\n",@w);
}