New script to manage servers

commands/first-install.sh

@@ -1,7 +1,7 @@
 #! /bin/bash
 
 # Install missing packets
-PACKAGES_LIST="libnet-ldap-perl libxml-libxml-perl libgearman-client-perl"
+PACKAGES_LIST="libnet-ldap-perl libxml-libxml-perl libgearman-client-perl libmailtools-perl libmail-sendmail-perl"
 
 if ! whereis dpkg > /dev/null 2> /dev/null
 then

commands/manage-server.sh

@@ -0,0 +1,26 @@
+#! /bin/sh
+
+cd $(dirname "$0")
+
+SRV_LIST="moore noyce hamano cpp"
+
+ACTIONS="start stop restart"
+
+for ACT in $ACTIONS
+do
+    if [ -n "$1" ] && [ "$1" == "$ACT" ]
+    then
+	ACTION="$ACT"
+	break
+    fi
+done
+
+if [ -z "$ACTION" ]
+then
+    echo "Usage: $0 [$ACTIONS]"
+fi
+
+for SRV in $SRV_LIST
+do
+    ssh root@$SRV ~/liblerdorf/process/launch.sh "$ACTION"
+done

process/launch.sh

@@ -30,11 +30,20 @@ launch_screen()
 
 if [ -z "$1" ]
 then
-    HOSTNAME=`/bin/hostname`
+    ACTION="restart"
 else
-    HOSTNAME="$1"
+    ACTION="$1"
 fi
 
+if [ -z "$2" ]
+then
+    HOSTNAME=`/bin/hostname`
+else
+    HOSTNAME="$2"
+fi
+
+if [ "$ACTION" == "stop" ] || [ "$ACTION" == "restart" ]
+then
     # Kill old liblersorf screen sessions
     $SU -c "$SCREEN -ls" intradmin | $GREP '[0-9]+\.lerdorf_[a-zA-Z0-9_-]+' |
     while read LINE
@@ -42,7 +51,11 @@ do
 	SNAME=`echo $LINE | $SED "s/^[^0-9]*([0-9]+\.[^ \t]+).*$/\1/"`
 	$SU -c "$SCREEN -S \"$SNAME\" -X kill" intradmin
     done
+fi
 
+
+if [ "$ACTION" == "start" ] || [ "$ACTION" == "restart" ]
+then
     case $HOSTNAME in
 
 	cpp)
@@ -71,3 +84,4 @@ case $HOSTNAME in
 	    exit 1
 	    ;;
     esac
+fi