The php code of Monitor Memcached Servers With vBulletin

It's always a good idea to monitor everything (the more information you have, the better in my opinion).


This is a plug-in I wrote years ago from vBulletin 3.6 that still works fine for vBulletin 4. It gives you a quick and easy way to make sure your Memcached server(s) are working properly. Beyond the normal stats it supplies, it also performs a realtime latency test for each of your servers so you can see if one might be working, but slow.


To have Memcached stats show on your main AdminCP screen, create a plug-in at the admin_index_main3 hook location with the following code (obviously this will only work if you use Memcache as your vBulletin datastore):

php Code:

// From downloadzonly.blogspot.com

$memcache = new Memcache;



foreach ($vbulletin->config['Misc']['memcacheserver'] as $key => $server) {

    $memcache->addServer($server,  $vbulletin->config['Misc']['memcacheport'][$key], 1, 1, 1, 15, true);

}



$stats = $memcache->getExtendedStats();

$memcache->close();



$labels = array (

    'host' => 'Host', 

    'pid' => 'PID', 

    'uptime' => 'Daemon Uptime', 

    'time' => 'Server Time', 

    'version' => 'Version', 

    'pointer_size' => 'Pointer Bits', 

    'rusage_user' => 'RUsage User', 

    'rusage_system' => 'RUsage System', 

    'curr_items' => 'Current Items', 

    'total_items' => 'Total Items', 

    'bytes' => 'Memory Used', 

    'curr_connections' => 'Current Connections', 

    'total_connections' => 'Total Connections', 

    'connection_structures' => 'Connection Structures', 

    'cmd_flush' => 'Flushes', 

    'cmd_get' => 'Gets', 

    'cmd_set' => 'Sets', 

    'get_hits' => 'Get Hits', 

    'get_misses' => 'Get Misses', 

    'delete_hits' => 'Delete Hits', 

    'delete_misses' => 'Delete Misses', 

    'incr_hits' => 'Increment Hits', 

    'incr_misses' => 'Increment Misses', 

    'decr_hits' => 'Decrement Hits', 

    'decr_misses' => 'Decrement Misses', 

    'cas_hits' => 'CAS Hits', 

    'cas_misses' => 'CAS Misses', 

    'cas_badval' => 'CAS Bad Value', 

    'auth_cmds' => 'Auth Commands', 

    'auth_errors' => 'Auth Errors', 

    'evictions' => 'Evictions', 

    'reclaimed' => 'Reclaimed', 

    'bytes_read' => 'Data Read In', 

    'bytes_written' => 'Data Written Out', 

    'limit_maxbytes' => 'Memory Allocated', 

    'threads' => 'Threads', 

    'accepting_conns' => 'Accepting Connections', 

    'conn_yields' => 'Connection Yields', 

    'listen_disabled_num' => 'Listening Disabled Num', 

    'latency' => 'Latency Test', 

);



$data = array('Host' => '', 'Latency Test' => '', 'Memory Allocated' => '', 'Memory Used' => '', 'Current Items' => '', 'Total Items' => '');



$i=1;



foreach($stats as $key => $val) {   

    if (is_array($val)) {

        $data[$labels['host']][] = $key;

        foreach($val as $key2 => $val2) {

            $data[$labels[$key2]][] = 

                (strpos($key2, 'bytes') !== false) ? vb_number_format($val2, 2, true) . iif (preg_match("#(bytes_read|bytes_written)#si", $key2), ' (' . vb_number_format(intval($val2/$val['uptime']), 2, true) . '/sec)') : 

                ($key2 == 'time' ? date("M j, Y, G:i:s", $val2) : 

                (preg_match("#(curr_items|total_items|curr_connections|total_connections|connection_structures|cmd_get|cmd_set|get_hits|get_misses)#si", $key2) ? number_format($val2) : 

                ($key2 == 'uptime' ? intval($val2 / 86400) . 'd, ' . intval(($val2 % 86400) / 3600) . 'h, ' . intval(($val2 % 3600) / 60) . 'm, ' . intval($val2 % 60) . 's'  : $val2))) . 

                iif (preg_match("#(total_connections|cmd_get|cmd_set|bytes_read|bytes_written|get_hits|get_misses)#si", $key2), ' (' . intval($val2/$val['uptime']) . '/sec)');

        }

        

        $latency = microtime();

        $memcache = new Memcache;

        $memcache->addServer($vbulletin->config['Misc']['memcacheserver'][$i]);

        $set = $memcache->set('latency-test', 'some value', 0, 10);

        $get = $memcache->get('latency-test');

        $memcache->close();

        $data[$labels['latency']][] = round ((microtime() - $latency) * 1000, 4) . ' ms';

        $i++;

    }

}

print_table_start();

print_table_header('Memcached Servers', count($stats) + 1);

foreach($data as $key => $val) {

    print_cells_row(array_merge((array)"<strong>$key</strong>", $val), 0, 0, -5, 'top', 0, 1);

}

print_table_footer(2, '', '', false);

downloadzonly.blogspot.com