Annotation of 42BSD/usr.bin/uucp/UUAIDS/uurate, revision 1.1

1.1     ! root        1: case $# in
        !             2: 0)
        !             3:        FILE=/usr/spool/uucp/SYSLOG
        !             4:        ;;
        !             5: 1)
        !             6:        FILE=$*
        !             7:        ;;
        !             8: *)
        !             9:        echo "usage: uustat [syslog]"
        !            10:        ;;
        !            11: esac
        !            12: awk ' \
        !            13:        $5 ~ /received/ {ftotal++; fcount[$2]++; fbytes[$2] += $7; \
        !            14:        fsecs[$2] += $9} \
        !            15:        $5 ~ /sent/ {ttotal++; tcount[$2]++; tbytes[$2] += $7; \
        !            16:        tsecs[$2] += $9} \
        !            17:        { curtime = substr($4, 5, 6); \
        !            18:        dtmp = curtime - int($9) - lasttime[$2]; \
        !            19:        if (dtmp > 0) if (dtmp < 20) \
        !            20:                dead[$2] += dtmp; \
        !            21:        lasttime[$2] = curtime; \
        !            22:        live[$2] += $9 ; \
        !            23:        } \
        !            24:        END { if (ftotal) for (i in fbytes) { \
        !            25:        printf "got from %8s %4d files %7d bytes %5d secs", i, \
        !            26:        fcount[i], fbytes[i], fsecs[i]; \
        !            27:        if (fsecs[i]) printf " %.2f bytes/sec", fbytes[i]/fsecs[i]; \
        !            28:        printf "\n"; } \
        !            29:        if (ttotal) for (i in tbytes) { \
        !            30:        printf "sent to  %8s %4d files %7d bytes %5d secs", i, \
        !            31:        tcount[i], tbytes[i], tsecs[i]; \
        !            32:        if (tsecs[i]) printf " %.2f bytes/sec", tbytes[i]/tsecs[i]; \
        !            33:        printf "\n"; } \
        !            34:        for (i in live) { \
        !            35:        printf "%8s live%5d secs  dead%5d secs\n", i, live[i], dead[i]; } \
        !            36:        }' \
        !            37: $FILE

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.