X-Git-Url: http://git.i-scream.org/?a=blobdiff_plain;f=cgi-bin%2Fdocs.cgi;h=8c60667f6e82ab64edd813ee57379682cb2591d1;hb=02d3da75029cbd8bff5d4c7ae13763de3b73e796;hp=f373219a07c7efb2fb0ed2ddabe0b97ce28616e7;hpb=f3dea95c45f09985dee82aaebd8766df3fabedfc;p=www.i-scream.org.git diff --git a/cgi-bin/docs.cgi b/cgi-bin/docs.cgi index f373219..8c60667 100755 --- a/cgi-bin/docs.cgi +++ b/cgi-bin/docs.cgi @@ -13,9 +13,9 @@ use CGI; $| = 1; # Settings -my ($left) = "../left.inc" ; -my ($title) = "../title.inc"; -my ($bottom) = "../bottom.inc"; +my ($left) = "../htdocs/left.inc" ; +my ($title) = "../htdocs/title.inc"; +my ($bottom) = "../htdocs/bottom.inc"; my ($query) = new CGI; @@ -34,10 +34,10 @@ unless (defined $doc) { # Prevent hackers from supplying a malformed document string. # I.e. only allow normal characters, slashes and dots. unless ($doc =~ /^[a-zA-Z_\-0-9\.\/]+$/) { - print "Go Away, you nasty hax0r!"; + print "Malformed request"; exit; } -$doc = "../documentation/".$doc; +$doc = "../htdocs/documentation/".$doc; print <<"END"; @@ -125,5 +125,5 @@ sub print_file ($) { # Print a file without escaping HTML: - sub print_html ($) { my ($filename) = @_; - print `cat $filename`; + print `cat $filename 2>&1`; }