diff options
| author | Charles.Forsyth <devnull@localhost> | 2007-06-14 14:10:50 +0000 |
|---|---|---|
| committer | Charles.Forsyth <devnull@localhost> | 2007-06-14 14:10:50 +0000 |
| commit | 150ed664169adc7de05ac8c4fdcf87a0987bc372 (patch) | |
| tree | 0aff34048f1f67f6e45c9ae0374abbba7f3543fe /man/lib/secindex | |
| parent | 36d90ed95f4c8a9bd69f7c664696a5986cbafcc7 (diff) | |
20070614-1508 initial vac things, man/lib
Diffstat (limited to 'man/lib/secindex')
| -rwxr-xr-x | man/lib/secindex | 43 |
1 files changed, 43 insertions, 0 deletions
diff --git a/man/lib/secindex b/man/lib/secindex new file mode 100755 index 00000000..060e7a6a --- /dev/null +++ b/man/lib/secindex @@ -0,0 +1,43 @@ +#!/bin/rc +U='ABCDEFGHIJKLMNOPQRSTUVWXYZ' +L='abcdefghijklmnopqrstuvwxyz' +builtin cd $1 +for (i in [a-z0-9:]*) { + sed -n ' + /SH *NAM/,/SH/{ + /SH/d + s/, *$// + ty + :y + s/ *\\*-.*// + tx + s/ *\\\(mi.*// + tx + s/[,:] */\ +/g + s/\n\\n/\ +/g + y/'$U'/'$L'/ + s/\n/ '$i'&/g + s/$/ '$i'/ + p + } + /SH *DES/q + d + :x + s/ *\\*-.*// + s/ *\\\(mi.*// + /^$/d + s/[,:] */\ +/g + s/\n\n/\ +/g + y/'$U'/'$L'/ + s/\n/ '$i'&/g + s/(.|\n)*$/& '$i'/ + p + q +' $i +kw=`{echo $i | sed 's/0intro/intro/'} +echo $kw $i +} | sort -u |