Added services management, first shot on ssh module

lib/services.sh

@@ -0,0 +1,43 @@
+# Services manipulation functions
+
+# Syntax exec_serv svcname command
+exec_serv()
+{
+    [[ $# -lt 2 ]] && (
+	prnt E "exec_serv(): Erreur de syntaxe !"
+	exit 11
+    )
+
+    local svcname=$1 command=$2
+    shift 2
+
+    local lineexec=$(echo $INIT_COM |
+			 sed -e s/%srv%/$svcname/ \
+			     -e s/%com%/$command/)
+    prnt I "Lancement de la commande $command du services $svcname"
+    $lineexec
+}
+
+svc_start()
+{
+    for svc in $@; do
+	exec_serv $svc start
+    done
+}
+export -f svc_start
+
+svc_restart()
+{
+    for svc in $@; do
+	exec_serv $svc restart
+    done
+}
+export -f svc_restart
+
+svc_stop()
+{
+    for svc in $@; do
+	exec_serv $svc stop
+    done
+}
+export -f svc_stop