#!/usr/bin/perl.real # Game Server Module, crontab Copyright(c) cPanel, Inc. # All rights Reserved. # darren@cpanel.net http://cpgs.cpanel.net $arg=$ARGV[0]; if($arg eq "-v") { $verbose=1; } open(CONFIG,") { s/(\r|\n)//g; my($var,$val)=split(/\=/,$_,2); if($var eq "root") { $root=$val; last; } } close(CONFIG); if(-e "$root/cpgsd.pid") { open(TM,"<$root/cpgsd.pid"); my $formerpid = (); close(TM); my @procs=`ps uaxww`; foreach my $pr(@procs) { my(undef,$ppid,$rest)=split(/\s+/,$pr,3); if(($ppid == $formerpid) and ($rest =~ /cPGSD/)) { if($verbose) { $rest =~ s/(\r|\n)//g; print "cPGSD is currently running. $ppid [$rest]"; } exit(0); } } } # if we get this far, we didn't find cPGSD running already $ret = system("/var/cpanel/cpgsd.pl 2>\&1 >/dev/null"); if($verbose) { if($ret == 0) { print "cPGSD not running, restarted.. "; } else { print "cPGSD not running, nor could it be restarted. Please run /var/cpanel/cpgsd.pl manually for errors."; } }