#!/bin/sh
#set -xv
#
#       This shell script loads the GeoTAX Auxiliary Reference file #2
#       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 auxload2.log file found in
#       the /data directory.
#
#==============================================================================
check_run() {
xxx=
dbloc=$G1GTXDB
G1CDDIR=$G1GTX/data; export G1CDDIR
Clearit;
$G1ECHO "\n\tThe Auxiliary Reference load environment is currently set to:\n"
$G1ECHO "\tAuxiliary Reference input file location:" $G1GTX/data"\n"
$G1ECHO "\tAuxiliary Reference 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\tAuxiliary Reference file output location "$dbloc" does not exist."
        $G1ECHO "\tDo you want to create it now?\n"
        $G1ECHO "\tEnter (y)es to create the new Auxiliary Reference 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 Auxiliary Reference install area."
                        exit 1
                ;;
        esac
fi

update_setup


}
#===========================================================================
getauxname()
{
Clearit;
$G1ECHO "\n\tPlease enter the file name of your Auxiliary Reference file #2,"
$G1ECHO "\tthen press <Enter> to continue...."
$G1ECHO "\n\t=====> \c"
read auxname
export auxname
if [ -f "$G1CDDIR/$auxname" ]
then
        $G1ECHO "\n\tAuxiliary Reference file located....."
	$G1ECHO "\n\tCreating the GeoTAX Auxiliary Reference File...\n"
else
        $G1ECHO "\n\tFile was not found at "$G1CDDIR/$auxname
        $G1ECHO "\n\tPlease try again or press Control C (^C) to quit."
        $G1ECHO "\tPress <Enter> to try again...."
        read xxx
        getauxname
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"/g1gtax2 ]
   then
       $G1ECHO "************************************************"
       $G1ECHO "AUXILARY REFERENCE FILE #2 LOADED SUCCESSFULLY"
       $G1ECHO "END GEOTAX AUXILARY REFERENCE INSTALLATION" 
       $G1ECHO "************************************************"
       $G1ECHO "************************************************" > $G1DBLOG
       $G1ECHO "AUXILARY REFERENCE FILE #2 LOADED SUCCESSFULLY" >> $G1DBLOG
       $G1ECHO "END GEOTAX AUXILARY REFERENCE 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 Auxiliary Reference 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 Auxiliary Reference 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 Auxiliary Reference #2 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 Auxiliary Reference file #2 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 "   AUXILARY REFERENCE FILE #2 DID NOT LOAD\n"
       $G1ECHO "Please check log file (gtxload2.log) for possible causes."
       $G1ECHO "*************************************" >> $G1DBLOG
       $G1ECHO "=========> ERROR <=========" >> $G1DBLOG
       $G1ECHO "AUXILARY REFERENCE FILE #2 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;
getauxname;
. $G1GTX/bin/setauxdb2
if [ -s "$dbloc"/g1gtax2 ]
then
       rm -f "$dbloc"/g1gtax2 >/dev/null 2>&1
       rm -f "$dbloc"/g1gtax2.vix >/dev/null 2>&1
fi
$G1ECHO "****************************************" > $G1DBLOG
$G1ECHO "GEOTAX AUXILARY REFERENCE #2 INSTALLATION\n" >> $G1DBLOG
$G1ECHO "Installed on `date`\n" >>$G1DBLOG
$G1RTS/bin/runcbl $G1GTX/lib/GTAX2BLD.acu
if [ $? -ne 0 ]
then
        $G1ECHO "\nThe database load program GTAX2BLD did not execute."
        $G1ECHO "Please contact Group 1 Support for assistance.\n"
        exit
fi
check_filesout;
