#!/bin/sh
################################################################3
#
#  This script will tar up the data for a given forecast cycle for the
#  directory specified by the first
#  argument ($1) and place the tar file on the HPSS server
#  under ${HPSSOUT}.  The tar file is put in the directory
#  appropriate for data valid for the day specified as the second 
#  command line argument ($2).
#
#  This script breaks up the fnmoc ensemble directory into four separate
#  tar files
#  
#  pgrba: all files stored in the pgrba subdirectory
#  pgrba_an: all files stored in the pgrba_an subdirectory
#  pgrba_bc: all files stored in the pgrba_bc subdirectory
#  pgrba_wt: all files stored in the pgrba_wt subdirectory
#
#  Usage: rhist_savefnmocens.sh Directory Date(YYYYMMDDHH format)
#
#  Where: Directory  = Directory to be tarred.
#         Date(YYYYMMDDHH format) = Day that the tar file should be saved under.
#
#  02/22/2007 - J. Cooke - Removed all error checking for 
#                          missing CMCENS data since it is
#                          often incomplete
#
#  11/30/2007 - J. Cooke - Added logic to being archiving track data
#
#  02/23/2011 - J. Zhu -  Modified based on cmcens script to add archive for fnmoc data
#
################################################################3
set -x


if [ $# -ne 2 ]
then
  echo "Usage: rhist_savefnmocens.sh Directory Date(YYYYMMDD format) "
  exit 1
fi 

#
#   Get directory to be tarred from the first command line argument,
#   and check to make sure that the directory exists.
#

dir=$1
if [ ! -d $dir ]
then
  echo "rhist_savefnmocens.sh:  Directory $dir does not exist."
  exit 2
fi 

#
#   Determine the directory where the tar file will be stored
#   and make sure that it exists on the CCS.
#

year=`echo $2 | cut -c 1-4`
yearmo=`echo $2 | cut -c 1-6`
yrmoday=`echo $2 | cut -c 1-8`
rhcyc=`echo $2 | cut -c 9-10`
rhcycle=$rhcyc

if [ $TSM_FLAG = 'NO' ]
then
  hpssdir0=${HPSSOUT}/rh${year}/${yearmo}/$yrmoday
  hpssdir1=${HPSSOUT}/1year/rh${year}/${yearmo}/$yrmoday
  hpssdir2=${HPSSOUT}/2year/rh${year}/${yearmo}/$yrmoday
                                                                                                   
elif [ $TSM_FLAG = 'YES' ]
then
  rhistdir0=${TSMOUT}/rh${year}/${yearmo}/$yrmoday
  rhistdir1=${TSMOUT}/1year/rh${year}/${yearmo}/$yrmoday
  rhistdir2=${TSMOUT}/2year/rh${year}/${yearmo}/$yrmoday
 
  ssh ibmtsm1.ncep.noaa.gov "mkdir -p -m 755 $rhistdir0; mkdir -p -m 755 $rhistdir1; mkdir -p -m 755 $rhistdir2"
fi

#
#   Get a listing of all files in the directory to be tarred
#   and break the file list up into groups of files.
#   Each list of files names the contents of its associated tar file.
#   Then cd to the directory to be tarred.
# 

cd $DATA
ls -1 ${dir}/${rhcycle}/pgrba | awk ' BEGIN { FS="/"} { print "./pgrba/"$NF } ' > pgrba
ls -1 ${dir}/${rhcycle}/pgrba_an | awk ' BEGIN { FS="/"} { print "./pgrba_an/"$NF } ' > pgrba_an
ls -1 ${dir}/${rhcycle}/pgrba_bc | awk ' BEGIN { FS="/"} { print "./pgrba_bc/"$NF } ' > pgrba_bc
ls -1 ${dir}/${rhcycle}/pgrba_wt | awk ' BEGIN { FS="/"} { print "./pgrba_wt/"$NF } ' > pgrba_wt
ls -1 ${dir}/${rhcycle}/track | awk ' BEGIN { FS="/"} { print "./track/"$NF } ' > track

if [ ${rhcycle} -eq 00 -o ${rhcycle} -eq 12 ]
then
   archive_list='pgrba pgrba_an pgrba_bc pgrba_wt'
else
   archive_list='pgrba'
fi

cd ${dir}/${rhcycle}

#  Now create a tar file for each group of files

for file in $archive_list
do

   #
   #   Pick 1year, 2year, or permanent archive.
   #
   case $file in
      pgrba)        hpssdir=$hpssdir0
                    rhistdir=$rhistdir0;;
      pgrba_an)     hpssdir=$hpssdir1
                    rhistdir=$rhistdir1;;
      pgrba_bc)     hpssdir=$hpssdir1
                    rhistdir=$rhistdir1;;
      pgrba_wt)     hpssdir=$hpssdir1
                    rhistdir=$rhistdir1;;
      *)            hpssdir=$hpssdir0
                    rhistdir=$rhistdir0;;
   esac

   #
   #   Generate the name of the tarfile, which should be the same
   #   as the absolute path name of the directory being
   #   tarred, except that "/" are replaced with "_".
   #

   tarfile=`echo $PWD | cut -c 2- | tr "/" "_"`
   tarfile=${tarfile}.${file}.tar

   #
   #   Check if the tarfile index exists.  If it does, assume that
   #   the data for the corresponding directory has already been
   #   tarred and saved.
   #
   
   if [ $TSM_FLAG = 'NO' ]
   then
     hsi "ls -l ${hpssdir}/${tarfile}.idx"
     tar_file_exists=$?
     if [ $tar_file_exists -eq 0 ]
     then
       echo "File  $tarfile already saved."
       continue
     fi 
   elif [ $TSM_FLAG = 'YES' ]
   then
     size=`ssh ibmtsm1.ncep.noaa.gov ls -l ${rhistdir}/${tarfile} | awk '{ print \$5}'`
     if [  -n "$size" ]
     then
       if [ $size -gt 0 ]
       then
          echo "File $tarfile already saved."
          continue
       fi
     fi
   fi

   #   If on Stratus:
   #   htar is used to create the archive, -P creates
   #   the directory path if it does not already exist, 
   #   and an index file is also made.
   #  
   if [ $TSM_FLAG = 'NO' ]
   then   
     date
     htar -P -cvf ${hpssdir}/$tarfile -L ${DATA}/$file
#     err=$?
     err=0
     if [ $err -ne 0 ]
     then
       echo "$0:  File $tarfile was not successfully created."
       exit 3
     fi 
     date
  
   #
   #   Read the tarfile and save a list of files that are in the tar file.
   # 
   
     htar -tvf $hpssdir/$tarfile
#     err=$?
     err=0
     if [ $err -ne 0 ]
     then
       echo "$0:  Tar file $tarfile was not successfully read to generate a list of the files."
       exit 4
     fi 

   #
   #  Restrict tar file, if it contains restricted data.
   #
       ${USHrhist}/rhist_restrict.sh ${hpssdir}/$tarfile

   #
   #  send to HSM
   #
   elif [ $TSM_FLAG = 'YES' ]
   then
     date
     gtar -cvf ${DATA}/$tarfile -T ${DATA}/$file
#     err=$?
     err=0
     if [ $err -ne 0 ]
     then
       echo "$0:  File $tarfile was not successfully created."
       exit 3
     fi

     $SCP $SCP_CONFIG ${DATA}/$tarfile ibmtsm1.ncep.noaa.gov:${rhistdir}/$tarfile
     date
   fi 
rm  ${DATA}/$file
   
done

exit 0
