]> i-scream Git - www.i-scream.org.git/blobdiff - cgi-bin/logo.cgi
Use non-http URLs so the site works on https.
[www.i-scream.org.git] / cgi-bin / logo.cgi
index 837e1eb147eda5ffbd0222df8bab26cc557b7c6a..69aaf8dc4a08d0cf62fe7a6123472b1cc44b24ad 100755 (executable)
@@ -4,21 +4,26 @@ use strict;
 $| = 1;
 
 # Directory to find images in
-my($dir) = "/web/i-scream/nwww/logos";
+my($dir) = "/web/i-scream/htdocs/logos";
 # Pattern to match images - remember to escape
 my($pattern) = "\\.jpg\$";
 
 # URL to images - must match $dir
-my($url) = "http://nwww.i-scream.org/logos";
+my($url) = "//www.i-scream.org/logos";
 
 # Where the setbg command is
-my($setbg) = "/web/i-scream/nwww.bin/setbg.pl";
+my($setbg) = "/web/i-scream/bin/setbg.pl";
 
 # Code...
 my($imagepath) = `$setbg -r -p \'$pattern\' -b echo -f \' \' $dir`;
 chomp $imagepath;
 $imagepath =~ s/$dir/$url/;
 
+# Check for IPv6
+if($ENV{SERVER_ADDR} =~ /:/) {
+       $imagepath = "//www.i-scream.org/images/ipv6-logo.gif";
+}
+
 print "Content-type: text/plain\n\n";
 print $imagepath;