|
|
1.1 root 1: #!/bin/rc
2:
3: if(! ~ $#* 1){
4: echo usage: mkdevlist file >[2=1]
5: exit 1
6: }
7:
8: fn mkextract{
9:
10: sed '/^$/d; /^#/d' $2 | awk '
11: BEGIN { doprint=0 }
12: doprint && /^[^ ]/ { doprint=0 }
13: doprint { print "dev" $1 "'.$O'"; for(i=3; i <= NF; i++)
14: print $i "'.$O'"; }
15: $0 ~ field { doprint=1; next }
16: ' 'field=^'$1
17: }
18:
19: mkextract dev $1
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.