Return to delay CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / new / news / misc

Annotation of 43BSDTahoe/new/news/misc/delay, revision 1.1

1.1     ! root        1: #
        !             2: #      Note, Date-Received knows abotu yout local timezone
        !             3: #
        !             4: ./grabheaders | awk '
        !             5: BEGIN{
        !             6:        t = "Jan 31 Feb 28 Mar 31 Apr 30 May 31 Jun 30 Jul 31 Aug 31 Sep 30 Oct 31 Nov 30 Dec 31"
        !             7:        split(t,x)
        !             8:        n = 0;
        !             9:        for(i=1;i<24;i+=2) {
        !            10:                month[x[i]] = month[(i+1)/2] = (i+1)/2
        !            11:                days[(i+1)/2] = n
        !            12:                n += x[i+1]
        !            13:        }
        !            14: }
        !            15: 
        !            16: /^Date: /{
        !            17:        if (NF == 7 ){
        !            18:                t = $6
        !            19:                x[1] = $3
        !            20:                x[2] = $4
        !            21:                x[3] = $5
        !            22:        } else if (NF == 5 && split($3,x,"-") == 3) {
        !            23:                t = $4
        !            24:        } else if (NF == 4 && split($2,x,"-") == 3) {
        !            25:                t = $3
        !            26:        }else if (NF == 6) {
        !            27:                t = $5
        !            28:                x[1] = $2
        !            29:                x[2] = $3
        !            30:                x[3] = $4
        !            31:        }else{
        !            32:                print "Bad date",messageid, $0
        !            33:                next
        !            34:        }
        !            35:        sent = x[1] + days[month[x[2]]] + (x[3]-80)*365
        !            36:        if (x[3]%4 == 0 && month[x[2]] > 2)
        !            37:                sent++
        !            38:        split(t,x,":")
        !            39:        sent *= 60*24
        !            40:        sent += x[1] * 60 + x[2]
        !            41: }
        !            42: /^Date-Received: /{
        !            43:        if (NF < 3){
        !            44:                print "Date-received", messageid ,$0
        !            45:                rec = 0
        !            46:                next
        !            47:        }
        !            48:        split($2,x,"/")
        !            49:        rec = x[2] + days[x[1]+0] +(x[3]-80)*365
        !            50:        if (x[3]%4 == 0 && x[1] > 2)
        !            51:                rec++
        !            52:        split($3,x,":")
        !            53:        rec *= 60*24
        !            54:        rec += x[1] * 60 + x[2] + 1.44
        !            55:        if ($4 != "GMT")
        !            56:                rec += 60*5
        !            57:        if (rec > today)
        !            58:                today = rec
        !            59: }
        !            60: /^Message-ID: /{messageid = $2}
        !            61: /^Path: /{
        !            62:        n = split($2,x,"!")
        !            63:        if( n > 2)
        !            64:                feed = x[2]
        !            65:        else
        !            66:                feed = x[1]
        !            67: }
        !            68: /^$/{
        !            69:        n = int((rec - sent)/(60*24)+0.999)
        !            70:        if( rec > 0 ) {
        !            71:                if ( n >= 0) {
        !            72:                        adelay[n]++
        !            73:                        if( n > amaxdelay)
        !            74:                                amaxdelay = n
        !            75:                } else {
        !            76:                        adelay[-1]++
        !            77:                        print "Time Warp", messageid
        !            78:                }
        !            79:                totdelay++
        !            80:                feedsite[feed]++
        !            81:        }
        !            82:        rec = sent = 0
        !            83: }
        !            84: END {
        !            85:        n = int((rec - sent)/(60*24)+0.999)
        !            86:        if( rec > 0 ) {
        !            87:                if ( n >= 0) {
        !            88:                        adelay[n]++
        !            89:                        if( n > amaxdelay)
        !            90:                                amaxdelay = n
        !            91:                } else {
        !            92:                        adelay[-1]++
        !            93:                        print "Time Warp", messageid
        !            94:                }
        !            95:                totdelay++
        !            96:                feedsite[feed]++
        !            97:        }
        !            98:        i = 0
        !            99:        count = 0
        !           100:        printf("\n\tPropagation Delay\n")
        !           101:        printf("\n\t     No. of   Cumulative\n")
        !           102:        printf("\tDays Articles Percent\n")
        !           103:        if (adelay[-1] > 0) {
        !           104:                printf("\t <0%8d%7d%% (Time Warp)\n",adelay[-1],0)
        !           105:                count += adelay[-1]
        !           106:        }
        !           107:        while (i <= amaxdelay) {
        !           108:                count += adelay[i]
        !           109:                if( adelay[i] != 0 )
        !           110:                        printf("\t%3d%8d%7d%%\n",i,adelay[i],(count*100)/totdelay)
        !           111:                i++
        !           112:        }
        !           113: 
        !           114:        n = 0
        !           115:        for (i in feedsite)
        !           116:                ptr[++n] = i
        !           117: 
        !           118:        j = 1
        !           119:        while (j < n){
        !           120:                if  (feedsite[ptr[j]] < feedsite[ptr[j+1]]){
        !           121:                        temp = ptr[j]
        !           122:                        ptr[j] = ptr[j+1]
        !           123:                        ptr[j+1] = temp
        !           124:                        if( j > 1) {
        !           125:                                j--
        !           126:                                continue
        !           127:                        }
        !           128:                }
        !           129:                j++
        !           130:        }
        !           131:        printf("\n\tDistribution of news feeds\n")
        !           132:        printf("\t   Count Percent   Site\n")
        !           133:        j = 0
        !           134:        while (++j <= n){
        !           135:                i =feedsite[ptr[j]]
        !           136:                printf("\t%8d%7d%%   %s\n",i,(i*100)/totdelay,ptr[j]);
        !           137:        }
        !           138: }'

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