<?php
// +----------------------------------------------------------------------
// | ThinkPHP [ WE CAN DO IT JUST THINK ]
// +----------------------------------------------------------------------
// | Copyright (c) 2006~2016 http://thinkphp.cn All rights reserved.
// +----------------------------------------------------------------------
// | Licensed ( http://www.apache.org/licenses/LICENSE-2.0 )
// +----------------------------------------------------------------------
// | Author: liu21st <liu21st@gmail.com>
// +----------------------------------------------------------------------

namespace think;

use think\Config;// 配置
use think\exception\ClassNotFoundException;// 异常 类查找异常
use think\Log;// 日志
use think\Request;// 请求
use think\Response;// 回复
use think\response\Redirect; // 跳转

class Debug
{
    // 区间时间信息
    protected static $info = [];// 区间 时间信息
    // 区间内存信息
    protected static $mem = [];// 区间 内存信息

    /**
     * 记录时间(微秒)和内存使用情况
     * @param string    $name 标记位置
     * @param mixed     $value 标记值 留空则取当前 time 表示仅记录时间 否则同时记录时间和内存
     * @return mixed
     */
    public static function remark($name, $value = '')
    {// 记录 时间 微秒 和 内存使用情况
        // 记录时间和内存使用
        self::$info[$name] = is_float($value) ? $value : microtime(true);// 记录 时间
        if ('time' != $value) {// 如果没有 value
            self::$mem['mem'][$name]  = is_float($value) ? $value : memory_get_usage();// 详细标记 使用值
            self::$mem['peak'][$name] = memory_get_peak_usage();// 标记 锋值
        }
    }

    /**
     * 统计某个区间的时间(微秒)使用情况
     * @param string            $start 开始标签
     * @param string            $end 结束标签
     * @param integer|string    $dec 小数位
     * @return integer
     */
    public static function getRangeTime($start, $end, $dec = 6)
    {
        if (!isset(self::$info[$end])) {// 如果没有 结束时间
            self::$info[$end] = microtime(true);
        }
        return number_format((self::$info[$end] - self::$info[$start]), $dec);// 格式化 时间输出
    }

    /**
     * 统计从开始到统计时的时间(微秒)使用情况
     * @param integer|string $dec 小数位
     * @return integer
     */
    public static function getUseTime($dec = 6)
    {
        return number_format((microtime(true) - THINK_START_TIME), $dec);// 时间统计
    }

    /**
     * 获取当前访问的吞吐率情况
     * @return string
     */
    public static function getThroughputRate()
    {
        return number_format(1 / self::getUseTime(), 2) . 'req/s';// 获取单位时间内 请求此次数
    }

    /**
     * 记录区间的内存使用情况
     * @param string            $start 开始标签
     * @param string            $end 结束标签
     * @param integer|string    $dec 小数位
     * @return string
     */
    public static function getRangeMem($start, $end, $dec = 2)
    {
        if (!isset(self::$mem['mem'][$end])) {
            self::$mem['mem'][$end] = memory_get_usage();// 获取内存 结束情况
        }
        $size = self::$mem['mem'][$end] - self::$mem['mem'][$start];
        $a    = ['B', 'KB', 'MB', 'GB', 'TB'];
        $pos  = 0;
        while ($size >= 1024) {// 计算单位 比较经典的用法
            $size /= 1024;
            $pos++;
        }
        return round($size, $dec) . " " . $a[$pos];// 显示 格式化 内存 数据
    }

    /**
     * 统计从开始到统计时的内存使用情况
     * @param integer|string $dec 小数位
     * @return string
     */
    public static function getUseMem($dec = 2)// 显示 内存 输出
    {
        $size = memory_get_usage() - THINK_START_MEM;
        $a    = ['B', 'KB', 'MB', 'GB', 'TB'];
        $pos  = 0;
        while ($size >= 1024) {
            $size /= 1024;
            $pos++;
        }
        return round($size, $dec) . " " . $a[$pos];
    }

    /**
     * 统计区间的内存峰值情况
     * @param string            $start 开始标签
     * @param string            $end 结束标签
     * @param integer|string    $dec 小数位
     * @return mixed
     */
    public static function getMemPeak($start, $end, $dec = 2)// 峰值消耗
    {
        if (!isset(self::$mem['peak'][$end])) {
            self::$mem['peak'][$end] = memory_get_peak_usage();
        }
        $size = self::$mem['peak'][$end] - self::$mem['peak'][$start];
        $a    = ['B', 'KB', 'MB', 'GB', 'TB'];
        $pos  = 0;
        while ($size >= 1024) {
            $size /= 1024;
            $pos++;
        }
        return round($size, $dec) . " " . $a[$pos];
    }

    /**
     * 获取文件加载信息
     * @param bool  $detail 是否显示详细
     * @return integer|array
     */
    public static function getFile($detail = false)// 获取文件加载信息
    {
        if ($detail) {
            $files = get_included_files();// 获取包含文件信息
            $info  = [];
            foreach ($files as $key => $file) {
                $info[] = $file . ' ( ' . number_format(filesize($file) / 1024, 2) . ' KB )';
            }
            return $info;// 文件大小
        }
        return count(get_included_files());
    }

    /**
     * 浏览器友好的变量输出
     * @param mixed         $var 变量
     * @param boolean       $echo 是否输出 默认为true 如果为false 则返回输出字符串
     * @param string        $label 标签 默认为空
     * @param integer       $flags htmlspecialchars flags
     * @return void|string
     */
    public static function dump($var, $echo = true, $label = null, $flags = ENT_SUBSTITUTE)
    {
        $label = (null === $label) ? '' : rtrim($label) . ':';// 友好输出
        ob_start();
        var_dump($var);
        $output = ob_get_clean();
        $output = preg_replace('/\]\=\>\n(\s+)/m', '] => ', $output);
        if (IS_CLI) {
            $output = PHP_EOL . $label . $output . PHP_EOL;
        } else {
            if (!extension_loaded('xdebug')) {
                $output = htmlspecialchars($output, $flags);
            }
            $output = '<pre>' . $label . $output . '</pre>';
        }
        if ($echo) {// 显示 是否 输出
            echo ($output);
            return null;
        } else {
            return $output;
        }
    }

    public static function inject(Response $response, &$content)
    {
        $config  = Config::get('trace');// 获取配置信息
        $type    = isset($config['type']) ? $config['type'] : 'Html';// 设置 了配置文件
        $request = Request::instance();// 请求 类型
        $class   = false !== strpos($type, '\\') ? $type : '\\think\\debug\\' . ucwords($type);// 类型位置
        unset($config['type']);// 删除配置信息
        if (class_exists($class)) {
            $trace = new $class($config);
        } else {
            throw new ClassNotFoundException('class not exists:' . $class, $class);
        }

        if ($response instanceof Redirect) {
            //TODO 记录
        } else {
            $output = $trace->output($response, Log::getLog());
            if (is_string($output)) {
                // trace调试信息注入
                $pos = strripos($content, '</body>');// 注入 信息
                if (false !== $pos) {// 位置 不为 空
                    $content = substr($content, 0, $pos) . $output . substr($content, $pos);// 注入到指定位置
                } else {
                    $content = $content . $output;// 尾部追加输出
                }
            }
        }
    }
}