Updates
This commit is contained in:
@@ -5,6 +5,8 @@ The following is a first list of the stuff we should know how to do.
|
|||||||
|
|
||||||
ssh actswac@104.238.116.218
|
ssh actswac@104.238.116.218
|
||||||
|
|
||||||
|
Qbttxpsea1!
|
||||||
|
|
||||||
- Find names of software packages in the official CentOS repositories.
|
- Find names of software packages in the official CentOS repositories.
|
||||||
|
|
||||||
Sample commands
|
Sample commands
|
||||||
|
|||||||
@@ -11,215 +11,220 @@ require 'testlib.pl';
|
|||||||
&traceoutput("login.pl"); # TRACE IF ACTIVE
|
&traceoutput("login.pl"); # TRACE IF ACTIVE
|
||||||
|
|
||||||
&app_initialize;
|
&app_initialize;
|
||||||
$SESSION{'temptime'} = time();
|
|
||||||
|
|
||||||
|
$SESSION{'temptime'} = time();
|
||||||
$SESSION{'clid'} = $FORM{'clid'};
|
$SESSION{'clid'} = $FORM{'clid'};
|
||||||
$SESSION{'lang'} = $FORM{'lang'};
|
$SESSION{'lang'} = $FORM{'lang'};
|
||||||
|
|
||||||
&get_client_configuration();
|
&get_client_configuration();
|
||||||
&traceoutput("login.pl:$FORM{'clid'}:$FORM{'uid'}:$FORM{'pwd'}"); # TRACE IF ACTIVE
|
&traceoutput("login.pl:$FORM{'clid'}:$FORM{'uid'}:$FORM{'pwd'}"); # TRACE IF ACTIVE
|
||||||
&setbrowsertype();
|
&setbrowsertype();
|
||||||
|
|
||||||
## DED Patch for secure_html/tests dir permission problem 2006/10/11
|
## DED Patch for secure_html/tests dir permission problem 2006/10/11
|
||||||
if (! -x $testroot) {
|
if (! -x $testroot) {
|
||||||
print STDERR "PERMS: $testroot is not X\n";
|
print STDERR "PERMS: $testroot is not X\n";
|
||||||
chmod(0777, $testroot);
|
chmod(0777, $testroot);
|
||||||
}
|
}
|
||||||
|
|
||||||
if ($FORM{'selfregister'} eq "Y") {
|
if ($FORM{'selfregister'} eq "Y") {
|
||||||
unless ($SESSION{'clid'}) {
|
unless ($SESSION{'clid'}) {
|
||||||
warn "ERROR: Empty Client ID in Form $FORM{'clid'} " ;
|
warn "ERROR: Empty Client ID in Form $FORM{'clid'} " ;
|
||||||
&show_illegal_access_warning("user");
|
print STDERR "ERROR: Empty Client ID in Form $FORM{'clid'} " ;
|
||||||
exit();
|
# &show_illegal_access_warning("user");
|
||||||
}
|
exit();
|
||||||
&get_client_profile($SESSION{'clid'});
|
}
|
||||||
unless (%CLIENT) {
|
&get_client_profile($SESSION{'clid'});
|
||||||
warn "ERROR: Invalid Client ID $FORM{'clid'} " ;
|
unless (%CLIENT) {
|
||||||
&show_illegal_access_warning("user");
|
warn "ERROR: Invalid Client ID $FORM{'clid'} " ;
|
||||||
exit();
|
print STDERR "ERROR: Invalid Client ID $FORM{'clid'} " ;
|
||||||
}
|
# &show_illegal_access_warning("user");
|
||||||
$CANDIDATE{'new'}="Y";
|
exit();
|
||||||
print "Content-Type: text/html\n\n";
|
}
|
||||||
&show_template("regsas");
|
$CANDIDATE{'new'}="Y";
|
||||||
|
print "Content-Type: text/html\n\n";
|
||||||
|
&show_template("regsas");
|
||||||
} elsif (&verifyaccess) {
|
} elsif (&verifyaccess) {
|
||||||
&init_session;
|
&init_session;
|
||||||
&LanguageSupportInit();
|
&LanguageSupportInit();
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "1");
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "1");
|
||||||
$FORM{'notice'} = $SYSTEM{'message'};
|
$FORM{'notice'} = $SYSTEM{'message'};
|
||||||
|
|
||||||
### For redirect to regcnd & regsas
|
### For redirect to regcnd & regsas
|
||||||
$vars{'tid'} = $SESSION{'tid'};
|
$vars{'tid'} = $SESSION{'tid'};
|
||||||
$vars{'lang'} = $SESSION{'lang'};
|
$vars{'lang'} = $SESSION{'lang'};
|
||||||
$vars{'testid'} = $FORM{'testid'} if ($FORM{'testid'}) ;
|
$vars{'testid'} = $FORM{'testid'} if ($FORM{'testid'}) ;
|
||||||
$vars{'badid'} = $FORM{'badid'} unless !(defined($FORM{'badid'})); #This is used if badid is passed from regsas for autorefresh location trick
|
$vars{'badid'} = $FORM{'badid'} unless !(defined($FORM{'badid'})); #This is used if badid is passed from regsas for autorefresh location trick
|
||||||
$vars{'direction'} = $FORM{'direction'} unless !(defined($FORM{'direction'}));
|
$vars{'direction'} = $FORM{'direction'} unless !(defined($FORM{'direction'}));
|
||||||
unless ($SESSION{'clid'}) {
|
unless ($SESSION{'clid'}) {
|
||||||
warn "ERROR: Empty Client ID in Form $FORM{'clid'} " ;
|
warn "ERROR: Empty Client ID in Form $FORM{'clid'} " ;
|
||||||
&show_illegal_access_warning("user");
|
print STDERR "ERROR: Empty Client ID in Form $FORM{'clid'} " ;
|
||||||
exit();
|
# &show_illegal_access_warning("user");
|
||||||
}
|
exit();
|
||||||
&get_client_profile($SESSION{'clid'});
|
}
|
||||||
unless (%CLIENT || $SESSION{'clid'} eq 'std') {
|
&get_client_profile($SESSION{'clid'});
|
||||||
warn "ERROR: Invalid Client ID $FORM{'clid'} " ;
|
unless (%CLIENT || $SESSION{'clid'} eq 'std') {
|
||||||
&show_illegal_access_warning("user");
|
warn "ERROR: Invalid Client ID $FORM{'clid'} " ;
|
||||||
exit();
|
print STDERR "ERROR: Invalid Client ID $FORM{'clid'} " ;
|
||||||
}
|
# &show_illegal_access_warning("user");
|
||||||
if ($SESSION{'taclid'} ne '') {
|
exit();
|
||||||
print "Content-Type: text/html\n\n";
|
}
|
||||||
my $opts = { restrict_to_availability_window => 1 };
|
if ($SESSION{'taclid'} ne '') {
|
||||||
&set_session($SESSION{'tid'},'taclauthtests',$SESSION{'taclauthtests'});
|
|
||||||
&set_session($SESSION{'tid'},'uid',$SESSION{'taclid'});
|
|
||||||
if ($FORM{'pwd'} eq '_____') {
|
|
||||||
&get_tacl_profile("regauto");
|
|
||||||
®dusr("regauto");
|
|
||||||
} else {
|
|
||||||
&get_tacl_profile();
|
|
||||||
®dusr("regtacl");
|
|
||||||
}
|
|
||||||
} elsif ($FORM{'sas'} ne '') {
|
|
||||||
## ^ support for wilcard login
|
|
||||||
# register an account to the candidate
|
|
||||||
my $opts = { restrict_to_availability_window => 1 };
|
|
||||||
unless ($SESSION{'uid'}) {
|
|
||||||
warn "ERROR: Empty Candidate ID in Session data " ;
|
|
||||||
}
|
|
||||||
&get_candidate_profile($SESSION{'clid'}, $SESSION{'uid'}, $opts);
|
|
||||||
#®dusr("regsas");
|
|
||||||
&redirect("regsas", \%vars);
|
|
||||||
} else {
|
|
||||||
if ($FORM{'sadm'} ne '') {
|
|
||||||
print "Content-Type: text/html\n\n";
|
|
||||||
if ($SESSION{'uac'} eq 'gadmin') {
|
|
||||||
# Site administration
|
|
||||||
$CLIENT{'active'} = "X";
|
|
||||||
$CLIENT{'logo'} = "<IMG SRC=\"$PATHS{'graphroot'}/logo.gif\" BORDER=0>\n";
|
|
||||||
$CLIENT{'clorg'} = "ACTS Corporation";
|
|
||||||
®dusr("frsadmin");
|
|
||||||
} elsif ($SESSION{'uac'} =~ /txlatr./ ) {
|
|
||||||
($FORM{'uac'},$FORM{'lang'}) = split(/\./, $SESSION{'uac'});
|
|
||||||
$CLIENT{'active'} = "X";
|
|
||||||
$CLIENT{'logo'} = "<IMG SRC=\"$PATHS{'graphroot'}/logo.gif\" BORDER=0>\n";
|
|
||||||
$CLIENT{'clorg'} = "ACTS Corporation";
|
|
||||||
print "<HTML>\n";
|
|
||||||
print "<HEAD>\n";
|
|
||||||
print "<META HTTP-EQUIV=\"Refresh\" CONTENT=\"0; URL=$PATHS{'cgiroot'}/Interpreter.pl?tid=$SESSION{'tid'}&lang=$FORM{'lang'}\">\n";
|
|
||||||
print "</HEAD>\n";
|
|
||||||
print "<BODY>\n";
|
|
||||||
print "</BODY>\n";
|
|
||||||
print "</HTML>\n";
|
|
||||||
} elsif ($SESSION{'uac'} eq 'madmin') {
|
|
||||||
# Multiple-client admin
|
|
||||||
®dusr("madmin");
|
|
||||||
} else {
|
|
||||||
# Client Test Administration
|
|
||||||
&get_client_profile($SESSION{'clid'});
|
|
||||||
®dusr("frsadmin");
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
if ($FORM{'tadm'} ne '') {
|
|
||||||
print "Content-Type: text/html\n\n";
|
|
||||||
if ($SESSION{'uac'} eq 'madmin') {
|
|
||||||
# Multiple-client admin
|
|
||||||
®dusr("madmin");
|
|
||||||
} else {
|
|
||||||
# Client Test Administration
|
|
||||||
&get_client_profile($SESSION{'clid'});
|
|
||||||
®dusr("frsadmin");
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
if (&checkinprogress($SESSION{'clid'}, $FORM{'uid'}) ) {
|
|
||||||
# resume test at point of pause
|
|
||||||
&resumetest;
|
|
||||||
} else {
|
|
||||||
if ($FORM{'cnd'} ne '') {
|
|
||||||
&get_client_profile($SESSION{'clid'});
|
|
||||||
my $opts = { restrict_to_availability_window => 1 };
|
|
||||||
&get_candidate_profile($SESSION{'clid'}, $FORM{'uid'}, $opts);
|
|
||||||
#print STDERR "clid: $SESSION{'clid'}, uid: $FORM{'uid'}, opts: $opts\n";
|
|
||||||
if ($CANDIDATE{'grpowner'} eq 'Y') {
|
|
||||||
print "Content-Type: text/html\n\n";
|
|
||||||
&show_template("frcnd");
|
|
||||||
} elsif ($CANDIDATE{'registrar'} eq 'Y') {
|
|
||||||
print "Content-Type: text/html\n\n";
|
|
||||||
&show_template("frcnd");
|
|
||||||
} else {
|
|
||||||
&redirect("regcnd", \%vars);
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
&get_candidate_profile($SESSION{'clid'}, $FORM{'uid'});
|
|
||||||
#®dusr("regsas");
|
|
||||||
&redirect("regsas", \%vars);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
# Load Index.html
|
|
||||||
print "Content-Type: text/html\n\n";
|
print "Content-Type: text/html\n\n";
|
||||||
if ($FORM{'home'} eq 'client') {
|
my $opts = { restrict_to_availability_window => 1 };
|
||||||
&get_client_profile($FORM{'clid'});
|
&set_session($SESSION{'tid'},'taclauthtests',$SESSION{'taclauthtests'});
|
||||||
@lines = &get_template("cindex");
|
&set_session($SESSION{'tid'},'uid',$SESSION{'taclid'});
|
||||||
|
if ($FORM{'pwd'} eq '_____') {
|
||||||
|
&get_tacl_profile("regauto");
|
||||||
|
®dusr("regauto");
|
||||||
} else {
|
} else {
|
||||||
@lines = &get_template("shome");
|
&get_tacl_profile();
|
||||||
|
®dusr("regtacl");
|
||||||
}
|
}
|
||||||
if ($ipfilter ne '') {
|
} elsif ($FORM{'sas'} ne '') {
|
||||||
if ($ipfilter =~ /$ENV{'REMOTE_ADDR'}/ ) {
|
## ^ support for wilcard login
|
||||||
# ip blocked
|
# register an account to the candidate
|
||||||
if ($FORM{'sas'} eq '') {
|
my $opts = { restrict_to_availability_window => 1 };
|
||||||
# uid or password were incorrect
|
unless ($SESSION{'uid'}) {
|
||||||
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgbpw.gif\" ALT=\"System Maintenance In Progress.\" BORDER=0>";
|
warn "ERROR: Empty Candidate ID in Session data " ;
|
||||||
} else {
|
}
|
||||||
# uid is used
|
&get_candidate_profile($SESSION{'clid'}, $SESSION{'uid'}, $opts);
|
||||||
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgidu.gif\" ALT=\"Requested Login ID is not available.\" BORDER=0>";
|
#®dusr("regsas");
|
||||||
}
|
&redirect("regsas", \%vars);
|
||||||
} else {
|
} else {
|
||||||
&logger::loginfo("Incorrect passwd 4");
|
if ($FORM{'sadm'} ne '') {
|
||||||
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgipb.gif\" ALT=\"Incorrect Password.\" BORDER=0>";
|
print "Content-Type: text/html\n\n";
|
||||||
}
|
if ($SESSION{'uac'} eq 'gadmin') {
|
||||||
|
# Site administration
|
||||||
|
$CLIENT{'active'} = "X";
|
||||||
|
$CLIENT{'logo'} = "<IMG SRC=\"$PATHS{'graphroot'}/logo.gif\" BORDER=0>\n";
|
||||||
|
$CLIENT{'clorg'} = "ACTS Corporation";
|
||||||
|
®dusr("frsadmin");
|
||||||
|
} elsif ($SESSION{'uac'} =~ /txlatr./ ) {
|
||||||
|
($FORM{'uac'},$FORM{'lang'}) = split(/\./, $SESSION{'uac'});
|
||||||
|
$CLIENT{'active'} = "X";
|
||||||
|
$CLIENT{'logo'} = "<IMG SRC=\"$PATHS{'graphroot'}/logo.gif\" BORDER=0>\n";
|
||||||
|
$CLIENT{'clorg'} = "ACTS Corporation";
|
||||||
|
print "<HTML>\n";
|
||||||
|
print "<HEAD>\n";
|
||||||
|
print "<META HTTP-EQUIV=\"Refresh\" CONTENT=\"0; URL=$PATHS{'cgiroot'}/Interpreter.pl?tid=$SESSION{'tid'}&lang=$FORM{'lang'}\">\n";
|
||||||
|
print "</HEAD>\n";
|
||||||
|
print "<BODY>\n";
|
||||||
|
print "</BODY>\n";
|
||||||
|
print "</HTML>\n";
|
||||||
|
} elsif ($SESSION{'uac'} eq 'madmin') {
|
||||||
|
# Multiple-client admin
|
||||||
|
®dusr("madmin");
|
||||||
|
} else {
|
||||||
|
# Client Test Administration
|
||||||
|
&get_client_profile($SESSION{'clid'});
|
||||||
|
®dusr("frsadmin");
|
||||||
|
}
|
||||||
} else {
|
} else {
|
||||||
if ($SYSTEM{'IP_ACCESS_FILTER'} ne '') {
|
if ($FORM{'tadm'} ne '') {
|
||||||
if ($SYSTEM{'IP_ACCESS_FILTER'} =~ /$ENV{'REMOTE_ADDR'}/ ) {
|
print "Content-Type: text/html\n\n";
|
||||||
if ($FORM{'sas'} eq '') {
|
if ($SESSION{'uac'} eq 'madmin') {
|
||||||
# uid or password were incorrect
|
# Multiple-client admin
|
||||||
&logger::loginfo("Incorrect passwd 3");
|
®dusr("madmin");
|
||||||
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgbpw.gif\" ALT=\"Incorrect Password.\" BORDER=0>";
|
|
||||||
} else {
|
|
||||||
# uid is used
|
|
||||||
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgidu.gif\" ALT=\"Requested Login ID is not available.\" BORDER=0>";
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
&logger::loginfo("Incorrect passwd 2");
|
|
||||||
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgipb.gif\" ALT=\"Incorrect Password.\" BORDER=0>";
|
|
||||||
}
|
|
||||||
} else {
|
} else {
|
||||||
if ($FORM{'sas'} eq '') {
|
# Client Test Administration
|
||||||
# uid or password were incorrect
|
&get_client_profile($SESSION{'clid'});
|
||||||
&logger::loginfo("Incorrect passwd 1");
|
®dusr("frsadmin");
|
||||||
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgbpw.gif\" ALT=\"Incorrect Password.\" BORDER=0>";
|
|
||||||
} else {
|
|
||||||
# uid is used
|
|
||||||
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgidu.gif\" ALT=\"Requested Login ID is not available.\" BORDER=0>";
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
} else {
|
||||||
|
if (&checkinprogress($SESSION{'clid'}, $FORM{'uid'}) ) {
|
||||||
|
# resume test at point of pause
|
||||||
|
&resumetest;
|
||||||
|
} else {
|
||||||
|
if ($FORM{'cnd'} ne '') {
|
||||||
|
&get_client_profile($SESSION{'clid'});
|
||||||
|
my $opts = { restrict_to_availability_window => 1 };
|
||||||
|
&get_candidate_profile($SESSION{'clid'}, $FORM{'uid'}, $opts);
|
||||||
|
#print STDERR "clid: $SESSION{'clid'}, uid: $FORM{'uid'}, opts: $opts\n";
|
||||||
|
if ($CANDIDATE{'grpowner'} eq 'Y') {
|
||||||
|
print "Content-Type: text/html\n\n";
|
||||||
|
&show_template("frcnd");
|
||||||
|
} elsif ($CANDIDATE{'registrar'} eq 'Y') {
|
||||||
|
print "Content-Type: text/html\n\n";
|
||||||
|
&show_template("frcnd");
|
||||||
|
} else {
|
||||||
|
&redirect("regcnd", \%vars);
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
&get_candidate_profile($SESSION{'clid'}, $FORM{'uid'});
|
||||||
|
#®dusr("regsas");
|
||||||
|
&redirect("regsas", \%vars);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
}
|
}
|
||||||
foreach $line (@lines) {
|
}
|
||||||
$line = &xlatline($line);
|
} else {
|
||||||
|
# Load Index.html
|
||||||
|
print "Content-Type: text/html\n\n";
|
||||||
|
if ($FORM{'home'} eq 'client') {
|
||||||
|
&get_client_profile($FORM{'clid'});
|
||||||
|
@lines = &get_template("cindex");
|
||||||
|
} else {
|
||||||
|
@lines = &get_template("shome");
|
||||||
|
}
|
||||||
|
if ($ipfilter ne '') {
|
||||||
|
if ($ipfilter =~ /$ENV{'REMOTE_ADDR'}/ ) {
|
||||||
|
# ip blocked
|
||||||
|
if ($FORM{'sas'} eq '') {
|
||||||
|
# uid or password were incorrect
|
||||||
|
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgbpw.gif\" ALT=\"System Maintenance In Progress.\" BORDER=0>";
|
||||||
|
} else {
|
||||||
|
# uid is used
|
||||||
|
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgidu.gif\" ALT=\"Requested Login ID is not available.\" BORDER=0>";
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
&logger::loginfo("Incorrect passwd 4");
|
||||||
|
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgipb.gif\" ALT=\"Incorrect Password.\" BORDER=0>";
|
||||||
}
|
}
|
||||||
|
} else {
|
||||||
|
if ($SYSTEM{'IP_ACCESS_FILTER'} ne '') {
|
||||||
|
if ($SYSTEM{'IP_ACCESS_FILTER'} =~ /$ENV{'REMOTE_ADDR'}/ ) {
|
||||||
|
if ($FORM{'sas'} eq '') {
|
||||||
|
# uid or password were incorrect
|
||||||
|
&logger::loginfo("Incorrect passwd 3");
|
||||||
|
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgbpw.gif\" ALT=\"Incorrect Password.\" BORDER=0>";
|
||||||
|
} else {
|
||||||
|
# uid is used
|
||||||
|
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgidu.gif\" ALT=\"Requested Login ID is not available.\" BORDER=0>";
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
&logger::loginfo("Incorrect passwd 2");
|
||||||
|
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgipb.gif\" ALT=\"Incorrect Password.\" BORDER=0>";
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
if ($FORM{'sas'} eq '') {
|
||||||
|
# uid or password were incorrect
|
||||||
|
&logger::loginfo("Incorrect passwd 1");
|
||||||
|
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgbpw.gif\" ALT=\"Incorrect Password.\" BORDER=0>";
|
||||||
|
} else {
|
||||||
|
# uid is used
|
||||||
|
$SYSTEM{'message'} = "<IMG SRC=\"$graphroot/msgidu.gif\" ALT=\"Requested Login ID is not available.\" BORDER=0>";
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
foreach $line (@lines) {
|
||||||
|
$line = &xlatline($line);
|
||||||
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
sub resumetest {
|
sub resumetest {
|
||||||
print "RESUMING TEST<BR>\n";
|
print "RESUMING TEST<BR>\n";
|
||||||
print "<INPUT TYPE=TEXT NAME=\"tid\" VALUE=\"$FORM{'tid'}\"><BR>\n";
|
print "<INPUT TYPE=TEXT NAME=\"tid\" VALUE=\"$FORM{'tid'}\"><BR>\n";
|
||||||
print "<INPUT TYPE=TEXT NAME=\"uid\" VALUE=\"$FORM{'uid'}\"><BR>\n";
|
print "<INPUT TYPE=TEXT NAME=\"uid\" VALUE=\"$FORM{'uid'}\"><BR>\n";
|
||||||
print "<INPUT TYPE=TEXT NAME=\"pwd\" VALUE=\"$FORM{'pwd'}\"><BR>\n";
|
print "<INPUT TYPE=TEXT NAME=\"pwd\" VALUE=\"$FORM{'pwd'}\"><BR>\n";
|
||||||
print "<INPUT TYPE=TEXT NAME=\"uac\" VALUE=\"$FORM{'uac'}\"><BR>\n";
|
print "<INPUT TYPE=TEXT NAME=\"uac\" VALUE=\"$FORM{'uac'}\"><BR>\n";
|
||||||
}
|
}
|
||||||
|
|
||||||
sub test {
|
sub test {
|
||||||
print "<INPUT TYPE=TEXT NAME=\"tid\" VALUE=\"$FORM{'tid'}\"><BR>\n";
|
print "<INPUT TYPE=TEXT NAME=\"tid\" VALUE=\"$FORM{'tid'}\"><BR>\n";
|
||||||
print "<INPUT TYPE=TEXT NAME=\"uid\" VALUE=\"$FORM{'uid'}\"><BR>\n";
|
print "<INPUT TYPE=TEXT NAME=\"uid\" VALUE=\"$FORM{'uid'}\"><BR>\n";
|
||||||
print "<INPUT TYPE=TEXT NAME=\"pwd\" VALUE=\"$FORM{'pwd'}\"><BR>\n";
|
print "<INPUT TYPE=TEXT NAME=\"pwd\" VALUE=\"$FORM{'pwd'}\"><BR>\n";
|
||||||
print "<INPUT TYPE=TEXT NAME=\"uac\" VALUE=\"$FORM{'uac'}\"><BR>\n";
|
print "<INPUT TYPE=TEXT NAME=\"uac\" VALUE=\"$FORM{'uac'}\"><BR>\n";
|
||||||
&showenv;
|
&showenv;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@@ -4,7 +4,15 @@
|
|||||||
#
|
#
|
||||||
# Source File: sadmin.pl
|
# Source File: sadmin.pl
|
||||||
|
|
||||||
|
#use strict;
|
||||||
|
use warnings;
|
||||||
|
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);
|
||||||
|
|
||||||
|
#warningsToBrowser(1);
|
||||||
|
#fatalsToBrowser(1);
|
||||||
|
|
||||||
# Get config
|
# Get config
|
||||||
|
|
||||||
require 'sitecfg.pl';
|
require 'sitecfg.pl';
|
||||||
require 'testlib.pl';
|
require 'testlib.pl';
|
||||||
|
|
||||||
@@ -12,120 +20,121 @@ require 'testlib.pl';
|
|||||||
|
|
||||||
print "Content-Type: text/html\n\n";
|
print "Content-Type: text/html\n\n";
|
||||||
|
|
||||||
if (&get_session($FORM{'tid'})) {
|
#print $logroot;
|
||||||
&LanguageSupportInit();
|
my $tid = $FORM{'tid'};
|
||||||
unless ($SESSION{'clid'}) {
|
|
||||||
warn "ERROR: Empty Client ID in Session data for Session ID $FORM{'tid'} " ;
|
if (&get_session($tid)) {
|
||||||
&show_illegal_access_warning("user");
|
&LanguageSupportInit();
|
||||||
exit();
|
unless ($SESSION{'clid'}) {
|
||||||
}
|
warn "ERROR: Empty Client ID in Session data for Session ID $FORM{'tid'} " ;
|
||||||
if ($SESSION{'clid'} ne 'std') {
|
#&show_illegal_access_warning("user");
|
||||||
&get_client_profile($SESSION{'clid'});
|
exit();
|
||||||
unless (%CLIENT) {
|
}
|
||||||
warn "ERROR: Invalid Client ID $SESSION{'clid'} in Session ID $FORM{'tid'} " ;
|
if ($SESSION{'clid'} ne 'std') {
|
||||||
&show_illegal_access_warning("user");
|
&get_client_profile($SESSION{'clid'});
|
||||||
exit();
|
unless (%CLIENT) {
|
||||||
|
warn "ERROR: Invalid Client ID $SESSION{'clid'} in Session ID $FORM{'tid'} " ;
|
||||||
|
#&show_illegal_access_warning("user");
|
||||||
|
exit();
|
||||||
}
|
}
|
||||||
if ($SESSION{'uac'} eq 'admin' || $SESSION{'uac'} eq 'madmin') {
|
if ($SESSION{'uac'} eq 'admin' || $SESSION{'uac'} eq 'madmin') {
|
||||||
$FORM{'pageid'} = "Group";
|
$FORM{'pageid'} = "Group";
|
||||||
$FORM{'PAGEID'} = "GROUP";
|
$FORM{'PAGEID'} = "GROUP";
|
||||||
$mainttmplt = "frgrpadmin";
|
$mainttmplt = "frgrpadmin";
|
||||||
} else {
|
} else {
|
||||||
&get_candidate_profile($SESSION{'clid'}, $SESSION{'uid'});
|
&get_candidate_profile($SESSION{'clid'}, $SESSION{'uid'});
|
||||||
unless (%CANDIDATE) {
|
unless (%CANDIDATE) {
|
||||||
warn "ERROR: Invalid Candidate ID $SESSION{'uid'} for Client $SESSION{'clid'} in Session ID $FORM{'tid'} " ;
|
warn "ERROR: Invalid Candidate ID $SESSION{'uid'} for Client $SESSION{'clid'} in Session ID $FORM{'tid'} " ;
|
||||||
&show_illegal_access_warning("user");
|
#&show_illegal_access_warning("user");
|
||||||
exit();
|
exit();
|
||||||
}
|
}
|
||||||
$FORM{'pageid'} = "Gradebook";
|
$FORM{'pageid'} = "Gradebook";
|
||||||
$FORM{'PAGEID'} = "GRADEBOOK";
|
$FORM{'PAGEID'} = "GRADEBOOK";
|
||||||
$mainttmplt = "frgradebooks";
|
$mainttmplt = "frgradebooks";
|
||||||
}
|
|
||||||
}
|
}
|
||||||
|
}
|
||||||
|
|
||||||
my @tempacl = &popEmlAcl($SESSION{'clid'});
|
my @tempacl = &popEmlAcl($SESSION{'clid'});
|
||||||
foreach (@tempacl) {
|
foreach (@tempacl) {
|
||||||
$CLIENT{'emlaclstr'} .= "$_,";
|
$CLIENT{'emlaclstr'} .= "$_,";
|
||||||
|
}
|
||||||
|
$CLIENT{'emlaclstr'} =~ s/@//g;
|
||||||
|
$CLIENT{'emlaclstr'} =~ s/,$//g;
|
||||||
|
|
||||||
|
if ($FORM{'idx'} eq '1') {
|
||||||
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/I");
|
||||||
|
if ($SESSION{'uac'} eq 'admin' || $SESSION{'uac'} eq 'gadmin' || $SESSION{'uac'} eq 'madmin') {
|
||||||
|
&show_template("sadminidx");
|
||||||
|
} else {
|
||||||
|
&show_template("cndidx");
|
||||||
}
|
}
|
||||||
$CLIENT{'emlaclstr'} =~ s/@//g;
|
} elsif ($FORM{'dtl'} eq '0') {
|
||||||
$CLIENT{'emlaclstr'} =~ s/,$//g;
|
print "<HTML>\n$xlatphrase[539]<BR>$xlatphrase[540]</HTML>\n";
|
||||||
|
} elsif ($FORM{'dtl'} eq '1') {
|
||||||
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/CM");
|
||||||
|
if ($SESSION{'uac'} eq 'gadmin') {
|
||||||
if ($FORM{'idx'} eq '1') {
|
&show_admin_request("maintclient");
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/I");
|
} else {
|
||||||
if ($SESSION{'uac'} eq 'admin' || $SESSION{'uac'} eq 'gadmin' || $SESSION{'uac'} eq 'madmin') {
|
$FORM{'dbop'} = 'ccupd';
|
||||||
&show_template("sadminidx");
|
&show_admin_request("cdef");
|
||||||
} else {
|
}
|
||||||
&show_template("cndidx");
|
} elsif ($FORM{'dtl'} eq '12') {
|
||||||
}
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/TR");
|
||||||
} elsif ($FORM{'dtl'} eq '0') {
|
&show_admin_request("treplicaframe");
|
||||||
print "<HTML>\n$xlatphrase[539]<BR>$xlatphrase[540]</HTML>\n";
|
} elsif ($FORM{'dtl'} eq '13') {
|
||||||
} elsif ($FORM{'dtl'} eq '1') {
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/TO");
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/CM");
|
&show_admin_request("tocrinpframe");
|
||||||
if ($SESSION{'uac'} eq 'gadmin') {
|
} elsif ($FORM{'dtl'} eq '2') {
|
||||||
&show_admin_request("maintclient");
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/TM");
|
||||||
} else {
|
$TEST{'id'} = $FORM{'tstid'};
|
||||||
$FORM{'dbop'} = 'ccupd';
|
&show_admin_request("tdefframe");
|
||||||
&show_admin_request("cdef");
|
} elsif ($FORM{'dtl'} eq '21') {
|
||||||
}
|
if ($SESSION{'uac'} eq 'cnd') {
|
||||||
} elsif ($FORM{'dtl'} eq '12') {
|
$CANDIDATE{'ownedtests'} = &get_group_tests($SESSION{'clid'}, $SESSION{'uid'}, 0);
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/TR");
|
}
|
||||||
&show_admin_request("treplicaframe");
|
&show_admin_request("mainttest");
|
||||||
} elsif ($FORM{'dtl'} eq '13') {
|
} elsif ($FORM{'dtl'} eq '99') {
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/TO");
|
&show_template("selectpg");
|
||||||
&show_admin_request("tocrinpframe");
|
} elsif ($FORM{'dtl'} eq '3') {
|
||||||
} elsif ($FORM{'dtl'} eq '2') {
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/R");
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/TM");
|
&show_admin_request("maintreport");
|
||||||
$TEST{'id'} = $FORM{'tstid'};
|
} elsif ($FORM{'dtl'} eq '4') {
|
||||||
&show_admin_request("tdefframe");
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/DL");
|
||||||
} elsif ($FORM{'dtl'} eq '21') {
|
&show_admin_downloads;
|
||||||
if ($SESSION{'uac'} eq 'cnd') {
|
} elsif ($FORM{'dtl'} eq '5') {
|
||||||
$CANDIDATE{'ownedtests'} = &get_group_tests($SESSION{'clid'}, $SESSION{'uid'}, 0);
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/DB");
|
||||||
}
|
&show_admin_request("maintdb");
|
||||||
&show_admin_request("mainttest");
|
} elsif ($FORM{'dtl'} eq '6') {
|
||||||
} elsif ($FORM{'dtl'} eq '99') {
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/CF");
|
||||||
&show_template("selectpg");
|
# set FORM.colors
|
||||||
} elsif ($FORM{'dtl'} eq '3') {
|
$trash = join( $pathsep, $dataroot, "config.$SESSION{'clid'}");
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/R");
|
$omsg = "";
|
||||||
&show_admin_request("maintreport");
|
open( CFGFILE, "<$trash" ) or $omsg="not found";
|
||||||
} elsif ($FORM{'dtl'} eq '4') {
|
if ($omsg eq 'not found') {
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/DL");
|
$trash = join( $pathsep, $dataroot, "config.std");
|
||||||
&show_admin_downloads;
|
open( CFGFILE, "<$trash" ) or return;
|
||||||
} elsif ($FORM{'dtl'} eq '5') {
|
}
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/DB");
|
@cfgentries = <CFGFILE>;
|
||||||
&show_admin_request("maintdb");
|
close CFGFILE;
|
||||||
} elsif ($FORM{'dtl'} eq '6') {
|
$langdef = "enu";
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/CF");
|
$FORM{'colors'} = "";
|
||||||
# set FORM.colors
|
for (0 .. $#cfgentries) {
|
||||||
$trash = join( $pathsep, $dataroot, "config.$SESSION{'clid'}");
|
chop ($cfgentries[$_]);
|
||||||
$omsg = "";
|
($entrykey,$entryvalue) = split(/=/, $cfgentries[$_]);
|
||||||
open( CFGFILE, "<$trash" ) or $omsg="not found";
|
if ($entrykey eq 'DEFAULTLANG') {
|
||||||
if ($omsg eq 'not found') {
|
$langdef = $entryvalue;
|
||||||
$trash = join( $pathsep, $dataroot, "config.std");
|
$langselfr = ($langdef eq 'fr') ? " SELECTED" : "";
|
||||||
open( CFGFILE, "<$trash" ) or return;
|
$langselsp = ($langdef eq 'sp') ? " SELECTED" : "";
|
||||||
}
|
$langseldeu = ($langdef eq 'deu') ? " SELECTED" : "";
|
||||||
@cfgentries = <CFGFILE>;
|
$langselenu = ($langdef eq 'enu') ? " SELECTED" : "";
|
||||||
close CFGFILE;
|
$langselena = ($langdef eq 'ena') ? " SELECTED" : "";
|
||||||
$langdef = "enu";
|
$langseleuv = ($langdef eq 'euv') ? " SELECTED" : "";
|
||||||
$FORM{'colors'} = "";
|
$langselcyr = ($langdef eq 'cyr') ? " SELECTED" : "";
|
||||||
for (0 .. $#cfgentries) {
|
$langselmy = ($langdef eq 'my') ? " SELECTED" : "";
|
||||||
chop ($cfgentries[$_]);
|
$langselkor = ($langdef eq 'kor') ? " SELECTED" : "";
|
||||||
($entrykey,$entryvalue) = split(/=/, $cfgentries[$_]);
|
$langselafr = ($langdef eq 'afr') ? " SELECTED" : "";
|
||||||
if ($entrykey eq 'DEFAULTLANG') {
|
$langselhin = ($langdef eq 'hin') ? " SELECTED" : "";
|
||||||
$langdef = $entryvalue;
|
$colortag = "<TR>
|
||||||
$langselfr = ($langdef eq 'fr') ? " SELECTED" : "";
|
|
||||||
$langselsp = ($langdef eq 'sp') ? " SELECTED" : "";
|
|
||||||
$langseldeu = ($langdef eq 'deu') ? " SELECTED" : "";
|
|
||||||
$langselenu = ($langdef eq 'enu') ? " SELECTED" : "";
|
|
||||||
$langselena = ($langdef eq 'ena') ? " SELECTED" : "";
|
|
||||||
$langseleuv = ($langdef eq 'euv') ? " SELECTED" : "";
|
|
||||||
$langselcyr = ($langdef eq 'cyr') ? " SELECTED" : "";
|
|
||||||
$langselmy = ($langdef eq 'my') ? " SELECTED" : "";
|
|
||||||
$langselkor = ($langdef eq 'kor') ? " SELECTED" : "";
|
|
||||||
$langselafr = ($langdef eq 'afr') ? " SELECTED" : "";
|
|
||||||
$langselhin = ($langdef eq 'hin') ? " SELECTED" : "";
|
|
||||||
$colortag = "<TR>
|
|
||||||
<TD align=right>
|
<TD align=right>
|
||||||
$xlatphrase[541]\ \;
|
$xlatphrase[541]\ \;
|
||||||
</TD>
|
</TD>
|
||||||
@@ -145,9 +154,9 @@ if (&get_session($FORM{'tid'})) {
|
|||||||
</SELECT>
|
</SELECT>
|
||||||
</TD>
|
</TD>
|
||||||
</TR>\n";
|
</TR>\n";
|
||||||
$FORM{'language'} = join('', $colortag, $FORM{'language'});
|
$FORM{'language'} = join('', $colortag, $FORM{'language'});
|
||||||
} elsif ($entrykey eq 'IP_ACCESS_FILTER') {
|
} elsif ($entrykey eq 'IP_ACCESS_FILTER') {
|
||||||
$FORM{'language'} = " <TR>
|
$FORM{'language'} = " <TR>
|
||||||
<TD align=right width=50\%>
|
<TD align=right width=50\%>
|
||||||
$xlatphrase[385]\ \;
|
$xlatphrase[385]\ \;
|
||||||
</TD>
|
</TD>
|
||||||
@@ -155,63 +164,63 @@ if (&get_session($FORM{'tid'})) {
|
|||||||
<INPUT TYPE=TEXT NAME=\"C$entrykey\" VALUE=\"$entryvalue\" onChange=\"reset_autotimer()\">
|
<INPUT TYPE=TEXT NAME=\"C$entrykey\" VALUE=\"$entryvalue\" onChange=\"reset_autotimer()\">
|
||||||
</TD>
|
</TD>
|
||||||
</TR>\n";
|
</TR>\n";
|
||||||
} else {
|
} else {
|
||||||
if ($entrykey eq 'BACKGROUND') {
|
if ($entrykey eq 'BACKGROUND') {
|
||||||
$colortag = " <TR>
|
$colortag = " <TR>
|
||||||
<TD align=right><font size=1>$entrykey:\ \;</font></TD>
|
<TD align=right><font size=1>$entrykey:\ \;</font></TD>
|
||||||
<TD align=left><INPUT TYPE=FILE NAME=\"C$entrykey\" VALUE=\"$entryvalue\" onChange=\"reset_autotimer()\"></TD>
|
<TD align=left><INPUT TYPE=FILE NAME=\"C$entrykey\" VALUE=\"$entryvalue\" onChange=\"reset_autotimer()\"></TD>
|
||||||
</TR>\n";
|
</TR>\n";
|
||||||
} else {
|
} else {
|
||||||
if (($entrykey =~ /COLOR/)
|
if (($entrykey =~ /COLOR/)
|
||||||
|| ($entrykey =~ 'LINK')
|
|| ($entrykey =~ 'LINK')
|
||||||
|| ($entrykey =~ 'ALINK')
|
|| ($entrykey =~ 'ALINK')
|
||||||
|| ($entrykey =~ 'VLINK')
|
|| ($entrykey =~ 'VLINK')
|
||||||
|| ($entrykey eq 'TEXT') ) {
|
|| ($entrykey eq 'TEXT') ) {
|
||||||
$gotfocus = "onFocus=\"return tGotFocus(this)\"";
|
$gotfocus = "onFocus=\"return tGotFocus(this)\"";
|
||||||
} else {
|
} else {
|
||||||
$gotfocus = "";
|
$gotfocus = "";
|
||||||
}
|
}
|
||||||
$colortag = " <TR>
|
$colortag = " <TR>
|
||||||
<TD align=right nowrap><font size=1>$entrykey:\ \;</font></TD>
|
<TD align=right nowrap><font size=1>$entrykey:\ \;</font></TD>
|
||||||
<TD align=left><INPUT TYPE=TEXT NAME=\"C$entrykey\" SIZE=8 MAXLENGTH=7 VALUE=\"$entryvalue\" $gotfocus onChange=\"reset_autotimer()\"></TD>
|
<TD align=left><INPUT TYPE=TEXT NAME=\"C$entrykey\" SIZE=8 MAXLENGTH=7 VALUE=\"$entryvalue\" $gotfocus onChange=\"reset_autotimer()\"></TD>
|
||||||
</TR>\n";
|
</TR>\n";
|
||||||
}
|
|
||||||
$FORM{'colors'} = join('', $FORM{'colors'}, $colortag);
|
|
||||||
}
|
|
||||||
}
|
}
|
||||||
&show_admin_request("maintcfg");
|
$FORM{'colors'} = join('', $FORM{'colors'}, $colortag);
|
||||||
} elsif ($FORM{'dtl'} eq '7') {
|
}
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/GP");
|
|
||||||
&show_admin_request($mainttmplt);
|
|
||||||
} elsif ($FORM{'dtl'} eq '8') {
|
|
||||||
#Begin filtering
|
|
||||||
$filterbydate = $FORM{'filterbydate'};
|
|
||||||
$day_filter = $FORM{'day_filter'};
|
|
||||||
$date_filter = $FORM{'date_filter'};
|
|
||||||
$cnd1_filter = $FORM{'cnd1'};
|
|
||||||
$cnd2_filter = $FORM{'cnd2'};
|
|
||||||
$cnd3_filter = $FORM{'cnd3'};
|
|
||||||
$cnd4_filter = $FORM{'cnd4'};
|
|
||||||
#End filtering
|
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/CC");
|
|
||||||
&show_admin_request("maintcnd");
|
|
||||||
} elsif ($FORM{'dtl'} eq '9') {
|
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/RG");
|
|
||||||
&show_admin_request("regcnd");
|
|
||||||
} elsif ($FORM{'dtl'} eq '10') {
|
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/IM");
|
|
||||||
&show_admin_request("upimport");
|
|
||||||
} elsif ($FORM{'dtl'} eq '11') {
|
|
||||||
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/LC");
|
|
||||||
&show_admin_request("frlicadmin");
|
|
||||||
} elsif ($FORM{'dbop'} ne '') {
|
|
||||||
&show_dbop_response;
|
|
||||||
} else {
|
|
||||||
&show_illegal_access_warning;
|
|
||||||
}
|
}
|
||||||
|
&show_admin_request("maintcfg");
|
||||||
|
} elsif ($FORM{'dtl'} eq '7') {
|
||||||
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/GP");
|
||||||
|
&show_admin_request($mainttmplt);
|
||||||
|
} elsif ($FORM{'dtl'} eq '8') {
|
||||||
|
#Begin filtering
|
||||||
|
$filterbydate = $FORM{'filterbydate'};
|
||||||
|
$day_filter = $FORM{'day_filter'};
|
||||||
|
$date_filter = $FORM{'date_filter'};
|
||||||
|
$cnd1_filter = $FORM{'cnd1'};
|
||||||
|
$cnd2_filter = $FORM{'cnd2'};
|
||||||
|
$cnd3_filter = $FORM{'cnd3'};
|
||||||
|
$cnd4_filter = $FORM{'cnd4'};
|
||||||
|
#End filtering
|
||||||
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/CC");
|
||||||
|
&show_admin_request("maintcnd");
|
||||||
|
} elsif ($FORM{'dtl'} eq '9') {
|
||||||
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/RG");
|
||||||
|
&show_admin_request("regcnd");
|
||||||
|
} elsif ($FORM{'dtl'} eq '10') {
|
||||||
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/IM");
|
||||||
|
&show_admin_request("upimport");
|
||||||
|
} elsif ($FORM{'dtl'} eq '11') {
|
||||||
|
&log_entry($SESSION{'clid'}, $SESSION{'uid'}, "2", "SA/LC");
|
||||||
|
&show_admin_request("frlicadmin");
|
||||||
|
} elsif ($FORM{'dbop'} ne '') {
|
||||||
|
&show_dbop_response;
|
||||||
|
} else {
|
||||||
|
#&show_illegal_access_warning("else1");
|
||||||
|
}
|
||||||
} else {
|
} else {
|
||||||
&logger::logerr("Unable to get session with &get_session($FORM{'tid'})");
|
&logger::logerr("Unable to get session with &get_session($FORM{'tid'})");
|
||||||
&show_illegal_access_warning;
|
&show_illegal_access_warning("else2");
|
||||||
}
|
}
|
||||||
|
|
||||||
sub show_license_request {
|
sub show_license_request {
|
||||||
@@ -479,5 +488,5 @@ window.onmouseup=right;
|
|||||||
}
|
}
|
||||||
|
|
||||||
sub close_results {
|
sub close_results {
|
||||||
print "</BODY>\n</HTML>\n";
|
print "<DIV>HERE</DIV></BODY>\n</HTML>\n";
|
||||||
}
|
}
|
||||||
|
|||||||
0
survey-nginx/cgi-bin/sdbtxt/de
Normal file → Executable file
0
survey-nginx/cgi-bin/sdbtxt/de
Normal file → Executable file
0
survey-nginx/cgi-bin/sdbtxt/en
Normal file → Executable file
0
survey-nginx/cgi-bin/sdbtxt/en
Normal file → Executable file
0
survey-nginx/cgi-bin/sdbtxt/es
Normal file → Executable file
0
survey-nginx/cgi-bin/sdbtxt/es
Normal file → Executable file
0
survey-nginx/cgi-bin/sdbtxt/fr
Normal file → Executable file
0
survey-nginx/cgi-bin/sdbtxt/fr
Normal file → Executable file
0
survey-nginx/cgi-bin/sdbtxt/it
Normal file → Executable file
0
survey-nginx/cgi-bin/sdbtxt/it
Normal file → Executable file
@@ -75,14 +75,15 @@ $fieldsep = ';';
|
|||||||
$idmax = 1000;
|
$idmax = 1000;
|
||||||
|
|
||||||
$hostid = 4;
|
$hostid = 4;
|
||||||
|
|
||||||
require 'smilib.pl';
|
require 'smilib.pl';
|
||||||
require 'cybertestlib.pl';
|
require 'cybertestlib.pl';
|
||||||
require 'maillib.pl';
|
require 'maillib.pl';
|
||||||
|
|
||||||
|
|
||||||
#
|
#
|
||||||
# THIS IS DEVELOPMENT SETTING *ONLY*! DO NOT COMMIT THIS CHANGE!!
|
# THIS IS DEVELOPMENT SETTING *ONLY*! DO NOT COMMIT THIS CHANGE!!
|
||||||
#
|
#
|
||||||
|
|
||||||
$docroot = $ENV{DOCUMENT_ROOT};
|
$docroot = $ENV{DOCUMENT_ROOT};
|
||||||
$docroot =~ s/\/htdocs\s*$//g;
|
$docroot =~ s/\/htdocs\s*$//g;
|
||||||
$urlroot = "/cgi-bin";
|
$urlroot = "/cgi-bin";
|
||||||
@@ -115,7 +116,7 @@ $PATHS{'pubroot'} = $pubroot;
|
|||||||
$PATHS{'logroot'} = $logroot;
|
$PATHS{'logroot'} = $logroot;
|
||||||
$PATHS{'dataroot'} = $dataroot;
|
$PATHS{'dataroot'} = $dataroot;
|
||||||
$PATHS{'secroot'} = $secroot;
|
$PATHS{'secroot'} = $secroot;
|
||||||
$PATHS{'logroot'} = $logroot;
|
#$PATHS{'logroot'} = $logroot;
|
||||||
$PATHS{'resptmplt'} = $resptmplt;
|
$PATHS{'resptmplt'} = $resptmplt;
|
||||||
$PATHS{'questionroot'} = $questionroot;
|
$PATHS{'questionroot'} = $questionroot;
|
||||||
$PATHS{'testroot'} = $testroot;
|
$PATHS{'testroot'} = $testroot;
|
||||||
|
|||||||
File diff suppressed because it is too large
Load Diff
@@ -1,96 +1,70 @@
|
|||||||
#!/usr/bin/perl
|
#!/usr/bin/perl
|
||||||
|
#use strict;
|
||||||
|
#use warnings;
|
||||||
|
use CGI;
|
||||||
|
use CGI::Carp qw(fatalsToBrowser);
|
||||||
|
|
||||||
require 'sitecfg.pl';
|
require 'sitecfg.pl';
|
||||||
require 'testlib.pl';
|
|
||||||
|
|
||||||
&traceoutput("visitor.pl:$ENV{'HTTP_REFERER'}"); # TRACE IF ACTIVE
|
print "Content-type: text/plain\n\n";
|
||||||
|
|
||||||
&app_initialize;
|
|
||||||
|
|
||||||
print "Content-Type: text/html\n\n";
|
|
||||||
|
|
||||||
$mtime = time;
|
|
||||||
$today = &format_date_time("yyyy-mm-dd hh:nn:ss GMT", "1", "-10000", $mtime);
|
|
||||||
|
|
||||||
$stdvisitorlog = join($pathsep, $secroot, "visitsstd.dat");
|
|
||||||
$clidvisitorlog = join($pathsep, $secroot, "visits$FORM{'clid'}.dat");
|
|
||||||
$defaultvisitlog = join($pathsep, $secroot, "visits.dat");
|
|
||||||
|
|
||||||
$msg = "";
|
|
||||||
if (($FORM{'clid'} eq '') || ($FORM{'clid'} eq 'sacc') || ($FORM{'clid'} eq 'std')) {
|
|
||||||
open(VSTLOG,"<$stdvisitorlog") or $msg="not found";
|
|
||||||
if ($msg eq "not found") {
|
|
||||||
$makeok = &make_file($stdvisitorlog, $defaultvisitlog, 1);
|
|
||||||
$msg = ($makeok == 1) ? "" : "failed";
|
|
||||||
open(VSTLOG,"<$stdvisitorlog") or $msg="not found";
|
|
||||||
}
|
|
||||||
if ($msg eq '') {
|
|
||||||
@visits = <VSTLOG>;
|
|
||||||
close VSTLOG;
|
|
||||||
}
|
|
||||||
$litmplt = "shome";
|
|
||||||
} else {
|
|
||||||
open(VSTLOG,"<$clidvisitorlog") or $msg="not found";
|
|
||||||
if ($msg eq "not found") {
|
|
||||||
$makeok = &make_file($clidvisitorlog, $stdvisitorlog, 1);
|
|
||||||
$msg = ($makeok == 1) ? "" : "failed";
|
|
||||||
open(VSTLOG,"<$clidvisitorlog") or $msg="not found";
|
|
||||||
}
|
|
||||||
if ($msg eq '') {
|
|
||||||
@visits = <VSTLOG>;
|
|
||||||
close VSTLOG;
|
|
||||||
}
|
|
||||||
$litmplt = "cindex";
|
|
||||||
$SESSION{'clid'} = $FORM{'clid'};
|
|
||||||
&get_client_profile($FORM{'clid'});
|
|
||||||
}
|
|
||||||
|
|
||||||
if ($FORM{'lang'} eq '') {
|
# Get user IDs
|
||||||
$lastvisit = -1;
|
my $real_user_id = $<;
|
||||||
for (1 .. $#visits) {
|
my $effective_user_id = $>;
|
||||||
@entries = split(/&/, $visits[$_]);
|
|
||||||
if ($entries[1] eq $ENV{'REMOTE_ADDR'}) {
|
|
||||||
$lastvisit = $_;
|
|
||||||
}
|
|
||||||
}
|
|
||||||
if ($lastvisit == -1) {
|
|
||||||
@languages=split(/\,/,$ENV{'HTTP_ACCEPT_LANGUAGE'});
|
|
||||||
if ($languages[0] eq 'en') {$languages[0]="enu";}
|
|
||||||
if ($languages[0] eq 'en-us') {$languages[0]="enu";}
|
|
||||||
if ($languages[0] eq 'ar') {$languages[0]="arb";}
|
|
||||||
if ($LANGUAGE_ID{$languages[0]} ne '') {
|
|
||||||
$FORM{'lang'} = $languages[0];
|
|
||||||
}
|
|
||||||
} else {
|
|
||||||
@visitdata = split(/&/, $visits[$lastvisit]);
|
|
||||||
$idx = $#visitdata - 1;
|
|
||||||
$FORM{'lang'} = $visitdata[$idx];
|
|
||||||
@visitdata = ();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
@visits = ();
|
# Get group IDs
|
||||||
|
my $real_group_id = $(;
|
||||||
&LanguageSupportInit();
|
my $effective_group_id = $);
|
||||||
|
|
||||||
$visitrec = join('&',$today,$ENV{'REMOTE_ADDR'},$ENV{'REMOTE_PORT'},$ENV{'HTTP_ACCEPT_LANGUAGE'},$ENV{'HTTP_USER_AGENT'},$SESSION{'lang'},"");
|
|
||||||
if (($FORM{'clid'} eq '') || ($FORM{'clid'} eq 'sacc') || ($FORM{'clid'} eq 'std')) {
|
|
||||||
open(VSTLOG,">>$stdvisitorlog");
|
|
||||||
} else {
|
|
||||||
open(VSTLOG,">>$clidvisitorlog");
|
|
||||||
}
|
|
||||||
print VSTLOG "$visitrec\n";
|
|
||||||
close VSTLOG;
|
|
||||||
print "$litmplt\n";
|
|
||||||
print "--------------------------------------------------------------------------\n";
|
|
||||||
$SESSION{'browserapp'} = ($ENV{'HTTP_USER_AGENT'} =~ /MSIE/ ) ? "MSIE" : "NSNV";
|
|
||||||
&traceoutput("visitor.pl:$litmplt"); # TRACE IF ACTIVE
|
|
||||||
&show_template($litmplt);
|
|
||||||
print "++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++\n";
|
|
||||||
|
|
||||||
print "Content-type: text/html\n\n";
|
# Get group names
|
||||||
print "<html><body><h1>Test CGI Script</h1></body></html>\n\n";
|
my $real_group_name = getgrgid($real_group_id);
|
||||||
print "\n\n";
|
my $effective_group_name = getgrgid($effective_group_id);
|
||||||
print "$docroot\n";
|
|
||||||
print "$secroot\n";
|
# Print user and group information
|
||||||
print $resptmplt;
|
print "Real User ID: $real_user_id\n";
|
||||||
print "\n\n";
|
print "Effective User ID: $effective_user_id\n";
|
||||||
|
print "Real Group ID: $real_group_id ($real_group_name)\n";
|
||||||
|
print "Effective Group ID: $effective_group_id ($effective_group_name)\n";
|
||||||
|
|
||||||
|
my $cgi = CGI->new($ENV{'QUERY_STRING'});
|
||||||
|
my %FORM = $cgi->Vars;
|
||||||
|
|
||||||
|
my $session_id = $FORM{'tid'};
|
||||||
|
|
||||||
|
my $s_id = "sess.$session_id";
|
||||||
|
my $directory = join($pathsep, $logroot);
|
||||||
|
my $trash = join($pathsep, $directory, $s_id);
|
||||||
|
|
||||||
|
if (-d $directory) {
|
||||||
|
print "Directory '$directory' exists.\n";
|
||||||
|
|
||||||
|
# Check if the directory is readable
|
||||||
|
if (-r $directory) {
|
||||||
|
print "Directory '$directory' is readable.\n";
|
||||||
|
} else {
|
||||||
|
print "Directory '$directory' is not readable.\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
# Check if the directory is writable
|
||||||
|
if (-w $directory) {
|
||||||
|
print "Directory '$directory' is writable.\n";
|
||||||
|
} else {
|
||||||
|
print "Directory '$directory' is not writable.\n";
|
||||||
|
}
|
||||||
|
} else {
|
||||||
|
print "Directory '$directory' does not exist.\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
# eval {
|
||||||
|
# open (my $SESSFILE, '>', $trash) or die "Could not open file '$trash': $!";
|
||||||
|
# print $SESSFILE "This is a test.\n";
|
||||||
|
# close($SESSFILE) or die "Could not close file '$trash': $!";
|
||||||
|
# };
|
||||||
|
|
||||||
|
# if ($@) {
|
||||||
|
# print $@
|
||||||
|
# }
|
||||||
|
|
||||||
|
#while (my ($key, $value) = each %FORM) {
|
||||||
|
# print "$key: $value\n";
|
||||||
|
#}
|
||||||
|
|||||||
@@ -2,8 +2,13 @@
|
|||||||
|
|
||||||
name="fcgiwrap"
|
name="fcgiwrap"
|
||||||
description="Simple server for running CGI applications over FastCGI"
|
description="Simple server for running CGI applications over FastCGI"
|
||||||
|
|
||||||
command="/usr/bin/spawn-fcgi"
|
command="/usr/bin/spawn-fcgi"
|
||||||
command_args="-s /var/run/fcgiwrap.socket -u nobody -g nogroup -P /var/run/fcgiwrap.pid /usr/bin/fcgiwrap > /var/log/fcgiwrap.log 2>&1"
|
command_user="nginx:nginx"
|
||||||
|
command_args="-s /var/run/fcgiwrap.socket -u nginx -g nginx -P /var/run/fcgiwrap.pid /usr/bin/fcgiwrap > /var/log/fcgiwrap.log 2>&1"
|
||||||
|
|
||||||
pidfile="/var/run/fcgiwrap.pid"
|
pidfile="/var/run/fcgiwrap.pid"
|
||||||
|
|
||||||
|
depend() {
|
||||||
|
use net
|
||||||
|
after nginx
|
||||||
|
}
|
||||||
|
|||||||
0
survey-nginx/htdocs/ATI/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/ATI/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/CISC/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/CISC/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/COMUG/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/COMUG/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/COMUG/index.html
Normal file → Executable file
0
survey-nginx/htdocs/COMUG/index.html
Normal file → Executable file
0
survey-nginx/htdocs/Jane's Testing Center/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/Jane's Testing Center/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/absi/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/absi/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/acts1/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/acts1/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/acts1/index.html.bak
Normal file → Executable file
0
survey-nginx/htdocs/acts1/index.html.bak
Normal file → Executable file
0
survey-nginx/htdocs/aig/docs/AD&D200kBrochureAG3360.pdf
Normal file → Executable file
0
survey-nginx/htdocs/aig/docs/AD&D200kBrochureAG3360.pdf
Normal file → Executable file
0
survey-nginx/htdocs/aig/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/aig/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/ainav/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/ainav/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/aiper/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/aiper/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/alliant.edu/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/alliant.edu/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/alliant.edu/index.html.old
Normal file → Executable file
0
survey-nginx/htdocs/alliant.edu/index.html.old
Normal file → Executable file
0
survey-nginx/htdocs/ati/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/ati/index.htm
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/.config.php.swm
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/.config.php.swm
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/.config.php.swn
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/.config.php.swn
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/.config.php.swo
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/.config.php.swo
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/CHANGELOG
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/CHANGELOG
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/DEVELOPERS
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/DEVELOPERS
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/FAQ
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/FAQ
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/Group-Office.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/Group-Office.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/LICENSE.GPL
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/LICENSE.GPL
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/README
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/README
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/README.ldap
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/README.ldap
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/RELEASE
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/RELEASE
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/TODO
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/TODO
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/TRANSLATORS
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/TRANSLATORS
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/about.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/about.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/admin.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/admin.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/auth_sources.dist
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/auth_sources.dist
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/avw_session.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/avw_session.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/checker.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/checker.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/admin.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/admin.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/base.groups.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/base.groups.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/base.security.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/base.security.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/base.users.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/base.users.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/acl.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/acl.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/acl.wh.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/acl.wh.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/button.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/button.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/checkbox.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/checkbox.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/color_selector.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/color_selector.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/datagrid.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/datagrid.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/date_picker.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/date_picker.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/dbrecord.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/dbrecord.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/dropbox.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/dropbox.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/htmlarea.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/htmlarea.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/overlib.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/overlib.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/radio_list.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/radio_list.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/select.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/select.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/statusbar.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/statusbar.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/tabtable.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/tabtable.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/testButton.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/testButton.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/treeview.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/controls/treeview.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/crypto.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/crypto.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/email.auth.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/email.auth.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/language.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/language.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/ldap.auth.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/ldap.auth.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/ldap.groups.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/ldap.groups.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/ldap.security.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/ldap.security.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/ldap.users.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/ldap.users.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/modules.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/modules.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/passwd.groups.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/passwd.groups.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/passwd.security.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/passwd.security.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/passwd.users.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/passwd.users.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/sql.auth.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/sql.auth.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/sql.groups.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/sql.groups.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/sql.security.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/sql.security.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/sql.users.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/sql.users.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/theme.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/base/theme.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/dav.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/dav.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/filesystem.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/filesystem.class.inc
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/faq.css
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/faq.css
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/faq.htm
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/faq.htm
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/courier.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/courier.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/helvetica.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/helvetica.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/helveticab.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/helveticab.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/helveticabi.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/helveticabi.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/helveticai.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/helveticai.php
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1250.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1250.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1251.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1251.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1252.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1252.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1253.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1253.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1254.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1254.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1255.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1255.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1257.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1257.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1258.map
Normal file → Executable file
0
survey-nginx/htdocs/avw/navy/go/classes/fpdf/font/makefont/cp1258.map
Normal file → Executable file
Some files were not shown because too many files have changed in this diff Show More
Reference in New Issue
Block a user