diff options
author | coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2000-12-29 00:05:54 +0000 |
---|---|---|
committer | coryan <coryan@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 2000-12-29 00:05:54 +0000 |
commit | 5c960e64192114ac265ce28e47ccef334098894a (patch) | |
tree | 38e94053aaec53d7875abb6d740999209061fe92 /bin/auto_compile | |
parent | c530c67530685a09de3e1b135c5db3121d30f7d9 (diff) | |
download | ATCD-5c960e64192114ac265ce28e47ccef334098894a.tar.gz |
ChangeLogTag:Thu Dec 28 16:02:51 2000 Carlos O'Ryan <coryan@uci.edu>
Diffstat (limited to 'bin/auto_compile')
-rwxr-xr-x | bin/auto_compile | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/bin/auto_compile b/bin/auto_compile index 118c5483ea3..ec3c368774d 100755 --- a/bin/auto_compile +++ b/bin/auto_compile @@ -51,6 +51,8 @@ $pre_realclean = 0; $post_realclean = 0; $report_success = 0; $debug = 0; +$sandbox = ''; +$sandbox_timeout = 600; @BUILD_LIST= (); @CONFIGURATION_OPTIONS = (); @@ -90,10 +92,12 @@ while ($#ARGV >= 0) { shift; $copy_logs = 1; $LOG_DESTINATION = $ARGV[0]; - } elsif ($ARGV[0] eq "-mail_logs") { + } elsif ($ARGV[0] eq "-sandbox") { shift; - $copy_logs = 0; - $LOG_DESTINATION = $ARGV[0]; + $sandbox = $ARGV[0]; + } elsif ($ARGV[0] eq "-sandbox_timeout") { + shift; + $sandbox_timeout = $ARGV[0]; } elsif ($ARGV[0] eq "-dont_run") { $dont_run = 1; } elsif ($ARGV[0] eq "-pre_realclean") { @@ -448,7 +452,11 @@ if ($dont_run == 0) { || mydie "cannot chdir to $subdir"; $run_error = 0; - if (open(RUN, "perl $program 2>&1 |") == 0) { + my $prefix = ''; + if ($sandbox ne "") { + $prefix = $sandbox.' '.$sandbox_timeout.' '; + } + if (open(RUN, $prefix."perl $program 2>&1 |") == 0) { push @failures, "cannot run $program in $directory"; next; } |