# makeshortsect: make a section of the reference manual
#
# Usage: makeshortsect Section.<number>
#
# If the file 'lastpage' exists, it will be read to get the initial page number
#
# This differs from makesection by not making a table of contents, and also
# in where it puts the files.
#
# $Id: makeshortsect,v 2.1 1997/12/07 08:34:53 grog Exp grog $
#
# $Log: makeshortsect,v $
# Revision 2.1  1997/12/07 08:34:53  grog
# Base second edition
#
# Revision 1.6  1996/06/26 11:04:04  grog
# Checkpoint 30 June, maybe final version of long book for 2.1.5?
#
# Revision 1.5  1996/04/08  12:07:27  grog
# Minor mods (do we need this any more?)
#
# Revision 1.4  1996/02/24  16:31:45  grog
# More mods
#
# Revision 1.2  1996/02/24  12:17:12  grog
# minor mods
#
# Revision 1.1  1996/02/18  10:39:13  grog
# Initial revision
#
#
sect=`echo $1 | sed 's:Section.::; s:Chapter/short/::'`
if [ -f lastpage ]; then
  read page < lastpage
  page=`expr $page + 1`
else
  page=1
fi
TEMPFILE=/tmp/filelist.$$ export TEMPFILE
cat preferences/$1 > $TEMPFILE
GROFF_TMAC_PATH=`pwd`/../tools export GROFF_TMAC_PATH
PATH=`pwd`/../tools:$PATH
cd man$sect
rm -rf ../Chapter/short/$sect  ../Toc/$sect
mkdir -p ../Chapter/short/$sect
echo --- eliminating duplicates
find . -type f -name "*.gz" | xargs ls -l | sort +4 \
   | sed 's:^.* ::; s:^\./::; s:\.gz$::' >> $TEMPFILE
   xargs <$TEMPFILE elimdup
printf "%-28s\t%s\t%s\t%s\n\n" "Man page" First Last Pages
for i in `xargs < ../filelist`; do		# ../filelist is created by elimdup
  printf "%-30s\t%d\t" $i $page
  cleanup $i <$i | gsoelim | ${TBL} |
  groff -rD1 -rP$page -r%$page -r$$ -rLL=${HEIGHT} -rIN=${WIDTH} -rN2 -mpic ${MACROFILE} - \
   >../Chapter/short/$sect/$i 2>>../Toc/$sect
#   echo   lastpage=\`awk \< ../Chapter/short/$sect/$i '/%%Page:/ {page=$2 }; END {print page}'\`
   lastpage=`awk < ../Chapter/short/$sect/$i '/%%Page:/ {page=$2 }; END {print page}'`
   if [ $lastpage -ge $page ]; then
     pages=`expr $lastpage - $page + 1`
     page=$lastpage
   else
     echo '***' $i has incorrect page numbering
     pages=1
   fi
   printf "%d\t%d\n" $page $pages
   page=`expr $page + 1`
   rm -f $i
done
echo $page > ../lastpage
echo
cd ..
echo Merging PostScript files
cd Chapter/short
rm -f Section.$sect
find $sect -type f | xargs ../merge >> Section.$sect
rm -rf $sect Section.$sect~
