X-Git-Url: http://git.squeep.com/?p=portage-squeep;a=blobdiff_plain;f=games-server%2Ffbmuck%2Ffiles%2Ffbmuckctl;fp=games-server%2Ffbmuck%2Ffiles%2Ffbmuckctl;h=14e10172bd030e0c8406a85897d0099e128080ed;hp=0000000000000000000000000000000000000000;hb=c50a928ec26ad2ee9408a8b51872b4442386624a;hpb=90847b269c41b71c8ad42f4fa6213cfdaadba328

diff --git a/games-server/fbmuck/files/fbmuckctl b/games-server/fbmuck/files/fbmuckctl
new file mode 100755
index 0000000..14e1017
--- /dev/null
+++ b/games-server/fbmuck/files/fbmuckctl
@@ -0,0 +1,181 @@
+#!/bin/bash
+# fbmuckctl  This script takes care of starting and stopping
+#            FuzzBall Muck servers on this machine.
+#
+# The format of /etc/fbmucks is:
+#
+# MUCKNAME  USERNAME  MUCK_ROOT_PATH                 SCRIPTNAME  PORTS
+# tygmuck3  tygryss   /home/revar/tygmuck            restart     8888,8899s
+# feepmuck  foxen     /home/foxen/muck               restart     8800
+#
+# Port numbers are separate by commas.  An 's' at the end of a port number
+# means that that port is designated as a secure SSL port.
+
+[ -f /etc/fbmucks ] || exit 0
+
+RETVAL=0
+pidfile="netmuck.pid"
+who=`whoami`
+cmd=$1
+shift
+mucknames=$@
+
+# See how we were called.
+case "$cmd" in
+  start)
+    # Start mucks.
+    cat /etc/fbmucks | \
+    grep -v '^[ 	]*#' |\
+    grep -v '^[ 	]*$' |\
+    while read name user path script ports; do
+        if [ "x$mucknames" != "x" ]; then
+            found=0
+            for muckname in $mucknames; do
+                if [ "x$muckname" = "x$name" ]; then
+                    found=1
+                fi
+            done
+            if [ $found -eq 0 ]; then
+                continue
+            fi
+        fi
+        if [ "x$who" = "xroot" -o "x$who" = "x$user" ]; then
+            ports=`echo $ports | sed 's/,/ /g' | sed 's/\([0-9]*\)s/-sport \1/g'`
+            rm -f $path/$pidfile
+            echo -n "Starting $name fbmuck: "
+	    failed=0
+            if [ "x$who" = "x$user" ]; then
+                $path/$script $ports
+		if [ $? == 0 ]; then
+                    echo "started $name fbmuck"
+		else
+		    failed=1
+                    echo "failed to start $name fbmuck"
+		fi
+            else
+                rcode=`su $user -c "$path/$script $ports; echo \\\$?"`
+		if [ "$rcode" == 0 ]; then
+                    echo "started $name fbmuck"
+		else
+		    failed=1
+                    echo "failed to start $name fbmuck"
+		fi
+            fi
+	    if [ $failed == 0 ]; then
+		while [ ! -f $path/$pidfile ]; do
+echo "DEBUG: waiting for $path/$pidfile to exist ..."
+		    sleep 1
+		done
+	    fi
+            echo ""
+        fi
+    done
+    ;;
+  stop)
+    # Stop mucks.
+    cat /etc/fbmucks | \
+    grep -v '^[ 	]*#' |\
+    grep -v '^[ 	]*$' |\
+    while read name user path script ports; do
+        if [ "x$mucknames" != "x" ]; then
+            found=0
+            for muckname in $mucknames; do
+                if [ "x$muckname" = "x$name" ]; then
+                    found=1
+                fi
+            done
+            if [ $found = 0 ]; then
+                continue
+            fi
+        fi
+        if [ "x$who" = "xroot" -o "x$who" = "x$user" ]; then
+            didfail=1
+            echo -n "Shutting down $name fbmuck: "
+            if [ -f $path/$pidfile ]; then
+                pid=`cat $path/$pidfile`
+                if [ -d /proc/$pid ]; then
+                    if kill $pid; then
+                        didfail=0
+                    else
+                        didfail=1
+                    fi
+                    # Wait for server to complete a clean shutdown.
+                    # If the process doesn't change status for a period
+                    # longer than sixty seconds, assume it is hung, and exit.
+                    laststat="S"
+                    limitcnt=60
+                    while [ -d /proc/$pid ]; do
+                        newstat=`grep 'State:' /proc/$pid/status|awk '{print $2}'`
+                        if [ "x$newstat" != "xR" -a "x$laststat" = "x$newstat" ]; then
+                            limitcnt=`expr $limitcnt - 1`
+                            if [ $limitcnt -eq 0 ]; then
+                                didfail=1
+                                break
+                            fi
+                        else
+                            limitcnt=60
+                            laststat=$newstat
+                        fi
+                        sleep 1
+                    done
+                fi
+                rm -f $path/$pidfile
+            fi
+            [ $didfail = 0 ] \
+                && echo "stopped $name fbmuck" \
+                || echo "failed to stop $name fbmuck"
+            echo ""
+        fi
+    done
+    ;;
+  reload)
+    $0 stop
+    $0 start
+    ;;
+  restart)
+    $0 stop
+    $0 start
+    ;;
+  status)
+    cat /etc/fbmucks | \
+    grep -v '^[ 	]*#' |\
+    grep -v '^[ 	]*$' |\
+    while read name user path script ports; do
+        if [ "x$mucknames" != "x" ]; then
+            found=0
+            for muckname in $mucknames; do
+                if [ "x$muckname" = "x$name" ]; then
+                    found=1
+                fi
+            done
+            if [ $found -eq 0 ]; then
+                continue
+            fi
+        fi
+        if [ "x$who" = "xroot" -o "x$who" = "x$user" ]; then
+            echo -n "fbmuck for $name "
+            if [ -f $path/$pidfile ]; then
+                pid=`cat $path/$pidfile`
+                if [ -d /proc/$pid ]; then
+                    echo "is running. ($pid)"
+                else
+                    echo "is not running."
+                fi
+            else
+                echo "is not running."
+            fi
+        fi
+    done
+    ;;
+  *)
+    echo -n "Usage: $0 {start|stop|restart|status}"
+    if [ "x$who" = "xroot" ]; then
+    	echo " [muckname,[muckname,[..]]]"
+    else
+    	echo ""
+    fi
+    exit 1
+esac
+
+exit 0
+