#!/usr/sbin/dtrace -s

#pragma D option quiet

ip:::receive
{
	@bytes[xlate<ipinfo_t *>(args[2])->ip_daddr] =
	    sum(xlate<ipinfo_t *>(args[2])->ip_plength);
}

ip:::send
{
	@bytes[xlate<ipinfo_t *>(args[2])->ip_saddr] =
	    sum(xlate<ipinfo_t *>(args[2])->ip_plength);
}

profile:::tick-1sec
{
	printa(@bytes);
}