dist/tcpdump/stime.awk

   1 #       $NetBSD$
   2
   3 $6 !~ /^ack/ && $5 !~ /[SFR]/   {
   4         # given a tcpdump ftp trace, output one line for each send
   5         # in the form
   6         #   <send time> <seq no>
   7         # where <send time> is the time packet was sent (in seconds with
   8         # zero at time of first packet) and <seq no> is the tcp sequence
   9         # number of the packet divided by 1024 (i.e., Kbytes sent).
  10         #
  11         # convert time to seconds
  12         n = split ($1,t,":")
  13         tim = t[1]*3600 + t[2]*60 + t[3]
  14         if (! tzero) {
  15                 tzero = tim
  16                 OFS = "\t"
  17         }
  18         # get packet sequence number
  19         i = index($6,":")
  20         printf "%7.2f\t%g\n", tim-tzero, substr($6,1,i-1)/1024
  21         }