#! /bin/sh
# TODO verify with spuso theinit info
### BEGIN INIT INFO
# Provides:          tango-starter
# Required-Start:    $syslog $remote_fs $network
# Should-Start:
# Required-Stop:     $null
# Should-Stop:
# Default-Start:     3 5
# Default-Stop:      0 1 2 6
# Short-Description: Tango control system starter daemon
# Description:       TANGO is an object oriented distributed control system
#    It allows communication between TANGO device processes running on the same
#    computer or distributed over the network. These processes can
#    provide services to the control system all over the network, such as
#    hardware control or data processing. This script starts Starter device.
#    It can start, stop, and report the status of other TANGO devices.
### END INIT INFO


# description:       Tango control system starter daemon
# chkconfig:         2345 90 10
#

# Shell functions sourced from /etc/rc.status:
#      rc_check         check and set local and overall rc status
#      rc_status        check and set local and overall rc status
#      rc_status -v     be verbose in local rc status and clear it afterwards
#      rc_status -v -r  ditto and clear both the local and overall rc status
#      rc_status -s     display "skipped" and exit with status 3
#      rc_status -u     display "unused" and exit with status 3
#      rc_failed        set local and overall rc status to failed
#      rc_failed <num>  set local and overall rc status to <num>
#      rc_reset         clear both the local and overall rc status
#      rc_exit          exit appropriate to overall rc status
#      rc_active        checks whether a service is activated by symlinks
#      rc_splash arg    sets the boot splash screen to arg (if active)
. /etc/rc.status

# Reset status of this service
rc_reset

# Return values acc. to LSB for all commands but status:
# 0	  - success
# 1       - generic or unspecified error
# 2       - invalid or excess argument(s)
# 3       - unimplemented feature (e.g. "reload")
# 4       - user had insufficient privileges
# 5       - program is not installed
# 6       - program is not configured
# 7       - program is not running
# 8--199  - reserved (8--99 LSB, 100--149 distrib, 150--199 appl)
# 
# Note that starting an already running service, stopping
# or restarting a not-running service as well as the restart
# with force-reload (in case signaling is not supported) are
# considered a success.


PREFIX=/usr
TANGO_CONFIG=/etc/tangorc

PID_FILE=/var/run/tango-starter.pid
LOCK_FILE=/var/lock/subsys/tango-starter

# set up environment
. /etc/profile

# TODO: TANGO_HOST variable has more priority than rc file
#if [ -z $TANGO_HOST ]; then
	# TODO: home/.tangorc file has more priority than etc/tangorc file
	[ -f $TANGO_CONFIG ] && . $TANGO_CONFIG
#fi

if [ -z $TANGO_HOST ]; then
    echo $"error: TANGO_HOST not set"
    exit 1
fi
export TANGO_HOST=$TANGO_HOST
HOSTNAME=`hostname`

STARTER_BIN=/usr/bin/Starter
STARTER_ARGS=${HOSTNAME%%.*}

CLASS=Starter
SERVER=$CLASS/${HOSTNAME%%.*}
DEVICE=tango/admin/${HOSTNAME%%.*}


case "$1" in
    start)
  	echo -n $"Starting tango-starter"
        # TODO: chech if is running
        
        # TODO: test connection to database
	tango_admin --ping-database >/dev/null
	if [ $? -ne 0 ]; then
	    echo
	    echo -n "Tango database connection failed"
	    rc_failed 1
	else
	    tango_admin --check-device $DEVICE
	    if [ $? -ne 0 ]; then
		echo
		echo -n "Adding $SERVER to the Tango database"
		tango_admin --add-server $SERVER $CLASS $DEVICE >> /dev/null
		tango_admin --add-property $DEVICE startDsPath $PREFIX/bin >> /dev/null
	    fi
    	    startproc -u tangosys $STARTER_BIN $STARTER_ARGS #>/dev/null 2>&1
        fi
    
	# Remember status and be verbose
	rc_status -v
	;;
    stop)
	echo -n "Shutting down starter "
	## Stop daemon with killproc(8) and if this fails
	## killproc sets the return value according to LSB.

	killproc -TERM $STARTER_BIN

	# Remember status and be verbose
	rc_status -v
	;;
    restart)
	## Stop the service and regardless of whether it was
	## running or not, start it again.
	$0 stop
	$0 start

	# Remember status and be quiet
	rc_status
	;;
    status)
	echo -n "Checking for service tango-db "
	## Check status with checkproc(8), if process is running
	## checkproc will return with exit status 0.

	# Return value is slightly different for the status command:
	# 0 - service up and running
	# 1 - service dead, but /var/run/  pid  file exists
	# 2 - service dead, but /var/lock/ lock file exists
	# 3 - service not running (unused)
	# 4 - service status unknown :-(
	# 5--199 reserved (5--99 LSB, 100--149 distro, 150--199 appl.)
	
	# NOTE: checkproc returns LSB compliant status values.
	checkproc $STARTER_BIN
	# NOTE: rc_status knows that we called this init script with
	# "status" option and adapts its messages accordingly.
	rc_status -v
	;;
    *)
	echo "Usage: $0 {start|stop|status|restart}"
	exit 1
	;;
esac
rc_exit