/**
* Search for item
* Return all the items matching parameters if successful, false otherwise
*
* @param String $server Hostname
* @param Integer $port Hostname Port
* @param String $key Key to search
* @param String $level Level of Detail
* @param String $more More action
*
* @return array
*/
function search($server, $port, $search, $level = false, $more = false)
{
$slabs = array();
$items = false;
# Executing command : stats
if ($level == 'full' && ($result = $this->exec('stats', $server, $port))) {
# Parsing result
$result = $this->parse($result);
$infinite = isset($result['time'], $result['uptime']) ? $result['time'] - $result['uptime'] : 0;
}
# Executing command : slabs stats
if ($result = $this->exec('stats slabs', $server, $port)) {
# Parsing result
$result = $this->parse($result);
unset($result['active_slabs']);
unset($result['total_malloced']);
# Indexing by slabs
foreach ($result as $key => $value) {
$key = preg_split('/:/', $key);
$slabs[$key[0]] = true;
}
}
# Exploring each slabs
foreach ($slabs as $slab => $unused) {
# Executing command : stats cachedump
if ($result = $this->exec('stats cachedump ' . $slab . ' 0', $server, $port)) {
# Parsing result
preg_match_all('/^ITEM ((?:.*)' . preg_quote($search, '/') . '(?:.*)) \\[([0-9]*) b; ([0-9]*) s\\]\\r\\n/imU', $result, $matchs, PREG_SET_ORDER);
foreach ($matchs as $item) {
# Search & Delete
if ($more == 'delete') {
$items[] = $item[1] . ' : ' . $this->delete($server, $port, $item[1]);
# Basic search
} else {
# Detail level
if ($level == 'full') {
$items[] = $item[1] . ' : [' . str_pad(Library_Data_Analysis::byteResize($item[2]), 7, ' ', STR_PAD_LEFT) . 'b, Expire : ' . ($item[3] == $infinite ? '∞' : Library_Data_Analysis::uptime($item[3] - time(), true)) . ']';
} else {
$items[] = $item[1];
}
}
}
}
unset($slabs[$slab]);
}
if (is_array($items)) {
sort($items);
}
return $items;
}
