BackTraceExplain.php

Go to the documentation of this file.

<?php
class BackTraceExplain
{
    const CONTEXT_LINES = 0;

    const SHOW_ARGUMENT_VALUE = false;

    protected static $aFileContent = array();

    protected static $iExplainId = 0;

    protected $iStartLevel = 0;

    protected $oBackTrace = null;

    protected $sScriptFunctionName = "";

    protected function __construct(){}

    protected function fetchArguments()
    {
        $aArgument = $this->oBackTrace->getArguments();
        if ( count( $aArgument ) == 0 )
        {
            return array();
        }
        $aReturn = array();
        foreach ( $aArgument as $mArgument )
        {
            switch( gettype( $mArgument ) )
            {
                case "array":
                    $sSummary = "array( " . count( $mArgument ) . " )";
                    break;
                case "boolean":
                    $sSummary = $mArgument == true ? "true" : "false";
                    break;
                case "double":
                case "integer":
                    $sSummary = self::SHOW_ARGUMENT_VALUE == true ? (string) $mArgument : "integer";
                    break;
                case "NULL":
                    $sSummary = "null";
                    break;
                case "object":
                    $sSummary = "object( " . htmlentities( get_class( $mArgument ) ) . " )";
                    break;
                case "resource":
                    $sSummary = "resource( " . htmlentities( strstr( $mArgument, "#" ) . " " . get_resource_type( $mArgument ) ) . " )";
                    break;
                case "string":
                    if ( self::SHOW_ARGUMENT_VALUE == true )
                    {
                        if ( strlen( $mArgument ) > 15 )
                        {
                            $mArgument = substr( $mArgument, 0, 12 ) . "...";
                        }
                        $sSummary = htmlentities( "\"" . $mArgument . "\"" );
                    }
                    else
                    {
                        $sSummary = "string( " . strlen( $mArgument ) . " )";
                    }
                    break;
                default:
                    $sSummary = "unknown type " . htmlentities( gettype( $mArgument ) );
                    break;
            }
            array_push( $aReturn, $sSummary );
        }
        return $aReturn;
    }

    protected function fetchCall()
    {
        if ( $this->oBackTrace->getScope() == BackTrace::SCOPE_FILE )
        {
            return "";
        }
        $iLevel = self::$iExplainId + $this->oBackTrace->getLevel();
        $sAnchor = "";
        $sArgument = "";
        foreach ( $this->fetchArguments() as $sSummary )
        {
            $sArgument .= ", " . $sSummary;
        }
        if ( $sArgument != "" )
        {
            $sArgument = substr( $sArgument, 1 ) . " ";
        }
        $sClass = $this->oBackTrace->getClass();
        $sType = $this->oBackTrace->getType();
        $sFunction = $this->oBackTrace->getFunction();
        return htmlentities( $sClass . $sType . $sFunction ) . "(" . $sArgument . ")";
    }

    protected function fetchLevel()
    {
        $sLocation = htmlentities( $this->oBackTrace->getFile() ) . " on line " . $this->oBackTrace->getLine();
        $sSource = $this->fetchSource();
        $sSourceId = "BackTraceExplainSource" . ( self::$iExplainId + $this->oBackTrace->getLevel() );
        if ( $sSource != "" )
        {
            $sLocation =
                "<a href=\"\" onclick=\"this.blur(); " . $this->sScriptFunctionName . "( '" . $sSourceId . "' ); return false;\">" .
                    $sLocation .
                "</a>";
        }
        return
            "<div class=\"traceCall\">" .
                $this->fetchCall() .
            "</div>" .
            "<div class=\"traceLocation\">" .
                $sLocation .
            "</div>" .
            "<div class=\"traceSource\" id=\"" . $sSourceId . "\">" .
                $sSource .
            "</div>";
    }

    protected function fetchSource()
    {
        $sFile = $this->oBackTrace->getFile();
        if ( self::CONTEXT_LINES == 0 || file_exists( $sFile ) == false || is_readable( $sFile ) == false )
        {
            return "";
        }
        # verifica se existe cache
        if ( array_key_exists( $sFile, self::$aFileContent ) == false )
        {
            self::$aFileContent[$sFile] = substr( highlight_string( file_get_contents( $sFile ), true ), 6, -7 );
        }
        $sSource = "";
        $aLine = explode( "<br />", self::$aFileContent[$sFile] );
        $iLine = $this->oBackTrace->getLine();
        # define linha inicial e final a ser exibida
        if ( self::CONTEXT_LINES < 0 )
        {
            $iLineStart = 1;
            $iLineEnd = count( $aLine );
        }
        else
        {
            $fEdge = ( self::CONTEXT_LINES - 1 ) / 3;
            $iLineStart = $iLine - ceil( $fEdge * 2 );
            $iLineEnd = $iLine + floor( $fEdge );
            if ( $iLineStart < 1 )
            {
                $iLineEnd += abs( $iLineStart ) + 1;
                $iLineStart = 1;
            }
            $iSourceLength = count( $aLine );
            if ( $iLineEnd > $iSourceLength )
            {
                $iLineStart -= $iLineEnd - $iSourceLength;
                if ( $iLineStart < 1 )
                {
                    $iLineStart = 1;
                }
                $iLineEnd = $iSourceLength;
            }
        }
        # monta texto de deteção da primeira linha, que precisa de tratamento especial
        $sFirstLineDetect = "<span style=\"color: #000000\">\n<span style=\"color: #0000BB\">";
        $iFirstLineDetectLength = strlen( $sFirstLineDetect );
        # percorre linhas de código
        foreach ( $aLine as $iCurrentLine => $sLineContent )
        {
            # trata linha corrente para contagem iniciar no número 1
            $iCurrentLine++;
            # verifica se linha deve estar visível
            if ( $iCurrentLine < $iLineStart || $iCurrentLine > $iLineEnd )
            {
                # remove todo conteúdo que existir entre duas marcações HTML
                $aMatch = array();
                preg_match_all( "(<[^>]+>)", $sLineContent, $aMatch );
                if ( count( $aMatch ) > 0 && is_array( $aMatch[0] ) === true )
                {
                    $sLineContent = str_replace( array( "<br/>", "&nbsp;", "\n" ), "", implode( "", $aMatch[0] ) );
                }
            }
            else
            {
                # verifica se é a primeira linha
                if ( substr( $sLineContent, 0, $iFirstLineDetectLength ) === $sFirstLineDetect )
                {
                    # retira o prefixo para evitar erros de tratamento do código
                    # o prefixo é adiciona de volta a linha ao final do tratamento da linha atual
                    $sLineContent = substr( $sLineContent, $iFirstLineDetectLength );
                    $sLinePrefix = $sFirstLineDetect;
                }
                else
                {
                    $sLinePrefix = "";
                }
                # prepara linha para que ela receba a numeração com uma classe de estilo
                # adiciona uma quebra de linha visível ao final da linha
                $sLineContent = "</span>" . $sLineContent . "<br/>";
                # verifica se linha deve ser destacada
                if ( $iCurrentLine !== $iLine )
                {
                    $sClass = "traceNumberLineOff";
                }
                else
                {
                    # destaca número da linha
                    # adiciona classe de estilo para destaque de todo conteúdo da linha
                    $sClass = "traceNumberLineOn";
                    $sLineContent = preg_replace( "/>([^<]*)</", "><span class=\"traceLineActive\">$1</span><", $sLineContent );
                }
                $sLineContent =
                    $sLinePrefix .
                    "<span class=\"" . $sClass . "\">" .
                        sprintf( "%0" . strlen( $iLineEnd ) . "d", $iCurrentLine ) .
                        $sLineContent;
            }
            $sSource .= $sLineContent;
        }
        return $sSource;
    }

    public static function perform( BackTrace $oBackTrace = null )
    {
        if ( $oBackTrace == null )
        {
            $oBackTrace = new BackTrace();
            $oBackTrace->levelDown();
        }
        $iOriginalLevel = $oBackTrace->getLevel();
        $oExplain = new self();
        $oExplain->oBackTrace = $oBackTrace;
        $oExplain->iStartLevel = $oBackTrace->getLevel();
        $oExplain->sScriptFunctionName = "BackTraceExplainFunction" . self::$iExplainId;
        $sTrace = "";
        do
        {
            $sTrace .=
                "<li class=\"traceLevel\">" .
                    $oExplain->fetchLevel() .
                "</li>";
        }
        while ( $oBackTrace->levelDown() == true );
        self::$iExplainId += $oBackTrace->getLevel() - $iOriginalLevel + 1;
        $oBackTrace->setLevel( $iOriginalLevel );
        $sDir = dirname( __FILE__ ) . "/resource/";
        return
            "<style type=\"text/css\">" .
                file_get_contents( $sDir . "style.css" ) .
            "</style>" .
            "<script type=\"text/javascript\">" .
                str_replace( "_TRACE_FUNCTION_", $oExplain->sScriptFunctionName, file_get_contents( $sDir . "script.js" ) ) .
            "</script>" .
            "<ol class=\"trace\">" .
                $sTrace .
            "</ol>";
    }
}