r12: modified to use separate configuration file

[ctsim.git] / cgi-bin / ctsim.cgi

diff --git a/cgi-bin/ctsim.cgi b/cgi-bin/ctsim.cgi
index d75e46627c77efadc5d29028954a1164098490f5..89b05332236e7202b35115f6bc3ae112cf77718a 100644 (file)
--- a/cgi-bin/ctsim.cgi
+++ b/cgi-bin/ctsim.cgi
@@ -6,8 +6,9 @@ use CGI;
 use File::Basename;
 use Fcntl ':flock';
 
+require ctsim.conf;
+
 my $opt_d = 0;
-my $bindir = "/opt/ctsim/bin";
 $ENV{'PATH'} = $bindir;
 
 my $fromhost = $ENV{'REMOTE_HOST'};
@@ -70,13 +71,10 @@ $error .= "IR Nx and Ny must be between 5 and 1024<br>" if ($IR_Nx < 5 || $IR_Nx
 $error .= "IR Filter Parameter must be between 0 and 1<br>" if ($IR_Filter_Param < 0 || $IR_Filter_Param > 1);
 
 
-my $jobdir = "/opt/apache/htdocs/ctsim/webdata";
 my $tmpid = $$;
 my $auto_window_img = "std0.1";
 my $auto_window_diff = "std1";
 my $auto_window_rs = "full";
-my $datadir = "/opt/apache/htdocs/ctsim/webdata";
-my $url_datadir = "/ctsim/webdata";
 my $logfile = "$jobdir/ctsim.log";
 
 my $result_fname = "$datadir/result-$tmpid.html";
@@ -100,9 +98,9 @@ my $ctrec_ver = "$bindir/ctrec";
 my $phm2rs_ver = "$bindir/phm2rs";
 my $phm2sdf_ver = "$bindir/phm2sdf";
 my $diff_ver = "$bindir/sdf-2";
-$ctrec_ver = "/opt/lam/bin/mpirun N N $bindir/ctrec-mpi" if $MPI;
-$phm2rs_ver = "/opt/lam/bin/mpirun N N $bindir/phm2rs-mpi" if $MPI;
-$phm2sdf_ver = "/opt/lam/bin/mpirun N N $bindir/phm2sdf-mpi" if $MPI;
+$ctrec_ver = "/opt/lam/bin/mpirun N N $bindir/ctrec-lam" if $MPI;
+$phm2rs_ver = "/opt/lam/bin/mpirun N N $bindir/phm2rs-lam" if $MPI;
+$phm2sdf_ver = "/opt/lam/bin/mpirun N N $bindir/phm2sdf-lam" if $MPI;
 
 my $gp_cmd = "$phm2sdf_ver $phantom_fname $Phantom_Nx $Phantom_Ny --phantom $Phantom_Name --nsample $Phantom_NSample";
 my $rs_cmd = "$phm2rs_ver $rs_fname $RS_NDet $RS_NRot --phantom $Phantom_Name --nray $RS_NRay --rotangle $RS_RotAngle";