11.1Smrgset x $*
21.1Smrg. ./.param
31.1Smrg
41.1SmrgPATH=$PATH:$MANDIR/tools
51.1Smrg
61.1Smrgsm=
71.1Smrgif test "$PFLAG" -eq 1
81.1Smrgthen
91.1Smrg	sm="-rs1"
101.1Smrgfi
111.1Smrg
121.1Smrgfor dir in $DIRLST
131.1Smrgdo
141.1Smrg	cd $MANDIR/man$dir
151.1Smrg	date > $TMPDIR/pages$dir
161.1Smrg	echo >> $TMPDIR/pages$dir
171.1Smrg	for file in $FILLST
181.1Smrg	do
191.1Smrg		prep="cat $file |"
201.1Smrg
211.1Smrg		first=`line < $file`
221.1Smrg		case "$first" in
231.1Smrg			.so*)	continue
241.1Smrg				;;
251.1Smrg			\'\\\"*)
261.1Smrg				option=`expr "$first" : '.* \(.*\)'`
271.1Smrg				case "$option" in
281.1Smrg					c)
291.1Smrg						prep="${prep} cw |"
301.1Smrg						;;
311.1Smrg					e)
321.1Smrg						prep="${prep} eqn |"
331.1Smrg						;;
341.1Smrg					t)
351.1Smrg						prep="${prep} tbl |"
361.1Smrg						;;
371.1Smrg					ce | ec)
381.1Smrg						prep="${prep} cw | eqn"
391.1Smrg						;;
401.1Smrg					ct | tc)
411.1Smrg						prep="${prep} cw | tbl |"
421.1Smrg						;;
431.1Smrg					et | te)
441.1Smrg						prep="${prep} tbl | eqn |"
451.1Smrg						;;
461.1Smrg					cet | cte | ect | etc | tce | tec)
471.1Smrg						prep="${prep} cw | tbl | eqn |"
481.1Smrg						;;
491.1Smrg				esac
501.1Smrg				;;
511.1Smrg			*)
521.1Smrg				;;
531.1Smrg		esac
541.1Smrg
551.1Smrg		numb=`eval ${prep} troff -man $sm -s -f -t | pages`
561.1Smrg		echo "$file	$numb" >> $TMPDIR/pages$dir
571.1Smrg	done
581.1Smrgdone
591.1Smrg
601.1Smrgtsum=0
611.1Smrgcd $TMPDIR
621.1Smrgdate > totalpgs
631.1Smrgecho >> totalpgs
641.1Smrg
651.1Smrgfor dir in $DIRLST
661.1Smrgdo
671.1Smrg	ed - pages$dir <<!
681.1Smrg		1,2d
691.1Smrg		w tmp1.$$
701.1Smrg		q
711.1Smrg!
721.1Smrg	sum=0
731.1Smrg	while read val
741.1Smrg	do
751.1Smrg		val=`echo $val | sed "s/.* / /"`
761.1Smrg		sum=`expr $sum + $val`
771.1Smrg		if test $? -eq 2
781.1Smrg		then
791.1Smrg			echo "pgcnt: error in summing - sum is $sum, val is $val"
801.1Smrg			exit
811.1Smrg		fi
821.1Smrg		echo $sum > tmp.$$
831.1Smrg	done < tmp1.$$
841.1Smrg	sumt=`line < tmp.$$`
851.1Smrg	echo "total pages Section $dir -- $sumt" >> totalpgs
861.1Smrg	tsum=`expr $tsum + $sumt`
871.1Smrgdone
881.1Smrg
891.1Smrgecho >> totalpgs
901.1Smrgecho >> totalpgs
911.1Smrgecho "total pages -- $tsum" >> totalpgs
921.1Smrgrm tmp.$$ tmp1.$$
93