$wgProfileSampleRate = 1; # Only profile every n requests when profiling is turned on
$wgDebugProfiling = false; # Detects non-matching wfProfileIn/wfProfileOut calls
$wgDebugFunctionEntry = 0; # Output debug message on every wfProfileIn/wfProfileOut
+$wgDebugSquid = false; # Lots of debugging output from SquidUpdate.php
$wgDisableCounters = false;
$wgDisableTextSearch = false;
/* first socket for this server, do the tests */
@list($server, $port) = explode(':', $wgSquidServers[$ss]);
if(!isset($port)) $port = 80;
+ $this->debug("Opening socket to $server:$port");
$socket = @fsockopen($server, $port, $error, $errstr, 3);
+ $this->debug("\n");
if (!$socket) {
$failed = true;
$totalsockets -= $sockspersq;
} else {
- @fputs($socket,"PURGE " . $firsturl . " HTTP/1.0\r\n".
- "Connection: Keep-Alive\r\n\r\n");
+ $msg ="PURGE " . $firsturl . " HTTP/1.0\r\n".
+ "Connection: Keep-Alive\r\n\r\n";
+ $this->debug($msg);
+ @fputs($socket,$msg);
+ $this->debug("...");
$res = @fread($socket,512);
+ $this->debug("\n");
/* Squid only returns http headers with 200 or 404 status,
if there's more returned something's wrong */
if (strlen($res) > 250) {
}
}
$urindex = $r + $urlspersocket * ($s - $sockspersq * floor($s / $sockspersq));
- @fputs($sockets[$s],"PURGE " . $urlArr[$urindex] . " HTTP/1.0\r\n".
- "Connection: Keep-Alive\r\n\r\n");
+ $msg = "PURGE " . $urlArr[$urindex] . " HTTP/1.0\r\n".
+ "Connection: Keep-Alive\r\n\r\n";
+ $this->debug($msg);
+ @fputs($sockets[$s],$msg);
+ $this->debug("\n");
}
}
}
-
+ $this->debug("Reading response...");
foreach ($sockets as $socket) {
$res = '';
$esc = 0;
@fclose($socket);
}
+ $this->debug("\n");
+ }
+
+ function debug( $text ) {
+ global $wgDebugSquid;
+ if ( $wgDebugSquid ) {
+ wfDebug( $text );
+ }
}
}
?>