#!/bin/sh
#set -xv
#
#       This shell script loads the GeoTAX Pay Tax Correspondence file
#       from the input media and puts them in the format needed.  
#
#       A log of status messages sent to the terminal following the response
#       to the load cd prompt is put into the payload.log file found in
#       the /data directory.
#
#==============================================================================
check_run() {
xxx=
dbloc=$G1GTXDB
G1CDDIR=$G1GTX/data; export G1CDDIR
Clearit;
$G1ECHO "\n\tThe Pay Tax Correspondence load environment is currently set to:\n"
$G1ECHO "\tPay Tax Correspondence input file location:" $G1GTX/data"\n"
$G1ECHO "\tPay Tax Correspondence output file location:" $dbloc"\n"
$G1ECHO "\tEnter c to (c)ontinue"
$G1ECHO "\t   or m to (m)odify input/output file location"
$G1ECHO "\t   or q to (q)uit\n"
$G1ECHO "\t   ===> \c"
read xxx
case $xxx in
        q|Q) $G1ECHO "\n\tUser requested termination.\n"
             exit
        ;;
esac
case $xxx in
        m|M)
                $G1ECHO "\n\tWhich do you want to change?\n"
                $G1ECHO "\tEnter 1 to change the input file location"
                $G1ECHO "\t   or 2 to change the database output location"
                $G1ECHO "\t   or 3 to change both\n"
                $G1ECHO "\t  ===> \c"
                read modio
                case $modio in
                        1)      get_pathin
                        ;;
                        2)      get_pathout
                        ;;
                        3)      get_pathin
                                get_pathout
                        ;;
                        *)      check_run
                        ;;
                esac
        ;;
        c|C) :
        ;;
          *) check_run
        ;;
esac

if [ ! -d "$dbloc" ]    # check to see if the install area is there
then
        $G1ECHO "\n\tPay Tax Correspondence file output location "$dbloc" does not exist."
        $G1ECHO "\tDo you want to create it now?\n"
        $G1ECHO "\tEnter (y)es to create the new Pay Tax Correspondence file area."
        $G1ECHO "\t      (n)o to exit.\n"
        $G1ECHO "\t   ===> \c"
        read yyyy
        case $yyyy in
                [yY]*)  curr_dir=$PWD         #  Preserve the current location
                        mk_dir                #  Call the make directory mk_dir function
                        cd $curr_dir          #  Change to the previous location
                ;;
                    *)  $G1ECHO "\n\tYou must create the new Pay Tax Correspondence install area."
                        exit 1
                ;;
        esac
fi

update_setup


}
#===========================================================================
getpayname()
{
Clearit;
$G1ECHO "\n\tPlease enter the file name of your Pay Tax Correspondence file,"
$G1ECHO "\tthen press <Enter> to continue...."
$G1ECHO "\n\t=====> \c"
read payname
export payname
if [ -f "$G1CDDIR/$payname" ]
then
        $G1ECHO "\n\tPay Tax Correspondence file located....."
	$G1ECHO "\n\tCreating the GeoTAX Pay Tax Correspondence File...\n"
else
        $G1ECHO "\n\tFile was not found at "$G1CDDIR/$payname
        $G1ECHO "\n\tPlease try again or press Control C (^C) to quit."
        $G1ECHO "\tPress <Enter> to try again...."
        read xxx
        getpayname
fi
}
#===========================================================================
check_filesout()
{
if  [ `grep 'Error' $G1DBLOG | wc -l` -ne 0 -o \
      `grep 'ERROR' $G1DBLOG | wc -l` -ne 0 -o \
      `grep 'error' $G1DBLOG | wc -l` -ne 0 ]
    then
    bad_load;
else
if  [ `grep 'Return Code' $G1DBLOG | wc -l` -ne 0 ]
    then
    bad_load;
else
   if [ -s "$dbloc"/g1gtptc ]
   then
       $G1ECHO "************************************************"
       $G1ECHO "PAY TAX CORRESPONDENCE FILE LOADED SUCCESSFULLY"
       $G1ECHO "END GEOTAX PAY TAX CORRESPONDENCE INSTALLATION" 
       $G1ECHO "************************************************"
       $G1ECHO "************************************************" > $G1DBLOG
       $G1ECHO "PAY TAX CORRESPONDENCE FILE LOADED SUCCESSFULLY" >> $G1DBLOG
       $G1ECHO "END GEOTAX PAY TAX CORRESPONDENCE INSTALLATION" >> $G1DBLOG
       $G1ECHO "************************************************" >> $G1DBLOG
   else
       bad_load;
   fi
 fi
fi
}


#===========================================================================
# Get the full path for the db input area
get_pathin()
{
Clearit;
$G1ECHO "\n\tPlease enter full path where the Pay Tax Correspondence files are located"
$G1ECHO "\t ==> \c"
read G1CDDIR
if [ "$G1CDDIR" = "" -o "$G1CDDIR" = " " ]
then
        $G1ECHO "\n\tYou must enter a valid full path."
        $G1ECHO "\tPress Enter to continue....."
        read pressenter
        get_pathin
fi
$G1ECHO "\n\tThe location of the Pay Tax Correspondence input files will be: " $G1CDDIR
$G1ECHO "\tIs this correct?\n"
$G1ECHO "\tEnter (y)es to continue."
$G1ECHO "\t      (n)o to try again.\n"
$G1ECHO "\t   ===> \c"
read yyyy
case $yyyy in
        [yY]*)  yyyy=
        ;;
            *)  get_pathin
        ;;
esac

export G1CDDIR
}
#===========================================================================
# Get the full path for the new db load area
get_pathout()
{
Clearit;
$G1ECHO "\n\tPlease enter full path where you would like to install"
$G1ECHO "\tthe Pay Tax Correspondence file ==> \c"
read dbloc
if [ "$dbloc" = "" -o "$dbloc" = " " ]
then
        $G1ECHO "\n\tYou must enter a valid full path."
        $G1ECHO "\tPress Enter to continue....."
        $G1ECHO "\t"$G1CDDIR", which are needed for input."
        read pressenter
        get_pathout
fi
$G1ECHO "\n\tThe new Pay Tax Correspondence file location will be: " $dbloc
$G1ECHO "\tIs this correct?\n"
$G1ECHO "\tEnter (y)es to continue."
$G1ECHO "\t      (n)o to try again.\n"
$G1ECHO "\t   ===> \c"
read yyyy
case $yyyy in
        [yY]*)  yyyy=
        ;;
            *)  get_pathout
        ;;
esac
if [ ! -d "$dbloc" ]    # check to see if the install area is there
then
        $G1ECHO "\n\tDatabase output location "$dbloc" does not exist."
        $G1ECHO "\tDo you want to create it now?\n"
        $G1ECHO "\tEnter (y)es to create the new database area."
        $G1ECHO "\t      (n)o to exit.\n"
        $G1ECHO "\t   ===> \c"
        read yyyy
        case $yyyy in
                [yY]*)  curr_dir=$PWD         #  Preserve the current location
                        mk_dir                #  Call the make directory mk_dir function
                        cd $curr_dir          #  Change to the previous location
                ;;
                    *)  $G1ECHO "\n\tYou must create the new database install area."
                        exit 1
                ;;
        esac
fi
export dbloc
}

#===========================================================================
#
# Function to clear the screen. Try the clear shell command
# first, then try the tput command with a clear parameter and then
# try to clear each position (line) of the screen the hard way.
#
Clearit()
{
{ clear; } 2>/dev/null  ||
        { tput clear; } 2>/dev/null  ||
                { for i in \
                p01 p02 p03 p04 p05 p06 p07 p08 p09 p10   \
                p11 p12 p13 p14 p15 p16 p17 p18 p19 p20   \
                p21 p22 p23 p24 p25 p26 p27 p28 p29 p30   \
                p31 p32 p33 p34 p35 p36 p37 p38 p39 p40
                do
                        echo ""
                done
                }
}

#===========================================================================
bad_load()
{
       $G1ECHO "============> ERROR <============"
       $G1ECHO "   PAY TAX CORRESPONDENCE FILE DID NOT LOAD\n"
       $G1ECHO "Please check log file (gtxload.log) for possible causes."
       $G1ECHO "*************************************" >> $G1DBLOG
       $G1ECHO "=========> ERROR <=========" >> $G1DBLOG
       $G1ECHO "PAY TAX CORRESPONDENCE FILE DID NOT LOAD" >> $G1DBLOG
       $G1ECHO "Possible causes...." >> $G1DBLOG
       $G1ECHO "  Not enough disk space available...." >> $G1DBLOG
       $G1ECHO "  Incorrect output path specification...." >> $G1DBLOG
       $G1ECHO "  Write permissions...." >> $G1DBLOG
       $G1ECHO "  Bad input media...." >> $G1DBLOG
       $G1ECHO "  Upper/lower case filenames...." >> $G1DBLOG
       $G1ECHO "*************************************" >> $G1DBLOG
}

#===========================================================================
#  update the new database location in the setup script for future use
update_setup()
{
   ${G1GTX}/bin/scr_updtdb "$dbloc"
}
#===========================================================================
#  create new db location based upon user's new entered path
mk_dir()
{
  cd /
  for n in `$G1ECHO $dbloc | tr '/' ' '`
  do
    if [ ! -d "$n" ]
    then
         mkdir $n
    fi
  cd $n
  done
}

#===========================================================================
Clearit;
check_run;
Clearit;
getpayname;
. $G1GTX/bin/setpaydb
if [ -s "$dbloc"/g1gtptc ]
then
       rm -f "$dbloc"/g1gtptc >/dev/null 2>&1
       rm -f "$dbloc"/g1gtptc.vix >/dev/null 2>&1
fi
$G1ECHO "*************************************" > $G1DBLOG
$G1ECHO "GEOTAX PAY TAX CORRESPONDENCE INSTALLATION\n" >> $G1DBLOG
$G1ECHO "Installed on `date`\n" >>$G1DBLOG
$G1RTS/bin/runcbl $G1GTX/lib/GTPTCBLD.acu
if [ $? -ne 0 ]
then
        $G1ECHO "\nThe database load program GTPTCBLD did not execute."
        $G1ECHO "Please contact Group 1 Support for assistance.\n"
        exit
fi
check_filesout;
