123456789101112131415161718192021222324252627282930313233343536373839 |
- #!/bin/rc
- awk '
- BEGIN{ collect = isdev = 0;
- }
- /^$/{ next;
- }
- /^#/{ next;
- }
- collect && /^[^ \t]/{
- collect = isdev = 0;
- }
- collect && $0 ~ /[^ \t]+/{
- if(isdev)
- obj["dev" $1 "'.$O'"]++;
- else
- obj[$1 "'.$O'"]++;
- for(i = 2; i <= NF; i++){
- if($i !~ "[+=-].*")
- obj[$i "'.$O'"]++;
- }
- }
- $0 ~ /^[^ \t]/{
- if($1 ~ "dev"){
- isdev = 1;
- collect = 1;
- }
- else if($1 ~ "misc" || $1 ~ "link" || $1 ~ "ip")
- collect = 1;
- next
- }
- END{
- x = ""
- for(i in obj)
- x = x i "\n"
- printf x
- }' $*
|