root/trunk/mod_cacher/htdocs/xcache.php @ 1038

<?php

include("./common.php");

class Cycle
{
    var $values;
    var $i;
    var $count;

    function Cycle($v)
    {
        $this->values = func_get_args();
        $this->i = -1;
        $this->count = count($this->values);
    }

    function next()
    {
        $this->i = ($this->i + 1) % $this->count;
        return $this->values[$this->i];
    }

    function cur()
    {
        return $this->values[$this->i];
    }

    function reset()
    {
        $this->i = -1;
    }
}

function number_formats($a, $keys)
{
    foreach ($keys as $k) {
        $a[$k] = number_format($a[$k]);
    }
    return $a;
}

function size($size)
{
    $size = (int) $size;
    if ($size < 1024)
        return number_format($size, 2) . ' b';

    if ($size < 1048576)
        return number_format($size / 1024, 2) . ' K';

    return number_format($size / 1048576, 2) . ' M';
}

function age($time)
{
    if (!$time) return '';
    $delta = REQUEST_TIME - $time;

    if ($delta < 0) {
        $delta = -$delta;
    }
    
    static $seconds = array(1, 60, 3600, 86400, 604800, 2678400, 31536000);
    static $name = array('s', 'm', 'h', 'd', 'w', 'M', 'Y');

    for ($i = 6; $i >= 0; $i --) {
        if ($delta >= $seconds[$i]) {
            $ret = (int) ($delta / $seconds[$i]);
            return $ret . ' ' . $name[$i];
        }
    }

    return '0 s';
}

function freeblock_to_graph($freeblocks, $size)
{
    global $config;

    // cached in static variable
    static $graph_initial;
    if (!isset($graph_initial)) {
        $graph_initial = array_fill(0, $config['percent_graph_width'], 0);
    }
    $graph = $graph_initial;
    foreach ($freeblocks as $b) {
        $begin = $b['offset'] / $size * $config['percent_graph_width'];
        $end = ($b['offset'] + $b['size']) / $size * $config['percent_graph_width'];

        if ((int) $begin == (int) $end) {
            $v = $end - $begin;
            $graph[(int) $v] += $v - (int) $v;
        }
        else {
            $graph[(int) $begin] += 1 - ($begin - (int) $begin);
            $graph[(int) $end] += $end - (int) $end;
            for ($i = (int) $begin + 1, $e = (int) $end; $i < $e; $i ++) {
                $graph[$i] += 1;
            }
        }
    }
    $html = array();
    $c = 255;
    foreach ($graph as $k => $v) {
        if ($config['percent_graph_type'] != 'free') {
            $v = 1 - $v;
        }
        $v = (int) ($v * $c);
        $r = $g = $c - $v;
        $b = $c;
        $html[] = '<div style="background: rgb(' . "$r,$g,$b" . ')"></div>';
    }
    return implode('', $html);
}

function calc_total(&$total, $data)
{
    foreach ($data as $k => $v) {
        switch ($k) {
        case 'type':
        case 'cache_name':
        case 'cacheid':
        case 'free_blocks':
            continue 2;
        }
        if (!isset($total[$k])) {
            $total[$k] = $v;
        }
        else {
            switch ($k) {
            case 'hits_by_hour':
            case 'hits_by_second':
                foreach ($data[$k] as $kk => $vv) {
                    $total[$k][$kk] += $vv;
                }
                break;

            default:
                $total[$k] += $v;
            }
        }
    }
}

function array_avg($a)
{
    if (count($a) == 0) {
        return '';
    }
    return array_sum($a) / count($a);
}

function bar_hits_percent($v, $percent, $active)
{
    $r = 220 + (int) ($percent * 25);
    $g = $b = 220 - (int) ($percent * 220);
    $percent = (int) ($percent * 100);
    $a = $active ? ' active' : '';
    return '<div title="' . $v . '">'
        . '<div class="barf' . $a . '" style="height: ' . (100 - $percent) . '%"></div>'
        . '<div class="barv' . $a . '" style="background: rgb(' . "$r,$g,$b" . '); height: ' . $percent . '%"></div>'
        . '</div>';
}

function hits_to_graph($hits)
{
    $max = 0;
    foreach ($hits as $v) {
        if ($max < $v) {
            $max = $v;
        }
    }
    if (!$max) {
        return '';
    }
    $t = (time() / (60 * 60)) % 24;
    $html = array();
    foreach ($hits as $i => $v) {
        $html[] = bar_hits_percent($v, $v / $max, $i == $t);
    }
    return implode('', $html);
}

function switcher($name, $options)
{
    $n = isset($_GET[$name]) ? $_GET[$name] : null;
    $html = array();
    foreach ($options as $k => $v) {
        $html[] = sprintf('<a href="?%s=%s"%s>%s</a>', $name, $k, $k == $n ? ' class="active"' : '', $v);
    }
    return implode('', $html);
}

function th($name, $attrs = null)
{
    $translated = __($name);
    if ($translated == $name) {
        $translated = "$name|$name";
    }
    list($text, $title) = explode('|', $translated, 2);
    return sprintf('%s<th%s id="%s" title="%s"><a href="javascript:" onclick="resort(this); return false">%s</a></th>%s'
            , "\t"
            , $attrs ? " $attrs" : ""
            , $name, htmlspecialchars(trim($title)), trim($text)
            , "\n");
}

if (!extension_loaded('XCache')) {
    echo '<h1>XCache is not loaded</h1>';
    ob_start();
    phpinfo();
    $info = ob_get_clean();
    if (preg_match('!<td class="v">(.*\\.ini)!', $info, $m)) {
        echo "Please check $m[1]";
    }
    else if (preg_match('!Configuration File \\(php.ini\\) Path *</td><td class="v">([^<]+)!', $info, $m)) {
        echo "Please put a php.ini in $m[1] and load XCache extension";
    }
    else {
        echo "You don't even have a php.ini yet?";
    }
    exit;
}
$pcnt = xcache_count(XC_TYPE_PHP);
$vcnt = xcache_count(XC_TYPE_VAR);

if ($_SERVER['REQUEST_METHOD'] == 'POST') {
    $remove = @ $_POST['remove'];
    if ($remove && is_array($remove)) {
        foreach ($remove as $name) {
            xcache_unset($name);
        }
    }
}

$moduleinfo = null;
$type_none = -1;
if (!isset($_GET['type'])) {
    $_GET['type'] = $type_none;
}
$_GET['type'] = $type = (int) $_GET['type'];

// {{{ process clear
function processClear()
{
    $type = isset($_POST['type']) ? $_POST['type'] : null;
    if ($type != XC_TYPE_PHP && $type != XC_TYPE_VAR) {
        $type = null;
    }
    if (isset($type)) {
        $cacheid = (int) (isset($_POST['cacheid']) ? $_POST['cacheid'] : 0);
        if (isset($_POST['clearcache'])) {
            $count = xcache_count($type);
            if ($cacheid >= 0) {
                for ($cacheid = 0; $cacheid < $count; $cacheid ++) {
                    xcache_clear_cache($type, $cacheid);
                }
            }
            else {
                xcache_clear_cache($type);
            }
        }
    }
}
processClear();
// }}}
// {{{ load info/list
$cacheinfos = array();
$total = array();
for ($i = 0; $i < $pcnt; $i ++) {
    $data = xcache_info(XC_TYPE_PHP, $i);
    if ($type === XC_TYPE_PHP) {
        $data += xcache_list(XC_TYPE_PHP, $i);
    }
    $data['type'] = XC_TYPE_PHP;
    $data['cache_name'] = "php#$i";
    $data['cacheid'] = $i;
    $cacheinfos[] = $data;
    if ($pcnt >= 2) {
        calc_total($total, $data);
    }
}

if ($pcnt >= 2) {
    $total['type'] = XC_TYPE_PHP;
    $total['cache_name'] = _('Total');
    $total['cacheid'] = -1;
    $total['gc'] = null;
    $total['istotal'] = true;
    $cacheinfos[] = $total;
}

$total = array();
for ($i = 0; $i < $vcnt; $i ++) {
    $data = xcache_info(XC_TYPE_VAR, $i);
    if ($type === XC_TYPE_VAR) {
        $data += xcache_list(XC_TYPE_VAR, $i);
    }
    $data['type'] = XC_TYPE_VAR;
    $data['cache_name'] = "var#$i";
    $data['cacheid'] = $i;
    $cacheinfos[] = $data;
    if ($vcnt >= 2) {
        calc_total($total, $data);
    }
}

if ($vcnt >= 2) {
    $total['type'] = XC_TYPE_VAR;
    $total['cache_name'] = _('Total');
    $total['cacheid'] = -1;
    $total['gc'] = null;
    $total['istotal'] = true;
    $cacheinfos[] = $total;
}
// }}}
// {{{ merge the list
switch ($type) {
case XC_TYPE_PHP:
case XC_TYPE_VAR:
    $cachelist = array('type' => $type, 'cache_list' => array(), 'deleted_list' => array());
    if ($type == XC_TYPE_VAR) {
        $cachelist['type_name'] = 'var';
    }
    else {
        $cachelist['type_name'] = 'php';
    }
    foreach ($cacheinfos as $i => $c) {
        if (!empty($c['istotal'])) {
            continue;
        }
        if ($c['type'] == $type && isset($c['cache_list'])) {
            foreach ($c['cache_list'] as $e) {
                $e['cache_name'] = $c['cache_name'];
                $cachelist['cache_list'][] = $e;
            }
            foreach ($c['deleted_list'] as $e) {
                $e['cache_name'] = $c['cache_name'];
                $cachelist['deleted_list'][] = $e;
            }
        }
    }
    if ($type == XC_TYPE_PHP) {
        $inodes = array();
        $haveinode = false;
        foreach ($cachelist['cache_list'] as $e) {
            if (isset($e['file_inode'])) {
                $haveinode = true;
                break;
            }
        }
        if (!$haveinode) {
            foreach ($cachelist['deleted_list'] as $e) {
                if (isset($e['file_inode'])) {
                    $haveinode = true;
                    break;
                }
            }
        }
    }
    unset($data);
    break;

default:
    $_GET['type'] = $type_none;
    $cachelist = array();
    ob_start();
    phpinfo(INFO_MODULES);
    $moduleinfo = ob_get_clean();
    if (preg_match_all('!XCache[^<]*</a></h2>(.*?)<h2>!is', $moduleinfo, $m)) {
        $moduleinfo = implode('', $m[1]);
    }
    else {
        $moduleinfo = null;
    }
    break;
}
// }}}

$type_php = XC_TYPE_PHP;
$type_var = XC_TYPE_VAR;
$types = array($type_none => _('Statistics'), $type_php => _('List PHP'), $type_var => _('List Var Data'));
$php_version = phpversion();
$xcache_version = XCACHE_VERSION;
$xcache_modules = XCACHE_MODULES;

include("xcache.tpl.php");

?>