#!/bin/sh

set -x

cd $DATA

#################################
# Define Fix File with File List to ftp
#################################
filelist=$FIXutil/ftp_$FIXFILE

cat << EOF > ftpin
  prompt
  bin
EOF

sed 's/^.*/get &/' $filelist > tmp1
sed s/{PDY}/$PDY/ tmp1 > tmp2
sed s/{PDYm1}/$PDYm1/ tmp2 > tmp1
sed s/{PDYcm1}/$PDYcm1/ tmp1 > tmp2
sed s/{cyc}/$cyc/ tmp2 > tmp1
sed s/{cycm1}/$cycm1/ tmp1 > tmp2
sed s/{cycm2}/$cycm2/ tmp2 > tmp1
sed s/{PDYcm2}/$PDYcm2/ tmp1 > tmp2
sed s/{PDYcm3}/$PDYcm3/ tmp2 > tmp1
sed s/{PDYcm4}/$PDYcm4/ tmp1 > tmp2
sed s/{cycm3}/$cycm3/ tmp2 > tmp1
sed s/{cycm4}/$cycm4/ tmp1 > tmp2 
sed s/{JDAYcm1}/$JDAYcm1/ tmp2 > tmp1
sed s/{cycprev3}/$cycprev3/ tmp1 > tmp2
sed s/{PREV1cyc}/$PREV1cyc/ tmp2 > tmp1
sed s/{PREV1day}/$PREV1day/ tmp1 > tmp2
sed s/{PDYcdasm2}/$PDYcdasm2/ tmp2 > tmp1
sed s/{cyccdasm2}/$cyccdasm2/ tmp1 > tmp2
sed s/{PDYm2}/$PDYm2/ tmp2 >> ftpin
rm -f tmp1 tmp2

cat << EOF >> ftpin
  bye
EOF

try=0
doftp=NO

while [ $try -lt $ntrymax ]
do
   /etc/ping $REMOTE_HOST 64 2
   pingerr=$?
   if [ $pingerr -eq 0 ]
   then
     doftp=YES
     try=$ntrymax
   else
     msg="Cannot Contact $REMOTE_HOST on try $try of $ntrymax"
     postmsg "$jlogfile" "$msg"
     let try=try+1 
   fi
done

if test "$doftp" = "YES"
then
   ftp -v $REMOTE_HOST < $DATA/ftpin
else
   err_exit "Cannot Contact $REMOTE_HOST after $ntrymax try/tries"
fi

if [ $model = "sst" ] ; then
  cat <<EOF >ftpsst
  bin
  prompt
  cd /com/gfs/prod/sst.${PDYm1}
  lcd /com/gfs/prod/sst.${PDYm1}
  mget *
  quit
EOF
  ftp -v $REMOTE_HOST < $DATA/ftpsst
fi

exit