epita-std/ACU
Archived
1
0
Fork 0
Code Releases Activity

Check Fact is already running after call it

Browse source
This commit is contained in:
Mercier Pierre-Olivier 2013-11-03 03:39:43 +01:00
commit 9dbf492046
1 changed files with 11 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

12
process/files/moulette_get.pl
View file

@ -37,7 +37,17 @@ sub fact_exec
{ {
my $cmd = shift; my $cmd = shift;
my $rundir = shift; my $rundir = shift;
jail_exec("cd $rundir && /usr/local/bin/mono /usr/local/fact/FactExe.exe $cmd");
# Check that Fact is running
qx/pgrep mono/;
while ($?)
{
log ERROR, "Fact is not running ... waiting for respawn";
sleep(10);
qx/pgrep mono/;
}
jail_exec("cd '$rundir' && /usr/local/bin/mono /usr/local/fact/FactExe.exe $cmd");
} }
sub prepare_dir sub prepare_dir