#!/bin/csh -f
# make a snapshot of the TechInfo utilities

set fname=tiutil
set tmpdir=/tmp

set echo

# Make temporary copy of everything
rm -rf ${tmpdir}/${fname}
mkdir ${tmpdir}/${fname}
(cd /mit/techinfodev/src; \
tar cf - README Imakefile config libti util) | (cd ${tmpdir}/${fname}; tar xf -)

# Remove cruft
cd ${tmpdir}/${fname}
rm -rf util/mirror libti/junk
set cruft=`find . "(" -name "RCS" -o -name "*~" -o -name ".#*" ")" -a -print`
rm -rf $cruft

# Get latest function prototypes produced by mkptypes
cp /mit/techinfodev/build/decmips/libti/ptypes.h libti/ptypes.h
# Don't try to use mkptypes to regenerate ptypes.h
mv libti/Imakefile libti/Imakefile.MIT
grep -v NOT-FOR-DISTRIBUTION libti/Imakefile.MIT > libti/Imakefile

# Make tarfile
cd ${tmpdir}
tar cf ${fname}.tar ${fname}
compress ${fname}.tar

# Make available for ftp
mv ${fname}.tar.Z ~ftp/pub/${fname}.tar.Z

exit 0