]>
Commit | Line | Data |
---|---|---|
8c9f6f7a | 1 | #!/bin/sh |
2 | # | |
3 | # perlbal Perlbal - Reverse-proxy load balancer and webserver | |
4 | # | |
5 | # chkconfig: 345 86 13 | |
6 | # | |
7 | # description: Perlbal - Reverse-proxy load balancer and webserver | |
8 | # | |
9 | # processname: perlbal | |
10 | # | |
11 | # $Id$ | |
12 | ||
13 | # Source function library | |
14 | . /etc/rc.d/init.d/functions | |
15 | ||
16 | # Get network config | |
17 | . /etc/sysconfig/network | |
18 | ||
19 | [ -f /etc/sysconfig/perlbal ] && . /etc/sysconfig/perlbal | |
20 | ||
21 | # Check that networking is up. | |
22 | if is_yes "${NETWORKING}"; then | |
23 | if [ ! -f /var/lock/subsys/network -a "$1" != stop -a "$1" != status ]; then | |
24 | msg_network_down perlbal | |
25 | exit 1 | |
26 | fi | |
27 | else | |
28 | exit 0 | |
29 | fi | |
30 | ||
31 | start() { | |
32 | # Check if the service is already running? | |
33 | if [ ! -f /var/lock/subsys/perlbal ]; then | |
34 | msg_starting perlbal | |
35 | daemon perlbal $PERLBAL_OPTS | |
36 | RETVAL=$? | |
37 | [ $RETVAL -eq 0 ] && touch /var/lock/subsys/perlbal | |
38 | else | |
39 | msg_already_running perlbal | |
40 | fi | |
41 | } | |
42 | ||
43 | stop() { | |
44 | if [ -f /var/lock/subsys/perlbal ]; then | |
45 | # Stop daemons. | |
46 | msg_stopping perlbal | |
47 | killproc perlbal | |
48 | rm -f /var/lock/subsys/perlbal | |
49 | else | |
50 | msg_not_running perlbal | |
51 | fi | |
52 | } | |
53 | ||
e4d22829 JB |
54 | condrestart() { |
55 | if [ -f /var/lock/subsys/perlbal ]; then | |
56 | stop | |
57 | start | |
58 | else | |
59 | msg_not_running perlbal | |
60 | RETVAL=$1 | |
61 | fi | |
62 | } | |
63 | ||
8c9f6f7a | 64 | reload() { |
65 | if [ -f /var/lock/subsys/perlbal ]; then | |
66 | msg_reloading perlbal | |
67 | killproc perlbal -HUP | |
68 | RETVAL=$? | |
69 | else | |
70 | msg_not_running perlbal | |
71 | RETVAL=7 | |
72 | fi | |
73 | } | |
74 | ||
75 | RETVAL=0 | |
76 | # See how we were called. | |
77 | case "$1" in | |
78 | start) | |
79 | start | |
80 | ;; | |
81 | stop) | |
82 | stop | |
83 | ;; | |
84 | restart) | |
85 | stop | |
86 | start | |
87 | ;; | |
e4d22829 JB |
88 | try-restart) |
89 | condrestart 0 | |
8c9f6f7a | 90 | ;; |
e4d22829 JB |
91 | reload|force-reload) |
92 | reload | |
8c9f6f7a | 93 | ;; |
94 | status) | |
95 | status perlbal | |
96 | RETVAL=$? | |
97 | ;; | |
98 | *) | |
e4d22829 | 99 | msg_usage "$0 {start|stop|restart|try-restart|reload|force-reload|status}" |
8c9f6f7a | 100 | exit 3 |
101 | esac | |
102 | ||
103 | exit $RETVAL |