#!/bin/sh

#

# mongodb      init file for starting up the MongoDB server

#

# chkconfig:   - 90 10

# description: Starts and stops the MongDB daemon that handles all \

#              database requests.

# Source function library.

. /etc/rc.d/init.d/functions

exec="/usr/bin/mongod"

prog="mongodb"

logfile="/var/log/mongodb/mongodb.log"

[ -e /etc/sysconfig/$prog ] && . /etc/sysconfig/$prog

pidfile=${PIDFILE-/var/run/mongodb/mongodb.pid}

options="$OPTIONS"

lockfile="/var/lock/subsys/$prog"

# Nicer version of killproc that does not kill mongodb when it takes

# a long time to shut down and does not hang for a long time when mongo

# shuts down quickly

killproc_nice() {

	local RC base pid pid_file= delay i

	RC=0; delay=3

	# Test syntax.

	if [ "$#" -eq 0 ]; then

		echo $"Usage: killproc [-p pidfile] [ -d delay] {program} [-signal]"

		return 1

	fi

	if [ "$1" = "-p" ]; then

		pid_file=$2

		shift 2

	fi

	if [ "$1" = "-d" ]; then

		delay=$2

		shift 2

	fi

	# Save basename.

	base=${1##*/}

	# Find pid.

	__pids_var_run "$1" "$pid_file"

	RC=$?

	if [ -z "$pid" ]; then

		if [ -z "$pid_file" ]; then

			pid="$(__pids_pidof "$1")"

		else

			[ "$RC" = "4" ] && { failure $"$base shutdown" ; return $RC ;}

		fi

	fi

	# Kill it.

	if [ -n "$pid" ] ; then

		[ "$BOOTUP" = "verbose" -a -z "${LSB:-}" ] && echo -n "$base "

		if checkpid $pid 2>&1; then

			# TERM first, then KILL if not dead

			kill -TERM $pid >/dev/null 2>&1

			usleep 100000

			# Check every one second if the program is stopped.

			# Do so for a maximum of $delay seconds

			for ((i = 0 ; i < $delay; i++))

			do

				if checkpid $pid; then

					sleep 1

				else

					break

				fi

			done

			# If the program is not stopped, kill it

			if checkpid $pid ; then

				kill -KILL $pid >/dev/null 2>&1

				usleep 100000

			fi

		fi

		checkpid $pid

		RC=$?

		[ "$RC" -eq 0 ] && failure $"$base shutdown" || success $"$base shutdown"

		RC=$((! $RC))

	else

		failure $"$base shutdown"

		RC=0

	fi

	# Remove pid file if any.

	rm -f "${pid_file:-/var/run/$base.pid}"

	return $RC

}

start() {

    [ -x $exec ] || exit 5

    printf '%s' $"Starting $prog: "

    # why the hell is this not checked in /etc/rc.d/init.d/functions ?

    [ "$(id -u)" -eq 0 ] || exit 4

    # FIXME check mongod source - if parent waits after forking for childs

    #   message about proper initialization

    daemon --pidfile="$pidfile" --user mongodb \

            "$exec $options run >> $logfile 2>&1"

    retval=$?

    echo

    [ $retval -eq 0 ] && touch $lockfile

    return $retval

}

stop() {

    printf '%s' $"Stopping $prog: "

    killproc_nice -p ${pidfile} -d 300 $prog

    retval=$?

    echo

    [ $retval -eq 0 ] && rm -f $lockfile

    return $retval

}

restart() {

    stop

    start

}

reload() {

    restart

}

force_reload() {

    restart

}

rh_status() {

    # run checks to determine if the service is running or use generic status

    status -p ${pidfile} $prog

}

rh_status_q() {

    rh_status >/dev/null 2>&1

}

. __SCL_SCRIPTS__/service-environment

. scl_source enable __list of scls__

case "$1" in

    start)

        rh_status_q && exit 0

        $1

        ;;

    stop)

        rh_status_q || exit 0

        $1

        ;;

    restart)

        $1

        ;;

    reload)

        rh_status_q || exit 7

        $1

        ;;

    force-reload)

        force_reload

        ;;

    status)

        rh_status

        ;;

    condrestart|try-restart)

        rh_status_q || exit 0

        restart

        ;;

    *)

        echo $"Usage: $0 {start|stop|status|restart|condrestart|try-restart|reload|force-reload}"

        exit 2

esac

exit $?