#!/usr/bin/ksh
#####################################################################
# TITRE:	ORASurvTbo
#--------------------------------------------------------------------
# CREE LE:	12/11/94		Par: Johann CURE HP
#--------------------------------------------------------------------
# OBJET: 	Tester si le process comp_ora_<NomInstance>
#		tourne.
#			
#====================================================================
# Modifie le:	JJ/MM/AA		Par: 
#	Motif: motif ayant justifie la modification et points
#	modifies si besoin
#####################################################################
# REMARQUES: Les entetes des fonctions ont ete allegees pour plus
#            de lisibilite (fonction de petite taille et presque
#            identiques
#
#####################################################################
# CONVENTION DES CODES DE RETOUR (autre aue 0 (Ok) et 1 (erreur)
#
#====================================================================
# ACCES ET DROITS D'APPEL
#	Mode: 0777	Owner: 			Group:
#====================================================================
# PRE-REQUIS EN ENTREE
# Environnement materiel:
#	Machine: 			Constructeur: HP,SUN,IBM,SGI
# Environnement logiciel:
#	OS: hp-ux			Version: 9.05
#	    hp-ux				 10.20
#	    Solaris				 5.3
#	    Solaris				 5.5
#	    SunOs 				 4.1.3
#	    AIX					 3.x
#	    AIX					 4.2
#	    IRIX				 5.3
# Initialisation des variables globales (environnement, reseau...):
#	VARIABLE1	=	
#	VARIABLE2	=
#####################################################################

#####################################################################
# INVENTAIRE DES APPELS EXTERNES
# Script(s) appelant(s) ce script: 
#	Operation Center
#--------------------------------------------------------------------
# Script(s) appele(s) par ce script:
#	Non Applicable	
#--------------------------------------------------------------------
# Fonction(s) appelee(s) par ce script:
# - Systeme:
#	Non Applicable	
# - Internes:
#	Non Applicable
#====================================================================
# Environnement et variables globales
# importes non modifies:
#	Non Applicable
#--------------------------------------------------------------------
# Importes modifies:
#	Non Applicable
#--------------------------------------------------------------------
# Exportes:
#	NOM_VARIABLE= Non Applicable
#####################################################################
# Fonctions internes au script
#	DeterminationOS 
#	FonctionHPUX
#	FonctionHPUX10
#	FonctionSunOS
#	FonctionSolaris
#	FonctionAIX
#	FonctionAIX42
#	FonctionIRIX
#####################################################################

# Recuperation du nom de la template associee
typeset NomTemplate=$1

# Recuperation du nom de l'instance
typeset NomInstance=$2

# Variable de retour pour ComPocess (1 en principe)
typeset CompProcess=3

# Definition des PATH :
HOME_ORACLE=/logiciel/oracle/oracle_${NomInstance}

# Definition du fichier temporaire
fic_temp=/tmp/ps_OpC_tbo_${NomInstance}

# Definition des variables globales locales script:
typeset CommandeLs			  # Commande ls en fonction de l'OS
typeset CommandePs			  # Commande ps en focntion de l'OS
typeset OPCMON				  # PATH de la commande opcmon
typeset TypeMachine                       # Recuperation de l'OS  	
typeset VersionOS                         # Recuperation de la version de l'OS 
typeset ReferenceFonction		  # Commande differente suivant l'OS

#####################################################################
# FONCTION: 	DeterminationOS	
# CREEE LE:	12/12/94		Par: Johann CURE HP
# OBJET:	Cette fonction permet de connaitre l'OS sur lequel
#		le script se deroule
#====================================================================
# Modifiee le:	12/12/96		Par:  Vincent Garreau HP
#	Motif: prise en compte de nouvelles plate-formes HP, AIX, SOLARIS, IRIX
#####################################################################
# Modifiee le:	JJ/MM/AA		Par: 
#	Motif: motif ayant justifie la modification et points
#	modifies si besoin
#####################################################################
# REMARQUES:
# 
#####################################################################
# CONVENTION DES CODES RETOUR (autres que 0 (Ok) et 2 (Erreur))
#
#====================================================================
# Fonctions DU SCRIPT appelees
#
#####################################################################
function DeterminationOS
{
	TypeMachine=$(uname -s)           # Recuperation de l'OS  	
	VersionOS=$(uname -rv)            # Recuperation de la version de l'OS 

	case ${TypeMachine} in
	HP-UX)
		if [[ "$(echo $VersionOS|cut -d. -f2)" = "10" || "$(echo $VersionOS|cut -d. -f2)" = "11" ]] ; then
			ReferenceFonction=FonctionHPUX10
			OPCMON=/opt/OV/bin/OpC/opcmon
		else
			ReferenceFonction=FonctionHPUX
			OPCMON=/usr/OV/bin/OpC/opcmon
		fi
		CommandeLs="ls -g"
		CommandePs="ps -edf"
		;;
	SunOS)
		if [ "$(echo $VersionOS|cut -c1,2)" = "5." ] ; then
				TypeMachine="Solaris"
				ReferenceFonction=FonctionSolaris
				OPCMON=/opt/OV/bin/OpC/opcmon
				CommandeLs="ls -g"
				CommandePs="ps -edf"
		else	
				ReferenceFonction=FonctionSunOS
				OPCMON=/usr/OV/bin/OpC/opcmon
				CommandeLs="ls -l"
				CommandePs="ps -axlww"
		fi
		;;
	AIX)
		if [ "$(echo $VersionOS|cut -c 3,3)" = "4" ] 
			then ReferenceFonction=FonctionAIX42
			else ReferenceFonction=FonctionAIX
		fi
		OPCMON=/usr/lpp/OV/OpC/opcmon
		CommandePs="ps -edf"
		CommandeLs="ls -g"
		;;
	IRIX)
		ReferenceFonction=FonctionIRIX
		OPCMON=/opt/OV/bin/OpC/opcmon
		CommandeLs="ls -g"
		CommandePs="ps -edf"
		;;

	*)	
		print "$TypeMachine non supporte par ce programme"
		exit 2
		;;
	esac
	return 0
}

#####################################################################
# FONCTION:     FonctionHP-UX
#		FonctionHP-UX10
#		FonctionSunOS 
#		FonctionSolaris
#		FonctionAIX
#		FonctionAIX42
#		FonctionIRIX
# CREEE LE:     12/12/94                Par: Johann CURE HP
# OBJET:        Ces 6 fonctions execute les instructions propres a
#		chaque systeme pour obtenir les memes resultats 
#====================================================================
# Modifiee le:  JJ/MM/AA                Par:
#       Motif: motif ayant justifie la modification et points
#       modifies si besoin
#		22/06/95		D.Stoll ESO/12151
#		le fichier temporaire ps_tmp_OpC_Oracle est relu  
#		si jamais il ne contient pas la ligne comp_ora la 
#		premiere fois.
#####################################################################
# REMARQUES:	Je teste si le process comp_ora_<instance> existe dans
#		le fichier temporaire et je renvoie la valeur 1 par defaut
#		si ce dernier existe (valeur qui ne genere aucune
#		erreur), sinon je renvoie la valeur 0.
#
#####################################################################
# CONVENTION DES CODES RETOUR (autres que 0 (Ok) et 2 (Erreur))
#
#====================================================================
# Fonctions DU SCRIPT appelees
#
#####################################################################

function FonctionHPUX
	{
	CompProcess=$(cat ${fic_temp} | grep comp_ora_$NomInstance )
	if [ "$CompProcess" != "" ]
	         then CompProcess=3
	else	
		CompProcess=0
        fi
	return 0
	}

function FonctionHPUX10
	{
	FonctionHPUX
        return 0
	}

function FonctionSunOS
	{
	CompProcess=$(cat ${fic_temp} | grep comp_ora_$NomInstance )
	if [ "$CompProcess" != "" ]
	         then CompProcess=3
	else	
		CompProcess=0
	fi
	return 0
	}

function FonctionSolaris
	{
	CompProcess=$(cat ${fic_temp} | grep comp_ora_$NomInstance ) 
	if [ "$CompProcess" != "" ]
	         then CompProcess=3
	else	
		CompProcess=0
	fi
	return 0
	}

function FonctionAIX
	{
	CompProcess=$(cat ${fic_temp} | grep comp_ora_$NomInstance )
	if [ "$CompProcess" != "" ]
	         then CompProcess=3
	else	
		CompProcess=0
	fi
	return 0
	}

function FonctionAIX42
	{
	FonctionAIX
	return 0
	}

function FonctionIRIX
	{
	CompProcess=$(cat ${fic_temp} | grep comp_ora_$NomInstance ) 
	if [ "$CompProcess" != "" ]
	         then CompProcess=3
	else	
		CompProcess=0
	fi
	return 0
	}

####################################################################
#			PROGRAMME PRINCIPAL
####################################################################

###############################################################
# Test pour s'assurer de la presence du fichier LOCK
# Si ce dernier est absent pas besoin de continuer le programme
# la base est arretee.
###############################################################
DeterminationOS

[[ ! -f ${HOME_ORACLE}/LOCK ]] && ${OPCMON} "${NomTemplate}=${CompProcess}" && exit 0 
${CommandePs} > ${fic_temp}

${ReferenceFonction}

${OPCMON} "${NomTemplate}=${CompProcess}"

if [ $? -ne 0 ]
	then
	echo "Probleme sur le programme ORASuvTbo." 1>&2
	exit 1
fi
	 
exit  0
