#!/bin/sh

cd /mit/netls/fred/build/$hosttype
PATH=/usr/ucb:$PATH

echo "Please answer with verbosity. For instance, if the vendor is"
echo "DEC, you can say Digital Equipment Corporation."
echo ""
echo -n "           Enter program name: "
read program
echo -n "                Enter version: "
read version
echo -n "            Enter vendor name: "
read vendor
echo -n "Enter full path to executable: "
read path
echo ""

pname=`basename $path`

echo "Encrypting binary..."
encrypt "$program" "$version" "$vendor" $path $path.des
if [ "$?" != "0" ]; then
	exit 1
fi
mv $path $path.hide
echo "Be sure to hide $path.hide."

cp unwrap `dirname $path`
if [ "$?" != "0" ]; then
	exit 1
fi

echo "#!/bin/sh" > $path
echo exec unwrap \"$program\" \"$version\" \"$vendor\" $path.des $pname \$* >> $path
chmod 755 $path