#!/bin/sh

# Copies the tree
function p1prep
{
  pushd ~/base
  rm -R /tmp/p1
  cp -R p1 /tmp/
  cd /tmp/p1
  rm misc/cppcode.tar.gz
  popd
}

# Cleans it
function p1clean
{
  pushd /tmp/p1

  for i in `ls *~` 
  do
    if [ -f $i ] 
    then
      rm $i
    fi
  done

  for i in `find . -name *.o` 
  do
    if [ -f $i ] 
    then
      rm $i
    fi
  done

  for i in `find . -name *.xcf` 
  do
    if [ -f $i ] 
    then
      rm $i
    fi
  done

  for i in `find . -name *.doc` 
  do
    if [ -f $i ] 
    then
      rm $i
    fi
  done

  for i in `find . -name *.ps` 
  do
    if [ -f $i ] 
    then
      rm $i
    fi
  done

  for i in `find . -name *.out` 
  do
    if [ -f $i ] 
    then
      rm $i
    fi
  done

  for i in `find . -name *.gz` 
  do
    if [ -f $i ] 
    then
      rm $i
    fi
  done


  for i in `find . -name main` 
  do
    if [ -f $i ] 
    then
      rm $i
    fi
  done

  popd
}

#runs the script to upload the
# tree to the web server.
function p1upload
{
  pushd /tmp/p1
  pwd

  kermit ~/base/ftplogin.txt


  popd
}



p1prep
p1clean
p1upload