<?php
-include_once( "../includes/DefaultSettings.php" );
-include_once( "../LocalSettings.php" );
-include_once( "../includes/MemCachedClient.inc.php" );
+/**
+ * memcached diagnostic tool
+ *
+ * @file
+ * @todo document
+ * @ingroup Maintenance
+ */
-$mcc = new MemCachedClient();
+/** */
+require_once( dirname(__FILE__) . '/commandLine.inc' );
+
+$mcc = new MWMemcached( array('persistant' => true/*, 'debug' => true*/) );
$mcc->set_servers( $wgMemCachedServers );
+#$mcc->set_debug( true );
+
+function mccShowHelp($command) {
+ $commandList = array(
+ 'get' => 'grabs something',
+ 'getsock' => 'lists sockets',
+ 'set' => 'changes something',
+ 'delete' => 'deletes something',
+ 'history' => 'show command line history',
+ 'server' => 'show current memcached server',
+ 'dumpmcc' => 'shows the whole thing',
+ 'exit' => 'exit mcc',
+ 'quit' => 'exit mcc',
+ 'help' => 'help about a command',
+ );
+ if( !$command ) {
+ $command = 'fullhelp';
+ }
+ if( $command === 'fullhelp' ) {
+ foreach( $commandList as $cmd => $desc ) {
+ print "$cmd: $desc\n";
+ }
+ } elseif( isset( $commandList[$command] ) ) {
+ print "$command: $commandList[$command]\n";
+ } else {
+ print "$command: command does not exist or no help for it\n";
+ }
+}
do {
$bad = false;
+ $showhelp = false;
$quit = false;
- $line = readconsole( "> " );
- $args = explode( " ", $line );
+
+ $line = readconsole( '> ' );
+ if ($line === false) exit;
+
+ $args = explode( ' ', $line );
$command = array_shift( $args );
+
+ // process command
switch ( $command ) {
- case "get":
- $res = $mcc->get( implode( " ", $args ) );
+ case 'help':
+ // show an help message
+ mccShowHelp(array_shift($args));
+ break;
+
+ case 'get':
+ $sub = '';
+ if ( array_key_exists( 1, $args ) ) {
+ $sub = $args[1];
+ }
+ print "Getting {$args[0]}[$sub]\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 'Error: ' . $mcc->error_string() . "\n";
+ print "MemCached error\n";
} elseif ( is_string( $res ) ) {
print "$res\n";
} else {
var_dump( $res );
}
+ break;
+
+ case 'getsock':
+ $res = $mcc->get( $args[0] );
+ $sock = $mcc->get_sock( $args[0] );
+ var_dump( $sock );
+ break;
+
+ case 'server':
+ if ( $mcc->_single_sock !== null ) {
+ print $mcc->_single_sock . "\n";
+ break;
+ }
+ $res = $mcc->get( $args[0] );
+ $hv = $mcc->_hashfunc( $args[0] );
+ for ( $i = 0; $i < 3; $i++ ) {
+ print $mcc->_buckets[$hv % $mcc->_bucketcount] . "\n";
+ $hv += $mcc->_hashfunc( $i . $args[0] );
+ }
break;
- case "set":
+
+ case 'set':
$key = array_shift( $args );
- if ( !$mcc->set( $key, implode( " ", $args ), 0 ) ) {
- print 'Error: ' . $mcc->error_string() . "\n";
+ if ( $args[0] == "#" && is_numeric( $args[1] ) ) {
+ $value = str_repeat( '*', $args[1] );
+ } else {
+ $value = implode( ' ', $args );
+ }
+ if ( !$mcc->set( $key, $value, 0 ) ) {
+ #print 'Error: ' . $mcc->error_string() . "\n";
+ print "MemCached error\n";
}
break;
- case "quit":
+
+ case 'delete':
+ $key = implode( ' ', $args );
+ if ( !$mcc->delete( $key ) ) {
+ #print 'Error: ' . $mcc->error_string() . "\n";
+ print "MemCached error\n";
+ }
+ break;
+
+ case 'history':
+ if ( function_exists( 'readline_list_history' ) ) {
+ foreach( readline_list_history() as $num => $line) {
+ print "$num: $line\n";
+ }
+ } else {
+ print "readline_list_history() not available\n";
+ }
+ break;
+
+ case 'dumpmcc':
+ var_dump( $mcc );
+ break;
+
+ case 'quit':
+ case 'exit':
$quit = true;
break;
+
default:
$bad = true;
- }
+ } // switch() end
+
if ( $bad ) {
if ( $command ) {
print "Bad command\n";
}
} else {
- if ( function_exists( "readline_add_history" ) ) {
+ if ( function_exists( 'readline_add_history' ) ) {
readline_add_history( $line );
}
}
} while ( !$quit );
-
-function readconsole( $prompt = "" ) {
- if ( function_exists( "readline" ) ) {
- return readline( $prompt );
- } else {
- print $prompt;
- $fp = fopen( "php://stdin", "r" );
- $resp = trim( fgets( $fp, 1024 ) );
- fclose( $fp );
- return $resp;
- }
-}
-
-
-
-?>
-