delay.awk

来自「在linux下开发的用于仿真ping协议的仿真文件」· AWK 代码 · 共 40 行

BEGIN {
	largest_index=0;
}
{
	action=$1;
	time=$2;
	nodeid=$3;
	tracelevel=$4;
	ipindex=$6;
	iptype=$7;


	if(largest_index<ipindex)
		largest_index=ipindex;
	if(action=="s"&&tracelevel=="AGT"&&iptype=="cbr")
		start_time[ipindex]=time;
	if(action=="r"&&tracelevel=="AGT"&&iptype=="cbr")
		end_time[ipindex]=time;
}
END {
	printf("There are %d packets!\n",largest_index);
	for(i=1;i<=largest_index;i++)
		printf("%d: %f %f\n",i,start_time[i],end_time[i]);
	maxpack=largest_index;
	totaldelay=0.0;
	for(i=1;i<=largest_index;i++)
	{
		if(end_time[i]<start_time[i])
			maxpack=maxpack-1;
		else
			totaldelay=totaldelay+end_time[i]-start_time[i];
	}
	meandelay=totaldelay/maxpack;
	printf("There are %d packets lost!\n",largest_index-maxpack);
	printf("The mean delay time is %f seconds\n",meandelay);
}