Dispatcher: Restart bei hohem Memory-Verbrauch via exec anstelle von exit

Wenn sich das Script im Fall von zu hohem Speicherverbrauch beendet, so
kann es sein, dass der Webserver bereits den nächsten Request zum Script
geschickt hat. Ist das der Fall, kommt es zu einem internal server
error für den User.

Statt dessen kann sich das Script selber ausführen. Dadurch werden die
Kommunikationskanäle zwischen Webserver und Script (STDIN, STDOUT,
STDERR) aufrechterhalten.

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index 6322027..ec6da1b 100644 (file)
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -226,14 +226,17 @@ sub _run_controller {
 sub handle_all_requests {
   my ($self) = @_;
 
+  my $restart;
   my $request = FCGI::Request();
   while ($request->Accept() >= 0) {
     $self->handle_request($request);
-    if (_memory_usage_is_too_high()) {
-      $request->Flush();
-      last;
+    if (($self->interface_type eq 'FastCGI') && _memory_usage_is_too_high()) {
+      $request->LastCall();
+      $restart = 1;
     }
   }
+
+  exec $0 if $restart;
 }
 
 sub handle_request {