modif de printemps

This commit is contained in:
Olivier Sirol 2000-06-07 15:13:22 +00:00
parent 95af6c6e33
commit 71a1c76806
4 changed files with 12 additions and 16148 deletions

View File

@ -1,5 +1,4 @@
2000/05/0024 16:01:27|bad referrer, off-site access denied||132.227.103.10 2000/06/07 17:07:36|log file access|/index.html|132.227.103.10
2000/05/0024 16:23:36|illegal method|| 2000/06/07 17:09:00|log file access|/alliance/index.html|132.227.103.10
2000/05/0025 12:42:00|bad query_string|| 2000/06/07 17:09:41|log file access|/mailing-lists/alliance-support/1999/0037.html|216.35.116.46
2000/05/0025 12:55:38|illegal method|| 2000/06/07 17:09:45|log file access|/alliance/mailing-lists/alliance-support/1999/0058.html|198.142.189.168
2000/05/28 13:51:14|bad referrer, off-site access denied||208.185.131.219

File diff suppressed because it is too large Load Diff

View File

@ -71,6 +71,7 @@ $sitename = $query->param('site');
if ( $sitename eq "" ) if ( $sitename eq "" )
{$sitename="asim";} {$sitename="asim";}
$pn="l";
$log_path = $log_path . "$sitename/"; $log_path = $log_path . "$sitename/";
$img_url = $img_url . "$sitename/"; $img_url = $img_url . "$sitename/";
@ -184,8 +185,9 @@ exit;
sub err_log {require "$log_path"."a_errlog.pl"; &err_logs} sub err_log {require "$log_path"."a_errlog.pl"; &err_logs}
########## Main ########## Main
if ( $ENV{'DOCUMENT_URI'} ) { &do_ssi; } if ( $ENV{'DOCUMENT_URI'} ) { &do_ssi; }
if (0) {
if ( $ENV{'REQUEST_METHOD'} eq 'GET' ) {;} if ( $ENV{'REQUEST_METHOD'} eq 'GET' ) {;}
elsif ( $ENV{'REQUEST_METHOD'} eq 'POST' ) {;} elsif ( $ENV{'REQUEST_METHOD'} eq 'POST' ) {;}
else {$err = "illegal method"; &err_log;} else {$err = "illegal method"; &err_log;}
@ -222,4 +224,5 @@ sub err_log {require "$log_path"."a_errlog.pl"; &err_logs}
local($digit) = substr($cnb,$pn,1); local($digit) = substr($cnb,$pn,1);
&sendFile($img_url.$digit.".gif", "image/gif"); &sendFile($img_url.$digit.".gif", "image/gif");
} }
}
exit(0); exit(0);