rpirena/l2rate.awk
stephan 21298419c1 rpirena: l2 rate plot
git-svn-id: svn+ssh://asterix.ieap.uni-kiel.de/home/subversion/stephan/solo/eda/cospi/host@6073 bc5caf13-1734-44f8-af43-603852e9ee25
2017-05-28 23:05:19 +00:00

28 lines
424 B
Awk
Executable file

#! /usr/bin/awk -f
BEGIN {
dt = 300
for (i=0; i<8; i++) C[i] = 0
t0 = 0
}
function do_l2() {
d = t-t0
if (d < 10*dt) {
print t0, d, C[0]/d, C[1]/d, C[2]/d, C[3]/d, C[4]/d, C[5]/d, C[6]/d, C[7]/d
}
for (i=0; i<8; i++) C[i] = 0
t0 = t
}
/^H/ {
t = $2
if (t > t0+dt) do_l2()
}
END { do_l2() }
/^EI/{
l2 = strtonum($4)
for (i=0; i<8; i++) if (and(l2,lshift(1,i))) C[i]++;
}