#! /bin/sh
# $1=docfilename $2=PID $3=doctype [chap/app] $4=tmp directory
#
# $Id: gnct 2.10 1998/06/22 19:19:38 len Exp $
#

if [ "X$debug" = "Xtrue" ]; then set -x; fi
doctype=$3
tmpfile=$4/Se.$2
tmptmpfile=$4/Se.$2.tmp
trap "rm -f $tmptmpfile; trap '' 0; exit" 0 1 2 3 15
flag=$4/Se.$2.flag

if [ "$1" = "" ]; then 
  echo "You must add a .FILE" > $tmpfile
  echo "command to your source" >> $tmpfile
  echo ".nr do_box 1" > $flag
  exit 1
fi

sed -n -e '/^\.Ah/p
/^\.SH1/,/^\.\/TLE/{
s/^\([A-z].*\)/.Ah "\1"/p
}' $1 > $tmptmpfile
if [ ! -s $tmptmpfile ]; then 
	echo ".nr do_box 0" > $flag
	exit 
else echo ".nr do_box 1" > $flag
fi
/usr/5bin/echo ".in 0\n.ft \\\*[tocbox_ft]" > $tmpfile
/usr/5bin/echo "In this $doctype:\n.sp 2p" >> $tmpfile
/usr/5bin/echo ".in 1m\n.ta 1m" >> $tmpfile
sed -n -e '/^\.ig ++/,/^\.++/b
	s/^\.Ah "\([^"]*\)" "\([^"]*\)" "\([^"]*\)"/.ti -1m\
\\(bu	\1 \2\
.sp 2p/p
	s/^\.Ah "\([^"]*\)" "\([^"]*\)"/.ti -1m\
\\(bu	\1\ \2\
.sp 2p/p
	s/^\.Ah "*\([^"]*\)"*/.ti -1m\
\\(bu	\1\
.sp 2p/p' $tmptmpfile >> $tmpfile
/usr/5bin/echo ".in 0" >> $tmpfile
trap '' 0