#! /bin/ksh
#
#	Copyright 29 Sep 1997 Sun Microsystems, Inc.  All Rights Reserved.
#
# @(#)hainformix_fmon_start.shi	1.19 97/09/29 SMI
#
# hainformix_fmon_start - start an Informix fault monitor (hainformix_fmon)
#			  for the Informix OnLine Server #1
#
# Environment:
# HA_ENV - file name of HA environment file
# HA_METASETSERVE - list of the logical hosts to run on the local host
# HA_SIBLING_METASETSERVE - list of the logical hosts not on local host
#

# make sure we reread HA_ENV (might have changed)
# setting HA_CLUSTER to "" forces a re-read in informix_boiler
HA_CLUSTER=""

#	Copyright 10 Sep 1997 Sun Microsystems, Inc.  All Rights Reserved.
#
# @(#)informix_boiler	1.18 97/09/10 SMI

# begin of common ha-dbms boilerplate

# remember our name
argv0=`basename $0`

# Get the BASEDIR and PRODUCTDIR settings from the installed pkgs
_basedir=`pkgparam SUNWscinf BASEDIR 2>/dev/null`
_productdir=`pkgparam SUNWscinf PRODUCTDIR 2>/dev/null`
_basedir=${_basedir:=""}
_productdir=${_productdir:="SUNWcluster"}

LOGGER=/usr/bin/logger

PATH=${_basedir}/${_productdir}/bin:${_basedir}/${_productdir}/ha/informix:${PATH}
export PATH
HA_FILES=/etc/${_basedir}/SUNWscinf; export HA_FILES
HA_VAR=/var/${_basedir}/SUNWscinf; export HA_VAR
ds="informix"

PREFIX="SUNWcluster.ha.${ds}"
HA_FM_NAME="fault_mon"

# include HA utilities library
. dbms_utilities
if [ $? -ne 0 ]; then
	$LOGGER -p local7.err -t "$HA_SLOGTAG" "$argv0: Cannot find HA utilities library"
	exit 1
fi

HA_CLUSTER=$CLUSTNAME; export HA_CLUSTER

# some default files and locations
# don't move this up - it depends on HA_FILES, which gets set above
HA_DATABASES=hainformix_databases
HA_DB_SUPPORT=${HA_FILES}/hainformix_support

# verify that we have the hainformix_support file
if [ ! -r $HA_DB_SUPPORT ] ; then
  logerr "4000" "file ${HA_DB_SUPPORT} does not exist or is not readable!"
  exit 2
fi


# talk_start ... - echo the args, run them, and evaluate return value
talk_start() {
  	logprint "$$: $*"
  	if $* ; then
    		return 0
  	else
    		logprint "$$: $* ... failed"
    		return 1
  	fi
}


# talk_start_bg ... - print the args, then run them in the background
talk_start_bg() {
  	logprint "$$: $*"
  	$* &
  	}


# get_pid [ -u userid ] pattern - find the process id of a running program
# if called with "-u userid", only process for that user will be considered
get_pid() {
	if [ "$1" = "-u" ] ; then
		ps_args="-f -u $2"
		shift
		shift
	else
		ps_args="-ef"
	fi
	PID=`/usr/bin/ps $ps_args | grep "\<$*\>" | nawk -v pat="$*" '
 BEGIN { 
   search_pat = substr(pat, 0, 79)
   }
 { if ( match($0, search_pat) )
     if ( ! match($0, "nawk -v pat=") )
       print $2
  }
'`
}


# kill_proc pattern - find and terminate a process
kill_proc() {
  	logprint "Killing $*..." 
  	get_pid $*
  	if [ "$PID" ] ; then
    		for p in ${PID} ; do
      			logprint "Killing process id $p"
      			kill $p
    		done
    		echo
  	else
    		logprint "process \"$*\" could not be located..." 
  	fi
}

# read_ha_databases onconfig - find an entry in the HA_DATABASES file,
# 	parse it apart, and return in variables. Assumes that INFORMIXDIR
#	is set!
read_ha_databases() {
#	conf_line=`grep "^o[nf][f]*	$1	" $HA_DATABASES`
	conf_line=$(get_instance "${ds}" "$1")
        set_inst_name $1

	if [ "$conf_line" = "" ] ; then
		logerr "4010" "$1 missing from HA INFORMIX CCD!"
		return 1
	fi
        on_off_mode=`echo "$conf_line" | cut -s -f 1`
	onconfig=`echo "$conf_line" | cut -s -f 2`
	logical_host=`echo "$conf_line" | cut -s -f 3`
	poll_cycle=`echo "$conf_line" | cut -s -f 4`
	connect_cycle=`echo "$conf_line" | cut -s -f 5`
	timeout=`echo "$conf_line" | cut -s -f 6`
	restart_delay=`echo "$conf_line" | cut -s -f 7`
	dbname=`echo "$conf_line" | cut -s -f 8`
	DB_LOGIN=$dbname
	export DB_LOGIN
	informixserver=`echo "$conf_line" | cut -s -f 9`
        set_logical_host $logical_host

	return 0
}

# find_informix onconfig - finds and sets various Informix related variables:
#	INFORMIXDIR ONINIT INFORMIXSERVER ONCONFIG
# in case of a problem, it returns with an empty INFORMIXDIR variable
find_informix() {
  	INFTAB=/var/opt/informix/inftab
	
	INFORMIXDIR=""
	ONINIT=""
	ONCONFIG=""
	INFORMIXSERVER=""

        if inftab_line=`grep "^[	 ]*$1:" $INFTAB` ; then
                informixdir=`echo $inftab_line | awk -F: '{print $2}' -`
                if [ -d $informixdir ] && [ -n "`disk_mounted $1`" ] ; then
                        if [ -x ${informixdir}/bin/oninit ] ; then
                                read_ha_databases $1
                                INFORMIXDIR="$informixdir"
                                ONINIT="${INFORMIXDIR}/bin/oninit"
                        else
                                logerr "4020" "No oninit executable in ${INFORMIXDIR}/bin!"
				return 1
                        fi
                fi
        else
                logerr "4030" "Database '$1' not found in ${INFTAB}"
		return 1
        fi
 
        if [ -r ${informixdir}/etc/${onconfig} ] ; then
                ONCONFIG="$onconfig"
                ONCONFIGFILE=${informixdir}/etc/${onconfig}
        else
                logerr "4040" "Database '$1' onconfig file not found or is not readable!"
                INFORMIXDIR=""
		return 1
        fi
 
        if [ -r ${informixdir}/etc/sqlhosts ] ; then
                INFORMIXSQLHOSTS=${informixdir}/etc/sqlhosts
        else
                logerr "4050" "sqlhosts file not found or is not readable!"
                INFORMIXDIR=""
		return 1
        fi

#       INFORMIXSERVER=`grep DBSERVERNAME ${INFORMIXDIR}/etc/${ONCONFIG} | nawk
#'{print $2}'`                 

        INFORMIXSERVER="$informixserver"
	sqlhosts_informixserver=`grep "^${informixserver} " ${INFORMIXSQLHOSTS} | head -1 | awk '{print $1}'`

#Maybe a TAB is placed after the informixserver entry in the sqlhosts

	if [ ! "${sqlhosts_informixserver}" ] ; then
		sqlhosts_informixserver=`grep "^${informixserver}	" ${INFORMIXSQLHOSTS} | head -1 | awk '{print $1}'`
	fi 

 
        if [ "${INFORMIXSERVER}" != "${sqlhosts_informixserver}" ] ; then                        
                logerr "4060" "Informixserver $INFORMIXSERVER not found in ${INFORMIXSQLHOSTS}"
                INFORMIXDIR="" 
        fi

        export INFORMIXDIR ONINIT ONCONFIG INFORMIXSERVER

}


make_rpc_call() {
  	logprint "Calling $3 for onconfig $2 on host $1..."
  	ha_dbms_call $1 $2 $3 informix
  	}

#end of common ha-dbms boiler plate
#include_boiler

prog="${HA_FM_NAME}"

. $HA_VAR/ha_env

# process_parm_file - process an Informix onconfig file $1, 
#    references, and echo the value for MSGPATH
process_parm_file() {
	if [ -r "$1" ] ; then
		grep -v '^#' $1 | \
		while read var value ; do
				case "$var" in
					MSGPATH) atmp=`echo "$value" | awk '{print $1}'`;
					echo $atmp;;
					*) ;;
				esac
		done
	else
		logerr "${prog}.4047" \
			"Informix onconfig file $1 does not exist or is not readable!"
	fi
	}


# ############# Main ########################## Main ##########################
if [ $# -ne 1 ] ; then
	logerr "${prog}.4000" "usage: $argv0 informix_server"
	exit 2
fi

ONCONFIG=$1
read_ha_databases $ONCONFIG
LOCALHOST=`uname -n`

find_logical_host=`haget -f all_logical_hosts | grep $logical_host`
if [ "$find_logical_host" = "" ] ; then
        logerr "${prog}.4001" \
		"logical host $logical_host is not in the cluster configuration"
	logerr "${prog}.4060" \
		"Fault monitor for Informix OnLine Server ${INFORMIXSERVER} NOT started"
	exit 1
fi

#matches=`expr " $HA_METASETSERVE " : ".* $logical_host "`
#if [ "$matches" -eq 0 ] ; then

MASTERED_LOGICAL_HOSTS="`echo $HA_METASETSERVE | tr ',' ' '`"
is_member $logical_host "$MASTERED_LOGICAL_HOSTS"
if [ $? -ne 0 ] ; then
    	remote_args="-r $logical_host"

        # Don't start probe if diskset is in maintenance mode.
        # If this instance's logical host is in maint mode, exit now.
        MAINT=`haget -f is_maint -h ${logical_host}`
        if [ "$MAINT" = "1" ]; then
            exit 0
        fi

        need_to_run_probe ${logical_host} ${LOCALHOST}

        if [ $? -ne 0 ]; then
           exit 0
        fi


fi

current_mode=$(get_instance_dynamic "${ds}" "$ONCONFIG" | awk '{print $1}')
if [ "$current_mode" != "on" ] ; then
        logerr "${prog}.4062"\
        "on/off mode for \"$ONCONFIG\" is not on. Fault monitor not started"
     exit 0
fi

INFTAB=/var/opt/informix/inftab
if inftab_line=`grep "^[	 ]*$1:" $INFTAB` ; then
        informix_home=`echo $inftab_line | awk -F: '{print $2}' -`
fi

if [ "$remote_args" != "" ] ; then
	if [ ! -d $informix_home ] || [ -z "`disk_mounted $1`" ] ; then
        	binaries_on_logical="$informix_home"
	fi
fi

# create symbolic links for informix runtime libraries
for LIB in iasfs07a.so iasfd07c.so ismdd07a.so ismdd07b.so ; do
        ls /usr/lib/$LIB > /dev/null 2>&1
        if [ $? -ne 0 ] ; then
                ln -s $informix_home/lib/$LIB /usr/lib/$LIB 2> /dev/null
        fi
done

# Set environment variable HA_REMOTEHOST for this instance before starting
# starting fault monitor.

my_node=`uname -n`
res=$(haget -f physical_hosts -h $logical_host | tr '\012' ' ')
HA_REMOTEHOST=""
for next in ${res}; do
        if [ "$next" != "$my_node" ]; then
                HA_REMOTEHOST="${HA_REMOTEHOST} ${next}"
        fi
done
export HA_REMOTEHOST

# starting up remote fault monitor when the Informix binaries are
# installed on the logical host then the remote server does not
# have access to version and error log, thus, we hard coded here
# The remote fmon will be started and exit from here
if [ "$remote_args" != ""  -a "$binaries_on_logical" != "" ] ; then
        alert_file="none"
        INFORMIXDIR="/var/opt/informix"
	if [ ! -d $INFORMIXDIR/etc ] ; then
		logerr "${prog}.4040" \
"INFORMIX-ESQL Embedded Languages Runtime Facility product has not been properly installed under /var/opt/informix"
		logerr "${prog}.4060" \
"Fault monitor for Informix OnLine Server ${informixserver} NOT started"
		exit 1
	fi

        if [ ! -f $INFORMIXDIR/etc/sqlhosts ] ; then
		logerr "${prog}.4100" \
			"Could not locate file: $INFORMIXDIR/etc/sqlhosts"
		logerr "${prog}.4060" \
			"Fault monitor for Informix OnLine Server ${informixserver} NOT started"
		exit 1
        fi
        INFORMIXSQLHOSTS=$INFORMIXDIR/etc/sqlhosts
        INFORMIXSERVER="$informixserver"
        export INFORMIXDIR INFORMIXSQLHOSTS INFORMIXSERVER ONCONFIG
        ha_executable="hainformix_fmon"
        action_file="hainformix_config_V1"
        talk_start ${ha_executable} $remote_args $onconfig $poll_cycle $connect_cycle $timeout $restart_delay $HA_FILES/$action_file $alert_file
        exit 0
fi

find_informix $1
  
if [ "$INFORMIXDIR" != "" ] ; then
	#  Lets figure out the Informix version number
      	inf_version=`$INFORMIXDIR/bin/dbaccess -v | grep Version | awk '{print $3}'`
      	grep -v "^#" ${HA_DB_SUPPORT} | \
      	while read support_line ; do
        	pattern="\("`echo "$support_line" | cut -f 1`"\)"
        	result=`expr "$inf_version" : ${pattern}`
        	if [ "$result" != "" -a "$result" = "$inf_version" ] ; then
	  		ha_executable=`echo "$support_line" | cut -f 2`
	  		action_file=`echo "$support_line" | cut -f 3`
	  		if [ "$ha_executable" = "" ] ; then
				logerr "${prog}.4050" \
"Informix OnLine Server ${INFORMIXSERVER}: executable file name missing in line '$support_line' in file $HA_DB_SUPPORT"
				exit 1
			fi
	  		if [ "$action_file" = "" ] ; then
				logerr "${prog}.4061" \
"Informix OnLine Server ${INFORMIXSERVER}: action file name missing in line '$support_line' in file $HA_DB_SUPPORT"
				exit 1
			fi
      			if [ "$remote_args" = "" ] ; then
            			alert_file=`process_parm_file $ONCONFIGFILE`
            			if [ "$alert_file" = "" ] ; then
              				logerr "${prog}.4080" \
"Could not find the value for MSG PATH in $ONCONFIGFILE"
					exit 1
            			fi
          		else
            			alert_file="none"
          		fi

	  		talk_start ${ha_executable} $remote_args $onconfig $poll_cycle $connect_cycle $timeout $restart_delay $HA_FILES/$action_file $alert_file 
          		exit 3
        	fi
      	done
        case $? in
                1) ;;
                3) exit 0 ;;
                *) logerr "${prog}.4090" "Informix ${inf_version} not supported!" ;;
        esac

fi

# if we reach here, then a fault monitor did not get started
# the reason did already get logged in the various logerr calls above
# Note: The "exit" statements in the while statement above do not
#       cause an exit of the entire script, but just the subshell that
#	executes the while command as part of a pipe!
logerr "${prog}.4060" "Fault monitor for Informix OnLine Server ${INFORMIXSERVER} NOT started"
exit 1

