$optionsWithArgs = array('d'); /** */ require_once "commandLine.inc"; if (isset($options['d'])) { $d = $options['d']; if ($d > 0) { $wgDebugLogFile = '/dev/stdout'; } if ($d > 1) { foreach ($wgLoadBalancer->mServers as $i => $server) { $wgLoadBalancer->mServers[$i]['flags'] |= DBO_DEBUG; } } if ($d > 2) { $wgDebugFunctionEntry = true; } } while (($line = readconsole('> ')) !== false) { $val = eval($line . ";"); if (is_null($val)) { echo "\n"; } elseif (is_string($val) || is_numeric($val)) { echo "{$val}\n"; } else { var_dump($val); } if (function_exists("readline_add_history")) { readline_add_history($line); } } print "\n";
case 'help': print "help: help about a command\n"; if ($onlyone) { break; } default: if ($onlyone) { print "{$command}: command does not exist or no help for it\n"; } } } do { $bad = false; $showhelp = false; $quit = false; $line = readconsole('> '); if ($line === false) { exit; } $args = explode(' ', $line); $command = array_shift($args); // process command switch ($command) { case 'help': // show an help message mccShowHelp(array_shift($args)); break; case 'get': print "Getting {$args[0]}[{$args[1]}]\n"; $res = $mcc->get($args[0]); if (array_key_exists(1, $args)) {
* memcached diagnostic tool * * @todo document * @package MediaWiki * @subpackage Maintenance */ /** */ require_once "commandLine.inc"; require_once "memcached-client.php"; $mcc = new memcached(array('persistant' => true, 'debug' => true)); $mcc->set_servers($wgMemCachedServers); $mcc->set_debug(true); do { $bad = false; $quit = false; $line = readconsole("> "); if ($line === false) { exit; } $args = explode(" ", $line); $command = array_shift($args); switch ($command) { case "get": print "Getting {$args[0]}[{$args[1]}]\n"; $res = $mcc->get($args[0]); if (array_key_exists(1, $args)) { $res = $res[$args[1]]; } if ($res === false) { #print 'Error: ' . $mcc->error_string() . "\n"; print "MemCached error\n";
{ if (!isset($this->hash[$dbkey])) { $this->hash[$dbkey] = Title::newFromDBkey($dbkey); } return $this->hash[$dbkey]; } } # print "You should have already run the installer to create a fresh, blank database.\n"; print "Data will be inserted into '{$wgDBname}'. THIS SHOULD BE EMPTY AND ANY DATA IN IN WILL BE ERASED!\n"; print "\nIf that's not what you want, ABORT NOW!\n\n"; print "Please enter the name of the old 'phase 2'-format database that will be used as a source:\n"; print "Old database name [enciclopedia]: "; $olddb = readconsole(); if (empty($olddb)) { $olddb = "enciclopedia"; } if ($olddb == $wgDBname) { die("Can't upgrade in-place! You must create a new database and copy data into it.\n"); } print "\nSource database: '{$olddb}'\n"; print " Dest database: '{$wgDBname}'\n"; print "Is this correct? Anything in '{$wgDBname}' WILL BE DESTROYED. [y/N] "; $response = readconsole(); if (strtolower($response[0]) != 'y') { die("\nAborted by user.\n"); } print "Starting import....\n"; $wgTitle = Title::newFromText("Conversion script"); $importer = new Phase2Importer($olddb); $importer->importAll();