#! /bin/sh

# This is a startup/shutdown script for the ZOOM-Perl test-server,
# suitable for use in a SysV-style init directory such as /etc/init.d
# (on Debian systems) and /etc/rc.d/init.d (on Red Hat systems).  This
# is configured to run on z3950.indexdata.com -- if you want to run it
# somewhere else, you'll probably need to tweak it to suit your
# system's paths.

### BEGIN INIT INFO
# Provides:   zoom-perl-server
# Required-Start: $local_fs $remote_fs $network $syslog $named
# Required-Stop:  $local_fs $remote_fs
# Default-Start:  2 3 4 5
# Default-Stop:   0 1 6
# Short-Description:    ZOOM-Perl test server
# Description:    Controls the ZOOM-Perl test server
### END INIT INFO


PATH=/bin:/usr/bin
logfile=/var/log/zoom-perl-test-server
pidfile=/var/run/zoom-perl-test-server.pid

case "$1" in
  start)
	if [ -f $pidfile ]; then
		echo "ZOOM-Perl test server seems to be already running"
		exit 1
	fi
	echo "Starting ZOOM-Perl test server"
	test -f $logfile && mv $logfile $logfile.old
	( cd /home/mike/ZOOM-Perl/archive/test-server
	  zebrasrv-2.0 -c test-server.cfg @:2100 > $logfile 2>&1 < /dev/null &
	  echo $! > $pidfile
	)
	;;
  stop)
	if [ ! -f $pidfile ]; then
		echo "ZOOM-Perl test server does not seem to be running"
		exit 1
	fi
	echo "Stopping ZOOM-Perl test server"
	kill `cat $pidfile`
	rm $pidfile
	;;
  restart)
	$0 stop && $0 start
	;;
  *)
	echo "Usage: $0 start|stop|restart" >&2
        ;;
esac