|
|
1.1 ! root 1: set x $* ! 2: . ./.param ! 3: ! 4: for dir in $DIRLST ! 5: do ! 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 ! 78: done
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.