#! /bin/sh
#
# Copyright (c) 2005 Silicon Graphics, Inc.  All Rights Reserved.
# 
# This program is free software; you can redistribute it and/or modify it
# under the terms of the GNU General Public License as published by the
# Free Software Foundation; either version 2 of the License, or (at your
# option) any later version.
# 
# This program is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
# or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
# for more details.
# 
# You should have received a copy of the GNU General Public License along
# with this program; if not, write to the Free Software Foundation, Inc.,
# 59 Temple Place, Suite 330, Boston, MA  02111-1307 USA
# 
# Start or Stop the Performance Co-Pilot (PCP) proxy daemon for pmcd
#
# The following is for chkconfig on RedHat based systems
# chkconfig: - 95 05
# description: Control pmproxy for PCP
#
# The following is for insserv(1) based systems,
# e.g. SuSE, where chkconfig is a perl script.
### BEGIN INIT INFO
# Provides:       pmproxy
# Required-Start: $network $remote_fs $syslog
# Required-Stop:  $remote_fs $syslog
# Default-Start:
# Default-Stop:   0 1 6
# Short-Description:   Control the pmproxy daemon
# Description:    Control the Performance Co-Pilot protocol proxy daemon
### END INIT INFO

. $PCP_DIR/etc/pcp.env
. $PCP_SHARE_DIR/lib/rc-proc.sh

PMPROXY=$PCP_BINADM_DIR/pmproxy
PMPROXYOPTS=$PCP_PMPROXYOPTIONS_PATH
RUNDIR=$PCP_LOG_DIR/pmproxy
pmprog=$PCP_RC_DIR/pmproxy
prog=$PCP_RC_DIR/`basename $0`

tmp=/var/tmp/$$
status=1
trap "rm -f $tmp.* ; exit \$status" 0 1 2 3 15

if [ $pmprog = $prog ]
then
    VERBOSE_CTL=on
else
    VERBOSE_CTL=off
fi

case "$PCP_PLATFORM"
in
    mingw)
	# nothing we can usefully do here, skip the test
	#
	;;

    *)
	# standard Unix/Linux style test
	#
	ID=id
	test -f /usr/xpg4/bin/id && ID=/usr/xpg4/bin/id

	IAM=`$ID -u 2>/dev/null`
	if [ -z "$IAM" ]
	then
	    # do it the hardway
	    #
	    IAM=`$ID | sed -e 's/.*uid=//' -e 's/(.*//'`
	fi
	;;
esac

_shutdown()
{
    # Is pmproxy running?
    #
    _get_pids_by_name pmproxy >$tmp.tmp
    if [ ! -s $tmp.tmp ]
    then
	[ "$1" = verbose ] && echo "$pmprog: PMPROXY not running"
	return 0
    fi

    # Send pmproxy a SIGTERM, which is noted as a pending shutdown.
    # When finished the currently active request, pmproxy will close any
    # connections and then exit.
    # Wait for pmproxy to terminate.
    #
    pmsignal -a -s TERM pmproxy > /dev/null 2>&1
    $ECHO $PCP_ECHO_N "Waiting for PMPROXY to terminate ...""$PCP_ECHO_C"
    gone=0
    for i in 1 2 3 4 5 6
    do
	sleep 3
	_get_pids_by_name pmproxy >$tmp.tmp
	if [ ! -s $tmp.tmp ]
	then
	    gone=1
	    break
	fi

	# If pmproxy doesn't go in 15 seconds, SIGKILL and sleep 1 more time
	# to allow any clients reading from PMPROXY sockets to fail so that
	# socket doesn't end up in TIME_WAIT or somesuch.
	#
	if [ $i = 5 ]
	then
	    $ECHO
	    echo "Process ..."
	    $PCP_PS_PROG $PCP_PS_ALL_FLAGS >$tmp.ps
	    sed 1q $tmp.ps
	    for pid in `cat $tmp.tmp`
	    do
		$PCP_AWK_PROG <$tmp.ps "\$2 == $pid { print }"
	    done
	    echo "$prog: Warning: Forcing PMPROXY to terminate!"
	    pmsignal -a -s KILL pmproxy > /dev/null 2>&1
	else
	    $ECHO $PCP_ECHO_N ".""$PCP_ECHO_C"
	fi
    done
    if [ $gone != 1 ]	# It just WON'T DIE, give up.
    then
	echo "Process ..."
	cat $tmp.tmp
	echo "$prog: Warning: PMPROXY won't die!"
	exit
    fi
    $RC_STATUS -v 
    pmpost "stop pmproxy from $pmprog"
}

_usage()
{
    echo "Usage: $pmprog [-v] {start|restart|stop|status|reload|force-reload}"
}

while getopts v c
do
    case $c
    in
	v)  # force verbose
	    VERBOSE_CTL=on
	    ;;
	
	*)
	    _usage
	    exit 1
	    ;;
    esac
done
shift `expr $OPTIND - 1`

if [ $VERBOSE_CTL = on ]
then				# For a verbose startup and shutdown
    ECHO=$PCP_ECHO_PROG
else				# For a quiet startup and shutdown
    ECHO=:
fi

if [ "$IAM" != 0 -a "$1" != "status" ]
then
    echo "$prog:"'
Error: You must be root (uid 0) to start or stop the PCP PMPROXY daemon.'
    exit
fi

# First reset status of this service
$RC_RESET
 
# Return values acc. to LSB for all commands but status:
# 0 - success
# 1 - misc error
# 2 - invalid or excess args
# 3 - unimplemented feature (e.g. reload)
# 4 - insufficient privilege
# 5 - program not installed
# 6 - program not configured
#
# Note that starting an already running service, stopping
# or restarting a not-running service as well as the restart
# with force-reload (in case signalling is not supported) are
# considered a success.
case "$1" in

  'start'|'restart'|'reload'|'force-reload')
	_shutdown quietly

	# PMPROXY messages should go to stderr, not the GUI notifiers
	#
	unset PCP_STDERR

	if [ -x $PMPROXY ]
	then
	    if [ ! -f $PCP_PMPROXYCONF_PATH ]
	    then
		echo "$prog:"'
Error: PMPROXY control file "$PCP_PMPROXYCONF_PATH" is missing, cannot start PMPROXY.'
		exit
	    fi
	    [ ! -d $RUNDIR ] && mkdir -p $RUNDIR
	    cd $RUNDIR

	    # salvage the previous versions of any PMPROXY
	    #
	    if [ -f pmproxy.log ]
	    then
		rm -f pmproxylog.log.prev
		mv pmproxy.log pmproxy.log.prev
	    fi

	    $ECHO $PCP_ECHO_N "Performance Co-Pilot starting PMPROXY (logfile is $RUNDIR/pmproxy.log) ..." "$PCP_ECHO_C"

	    # options file processing ...
	    # only consider lines which start with a hyphen
	    # get rid of the -f option
	    # ensure multiple lines concat onto 1 line
	    OPTS=`sed <$PMPROXYOPTS 2>/dev/null \
			    -e '/^[^-]/d' \
			    -e 's/^/ /' \
			    -e 's/$/ /' \
			    -e 's/ -f / /g' \
			    -e 's/^ //' \
			    -e 's/ $//' \
		    | tr '\012' ' ' `

	    # environment stuff
	    #
	    eval `sed -e 's/"/\\"/g' $PMPROXYOPTS \
	    | awk -F= '
BEGIN			{ exports="" }
/^[A-Z]/ && NF == 2	{ exports=exports" "$1
			  printf "%s=${%s:-\"%s\"}\n", $1, $1, $2
			}
END			{ if (exports != "") print "export", exports }'`

	    $PMPROXY $OPTS
	    $RC_STATUS -v

	    pmpost "start pmproxy from $pmprog"

	fi
	status=0
        ;;

  'stop')
	_shutdown
	status=0
        ;;

  'status')
	# NOTE: $RC_CHECKPROC returns LSB compliant status values.
	$ECHO $PCP_ECHO_N "Checking for PMPROXY:" "$PCP_ECHO_C"
        if [ -r /etc/rc.status ]
        then
            # SuSE
            $RC_CHECKPROC $PMPROXY
            $RC_STATUS -v
            status=$?
        else
            # not SuSE
            $RC_CHECKPROC $PMPROXY
            status=$?
            if [ $status -eq 0 ]
            then
                $ECHO running
            else
                $ECHO stopped
            fi
        fi
	;;

  *)
	_usage
        ;;
esac