Return to tdata.awk CVS log | Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / ntp / scripts / stats |
1.1 ! misho 1: # program to produce loran tdata statistics from clockstats files ! 2: # ! 3: # usage: awk -f tdata.awk clockstats ! 4: # ! 5: # format of input record (missing replaced by -40.0) ! 6: # 49228 36.852 127.127.10.1 93:241:00:00:20.812 LORAN TDATA ! 7: # M OK 0 0 1169.14 -7.4 3.16E-07 .424 ! 8: # W CV 0 0 3329.30 -16.4 1.81E-06 ! 9: # X OK 0 0 1737.19 -10.5 3.44E-07 .358 ! 10: # Y OK 0 0 2182.07 -9.0 4.41E-07 .218 ! 11: # ! 12: # format of output record (time in nanoseconds, signal values in dB) ! 13: # MJD sec time M W X Y Z ! 14: # 49228 36.852 175.0 -7.4 -16.4 -10.5 -9.0 ! 15: # ! 16: # select LORAN TDATA records with valid format ! 17: { ! 18: if (NF >= 7 && $6 == "TDATA") { ! 19: m = w = x = y = z = -40.0 ! 20: for (i = 7; i < NF - 5; i++) { ! 21: if ($i == "M" && $(i+1) == "OK") { ! 22: i += 5 ! 23: m = $i ! 24: } ! 25: else if ($i == "W" && $(i+1) == "OK") { ! 26: i += 5 ! 27: w = $i ! 28: } ! 29: else if ($i == "X" && $(i+1) == "OK") { ! 30: i += 5 ! 31: x = $i ! 32: } ! 33: else if ($i == "Y" && $(i+1) == "OK") { ! 34: i += 5 ! 35: y = $i ! 36: } ! 37: else if ($i == "Z" && $(i+1) == "OK") { ! 38: i += 5 ! 39: z = $i ! 40: } ! 41: } ! 42: printf "%5s %9.3f %6.1f %6.1f %6.1f %6.1f %6.1f\n", $1, $2, m, w, x, y, z ! 43: } ! 44: } ! 45: