fgm
/
php__memcache_ui


			
							123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987
							<?php
/*
  +----------------------------------------------------------------------+
  | PHP Version 5                                                        |
  +----------------------------------------------------------------------+
  | Copyright (c) 1997-2004 The PHP Group                                |
  +----------------------------------------------------------------------+
  | This source file is subject to version 3.0 of the PHP license,       |
  | that is bundled with this package in the file LICENSE, and is        |
  | available through the world-wide-web at the following url:           |
  | http://www.php.net/license/3_0.txt.                                  |
  | If you did not receive a copy of the PHP license and are unable to   |
  | obtain it through the world-wide-web, please send a note to          |
  | license@php.net so we can mail you a copy immediately.               |
  +----------------------------------------------------------------------+
  | Author:  Harun Yayli <harunyayli at gmail.com>                       |
  +----------------------------------------------------------------------+
*/

$VERSION='$Id: memcache.php,v 1.1.2.3 2008/08/28 18:07:54 mikl Exp $';

define('DATE_FORMAT', 'Y/m/d H:i:s');
define('GRAPH_SIZE', 200);
define('MAX_ITEM_DUMP', 50);

// Allow local configuration: change local values in (this file).local.php
$file = $_SERVER['SCRIPT_FILENAME'];
$local = preg_replace('/(.*)(\.php)$/', '$1.local$2', $file);
if (is_readable($local)) {
  // echo "<p>Loading local config from $local</p>";
  require $local;
}

if (!defined('ADMIN_USERNAME')) {
  define('ADMIN_USERNAME', 'memcache');
}
if (!defined('ADMIN_PASSWORD')) {
  define('ADMIN_PASSWORD', 'password');
}
if (empty($MEMCACHE_SERVERS)) {
  $MEMCACHE_SERVERS[] = 'mymemcache-server1:11211'; // add more as an array
  $MEMCACHE_SERVERS[] = 'mymemcache-server2:11211'; // add more as an array
}

////////// END OF DEFAULT CONFIG AREA /////////////////////////////////////////////////////////////

///////////////// Password protect ////////////////////////////////////////////////////////////////
if (!isset($_SERVER['PHP_AUTH_USER']) || !isset($_SERVER['PHP_AUTH_PW']) ||
  $_SERVER['PHP_AUTH_USER'] != ADMIN_USERNAME ||$_SERVER['PHP_AUTH_PW'] != ADMIN_PASSWORD) {
  Header("WWW-Authenticate: Basic realm=\"Memcache Login\"");
  Header("HTTP/1.0 401 Unauthorized");

  echo <<<EOB
        <html><body>
        <h1>Rejected!</h1>
        <big>Wrong Username or Password!</big>
        </body></html>
EOB;
  exit;
}

///////////MEMCACHE FUNCTIONS /////////////////////////////////////////////////////////////////////

function sendMemcacheCommands($command) {
  global $MEMCACHE_SERVERS;

  $result = array();

  foreach ($MEMCACHE_SERVERS as $server) {
    $strs = explode(':', $server);
    $host = $strs[0];
    $port = $strs[1];
    $result[$server] = sendMemcacheCommand($host, $port, $command);
  }

  return $result;
}

function sendMemcacheCommand($server, $port, $command) {
  $s = @fsockopen($server,$port);
  if (!$s){
    die("Can't connect to:". $server .':'. $port);
  }

  fwrite($s, $command."\r\n");

  $buf = '';
  while ((!feof($s))) {
    $buf .= fgets($s, 256);
    if (strpos($buf, "END\r\n") !== false){ // stat says end
      break;
    }
    if (strpos($buf, "DELETED\r\n") !== false || strpos($buf, "NOT_FOUND\r\n") !== false) { // delete says these
      break;
    }
    if (strpos($buf, "OK\r\n") !== false){ // flush_all says ok
      break;
    }
  }

  fclose($s);
  return parseMemcacheResults($buf);
}

function parseMemcacheResults($str){
  $res = array();
  $lines = explode("\r\n", $str);
  $cnt = count($lines);
  for($i=0 ; $i< $cnt ; $i++) {
    $line = $lines[$i];
    $l = explode(' ', $line, 3);
    if (count($l) == 3) {
      $res[$l[0]][$l[1]] = $l[2];
      if ($l[0] == 'VALUE') { // next line is the value
        $res[$l[0]][$l[1]] = array();
        list ($flag, $size) = explode(' ', $l[2]);
        $res[$l[0]][$l[1]]['stat'] = array(
          'flag' => $flag,
          'size' => $size,
        );
        $res[$l[0]][$l[1]]['value'] = $lines[++$i];
      }
    }
    elseif ($line == 'DELETED' || $line == 'NOT_FOUND' || $line == 'OK') {
      return $line;
    }
  }

  return $res;
}

function dumpCacheSlab($server, $slabId, $limit) {
  list($host, $port) = explode(':',$server);
  $resp = sendMemcacheCommand($host, $port, 'stats cachedump '. $slabId .' '. $limit);

  return $resp;
}

function flushServer($server) {
  list($host, $port) = explode(':', $server);
  $resp = sendMemcacheCommand($host, $port, 'flush_all');

  return $resp;
}

function getCacheItems() {
  $items = sendMemcacheCommands('stats items');
  $serverItems = array();
  $totalItems = array();
  foreach ($items as $server => $itemlist) {
    $serverItems[$server] = array();
    $totalItems[$server] = 0;
    if (!isset($itemlist['STAT'])) {
      continue;
    }

    $iteminfo = $itemlist['STAT'];

    foreach($iteminfo as $keyinfo => $value) {
      if (preg_match('/items\:(\d+?)\:(.+?)$/', $keyinfo, $matches)) {
        $serverItems[$server][$matches[1]][$matches[2]] = $value;
        if ($matches[2] == 'number') {
          $totalItems[$server] +=$value;
        }
      }
    }
  }

  return array('items'=>$serverItems,'counts'=>$totalItems);
}

function getMemcacheStats($total = true) {
  $resp = sendMemcacheCommands('stats');
  if ($total){
    $res = array();
    foreach($resp as $server => $r) {
      foreach ($r['STAT'] as $key => $row) {
        if (!isset($res[$key])) {
          $res[$key] = null;
        }
        switch ($key){
          case 'pid':
            $res['pid'][$server] = $row;
            break;
          case 'uptime':
            $res['uptime'][$server] = $row;
            break;
          case 'time':
            $res['time'][$server] = $row;
            break;
          case 'version':
            $res['version'][$server] = $row;
            break;
          case 'pointer_size':
            $res['pointer_size'][$server] = $row;
            break;
          case 'rusage_user':
            $res['rusage_user'][$server] = $row;
            break;
          case 'rusage_system':
            $res['rusage_system'][$server] = $row;
            break;
          case 'curr_items':
            $res['curr_items'] += $row;
            break;
          case 'total_items':
            $res['total_items'] += $row;
            break;
          case 'bytes':
            $res['bytes'] += $row;
            break;
          case 'curr_connections':
            $res['curr_connections'] += $row;
            break;
          case 'total_connections':
            $res['total_connections'] += $row;
            break;
          case 'connection_structures':
            $res['connection_structures'] += $row;
            break;
          case 'cmd_get':
            $res['cmd_get'] += $row;
            break;
          case 'cmd_set':
            $res['cmd_set'] += $row;
            break;
          case 'get_hits':
            $res['get_hits'] += $row;
            break;
          case 'get_misses':
            $res['get_misses'] += $row;
            break;
          case 'evictions':
            $res['evictions'] += $row;
            break;
          case 'bytes_read':
            $res['bytes_read'] += $row;
            break;
          case 'bytes_written':
            $res['bytes_written'] += $row;
            break;
          case 'limit_maxbytes':
            $res['limit_maxbytes'] += $row;
            break;
          case 'threads':
            $res['rusage_system'][$server]= $row;
            break;
        }
      }
    }
    return $res;
  }

  return $resp;
}

function duration($ts) {
  global $time;
  $years = (int) ((($time - $ts) / (7 * 86400)) / 52.177457);
  $rem = (int) (($time-$ts) - ($years * 52.177457 * 7 * 86400));
  $weeks = (int) (($rem) / (7*86400));
  $days = (int) (($rem) / 86400) - $weeks * 7;
  $hours = (int) (($rem) / 3600) - $days * 24 - $weeks * 7 * 24;
  $mins = (int) (($rem) / 60) - $hours * 60 - $days * 24 * 60 - $weeks * 7 * 24 * 60;
  $str = '';
  if ($years == 1) {
    $str .= "$years year, ";
  }
  if ($years > 1) {
    $str .= "$years years, ";
  }
  if ($weeks == 1) {
    $str .= "$weeks week, ";
  }
  if ($weeks > 1) {
    $str .= "$weeks weeks, ";
  }
  if ($days == 1) {
    $str .= "$days day,";
  }
  if ($days > 1) {
    $str .= "$days days,";
  }
  if ($hours == 1) {
    $str .= " $hours hour and";
  }
  if ($hours > 1) {
    $str .= " $hours hours and";
  }
  if ($mins == 1) {
    $str .= " 1 minute";
  }
  else {
    $str .= " $mins minutes";
  }

  return $str;
}

// create graphics
//
function graphics_avail() {
  return extension_loaded('gd');
}

function bsize($s) {
  foreach (array('', 'Ki', 'Mi', 'Gi', 'Ti') as $i => $k) {
    if ($s < 1024) {
      break;
    }
    $s /= 1024;
  }

  return sprintf("%5.1f %sBytes", $s, $k);
}

// create menu entry
function menu_entry($ob, $title) {
  global $PHP_SELF;

  if ($ob == $_GET['op']) {
    return "<li><a class=\"child_active\" href=\"$PHP_SELF&op=$ob\">$title</a></li>";
  }

  return "<li><a class=\"active\" href=\"$PHP_SELF&op=$ob\">$title</a></li>";
}

function getHeader() {
  $header = <<<EOB
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head><title>MEMCACHE INFO</title>
<style type="text/css"><!--
body { background:white; font-size:100.01%; margin:0; padding:0; }
body,p,td,th,input,submit { font-size:0.8em;font-family:arial,helvetica,sans-serif; }
* html body   {font-size:0.8em}
* html p      {font-size:0.8em}
* html td     {font-size:0.8em}
* html th     {font-size:0.8em}
* html input  {font-size:0.8em}
* html submit {font-size:0.8em}
td { vertical-align:top }
a { color:black; font-weight:none; text-decoration:none; }
a:hover { text-decoration:underline; }
div.content { padding:1em 1em 1em 1em; position:absolute; width:97%; z-index:100; }

h1.memcache { background:rgb(153,153,204); margin:0; padding:0.5em 1em 0.5em 1em; }
* html h1.memcache { margin-bottom:-7px; }
h1.memcache a:hover { text-decoration:none; color:rgb(90,90,90); }
h1.memcache span.logo {
  background:rgb(119,123,180);
  color:black;
  border-right: solid black 1px;
  border-bottom: solid black 1px;
  font-style:italic;
  font-size:1em;
  padding-left:1.2em;
  padding-right:1.2em;
  text-align:right;
  display:block;
  width:130px;
  }
h1.memcache span.logo span.name { color:white; font-size:0.7em; padding:0 0.8em 0 2em; }
h1.memcache span.nameinfo { color:white; display:inline; font-size:0.4em; margin-left: 3em; }
h1.memcache div.copy { color:black; font-size:0.4em; position:absolute; right:1em; }
hr.memcache {
  background:white;
  border-bottom:solid rgb(102,102,153) 1px;
  border-style:none;
  border-top:solid rgb(102,102,153) 10px;
  height:12px;
  margin:0;
  margin-top:1px;
  padding:0;
}

ol,menu { margin:1em 0 0 0; padding:0.2em; margin-left:1em;}
ol.menu li { display:inline; margin-right:0.7em; list-style:none; font-size:85%}
ol.menu a {
  background:rgb(153,153,204);
  border:solid rgb(102,102,153) 2px;
  color:white;
  font-weight:bold;
  margin-right:0em;
  padding:0.1em 0.5em 0.1em 0.5em;
  text-decoration:none;
  margin-left: 5px;
  }
ol.menu a.child_active {
  background:rgb(153,153,204);
  border:solid rgb(102,102,153) 2px;
  color:white;
  font-weight:bold;
  margin-right:0em;
  padding:0.1em 0.5em 0.1em 0.5em;
  text-decoration:none;
  border-left: solid black 5px;
  margin-left: 0px;
  }
ol.menu span.active {
  background:rgb(153,153,204);
  border:solid rgb(102,102,153) 2px;
  color:black;
  font-weight:bold;
  margin-right:0em;
  padding:0.1em 0.5em 0.1em 0.5em;
  text-decoration:none;
  border-left: solid black 5px;
  }
ol.menu span.inactive {
  background:rgb(193,193,244);
  border:solid rgb(182,182,233) 2px;
  color:white;
  font-weight:bold;
  margin-right:0em;
  padding:0.1em 0.5em 0.1em 0.5em;
  text-decoration:none;
  margin-left: 5px;
  }
ol.menu a:hover {
  background:rgb(193,193,244);
  text-decoration:none;
  }


div.info {
  background:rgb(204,204,204);
  border:solid rgb(204,204,204) 1px;
  margin-bottom:1em;
  }
div.info h2 {
  background:rgb(204,204,204);
  color:black;
  font-size:1em;
  margin:0;
  padding:0.1em 1em 0.1em 1em;
  }
div.info table {
  border:solid rgb(204,204,204) 1px;
  border-spacing:0;
  width:100%;
  }
div.info table th {
  background:rgb(204,204,204);
  color:white;
  margin:0;
  padding:0.1em 1em 0.1em 1em;
  }
div.info table th a.sortable { color:black; }
div.info table tr.tr-0 { background:rgb(238,238,238); }
div.info table tr.tr-1 { background:rgb(221,221,221); }
div.info table td { padding:0.3em 1em 0.3em 1em; }
div.info table td.td-0 { border-right:solid rgb(102,102,153) 1px; white-space:nowrap; }
div.info table td.td-n { border-right:solid rgb(102,102,153) 1px; }
div.info table td h3 {
  color:black;
  font-size:1.1em;
  margin-left:-0.3em;
  }
.td-0 a , .td-n a, .tr-0 a , tr-1 a {
    text-decoration:underline;
}
div.info table td dl,
div.info table td dl dt {
  display: inline;
}
div.info table td dl dt {
  font-weight: bold;
}
div.info table td dl dd {
  display: inline-block;
  margin-right: 2em;
  margin-left: 0.5em;
  width: 12em;
}
div.info table td div.slab-dump {
  -moz-column-count: 3;
  -moz-column-gap: 20px;
  -webkit-column-count: 3;
  -webkit-column-gap: 20px;
  column-count: 3;
  column-gap: 20px;
}
div.info table td a {
  display: block;
}
div.graph { margin-bottom:1em }
div.graph h2 { background:rgb(204,204,204);; color:black; font-size:1em; margin:0; padding:0.1em 1em 0.1em 1em; }
div.graph table { border:solid rgb(204,204,204) 1px; color:black; font-weight:normal; width:100%; }
div.graph table td.td-0 { background:rgb(238,238,238); }
div.graph table td.td-1 { background:rgb(221,221,221); }
div.graph table td { padding:0.2em 1em 0.4em 1em; }

div.div1,div.div2 { margin-bottom:1em; width:35em; }
div.div3 { position:absolute; left:40em; top:1em; width:580px; }
//div.div3 { position:absolute; left:37em; top:1em; right:1em; }

div.sorting { margin:1.5em 0em 1.5em 2em }
.center { text-align:center }
.aright { position:absolute;right:1em }
.right { text-align:right }
.ok { color:rgb(0,200,0); font-weight:bold}
.failed { color:rgb(200,0,0); font-weight:bold}

span.box {
  border: black solid 1px;
  border-right:solid black 2px;
  border-bottom:solid black 2px;
  padding:0 0.5em 0 0.5em;
  margin-right:1em;
}
span.green { background:#60F060; padding:0 0.5em 0 0.5em}
span.red { background:#D06030; padding:0 0.5em 0 0.5em }

div.authneeded {
  background:rgb(238,238,238);
  border:solid rgb(204,204,204) 1px;
  color:rgb(200,0,0);
  font-size:1.2em;
  font-weight:bold;
  padding:2em;
  text-align:center;
  }

input {
  background:rgb(153,153,204);
  border:solid rgb(102,102,153) 2px;
  color:white;
  font-weight:bold;
  margin-right:1em;
  padding:0.1em 0.5em 0.1em 0.5em;
  }
//-->
</style>
</head>
<body>
<div class="head">
  <h1 class="memcache">
    <span class="logo"><a href="http://pecl.php.net/package/memcache">memcache</a></span>
    <span class="nameinfo">memcache.php by <a href="http://livebookmark.net">Harun Yayli</a></span>
  </h1>
  <hr class="memcache">
</div>
<div class=content>
EOB;

  return $header;
}

function getFooter(){
  global $VERSION;

  $footer = '</div><!-- Based on apc.php '. $VERSION .'--></body>
</html>
';

  return $footer;
}

function getMenu() {
  global $PHP_SELF;

  echo "<ol class=menu>";
  if ($_GET['op']!=4){
    echo <<<EOB
    <li><a href="$PHP_SELF&op={$_GET['op']}">Refresh Data</a></li>
EOB;
  }
  else {
    echo <<<EOB
    <li><a href="$PHP_SELF&op=2}">Back</a></li>
EOB;
  }

  echo
    menu_entry(1, 'View Host Stats'),
    menu_entry(2, 'Variables');

  echo <<<EOB
  </ol>
  <br/>
EOB;
}

function fill_arc($im, $centerX, $centerY, $diameter, $start, $end, $color1, $color2, $text = '', $placeindex = 0) {
  $r = $diameter / 2;
  $w = deg2rad((360 + $start + ($end - $start) / 2) % 360);

  if (function_exists("imagefilledarc")) {
    // exists only if GD 2.0.1 is avaliable
    imagefilledarc($im, $centerX+1, $centerY+1, $diameter, $diameter, $start, $end, $color1, IMG_ARC_PIE);
    imagefilledarc($im, $centerX, $centerY, $diameter, $diameter, $start, $end, $color2, IMG_ARC_PIE);
    imagefilledarc($im, $centerX, $centerY, $diameter, $diameter, $start, $end, $color1, IMG_ARC_NOFILL|IMG_ARC_EDGED);
  }
  else {
    imagearc($im, $centerX, $centerY, $diameter, $diameter, $start, $end, $color2);
    imageline($im, $centerX, $centerY, $centerX + cos(deg2rad($start)) * $r, $centerY + sin(deg2rad($start)) * $r, $color2);
    imageline($im, $centerX, $centerY, $centerX + cos(deg2rad($start+1)) * $r, $centerY + sin(deg2rad($start)) * $r, $color2);
    imageline($im, $centerX, $centerY, $centerX + cos(deg2rad($end-1))   * $r, $centerY + sin(deg2rad($end))   * $r, $color2);
    imageline($im, $centerX, $centerY, $centerX + cos(deg2rad($end))   * $r, $centerY + sin(deg2rad($end))   * $r, $color2);
    imagefill($im,$centerX + $r*cos($w)/2, $centerY + $r*sin($w)/2, $color2);
  }

  if ($text) {
    if ($placeindex>0) {
      imageline($im,$centerX + $r*cos($w)/2, $centerY + $r*sin($w)/2,$diameter, $placeindex*12,$color1);
      imagestring($im,4,$diameter, $placeindex*12,$text,$color1);

    }
    else {
      imagestring($im,4,$centerX + $r*cos($w)/2, $centerY + $r*sin($w)/2,$text,$color1);
    }
  }
}

function fill_box($im, $x, $y, $w, $h, $color1, $color2, $text = '', $placeindex = '') {
  global $col_black;

  $x1 = $x + $w - 1;
  $y1 = $y + $h - 1;

  imagerectangle($im, $x, $y1, $x1 + 1, $y + 1, $col_black);
  if ($y1>$y) {
    imagefilledrectangle($im, $x, $y, $x1, $y1, $color2);
  }
  else {
    imagefilledrectangle($im, $x, $y1, $x1, $y, $color2);
  }

  imagerectangle($im, $x, $y1, $x1, $y, $color1);
  if ($text) {
    if ($placeindex > 0) {
      if ($placeindex < 16) {
        $px = 5;
        $py = $placeindex * 12 + 6;
        imagefilledrectangle($im, $px + 90, $py + 3, $px + 90 - 4, $py - 3, $color2);
        imageline($im, $x, $y + $h / 2, $px + 90, $py, $color2);
        imagestring($im, 2, $px, $py - 6, $text, $color1);
      }
      else {
        if ($placeindex < 31) {
          $px = $x + 40 * 2;
          $py = ($placeindex - 15) * 12 + 6;
        }
        else {
          $px = $x + 40 * 2 + 100 * intval(($placeindex - 15) / 15);
          $py = ($placeindex % 15) * 12 + 6;
        }

        imagefilledrectangle($im, $px, $py+3, $px - 4, $py - 3, $color2);
        imageline($im, $x + $w, $y + $h / 2, $px, $py, $color2);
        imagestring($im, 2, $px + 2, $py - 6, $text, $color1);
      }
    }
    else {
      imagestring($im, 4, $x + 5, $y1 - 16, $text, $color1);
    }
  }
}


//////////////////////////////////////////////////////
function main() {
  //
  // don't cache this page
  //
  header("Cache-Control: no-store, no-cache, must-revalidate");  // HTTP/1.1
  header("Cache-Control: post-check=0, pre-check=0", false);
  header("Pragma: no-cache");                                    // HTTP/1.0


  // TODO, AUTH
  global $PHP_SELF;
  global $MEMCACHE_SERVERS;

  $_GET['op'] = !isset($_GET['op']) ? '1' : $_GET['op'];
  $PHP_SELF= isset($_SERVER['PHP_SELF']) ? htmlentities(strip_tags($_SERVER['PHP_SELF'],'')) : '';

  $PHP_SELF = $PHP_SELF .'?';
  $time = time();
  // sanitize _GET

  foreach ($_GET as $key => $g) {
    $_GET[$key] = htmlentities($g);
  }

  // singleout
  // when singleout is set, it only gives details for that server.
  if (isset($_GET['singleout']) && $_GET['singleout'] >= 0 && $_GET['singleout'] < count($MEMCACHE_SERVERS)) {
    $MEMCACHE_SERVERS = array($MEMCACHE_SERVERS[$_GET['singleout']]);
  }

  // display images
  if (isset($_GET['IMG'])) {
    $memcacheStats = getMemcacheStats();
    $memcacheStatsSingle = getMemcacheStats(false);

    if (!graphics_avail()) {
      exit(0);
    }

    $size = GRAPH_SIZE; // image size
    $image = imagecreate($size+50, $size+10);

    $col_white = imagecolorallocate($image, 0xFF, 0xFF, 0xFF);
    $col_red   = imagecolorallocate($image, 0xD0, 0x60,  0x30);
    $col_green = imagecolorallocate($image, 0x60, 0xF0, 0x60);
    $col_black = imagecolorallocate($image,   0,   0,   0);

    imagecolortransparent($image,$col_white);

    switch ($_GET['IMG']){
      case 1: // pie chart
        $tsize = $memcacheStats['limit_maxbytes'];
        $avail = $tsize - $memcacheStats['bytes'];
        $x = $y = $size / 2;
        $angle_from = 0;
        $fuzz = 0.000001;

        foreach ($memcacheStatsSingle as $serv => $mcs) {
          $free = $mcs['STAT']['limit_maxbytes'] - $mcs['STAT']['bytes'];
          $used = $mcs['STAT']['bytes'];

          if ($free > 0){
          // draw free
            $angle_to = ($free*360)/$tsize;
            $perc =sprintf("%.2f%%", ($free *100) / $tsize) ;
            fill_arc($image, $x, $y, $size, $angle_from, $angle_from + $angle_to, $col_black, $col_green, $perc);
            $angle_from = $angle_from + $angle_to ;
          }

          if ($used > 0) {
          // draw used
          $angle_to = ($used * 360) / $tsize;
          $perc = sprintf("%.2f%%", ($used * 100) / $tsize);
          fill_arc($image, $x, $y, $size, $angle_from, $angle_from + $angle_to, $col_black, $col_red, '('. $perc .')');
          $angle_from = $angle_from + $angle_to ;
          }
        }
        break;

      case 2: // hit miss
        $hits = ($memcacheStats['get_hits'] == 0) ? 1 : $memcacheStats['get_hits'];
        $misses = ($memcacheStats['get_misses'] == 0) ? 1 : $memcacheStats['get_misses'];
        $total = $hits + $misses ;

        fill_box($image,  30, $size, 50,                 - $hits  * ($size - 21) / $total,  $col_black, $col_green, sprintf("%.1f%%", $hits   * 100 / $total));
        fill_box($image, 130, $size, 50, -max(4, ($total - $hits) * ($size - 21) / $total), $col_black, $col_red,   sprintf("%.1f%%", $misses * 100 / $total));
        break;
    }
    header("Content-type: image/png");
    imagepng($image);
    exit;
  }

  echo getHeader();
  echo getMenu();

  switch ($_GET['op']) {
    case 1: // host stats
      hostStats();
      break;

    case 2: // variables
      variables();
      break;

    case 4: //item dump
      itemDump();
      break;

    case 5: // item delete
      itemDelete();
      break;

    case 6: // flush server
      $theserver = $MEMCACHE_SERVERS[(int)$_GET['server']];
      $r = flushServer($theserver);
      echo 'Flush  '.$theserver.":".$r;
      break;
  }
  echo getFooter();
}

function itemDelete() {
  global $MEMCACHE_SERVERS;

  if (!isset($_GET['key']) || !isset($_GET['server'])) {
    echo "No key set!";
    break;
  }

  $theKey = htmlentities(base64_decode($_GET['key']));
  $theserver = $MEMCACHE_SERVERS[(int)$_GET['server']];
  list($h, $p) = explode(':', $theserver);
  $r = sendMemcacheCommand($h, $p, 'delete '. $theKey);
  echo 'Deleting '. $theKey .':'. $r;
}

function itemDump() {
  global $PHP_SELF;
  global $MEMCACHE_SERVERS;

  if (!isset($_GET['key']) || !isset($_GET['server'])){
    echo "No key set!";
    break;
  }

  // I'm not doing anything to check the validity of the key string.
  // probably an exploit can be written to delete all the files in key=base64_encode("\n\r delete all").
  // somebody has to do a fix to this.
  $theKey = htmlentities(base64_decode($_GET['key']));

  $theserver = $MEMCACHE_SERVERS[(int) $_GET['server']];
  list($h, $p) = explode(':', $theserver);
  $r = sendMemcacheCommand($h, $p, 'get '. $theKey);
  echo <<<EOB
        <div class="info"><table cellspacing=0><tbody>
      <tr><th>Server<th>Key</th><th>Value</th><th>Delete</th></tr>
EOB;
  echo "<tr><td class=td-0>",$theserver,"</td><td class=td-0>", $theKey,
             " <br/>flag:", $r['VALUE'][$theKey]['stat']['flag'],
             " <br/>Size:", bsize($r['VALUE'][$theKey]['stat']['size']),
             "</td><td>", chunk_split($r['VALUE'][$theKey]['value'], 40), "</td>",
             '<td><a href="', $PHP_SELF, '&op=5&server=', (int) $_GET['server'], '&key=', base64_encode($theKey), "\">Delete</a></td></tr>";
  echo <<<EOB
      </tbody></table>
      </div><hr/>
EOB;
}

function hostStats() {
  global $PHP_SELF;
  global $MEMCACHE_SERVERS;

  $phpversion = phpversion();
  $memcacheStats = getMemcacheStats();
  $memcacheStatsSingle = getMemcacheStats(false);

  $mem_size = $memcacheStats['limit_maxbytes'];
  $mem_used = $memcacheStats['bytes'];
  $mem_avail= $mem_size - $mem_used;
  $startTime = time() - array_sum($memcacheStats['uptime']);

  $curr_items = $memcacheStats['curr_items'];
  $total_items = $memcacheStats['total_items'];
  $hits = ($memcacheStats['get_hits'] == 0) ? 1 : $memcacheStats['get_hits'];
  $misses = ($memcacheStats['get_misses'] == 0) ? 1 : $memcacheStats['get_misses'];
  $sets = $memcacheStats['cmd_set'];

  $req_rate  = sprintf("%.2f", ($hits + $misses) / ($time - $startTime));
  $hit_rate  = sprintf("%.2f", ($hits          ) / ($time - $startTime));
  $miss_rate = sprintf("%.2f", (        $misses) / ($time - $startTime));
  $set_rate  = sprintf("%.2f", ($sets          ) / ($time - $startTime));

  echo <<< EOB
    <div class="info div1"><h2>General Cache Information</h2>
    <table cellspacing=0><tbody>
    <tr class=tr-1><td class=td-0>PHP Version</td><td>$phpversion</td></tr>
EOB;
  echo "<tr class=tr-0><td class=td-0>Memcached Host". ((count($MEMCACHE_SERVERS)>1) ? 's':'')."</td><td>";

  $i = 0;
  if (!isset($_GET['singleout']) && count($MEMCACHE_SERVERS)>1){
    foreach ($MEMCACHE_SERVERS as $server) {
      echo ($i + 1). '. <a href="'. $PHP_SELF .'&singleout='. $i++ .'">'. $server. '</a><br/>';
    }
  }
  else {
    echo '1.'.$MEMCACHE_SERVERS[0];
  }

  if (isset($_GET['singleout'])) {
    echo '<a href="'. $PHP_SELF .'">(all servers)</a><br/>';
  }
  echo "</td></tr>\n";
  echo "<tr class=tr-1><td class=td-0>Total Memcache Cache</td><td>". bsize($memcacheStats['limit_maxbytes']) ."</td></tr>\n";

  echo <<<EOB
    </tbody></table>
    </div>

    <div class="info div1"><h2>Memcache Server Information</h2>
EOB;

  foreach ($MEMCACHE_SERVERS as $server) {
    echo '<table cellspacing=0><tbody>';
    echo '<tr class=tr-1><td class=td-1>'. $server .'</td><td><a href="'. $PHP_SELF .'&server='. array_search($server, $MEMCACHE_SERVERS). '&op=6">[<b>Flush this server</b>]</a></td></tr>';
    echo '<tr class=tr-0><td class=td-0>Start Time</td><td>', date(DATE_FORMAT, $memcacheStatsSingle[$server]['STAT']['time'] - $memcacheStatsSingle[$server]['STAT']['uptime']),'</td></tr>';
    echo '<tr class=tr-1><td class=td-0>Uptime</td><td>', duration($memcacheStatsSingle[$server]['STAT']['time'] - $memcacheStatsSingle[$server]['STAT']['uptime']),'</td></tr>';
    echo '<tr class=tr-0><td class=td-0>Memcached Server Version</td><td>'. $memcacheStatsSingle[$server]['STAT']['version'] .'</td></tr>';
    echo '<tr class=tr-1><td class=td-0>Used Cache Size</td><td>', bsize($memcacheStatsSingle[$server]['STAT']['bytes']), '</td></tr>';
    echo '<tr class=tr-0><td class=td-0>Total Cache Size</td><td>', bsize($memcacheStatsSingle[$server]['STAT']['limit_maxbytes']), '</td></tr>';
    echo '</tbody></table>';
  }
  echo <<<EOB
    </div>
    <div class="graph div3"><h2>Host Status Diagrams</h2>
    <table cellspacing=0><tbody>
EOB;

  $size = 'width='. (GRAPH_SIZE + 50) .' height='. (GRAPH_SIZE + 10);
  echo <<<EOB
    <tr>
    <td class=td-0>Cache Usage</td>
    <td class=td-1>Hits &amp; Misses</td>
    </tr>
EOB;

  echo
    graphics_avail()
      ? '<tr>'.
        "<td class=td-0><img alt=\"\" $size src=\"$PHP_SELF&IMG=1&". (isset($_GET['singleout']) ? 'singleout='. $_GET['singleout'] .'&' : '') . "$time\"></td>".
        "<td class=td-1><img alt=\"\" $size src=\"$PHP_SELF&IMG=2&". (isset($_GET['singleout']) ? 'singleout='. $_GET['singleout'] .'&' : '') . "$time\"></td></tr>\n"
      : "",
    '<tr>',
    '<td class=td-0><span class="green box">&nbsp;</span>Free: ', bsize($mem_avail) . sprintf(" (%.1f%%)", $mem_avail * 100 / $mem_size),         "</td>\n",
    '<td class=td-1><span class="green box">&nbsp;</span>Hits: ', $hits             . sprintf(" (%.1f%%)", $hits      * 100 / ($hits + $misses)), "</td>\n",
    '</tr>',
    '<tr>',
    '<td class=td-0><span class="red box">&nbsp;</span>Used: ',   bsize($mem_used ) . sprintf(" (%.1f%%)", $mem_used  * 100 / $mem_size),         "</td>\n",
    '<td class=td-1><span class="red box">&nbsp;</span>Misses: ', $misses           . sprintf(" (%.1f%%)", $misses    * 100 / ($hits + $misses)), "</td>\n";
    echo <<< EOB
  </tr>
  </tbody></table>
<br/>
  <div class="info"><h2>Cache Information</h2>
    <table cellspacing=0><tbody>
    <tr class=tr-0><td class=td-0>Current Items(total)</td><td>$curr_items ($total_items)</td></tr>
    <tr class=tr-1><td class=td-0>Hits</td><td>{$hits}</td></tr>
    <tr class=tr-0><td class=td-0>Misses</td><td>{$misses}</td></tr>
    <tr class=tr-1><td class=td-0>Request Rate (hits, misses)</td><td>$req_rate cache requests/second</td></tr>
    <tr class=tr-0><td class=td-0>Hit Rate</td><td>$hit_rate cache requests/second</td></tr>
    <tr class=tr-1><td class=td-0>Miss Rate</td><td>$miss_rate cache requests/second</td></tr>
    <tr class=tr-0><td class=td-0>Set Rate</td><td>$set_rate cache requests/second</td></tr>
    </tbody></table>
    </div>

EOB;
}

function variables() {
  global $PHP_SELF;
  global $MEMCACHE_SERVERS;

  $m = 0;
  $cacheItems= getCacheItems();
  $items = $cacheItems['items'];
  $totals = $cacheItems['counts'];
  $maxDump = MAX_ITEM_DUMP;
  foreach ($items as $server => $entries) {
    echo <<< EOB
      <div class="info"><table cellspacing=0><tbody>
      <tr><th colspan="2">$server</th></tr>
      <tr><th>Slab Id</th><th>Info</th></tr>
EOB;

    foreach ($entries as $slabId => $slab) {
      $dumpUrl = $PHP_SELF .'&op=2&server='. (array_search($server,$MEMCACHE_SERVERS)) .'&dumpslab='. $slabId;
      echo
       "<tr class=tr-$m>",
        "<td class=td-0><center>",'<a href="', $dumpUrl,'">', $slabId, '</a>', "</center></td>",
        "<td class=td-last><dl class=\"slab-header\"><dt>Item count:</dt><dd>", $slab['number'], '</dd><dt>Age:</dt><dd>', duration($time - $slab['age']),'</dd><dt>Evicted:</dt><dd>', ((isset($slab['evicted']) && $slab['evicted'] == 1) ? 'Yes' : 'No'), '</dd></dl>';

      if ((isset($_GET['dumpslab']) && $_GET['dumpslab'] == $slabId)
        &&  (isset($_GET['server']) && $_GET['server'] == array_search($server, $MEMCACHE_SERVERS))) {
        echo "<br/><b>Items: item</b><br/><div class=\"slab-dump\">";
        $items = dumpCacheSlab($server, $slabId, $slab['number']);
        // maybe someone likes to do a pagination here :)
        $i = 1;
        foreach ($items['ITEM'] as $itemKey => $itemInfo) {
          $itemInfo = trim($itemInfo,'[ ]');
          echo '<a href="',$PHP_SELF, '&op=4&server=', (array_search($server,$MEMCACHE_SERVERS)), '&key=', base64_encode($itemKey) .'">', $itemKey, '</a>';
        }
      }

      echo "</div><!-- .slab-dump--></td></tr>";
      $m = 1 - $m;
    }
    echo <<<EOB
      </tbody></table>
      </div><hr/>
EOB;
  }
}

main();