X-Git-Url: http://git.i-scream.org/?a=blobdiff_plain;f=cgi-bin%2Fdownload.cgi;h=fb3a69414230a9a1904c19d5f570e31fd041ba03;hb=374eadca4d94df9fd11726246adbd2a42236e131;hp=d271ac23586e7d733768190c5bb4196b1fcff395;hpb=db82dfc2fa5376935a6781e1a977c01a5d86e5a7;p=www.i-scream.org.git diff --git a/cgi-bin/download.cgi b/cgi-bin/download.cgi index d271ac2..fb3a694 100755 --- a/cgi-bin/download.cgi +++ b/cgi-bin/download.cgi @@ -19,7 +19,7 @@ $| = 1; #-------------------------------------------------------------- # Essential Settings #-------------------------------------------------------------- -my ($build_dir) = "/builds"; +my ($build_dir) = "/downloads"; my ($log_file) = "download_log"; my ($left) = "../left.inc" ; my ($title) = "../title.inc"; @@ -48,7 +48,7 @@ if (!defined($file_name) || $file_name eq "") { if (defined($submit) && $submit eq "Download") { open(LOGFILE, ">>$log_file"); - print LOGFILE "$date|$file_name|$your_name|$email_address|$country\n"; + print LOGFILE "$date|$ENV{'REMOTE_ADDR'}|$file_name|$your_name|$email_address|$country\n"; close(LOGFILE); print $query->redirect("$build_dir/$file_name"); } @@ -108,7 +108,7 @@ END

 

-
+ @@ -154,5 +154,5 @@ exit; # Print a file without escaping HTML: - sub print_html ($) { my ($filename) = @_; - print `cat $filename`; -} \ No newline at end of file + print `cat $filename 2>&1`; +}
Filename: