|
|
1.1 root 1: echo Process $* 1>&2
2: cat $* | awk '
3: #
4: # Parse hosts file. Output format is
5: # <uid> INET,<number> <name> <name> ...
6: # merge entries with equivalent internet numbers
7: #
8:
9: BEGIN {
10: notinet = "[^0-9.]";
11: }
12: #
13: # ignore blank and comment lines
14: #
15: $0 ~ /^#/ {next;}
16: NF>1 {
17: #
18: # check that internet address has only digits and '.'s
19: #
20: if(match($1,notinet)) {
21: print "Line " NR ": Illegal internet address " $1 | "cat 1>&2"
22: next;
23:
24: }
25: #
26: # label domains
27: #
28: line = "INET," $1;
29: for (i=2; i<=NF; i++)
30: if(match($i, ".com")){
31: line = line " DOMAIN," $i
32: } else
33: line = line " " $i
34: #
35: # output the line with an id #
36: #
37: print line
38: }
39: '
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.