sbekman 00/12/20 10:52:01
Modified: . Changes
lib/Apache SizeLimit.pm
Log:
Solving an 'uninitialized value' warn in Apache::SizeLimit.
post_connection() expects a return status from the callback function.
Revision Changes Path
1.558 +4 -0 modperl/Changes
Index: Changes
===================================================================
RCS file: /home/cvs/modperl/Changes,v
retrieving revision 1.557
retrieving revision 1.558
diff -u -r1.557 -r1.558
--- Changes 2000/12/20 18:35:32 1.557
+++ Changes 2000/12/20 18:51:50 1.558
@@ -10,6 +10,10 @@
=item 1.24_02-dev
+Solving an 'uninitialized value' warn in Apache::SizeLimit.
+post_connection() expects a return status from the callback function.
+[Stas Bekman <[EMAIL PROTECTED]>]
+
include mod_perl hook/feature config in Apache::MyConfig
[Geoffrey Young <[EMAIL PROTECTED]>]
1.7 +6 -5 modperl/lib/Apache/SizeLimit.pm
Index: SizeLimit.pm
===================================================================
RCS file: /home/cvs/modperl/lib/Apache/SizeLimit.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -r1.6 -r1.7
--- SizeLimit.pm 1999/08/03 23:50:59 1.6
+++ SizeLimit.pm 2000/12/20 18:51:56 1.7
@@ -172,22 +172,23 @@
sub exit_if_too_big {
my $r = shift;
- return if ($REQUEST_COUNT++ < $CHECK_EVERY_N_REQUESTS);
+ return DECLINED if ($REQUEST_COUNT++ < $CHECK_EVERY_N_REQUESTS);
$REQUEST_COUNT = 1;
- if (defined($MAX_PROCESS_SIZE)) {
+ if ($MAX_PROCESS_SIZE) {
my $size = &$HOW_BIG_IS_IT();
if ($size > $MAX_PROCESS_SIZE) {
# I have no idea if this will work on anything but UNIX
if (getppid > 1) { # this is a child httpd
- &error_log("httpd process too big, exiting at SIZE=$size KB");
+ error_log("httpd process too big, exiting at SIZE=$size KB");
$r->child_terminate;
} else { # this is the main httpd
- &error_log("main process too big, SIZE=$size KB");
+ error_log("main process too big, SIZE=$size KB");
}
}
} else {
- &error_log("you didn't set \$Apache::SizeLimit::MAX_PROCESS_SIZE");
+ error_log("you didn't set \$Apache::SizeLimit::MAX_PROCESS_SIZE");
}
+ return OK;
}
# setmax can be called from within a CGI/Registry script to tell the httpd
