RootForum Community

Code: Select all

#! /bin/bash

PATH=/bin:/usr/bin:/sbin:/usr/sbin

DIR=/var/www/web12/html/shoutcast/test

DAEMON=sc_serv

PARAMS="$3"

NAME="$2"
DESC="Shoutcast"

start() {
   echo "Starte $DESC: $NAME"
   if [ -e $DIR ];
   then
    cd $DIR
    screen -d -m -S $NAME ./$DAEMON $PARAMS
    echo " ... gestartet."
   else echo "Fehlerhaftes Verzeichniss: $DIR!"
   fi
}


getpid() {
kpid=`screen -ls |grep $NAME |awk -F . '{print $4}'|awk '{print $4}'` 
echo "$kpid"
}

case "$1" in
 start)
   start
   ;;

 getpid)
   getpid
   ;;

 restart)
   stop
   start
   ;;

 *)
   echo "Usage: $0 {start|stop|status|restart}"
   exit 1
   ;;

esac


exit 0

Code: Select all

unlink("/var/www/web12/html/shoutcast/konsole/logs/$id.log");
print "Serverbeschreibung : $serverbeschreibung<br><br>";
$server1 = system("./start start $serverbeschreibung /var/www/web12/html/shoutcast/konsole/conf/$id.conf");

my $neuer = `./start getpid $serverbeschreibung`;
print "<br>Erteilte PID : $neuer <br><br>";
print "Datenbank Connect <br><br>";
&dbconnect;
print "DBABFRAGE-UPDATE - ID $id <br><br>";
my $sth = $dbh->prepare("update serverdaten set run='1', flag='0', startstopp='0', pid='$neuer' WHERE id='$id'");