# $Header: ohsresponse.pl 15-may-2003.13:12:59 klmichae Exp $
#
# ohsresponse.pl
# 
# Copyright (c) 2002, 2003, Oracle Corporation.  All rights reserved.  
#
#    NAME
#      ohsresponse.pl - gets the up/down status for the ohs instance
#
#    DESCRIPTION
#      ohsresponse.pl <oracle_home>
#
#      where
#         <oracle_home> is the oracle home in which ohs is running
#
#    returns: 
#      em_result=<isUp>
#
#      where:
#         <isUp> is 1 if the ohs is up or 0 if it is down
#
#    NOTES
#
#
#    MODIFIED   (MM/DD/YY)
#    klmichae   05/15/03 - remove calls to opmnadmin
#    klmichae   10/09/02 - klmichae_apache_status
#    klmichae   10/08/02 - Initial revision

use strict;
require "iasresourceusage.pl";

  # See we if find any http server pids
  # Get the pidd for the http server and see if we find some pids.
  my $httpPids = getHttpPids( $ARGV[0] );

  # If we found a pid, the http server is up
  if( $httpPids eq "" )
  {
    print "em_result=0\n";
  } else {
    print "em_result=1\n";
  }