Return to omkindex CVS log

Up to [Research Unix] / researchv10dc / vol2 / index / tools

Annotation of researchv10dc/vol2/index/tools/omkindex, revision 1.1.1.1

1.1       root        1: T=/usr/vol2/index/tools
                      2: if test $# -eq 0
                      3: then
                      4:        echo mkindex directory file or mkindex file
                      5:        exit
                      6: fi
                      7: if test $# -eq 1
                      8: then
                      9: j=`basename $1 .x`
                     10: sed -n "/^\.XX.*$j/p" ../contents/contents.ms|awk '{print $2 >"name"}'
                     11: else
                     12: j=`basename $2 .x`
                     13: sed -n "/^\.XX.*$1\/$j/p" ../contents/contents.ms|awk '{print $2 >"name"}'
                     14: fi
                     15: FILE=$j.x
                     16: S=`cat name`
                     17: echo $S
                     18: sed -e '/^0    /d' -e 's/ #.*//' -e 's/:/!/g' -e '/^[A-Za-z.]/d' -e '/Examp/d' $FILE| awk '
                     19: BEGIN  {FS="   " }
                     20: NF==2  { print str ", " $2 ": " $1
                     21:        print $2 ", " str ": " $1
                     22:        }
                     23: NF==3  {
                     24:        if($NF == "s" )print str ", " $2 ": " $1
                     25:        else print $2 ", " str ": " $1
                     26: }' str=$S | sort -u -t":" +0 -1 +1n |awk -f $T/combind.awk|sed -e 's/~/\$/g' -e 's/!/:/g'>$j.ind

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