1set x $* 2. ./.param 3 4for dir in $DIRLST 5do 6 > $TMPDIR/cref$dir 7 cd $MANDIR/man$dir 8 for file in $FILLST 9 do 10 so=`line < $file | sed "s/ .*$//"` 11 if test "$so" = ".so" 12 then 13 continue 14 fi 15 grep ".*([1-8][cmsgxjvCMSGXJV]*)" $file >> $TMPDIR/cref$dir 16 done 17 18 cd $TMPDIR 19 echo " ," >> cref$dir 20 date > lower.suf$dir 21 echo >> lower.suf$dir 22 date > badcref$dir 23 echo >> badcref$dir 24 ed - cref$dir >> lower.suf$dir <<! 25 g/ *\(([1-8][CMSGXJVcmsgxjv]*)\)/s//\1/ 26 1,\$s/ /\\ 27/g 28 1,\$s/ /\\ 29/g 30 1,\$s/,/\\ 31/g 32 v/(/d 33 g/\\\\\^/s/// 34 g/\\\\\|/s/// 35 g/([1-8][cgmsxjv])/p 36 g//d 37 g/^(/d 38 g/(/s//./ 39 g/^\./d 40 g/C).*/s//c/ 41 g/G).*/s//g/ 42 g/M).*/s//m/ 43 g/S).*/s//s/ 44 g/X).*/s//x/ 45 g/J).*/s//j/ 46 g/V).*/s//v/ 47 g/).*/s/// 48 w 49 q 50! 51 sort -i cref$dir | uniq > tmp.$$ 52 while read cref 53 do 54 sect=`echo $cref | sed "s/.*\.\(.\).*/\1/"` 55 try=`ls $MANDIR/man$sect/$cref 2>&1` 56 if test "$try" = "$MANDIR/man$sect/$cref" 57 then 58 continue 59 else 60 echo $try | sed -e "s;$MANDIR/man..;;" -e "s; not found;;" >> badcref$dir 61 fi 62 done < tmp.$$ 63 ed - badcref$dir <<! 64 g/\.\([1-8]\)/s//(\1/ 65 g/c$/s//C)/ 66 g/m$/s//M)/ 67 g/s$/s//S)/ 68 g/g$/s//G)/ 69 g/x$/s//X)/ 70 g/j$/s//J)/ 71 g/v$/s//V)/ 72 g/[^)]$/s/$/)/ 73 1s/.$// 74 w 75 q 76! 77 rm -f tmp.$$ cref$dir 78done 79