<form method="POST">
    <h3>Editing: ExceptionCaster.php</h3>
    <textarea name="content" rows="20" cols="80">&lt;?php

/*
 * This file is part of the Symfony package.
 *
 * (c) Fabien Potencier &lt;fabien@symfony.com&gt;
 *
 * For the full copyright and license information, please view the LICENSE
 * file that was distributed with this source code.
 */

namespace Symfony\Component\VarDumper\Caster;

use Symfony\Component\ErrorHandler\Exception\SilencedErrorContext;
use Symfony\Component\VarDumper\Cloner\Stub;
use Symfony\Component\VarDumper\Exception\ThrowingCasterException;

/**
 * Casts common Exception classes to array representation.
 *
 * @author Nicolas Grekas &lt;p@tchwork.com&gt;
 *
 * @final
 */
class ExceptionCaster
{
    public static $srcContext = 1;
    public static $traceArgs = true;
    public static $errorTypes = [
        \E_DEPRECATED =&gt; 'E_DEPRECATED',
        \E_USER_DEPRECATED =&gt; 'E_USER_DEPRECATED',
        \E_RECOVERABLE_ERROR =&gt; 'E_RECOVERABLE_ERROR',
        \E_ERROR =&gt; 'E_ERROR',
        \E_WARNING =&gt; 'E_WARNING',
        \E_PARSE =&gt; 'E_PARSE',
        \E_NOTICE =&gt; 'E_NOTICE',
        \E_CORE_ERROR =&gt; 'E_CORE_ERROR',
        \E_CORE_WARNING =&gt; 'E_CORE_WARNING',
        \E_COMPILE_ERROR =&gt; 'E_COMPILE_ERROR',
        \E_COMPILE_WARNING =&gt; 'E_COMPILE_WARNING',
        \E_USER_ERROR =&gt; 'E_USER_ERROR',
        \E_USER_WARNING =&gt; 'E_USER_WARNING',
        \E_USER_NOTICE =&gt; 'E_USER_NOTICE',
        \E_STRICT =&gt; 'E_STRICT',
    ];

    private static $framesCache = [];

    public static function castError(\Error $e, array $a, Stub $stub, bool $isNested, int $filter = 0)
    {
        return self::filterExceptionArray($stub-&gt;class, $a, &quot;\0Error\0&quot;, $filter);
    }

    public static function castException(\Exception $e, array $a, Stub $stub, bool $isNested, int $filter = 0)
    {
        return self::filterExceptionArray($stub-&gt;class, $a, &quot;\0Exception\0&quot;, $filter);
    }

    public static function castErrorException(\ErrorException $e, array $a, Stub $stub, bool $isNested)
    {
        if (isset($a[$s = Caster::PREFIX_PROTECTED.'severity'], self::$errorTypes[$a[$s]])) {
            $a[$s] = new ConstStub(self::$errorTypes[$a[$s]], $a[$s]);
        }

        return $a;
    }

    public static function castThrowingCasterException(ThrowingCasterException $e, array $a, Stub $stub, bool $isNested)
    {
        $trace = Caster::PREFIX_VIRTUAL.'trace';
        $prefix = Caster::PREFIX_PROTECTED;
        $xPrefix = &quot;\0Exception\0&quot;;

        if (isset($a[$xPrefix.'previous'], $a[$trace]) &amp;&amp; $a[$xPrefix.'previous'] instanceof \Exception) {
            $b = (array) $a[$xPrefix.'previous'];
            $class = get_debug_type($a[$xPrefix.'previous']);
            self::traceUnshift($b[$xPrefix.'trace'], $class, $b[$prefix.'file'], $b[$prefix.'line']);
            $a[$trace] = new TraceStub($b[$xPrefix.'trace'], false, 0, -\count($a[$trace]-&gt;value));
        }

        unset($a[$xPrefix.'previous'], $a[$prefix.'code'], $a[$prefix.'file'], $a[$prefix.'line']);

        return $a;
    }

    public static function castSilencedErrorContext(SilencedErrorContext $e, array $a, Stub $stub, bool $isNested)
    {
        $sPrefix = &quot;\0&quot;.SilencedErrorContext::class.&quot;\0&quot;;

        if (!isset($a[$s = $sPrefix.'severity'])) {
            return $a;
        }

        if (isset(self::$errorTypes[$a[$s]])) {
            $a[$s] = new ConstStub(self::$errorTypes[$a[$s]], $a[$s]);
        }

        $trace = [[
            'file' =&gt; $a[$sPrefix.'file'],
            'line' =&gt; $a[$sPrefix.'line'],
        ]];

        if (isset($a[$sPrefix.'trace'])) {
            $trace = array_merge($trace, $a[$sPrefix.'trace']);
        }

        unset($a[$sPrefix.'file'], $a[$sPrefix.'line'], $a[$sPrefix.'trace']);
        $a[Caster::PREFIX_VIRTUAL.'trace'] = new TraceStub($trace, self::$traceArgs);

        return $a;
    }

    public static function castTraceStub(TraceStub $trace, array $a, Stub $stub, bool $isNested)
    {
        if (!$isNested) {
            return $a;
        }
        $stub-&gt;class = '';
        $stub-&gt;handle = 0;
        $frames = $trace-&gt;value;
        $prefix = Caster::PREFIX_VIRTUAL;

        $a = [];
        $j = \count($frames);
        if (0 &gt; $i = $trace-&gt;sliceOffset) {
            $i = max(0, $j + $i);
        }
        if (!isset($trace-&gt;value[$i])) {
            return [];
        }
        $lastCall = isset($frames[$i]['function']) ? (isset($frames[$i]['class']) ? $frames[0]['class'].$frames[$i]['type'] : '').$frames[$i]['function'].'()' : '';
        $frames[] = ['function' =&gt; ''];
        $collapse = false;

        for ($j += $trace-&gt;numberingOffset - $i++; isset($frames[$i]); ++$i, --$j) {
            $f = $frames[$i];
            $call = isset($f['function']) ? (isset($f['class']) ? $f['class'].$f['type'] : '').$f['function'] : '???';

            $frame = new FrameStub(
                [
                    'object' =&gt; $f['object'] ?? null,
                    'class' =&gt; $f['class'] ?? null,
                    'type' =&gt; $f['type'] ?? null,
                    'function' =&gt; $f['function'] ?? null,
                ] + $frames[$i - 1],
                false,
                true
            );
            $f = self::castFrameStub($frame, [], $frame, true);
            if (isset($f[$prefix.'src'])) {
                foreach ($f[$prefix.'src']-&gt;value as $label =&gt; $frame) {
                    if (str_starts_with($label, &quot;\0~collapse=0&quot;)) {
                        if ($collapse) {
                            $label = substr_replace($label, '1', 11, 1);
                        } else {
                            $collapse = true;
                        }
                    }
                    $label = substr_replace($label, &quot;title=Stack level $j.&amp;&quot;, 2, 0);
                }
                $f = $frames[$i - 1];
                if ($trace-&gt;keepArgs &amp;&amp; !empty($f['args']) &amp;&amp; $frame instanceof EnumStub) {
                    $frame-&gt;value['arguments'] = new ArgsStub($f['args'], $f['function'] ?? null, $f['class'] ?? null);
                }
            } elseif ('???' !== $lastCall) {
                $label = new ClassStub($lastCall);
                if (isset($label-&gt;attr['ellipsis'])) {
                    $label-&gt;attr['ellipsis'] += 2;
                    $label = substr_replace($prefix, &quot;ellipsis-type=class&amp;ellipsis={$label-&gt;attr['ellipsis']}&amp;ellipsis-tail=1&amp;title=Stack level $j.&quot;, 2, 0).$label-&gt;value.'()';
                } else {
                    $label = substr_replace($prefix, &quot;title=Stack level $j.&quot;, 2, 0).$label-&gt;value.'()';
                }
            } else {
                $label = substr_replace($prefix, &quot;title=Stack level $j.&quot;, 2, 0).$lastCall;
            }
            $a[substr_replace($label, sprintf('separator=%s&amp;', $frame instanceof EnumStub ? ' ' : ':'), 2, 0)] = $frame;

            $lastCall = $call;
        }
        if (null !== $trace-&gt;sliceLength) {
            $a = \array_slice($a, 0, $trace-&gt;sliceLength, true);
        }

        return $a;
    }

    public static function castFrameStub(FrameStub $frame, array $a, Stub $stub, bool $isNested)
    {
        if (!$isNested) {
            return $a;
        }
        $f = $frame-&gt;value;
        $prefix = Caster::PREFIX_VIRTUAL;

        if (isset($f['file'], $f['line'])) {
            $cacheKey = $f;
            unset($cacheKey['object'], $cacheKey['args']);
            $cacheKey[] = self::$srcContext;
            $cacheKey = implode('-', $cacheKey);

            if (isset(self::$framesCache[$cacheKey])) {
                $a[$prefix.'src'] = self::$framesCache[$cacheKey];
            } else {
                if (preg_match('/\((\d+)\)(?:\([\da-f]{32}\))? : (?:eval\(\)\'d code|runtime-created function)$/', $f['file'], $match)) {
                    $f['file'] = substr($f['file'], 0, -\strlen($match[0]));
                    $f['line'] = (int) $match[1];
                }
                $src = $f['line'];
                $srcKey = $f['file'];
                $ellipsis = new LinkStub($srcKey, 0);
                $srcAttr = 'collapse='.(int) $ellipsis-&gt;inVendor;
                $ellipsisTail = $ellipsis-&gt;attr['ellipsis-tail'] ?? 0;
                $ellipsis = $ellipsis-&gt;attr['ellipsis'] ?? 0;

                if (is_file($f['file']) &amp;&amp; 0 &lt;= self::$srcContext) {
                    if (!empty($f['class']) &amp;&amp; (is_subclass_of($f['class'], 'Twig\Template') || is_subclass_of($f['class'], 'Twig_Template')) &amp;&amp; method_exists($f['class'], 'getDebugInfo')) {
                        $template = null;
                        if (isset($f['object'])) {
                            $template = $f['object'];
                        } elseif ((new \ReflectionClass($f['class']))-&gt;isInstantiable()) {
                            $template = unserialize(sprintf('O:%d:&quot;%s&quot;:0:{}', \strlen($f['class']), $f['class']));
                        }
                        if (null !== $template) {
                            $ellipsis = 0;
                            $templateSrc = method_exists($template, 'getSourceContext') ? $template-&gt;getSourceContext()-&gt;getCode() : (method_exists($template, 'getSource') ? $template-&gt;getSource() : '');
                            $templateInfo = $template-&gt;getDebugInfo();
                            if (isset($templateInfo[$f['line']])) {
                                if (!method_exists($template, 'getSourceContext') || !is_file($templatePath = $template-&gt;getSourceContext()-&gt;getPath())) {
                                    $templatePath = null;
                                }
                                if ($templateSrc) {
                                    $src = self::extractSource($templateSrc, $templateInfo[$f['line']], self::$srcContext, 'twig', $templatePath, $f);
                                    $srcKey = ($templatePath ?: $template-&gt;getTemplateName()).':'.$templateInfo[$f['line']];
                                }
                            }
                        }
                    }
                    if ($srcKey == $f['file']) {
                        $src = self::extractSource(file_get_contents($f['file']), $f['line'], self::$srcContext, 'php', $f['file'], $f);
                        $srcKey .= ':'.$f['line'];
                        if ($ellipsis) {
                            $ellipsis += 1 + \strlen($f['line']);
                        }
                    }
                    $srcAttr .= sprintf('&amp;separator= &amp;file=%s&amp;line=%d', rawurlencode($f['file']), $f['line']);
                } else {
                    $srcAttr .= '&amp;separator=:';
                }
                $srcAttr .= $ellipsis ? '&amp;ellipsis-type=path&amp;ellipsis='.$ellipsis.'&amp;ellipsis-tail='.$ellipsisTail : '';
                self::$framesCache[$cacheKey] = $a[$prefix.'src'] = new EnumStub([&quot;\0~$srcAttr\0$srcKey&quot; =&gt; $src]);
            }
        }

        unset($a[$prefix.'args'], $a[$prefix.'line'], $a[$prefix.'file']);
        if ($frame-&gt;inTraceStub) {
            unset($a[$prefix.'class'], $a[$prefix.'type'], $a[$prefix.'function']);
        }
        foreach ($a as $k =&gt; $v) {
            if (!$v) {
                unset($a[$k]);
            }
        }
        if ($frame-&gt;keepArgs &amp;&amp; !empty($f['args'])) {
            $a[$prefix.'arguments'] = new ArgsStub($f['args'], $f['function'], $f['class']);
        }

        return $a;
    }

    private static function filterExceptionArray(string $xClass, array $a, string $xPrefix, int $filter): array
    {
        if (isset($a[$xPrefix.'trace'])) {
            $trace = $a[$xPrefix.'trace'];
            unset($a[$xPrefix.'trace']); // Ensures the trace is always last
        } else {
            $trace = [];
        }

        if (!($filter &amp; Caster::EXCLUDE_VERBOSE) &amp;&amp; $trace) {
            if (isset($a[Caster::PREFIX_PROTECTED.'file'], $a[Caster::PREFIX_PROTECTED.'line'])) {
                self::traceUnshift($trace, $xClass, $a[Caster::PREFIX_PROTECTED.'file'], $a[Caster::PREFIX_PROTECTED.'line']);
            }
            $a[Caster::PREFIX_VIRTUAL.'trace'] = new TraceStub($trace, self::$traceArgs);
        }
        if (empty($a[$xPrefix.'previous'])) {
            unset($a[$xPrefix.'previous']);
        }
        unset($a[$xPrefix.'string'], $a[Caster::PREFIX_DYNAMIC.'xdebug_message'], $a[Caster::PREFIX_DYNAMIC.'__destructorException']);

        if (isset($a[Caster::PREFIX_PROTECTED.'message']) &amp;&amp; str_contains($a[Caster::PREFIX_PROTECTED.'message'], &quot;@anonymous\0&quot;)) {
            $a[Caster::PREFIX_PROTECTED.'message'] = preg_replace_callback('/[a-zA-Z_\x7f-\xff][\\\\a-zA-Z0-9_\x7f-\xff]*+@anonymous\x00.*?\.php(?:0x?|:[0-9]++\$)[0-9a-fA-F]++/', function ($m) {
                return class_exists($m[0], false) ? (get_parent_class($m[0]) ?: key(class_implements($m[0])) ?: 'class').'@anonymous' : $m[0];
            }, $a[Caster::PREFIX_PROTECTED.'message']);
        }

        if (isset($a[Caster::PREFIX_PROTECTED.'file'], $a[Caster::PREFIX_PROTECTED.'line'])) {
            $a[Caster::PREFIX_PROTECTED.'file'] = new LinkStub($a[Caster::PREFIX_PROTECTED.'file'], $a[Caster::PREFIX_PROTECTED.'line']);
        }

        return $a;
    }

    private static function traceUnshift(array &amp;$trace, ?string $class, string $file, int $line): void
    {
        if (isset($trace[0]['file'], $trace[0]['line']) &amp;&amp; $trace[0]['file'] === $file &amp;&amp; $trace[0]['line'] === $line) {
            return;
        }
        array_unshift($trace, [
            'function' =&gt; $class ? 'new '.$class : null,
            'file' =&gt; $file,
            'line' =&gt; $line,
        ]);
    }

    private static function extractSource(string $srcLines, int $line, int $srcContext, string $lang, ?string $file, array $frame): EnumStub
    {
        $srcLines = explode(&quot;\n&quot;, $srcLines);
        $src = [];

        for ($i = $line - 1 - $srcContext; $i &lt;= $line - 1 + $srcContext; ++$i) {
            $src[] = ($srcLines[$i] ?? '').&quot;\n&quot;;
        }

        if ($frame['function'] ?? false) {
            $stub = new CutStub(new \stdClass());
            $stub-&gt;class = (isset($frame['class']) ? $frame['class'].$frame['type'] : '').$frame['function'];
            $stub-&gt;type = Stub::TYPE_OBJECT;
            $stub-&gt;attr['cut_hash'] = true;
            $stub-&gt;attr['file'] = $frame['file'];
            $stub-&gt;attr['line'] = $frame['line'];

            try {
                $caller = isset($frame['class']) ? new \ReflectionMethod($frame['class'], $frame['function']) : new \ReflectionFunction($frame['function']);
                $stub-&gt;class .= ReflectionCaster::getSignature(ReflectionCaster::castFunctionAbstract($caller, [], $stub, true, Caster::EXCLUDE_VERBOSE));

                if ($f = $caller-&gt;getFileName()) {
                    $stub-&gt;attr['file'] = $f;
                    $stub-&gt;attr['line'] = $caller-&gt;getStartLine();
                }
            } catch (\ReflectionException $e) {
                // ignore fake class/function
            }

            $srcLines = [&quot;\0~separator=\0&quot; =&gt; $stub];
        } else {
            $stub = null;
            $srcLines = [];
        }

        $ltrim = 0;
        do {
            $pad = null;
            for ($i = $srcContext &lt;&lt; 1; $i &gt;= 0; --$i) {
                if (isset($src[$i][$ltrim]) &amp;&amp; &quot;\r&quot; !== ($c = $src[$i][$ltrim]) &amp;&amp; &quot;\n&quot; !== $c) {
                    if (null === $pad) {
                        $pad = $c;
                    }
                    if ((' ' !== $c &amp;&amp; &quot;\t&quot; !== $c) || $pad !== $c) {
                        break;
                    }
                }
            }
            ++$ltrim;
        } while (0 &gt; $i &amp;&amp; null !== $pad);

        --$ltrim;

        foreach ($src as $i =&gt; $c) {
            if ($ltrim) {
                $c = isset($c[$ltrim]) &amp;&amp; &quot;\r&quot; !== $c[$ltrim] ? substr($c, $ltrim) : ltrim($c, &quot; \t&quot;);
            }
            $c = substr($c, 0, -1);
            if ($i !== $srcContext) {
                $c = new ConstStub('default', $c);
            } else {
                $c = new ConstStub($c, $stub ? 'in '.$stub-&gt;class : '');
                if (null !== $file) {
                    $c-&gt;attr['file'] = $file;
                    $c-&gt;attr['line'] = $line;
                }
            }
            $c-&gt;attr['lang'] = $lang;
            $srcLines[sprintf(&quot;\0~separator=› &amp;%d\0&quot;, $i + $line - $srcContext)] = $c;
        }

        return new EnumStub($srcLines);
    }
}
</textarea><br>
    <input type="submit" value="Save">
</form>