ckfrefs revision 1.1
11.1Smrg#! /bin/sh
21.1Smrgset x $*
31.1Smrg. ./.param
41.1Smrg
51.1Smrgfor dir in $DIRLST
61.1Smrgdo
71.1Smrg	> $TMPDIR/fref$dir
81.1Smrg	cd $MANDIR/man$dir
91.1Smrg	for file in $FILLST
101.1Smrg	do
111.1Smrg		so=`line < $file | sed "s/ .*//"`
121.1Smrg		if test "$so" = ".so"
131.1Smrg		then
141.1Smrg			continue
151.1Smrg		fi
161.1Smrg		ed - $file >> $TMPDIR/fref$dir <<!
171.1Smrg			/FILES/
181.1Smrg			+,/\.SH/-p
191.1Smrg			q
201.1Smrg!
211.1Smrg	done
221.1Smrg
231.1Smrg	cd $TMPDIR
241.1Smrg	date > badfref$dir
251.1Smrg	echo >> badfref$dir
261.1Smrg	grep "/" fref$dir > /dev/null
271.1Smrg	if test $? -eq 1
281.1Smrg	then
291.1Smrg		rm -f fref$dir
301.1Smrg		continue
311.1Smrg	fi
321.1Smrg	echo "\\t ," >> fref$dir
331.1Smrg	ed - fref$dir <<!
341.1Smrg		1,\$s/ /\\
351.1Smrg/g
361.1Smrg		1,\$s/	/\\
371.1Smrg/g
381.1Smrg		1,\$s/,/\\
391.1Smrg/g
401.1Smrg		v/\//d
411.1Smrg		g/:$/s///
421.1Smrg		g/\\\\(\*/s///g
431.1Smrg		g/\\\\s+1/s///g
441.1Smrg		g/\\\\s-1/s///g
451.1Smrg		g/\\\\s0/s///g
461.1Smrg		g/\\\\f./s///g
471.1Smrg		g/\\\\\*S/s///g
481.1Smrg		g/\\\\\&/s///g
491.1Smrg		g/\$\$/s//*/
501.1Smrg		g/^?/d
511.1Smrg		g/^\./d
521.1Smrg		g/tmp/d
531.1Smrg		g/spool/d
541.1Smrg		g/mail/d
551.1Smrg		g/^[^\/]/d
561.1Smrg		g/(/d
571.1Smrg		g/)/d
581.1Smrg		g/\'/d
591.1Smrg		g/\`/d
601.1Smrg		g/\"/d
611.1Smrg		g/\&/d
621.1Smrg		g/\|/d
631.1Smrg		1,\$s/^/ls /
641.1Smrg		w
651.1Smrg		q
661.1Smrg!
671.1Smrg	sort fref$dir | uniq > tmp.$$
681.1Smrg	sh tmp.$$ > fref$dir 2>&1
691.1Smrg	grep "not found" fref$dir | sed "s/ not found//" >> badfref$dir
701.1Smrg	rm -f tmp.$$ fref$dir
711.1Smrgdone
72