You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

99 lines
2.9 KiB

#!/usr/bin/perl
#
# $Id: sitecfgorg.pl,v 1.2 2004/01/13 19:22:04 jeffo Exp $
#
# Source File: sitecfg.pl
$ipfilter = "";
$acceptpost = 1;
$acceptget = 1;
$allowmultilogin = 0;
$autologout = 1800;
$mmautontfyfrom="autonotify\@test-central.com";
$mmautontfyto="support\@test-central.com";
$SYSTEM{'Version'} = "4.00";
$SYSTEM{'ipfilter'} = $ipfilter;
$SYSTEM{'acceptpost'} = $acceptpost;
$SYSTEM{'acceptget'} = $acceptget;
$SYSTEM{'allowmultilogin'} = $allowmultilogin;
$SYSTEM{'autologout'} = $autologout;
$SYSTEM{'acceptpostchk'} = ($acceptpost == 1) ? "CHECKED" : "";
$SYSTEM{'acceptgetchk'} = ($acceptget == 1) ? "CHECKED" : "";
$SYSTEM{'allowmultiloginchk'} = ($allowmultilogin == 1) ? "CHECKED" : "";
$SYSTEM{'supportedimagemedia'} = "art;bmp;gif;jpg;jpe;jpeg";
$SYSTEM{'supportedaudiomedia'} = "aif;aifc;aiff;au;mid;rmi;snd;wav;";
$SYSTEM{'supportedvideomedia'} = "avi;m1v;mov;mpa;mpe;mpeg;mpg";
%CONTENT_TYPES=(
"aif" => "audio/x-aiff",
"aifc" => "audio/x-aiff",
"aiff" => "audio/x-aiff",
"art" => "image/x-jg",
"au" => "audio/basic",
"avi" => "video/avi",
"bmp" => "image/bmp",
"gif" => "image/gif",
"jpe" => "image/jpeg",
"jpg" => "image/jpeg",
"jpeg" => "image/jpeg",
"m1v" => "video/mpeg",
"mid" => "audio/mid",
"mov" => "video/quicktime",
"mpa" => "video/jpeg",
"mpe" => "video/jpeg",
"mpeg" => "video/jpeg",
"mpg" => "video/jpeg",
"rmi" => "audio/mid",
"snd" => "audio/basic",
"wav" => "audio/x-wav",
"other" => "text/html"
);
$osnt=0;
$pathsep = "/";
$idmax = 1000;
$hostid = 4;
require 'smilib.pl';
require 'cybertestlib.pl';
require 'maillib.pl';
$docroot = "/home/cust1/usr1108";
$urlroot = "http://64.224.96.108/cgi-bin";
$pubroot = join($pathsep, $docroot, "html");
$graphroot = join($pathsep, "", "graphic");
$graphurl = join($pathsep, "http://64.224.96.108", "graphic");
$cgiroot = $urlroot;
$cfgroot = join($pathsep, $docroot, "cgi-bin");
$archiveroot = join($pathsep, $docroot, "archive");
$secroot = join($pathsep, $docroot, "secure_html");
$logroot = join($pathsep, $secroot, "log");
$resptmplt = join($pathsep, $secroot, "template");
$dataroot = join($pathsep, $secroot, "data");
$questionroot = join($pathsep, $dataroot, "tests");
$testgraphic = join($pathsep, $questionroot, "graphic");
$testroot = join($pathsep, $secroot, "tests");
$testpending = join($pathsep, $secroot, "tests", "pending");
$testinprog = join($pathsep, $secroot, "tests", "inprog");
$testcomplete = join($pathsep, $secroot, "tests", "complete");
$PATHS{'graphroot'} = $graphroot;
$PATHS{'graphurl'} = $graphurl;
$PATHS{'cgiroot'} = $cgiroot;
$PATHS{'pubroot'} = $pubroot;
$PATHS{'logroot'} = $logroot;
$PATHS{'dataroot'} = $dataroot;
$PATHS{'secroot'} = $secroot;
$PATHS{'logroot'} = $logroot;
$PATHS{'resptmplt'} = $resptmplt;
$PATHS{'questionroot'} = $questionroot;
$PATHS{'testroot'} = $testroot;
$PATHS{'urlroot'} = $urlroot;
$PATHS{'archiveroot'} = $archiveroot;
$PATHS{'download'} = $download;
# end with True because this is a require file
1