Changeset 4088

Timestamp:

2003-04-03T15:15:36+12:00 (21 years ago)

Author:

dana

Message:

obfuscation code for IP addrs in report ID number added

Location:

trunk/gsdl/cgi-bin

Files:

• gsdlsite.cfg (modified) (3 diffs)
• perl.cgi (modified) (1 diff)
• usabcgi.pm (modified) (1 diff)

trunk/gsdl/cgi-bin/gsdlsite.cfg

@@ -3 +3 @@
 
 # points to the GSDLHOME directory
-gsdlhome    **GSDLHOME**
+gsdlhome    /nzdl/public_html/dana/gsdl
 
 # this is the http address of GSDLHOME
 # if your webservers DocumentRoot is set to $GSDLHOME
 # then httpprefix can remain commented out
-#httpprefix  /gsdl
+httpprefix  http://nzdl2.cs.waikato.ac.nz/dana/gsdl
 
 # this is the http address of the directory which
@@ -14 +14 @@
 # if your webservers DocumentRoot is set to $GSDLHOME
 # then httpimg will be /images
-httpimg     /images
+httpimg     http://nzdl2.cs.waikato.ac.nz/dana/gsdl/images
 
 # should contain the http address of this cgi script. This 
@@ -26 +26 @@
 # to a high figure (like 10000) when everything is
 # working well.
-maxrequests 10000
+maxrequests 1

trunk/gsdl/cgi-bin/perl.cgi

@@ -10 +10 @@
 $idno=$ENV{REMOTE_ADDR};
 $idno =~ s/\.//g;
+$idno =~ tr/0123456789/1357902468/;
 $idno .= time;
 

trunk/gsdl/cgi-bin/usabcgi.pm

@@ -40 +40 @@
     print "<style type=\"text/css\">\n";
     print "\th1 {font-family: sans-serif; font-size: 20px}\n";
-    print "\th2 {font-fanily: sans-serif; font-size: 14px; font-weight: bold; color: #009966}\n";
+    print "\th2 {font-family: sans-serif; font-size: 14px; font-weight: bold; color: #009966}\n";
     print "\tp.sans {font-family: sans-serif}\n";
     print "\ttd.sans {font-family: sans-serif; vertical-align:top}\n";