Latte\PhpHelpers::reformatCode PHP Method

    public static function reformatCode($source)
    {
        $res = $php = '';
        $lastChar = ';';
        $tokens = new \ArrayIterator(token_get_all($source));
        $level = $openLevel = 0;
        $lineLength = 100;
        foreach ($tokens as $n => $token) {
            if (is_array($token)) {
                list($name, $token) = $tmp = $token;
                if ($name === T_INLINE_HTML) {
                    $res .= $token;
                } elseif ($name === T_OPEN_TAG) {
                    $openLevel = $level;
                } elseif ($name === T_CLOSE_TAG) {
                    $next = isset($tokens[$n + 1]) ? $tokens[$n + 1] : NULL;
                    if (is_array($next) && $next[0] === T_OPEN_TAG) {
                        // remove ?)<?php
                        if (!strspn($lastChar, ';{}:/')) {
                            $php = rtrim($php) . ($lastChar = ';') . "\n" . str_repeat("\t", $level);
                        } elseif (substr($next[1], -1) === "\n") {
                            $php .= "\n" . str_repeat("\t", $level);
                        }
                        $tokens->next();
                    } else {
                        if (trim($php) !== '' || substr($res, -1) === '<') {
                            // skip <?php ?) but preserve <<?php
                            $inline = strpos($php, "\n") === FALSE && strlen($res) - strrpos($res, "\n") < $lineLength;
                            $res .= '<?php' . ($inline ? ' ' : "\n" . str_repeat("\t", $openLevel));
                            if (strpos($next[1], "\n") === FALSE) {
                                $token = rtrim($token, "\n");
                            } else {
                                $php = rtrim($php, "\t");
                            }
                            $res .= $php . $token;
                        }
                        $php = '';
                        $lastChar = ';';
                    }
                } elseif ($name === T_ELSE || $name === T_ELSEIF) {
                    if ($tokens[$n + 1] === ':' && $lastChar === '}') {
                        $php .= ';';
                        // semicolon needed in if(): ... if() ... else:
                    }
                    $lastChar = '';
                    $php .= $token;
                } elseif ($name === T_DOC_COMMENT || $name === T_COMMENT) {
                    $php .= preg_replace("#\n[ \t]*+(?!\n)#", "\n" . str_repeat("\t", $level), $token);
                } elseif ($name === T_WHITESPACE) {
                    $prev = $tokens[$n - 1];
                    $lines = substr_count($token, "\n");
                    if ($prev === '{' || $prev === '}' || $prev === ';' || $lines) {
                        $token = str_repeat("\n", max(1, $lines)) . str_repeat("\t", $level);
                        // indent last line
                    } elseif ($prev[0] === T_OPEN_TAG) {
                        $token = '';
                    }
                    $php .= $token;
                } else {
                    if (in_array($name, [T_CURLY_OPEN, T_DOLLAR_OPEN_CURLY_BRACES], TRUE)) {
                        $level++;
                    }
                    $lastChar = '';
                    $php .= $token;
                }
            } else {
                if ($token === '{' || $token === '[') {
                    $level++;
                } elseif ($token === '}' || $token === ']') {
                    $level--;
                    $php .= "";
                } elseif ($token === ';' && !(isset($tokens[$n + 1]) && $tokens[$n + 1][0] === T_WHITESPACE)) {
                    $token .= "\n" . str_repeat("\t", $level);
                    // indent last line
                }
                $lastChar = $token;
                $php .= $token;
            }
        }
        if ($php) {
            $res .= "<?php\n" . str_repeat("\t", $openLevel) . $php;
        }
        $res = str_replace(["\t", ""], '', $res);
        return $res;
    }