File: seqnos.awk

package info (click to toggle)
ns2 2.35%2Bdfsg-3.1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 78,808 kB
  • sloc: cpp: 172,923; tcl: 107,130; perl: 6,391; sh: 6,143; ansic: 5,846; makefile: 816; awk: 525; csh: 355
file content (37 lines) | stat: -rw-r--r-- 954 bytes parent folder | download | duplicates (8)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
# This prints the Seqnos, and the fraction of packets with that Seqno.
# Input file:
###########################################
# Distribution of Seqnos, 100 seqnos per bins
# 0 to 99: fraction 0.111 number 9384
# 100 to 199: fraction 0.095 number 8101
# 200 to 299: fraction 0.095 number 8021
###########################################
{
if (NR==1) {
   thisbin = 0
   binsize = 0
   maxbin = 1000
}
if ($1=="Distribution"&&$3=="Seqnos,") {
  binsize = $4
  halfbin = binsize/2
}
if (binsize > 0) {
if ($2=="to"&&$4=="seqnos:") {
   bin = $3;
   frac = $6;
   for (i=thisbin; i<bin; i += binsize) {
	aveSeqno = i - halfbin 
	if (aveSeqno < 0) aveSeqno = 0;
	printf "%4.3f 0.0\n", aveSeqno;
   }
   aveSeqno = bin - halfbin;
   if (aveSeqno < 0) aveSeqno = 0;
   printf "%4.3f %5.3f\n", aveSeqno, frac
   thisbin = bin + binsize
}}}
END{
  for (i=thisbin; i<=maxbin; i += binsize) {
     aveSeqno = i - halfbin;
     printf "%4.3f 0.0\n", aveSeqno;
}}