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