Blame | Last modification | View Log | RSS feed
#! /bin/sh
cd `dirname $0`
for l in ??
do
rm -f index.$l index2.$l dirs.$l 2>/dev/null
dirs=`cd $l; echo * | grep -v '\*' | sort`
for d in $dirs
do
rm -f $l/$d/.index 2>/dev/null
dmethlist=
meth=`cd $l/$d; ls *.def 2>/dev/null | sed 's/.def$//g' | sort`
for m in $meth
do
tit=`awk -F'=' '/methtit=/ {print $2; exit}
/wims_read_parm/ {exit}' $l/$d/$m.def`
echo $d/$m:$tit >>index.$l
echo $m:$tit >>$l/$d/.index
dmethlist="$dmethlist $m"
tit2=`awk -F'=' '/methtit2=/ {print $2; exit}
/wims_read_parm/ {exit}' $l/$d/$m.def`
if [ -z "$tit2" ]; then tit2=$tit; fi
echo $d/$m:$tit2 >>index2.$l
done
if [ ! -z "$dmethlist" ]; then
echo $d:$dmethlist >>index2.$l
fi
name=`cat $l/$d/.name`
if [ ! -z "$name" ]; then
echo $d:$name >>dirs.$l
fi
done
for f in index index2 dirs
do
if [ -s $f.$l ]; then
../dicsort $f.$l
mv $f.$l.sorted $f.$l
fi
done
done