Details | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 20 | reyssat | 1 | #! /bin/sh |
| 2 | # |
||
| 3 | # Regeneration of index files. |
||
| 4 | |||
| 5 | cd `dirname $0` |
||
| 6 | home=`pwd` |
||
| 7 | |||
| 8 | dirs=`ls -d [1-9]* | sort -n` |
||
| 9 | echo dirs = $dirs >.def |
||
| 10 | rm -f .index |
||
| 11 | |||
| 12 | for d in $dirs; do |
||
| 13 | cd $d |
||
| 14 | rm -f .index |
||
| 15 | list=`ls *.data | sed 's/\.data$//'` |
||
| 16 | for f in $list; do |
||
| 17 | desc=`awk -F: 'BEGIN {a=0;t=""}; |
||
| 18 | NF>1 {a++;t=$2}; |
||
| 19 | NF==1 {t=$1}; |
||
| 20 | a==1 && length(t)>0 {out=out" "t;t=""}; |
||
| 21 | a>1 {print out; exit};' $f.data |\ |
||
| 22 | sed 's/,/\,/g'` |
||
| 23 | echo ":$d,$f,$desc" >>.index |
||
| 24 | done |
||
| 25 | cd $home |
||
| 26 | sort <$d/.index >>.index |
||
| 27 | done |
||
| 28 |