3 # Really this should suck less, its a crap version of this:
4 # http://use.perl.org/~zzo/journal/34146
6 # Work out what our projects called, we must be called from the top level with
9 RESTART_SCRIPT=$( find script/ -type f -name '*_fastcgi.pl' )
10 #APP_PATH=/path/to/checkout
11 FCGI_SOCKET_PATH=/tmp/$PROJECT.prod.socket
12 PID_PATH=/var/run/$PROJECT.prod.pid
16 echo -n "Starting PROD: $RESTART_SCRIPT"
17 $RESTART_SCRIPT -l $FCGI_SOCKET_PATH -p $PID_PATH -d -n 5
20 # make real sure it's started
26 echo "Start failed - trying again"
27 unlink $FCGI_SOCKET_PATH
34 echo -n "Stopping PROD MT: "
41 unlink $FCGI_SOCKET_PATH
43 echo $PROJECT not running
54 echo "Usage: $0 { stop | start | restart }"