From ec7f71214195d2bc1aa680308f5dbfe4091a8e95 Mon Sep 17 00:00:00 2001
From: Pragmatic Software <pragma78@gmail.com>
Date: Mon, 12 Mar 2018 22:35:57 -0700
Subject: [PATCH] compiler_vm: remove bash -c from exec

---
 modules/compiler_vm/languages/server/_c_base.pm | 2 +-
 modules/compiler_vm/languages/server/java.pm    | 2 +-
 modules/compiler_vm/languages/server/tendra.pm  | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/modules/compiler_vm/languages/server/_c_base.pm b/modules/compiler_vm/languages/server/_c_base.pm
index 5a0e529a..82e5083a 100755
--- a/modules/compiler_vm/languages/server/_c_base.pm
+++ b/modules/compiler_vm/languages/server/_c_base.pm
@@ -31,7 +31,7 @@ sub postprocess {
   }
 
   print "Executing gdb\n";
-  my ($retval, $result) = $self->execute(60, "bash -c \"date -s \@$self->{date}; ulimit -t 5; compiler_watchdog.pl $self->{arguments} > .output\"");
+  my ($retval, $result) = $self->execute(60, "date -s \@$self->{date}; ulimit -t 5; compiler_watchdog.pl $self->{arguments} > .output");
 
   $result = "";
   open(FILE, '.output');
diff --git a/modules/compiler_vm/languages/server/java.pm b/modules/compiler_vm/languages/server/java.pm
index 2f8e7d62..f5d6a805 100755
--- a/modules/compiler_vm/languages/server/java.pm
+++ b/modules/compiler_vm/languages/server/java.pm
@@ -32,7 +32,7 @@ sub postprocess {
   print "Executing java\n";
   my $input_quoted = quotemeta $self->{input};
   $input_quoted =~ s/\\"/"'\\"'"/g;
-  my ($retval, $result) = $self->execute(60, "bash -c \"date -s \@$self->{date}; ulimit -t 5; echo $input_quoted | java prog $self->{arguments} > .output\"");
+  my ($retval, $result) = $self->execute(60, "date -s \@$self->{date}; ulimit -t 5; echo $input_quoted | java prog $self->{arguments} > .output");
 
   $result = "";
   open(FILE, '.output');
diff --git a/modules/compiler_vm/languages/server/tendra.pm b/modules/compiler_vm/languages/server/tendra.pm
index a5593b9e..8c9ca226 100755
--- a/modules/compiler_vm/languages/server/tendra.pm
+++ b/modules/compiler_vm/languages/server/tendra.pm
@@ -21,7 +21,7 @@ sub postprocess {
     $self->{output} = "[$self->{output}]\n";
   }
 
-  my ($retval, $result) = $self->execute(60, "bash -c \"date -s \@$self->{date}; ulimit -t 5; cat .input | /home/compiler/prog > .output\"");
+  my ($retval, $result) = $self->execute(60, "date -s \@$self->{date}; ulimit -t 5; cat .input | /home/compiler/prog > .output");
 
   $self->{error} = $retval;