qpsmtpd/sme7/qpsmtpd-forkserver.rc

#! /bin/bash
#
# qpsmtpd-forkserver          Start/Stop the qpsmtpd forking server
#
# chkconfig: 2345 90 60
# description: qpsmtpd is a flexible smtpd daemon written in Perl. \
#              Apart from the core SMTP features, all functionality is \
#              implemented in small "extension plugins" using the easy \
#              to use object oriented plugin API.
# processname: qpsmtpd-forkserver
# config: /etc/qpsmtpd
# pidfile: /var/run/qpsmtpd-forkserver.pid


# Source function library.
. /etc/init.d/functions
. /etc/sysconfig/qpsmtpd-forkserver

RETVAL=0

# See how we were called.
  
prog="qpsmtpd-forkserver"

start() {
        # cleanup environment a bit.
        unset PERL_UNICODE
        unset LANG
        unset LC_TIME
        unset LC_ALL
        unset BASH_ENV
        unset ENV
        unset CDPATH
        unset IFS

        echo -n $"Starting $prog: "
        trap "" 1
        daemon $prog --detach $QPSMTPD_OPTIONS
        RETVAL=$?
        echo
        [ $RETVAL -eq 0 ] && touch /var/lock/subsys/$prog
        return $RETVAL
}

stop() {
        echo -n $"Stopping $prog: "
        killproc $prog
        RETVAL=$?
        echo
        [ $RETVAL -eq 0 ] && rm -f /var/lock/subsys/$prog
        return $RETVAL
}       

# functions status() uses pidof, which doesn't work with (?) scripts
qpstatus() {
        local base=${1##*/}
        local pid

        # Test syntax.
        if [ "$#" = 0 ] ; then
                echo $"Usage: status {program}"
                return 1
        fi

        # Use "/var/run/*.pid" file for pid
        if [ -f /var/run/${base}.pid ] ; then
            read pid < /var/run/${base}.pid
            if [ -n "$pid" ]; then
            /bin/ps -p $pid >/dev/null
            if [ $? -eq 0 ]; then
                echo $"${base} (pid $pid) is running..."
                return 0
            else                
                    echo $"${base} dead but pid file exists"
                    return 1
            fi
            fi
        fi
        # See if /var/lock/subsys/${base} exists
        if [ -f /var/lock/subsys/${base} ]; then
                echo $"${base} dead but subsys locked"
                return 2
        fi
        echo $"${base} is stopped"
        return 3
}

restart() {
        stop
        start
}       

reload() {
        stop
        start
}       

case "$1" in
  start)
        start
        ;;
  stop)
        stop
        ;;
  restart)
        restart
        ;;
  reload)
        reload
        ;;
  status)
        qpstatus qpsmtpd-forkserver
        ;;
  condrestart)
        [ -f /var/lock/subsys/$prog ] && restart || :
        ;;
  *)
        echo $"Usage: $0 {start|stop|status|reload|restart|condrestart}"
        exit 1
esac

exit $?
1	slords	1.1	#! /bin/bash
2			#
3			# qpsmtpd-forkserver Start/Stop the qpsmtpd forking server
4			#
5			# chkconfig: 2345 90 60
6			# description: qpsmtpd is a flexible smtpd daemon written in Perl. \
7			# Apart from the core SMTP features, all functionality is \
8			# implemented in small "extension plugins" using the easy \
9			# to use object oriented plugin API.
10			# processname: qpsmtpd-forkserver
11			# config: /etc/qpsmtpd
12			# pidfile: /var/run/qpsmtpd-forkserver.pid
13
14	slords	1.2
15	slords	1.1	# Source function library.
16			. /etc/init.d/functions
17			. /etc/sysconfig/qpsmtpd-forkserver
18
19			RETVAL=0
20
21			# See how we were called.
22
23			prog="qpsmtpd-forkserver"
24
25			start() {
26	slords	1.2	# cleanup environment a bit.
27			unset PERL_UNICODE
28			unset LANG
29			unset LC_TIME
30			unset LC_ALL
31			unset BASH_ENV
32			unset ENV
33			unset CDPATH
34			unset IFS
35
36	slords	1.1	echo -n $"Starting $prog: "
37			trap "" 1
38	slords	1.2	daemon $prog --detach $QPSMTPD_OPTIONS
39	slords	1.1	RETVAL=$?
40			echo
41	slords	1.2	[ $RETVAL -eq 0 ] && touch /var/lock/subsys/$prog
42	slords	1.1	return $RETVAL
43			}
44
45			stop() {
46			echo -n $"Stopping $prog: "
47	slords	1.2	killproc $prog
48	slords	1.1	RETVAL=$?
49			echo
50	slords	1.2	[ $RETVAL -eq 0 ] && rm -f /var/lock/subsys/$prog
51	slords	1.1	return $RETVAL
52			}
53
54	slords	1.2	# functions status() uses pidof, which doesn't work with (?) scripts
55			qpstatus() {
56			local base=${1##*/}
57			local pid
58
59			# Test syntax.
60			if [ "$#" = 0 ] ; then
61			echo $"Usage: status {program}"
62			return 1
63			fi
64
65			# Use "/var/run/*.pid" file for pid
66			if [ -f /var/run/${base}.pid ] ; then
67			read pid < /var/run/${base}.pid
68			if [ -n "$pid" ]; then
69			/bin/ps -p $pid >/dev/null
70			if [ $? -eq 0 ]; then
71			echo $"${base} (pid $pid) is running..."
72			return 0
73			else
74			echo $"${base} dead but pid file exists"
75			return 1
76			fi
77			fi
78			fi
79			# See if /var/lock/subsys/${base} exists
80			if [ -f /var/lock/subsys/${base} ]; then
81			echo $"${base} dead but subsys locked"
82			return 2
83			fi
84			echo $"${base} is stopped"
85			return 3
86			}
87	slords	1.1
88			restart() {
89			stop
90			start
91			}
92
93			reload() {
94			stop
95			start
96			}
97
98			case "$1" in
99			start)
100			start
101			;;
102			stop)
103			stop
104			;;
105			restart)
106			restart
107			;;
108			reload)
109			reload
110			;;
111			status)
112	slords	1.2	qpstatus qpsmtpd-forkserver
113	slords	1.1	;;
114			condrestart)
115	slords	1.2	[ -f /var/lock/subsys/$prog ] && restart \|\| :
116	slords	1.1	;;
117			*)
118			echo $"Usage: $0 {start\|stop\|status\|reload\|restart\|condrestart}"
119			exit 1
120			esac
121
122			exit $?