#!/bin/ksh
data=`date +'%d/%m/%y`
caminho=/arch
pathback=/arch/archbk
backup=ok
#
# --- Zipa archives ---
#
   ls -lart $caminho/arch_slv* > $caminho/saida
   cat $caminho/saida | while read LINE
   do
      atu=`echo $LINE | awk -F/ '{print $3}'`
      gzip -c $caminho/$atu > $pathback/$atu'.'gz
   done
#
#--- Verifica se o backup foi ok ---
#    (Se sim, exclui os archives)
#
   cat $caminho/saida | while read LINE
   do
      file=`echo $LINE | awk -F/ '{print $3}'`
      len=`echo $LINE | awk '{print $5}'`
      zip=`gzip -l $pathback/$file'.'gz | awk '{print $2}'`
      uncomp=`echo $zip | awk '{print $2}'`
      if [ "$len" != "$uncomp" ]
         then
         backup=erro
         echo $data " Backup falhou para o file " $file >> $pathback/backup.log
      fi
   done
   if [ $backup = ok ]
      then
      cat $caminho/saida | while read LINE
      do
         file=`echo $LINE | awk '{print $9}'`
         rm $file
      done
   fi