#!/bin/csh -f
#
# $Id:$
# $Source:$
# $Author:$
#

set whoami = $0
set whoami = $whoami:t

if ($?argv != 1) then
   echo "Usage: $whoami dir"
   exit 1
endif

set dir = $1
cd $dir

set lastcomp = $cwd:t
set archive = $lastcomp.tar.gz

set files = `ls -A`
tar cvf - $files | gzip > $archive
if ($status == 0) then
   set owner = `ls -ld | awk '{print $3}'`
   chown $owner $archive >& /dev/null
   chmod 444 $archive >& /dev/null
   echo "Archive succesful.  Removing files..."
   rm -rf $files
   cp -p /home/era/archive_init/.login .login
   chown $owner .login >& /dev/null
   # Must be writable 
   chmod 644 .login >& /dev/null
else
   echo "Archive of $dir failed."
   rm $archive
endif

exit 0