Return to parsenets.sh CVS log

Up to [Research Unix] / researchv10no / ipc / mgrs / ns / mkdb

Annotation of researchv10no/ipc/mgrs/ns/mkdb/parsenets.sh, revision 1.1

1.1     ! root        1: echo Process $* 1>&2
        !             2: cat $* | awk '
        !             3: #
        !             4: #      Parse networks file.  Output format is
        !             5: #              <uid> INET,<number> <name> <name> ...
        !             6: #      merge entries with equivalent internet numbers
        !             7: #
        !             8: BEGIN {
        !             9:        notinet = "[^0-9.]";
        !            10: }
        !            11: #
        !            12: #      ignore blank and comment lines
        !            13: #
        !            14: $0 ~ /^#/      {next;}
        !            15: NF>1 {
        !            16: #      
        !            17: #      check that internet address has only digits and '.'s
        !            18: #
        !            19:        if(match($2,notinet)) {
        !            20:                print "Line " NR ": Illegal internet address " $1 | "cat 1>&2"
        !            21:                next;
        !            22:        }
        !            23: #
        !            24: #      output the line with an id #
        !            25: #
        !            26:        for(i=3; i<=NF; i++)
        !            27:                line = line " " $i
        !            28:        print "INET," $2 ".0 " line
        !            29: }
        !            30: '

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