nabble/ajde

<?php

class Ajde_Core_Autoloader_Combinator
{
    public static function generate($class, $extends, $source_class, $source_extends)
    {
        $reflector = new ReflectionClass($source_class);

        $source_contents = $reflector->getFileName();
        $source_contents = file_get_contents($source_contents);

        $contents = str_replace(
            '<?php',
            '',
            $source_contents
        );

        $contents = str_replace(
            "abstract class $source_class ",
            "abstract class $class ",
            $contents
        );

        $contents = str_replace(
            " extends $source_extends",
            " extends $extends",
            $contents
        );

        $return = eval($contents);

        if ($return === false) {
            var_dump(self::php_syntax_error($contents));
            throw new Ajde_Exception('Dynamic class creation of '.$class.' failed');
        }
    }

    /**
     * @see http://stackoverflow.com/a/3224985/938297
     *
     * Check the syntax of some PHP code.
     *
     * @param string $code PHP code to check.
     *
     * @return bool|array If false, then check was successful, otherwise an array(message,line) of errors is
     *                    returned.
     */
    public static function php_syntax_error($code)
    {
        $braces = 0;
        $inString = 0;
        foreach (token_get_all('<?php '.$code) as $token) {
            if (is_array($token)) {
                switch ($token[0]) {
                    case T_CURLY_OPEN:
                    case T_DOLLAR_OPEN_CURLY_BRACES:
                    case T_START_HEREDOC:
                        ++$inString;
                        break;
                    case T_END_HEREDOC:
                        --$inString;
                        break;
                }
            } else {
                if ($inString & 1) {
                    switch ($token) {
                        case '`':
                        case '\'':
                        case '"':
                            --$inString;
                            break;
                    }
                } else {
                    switch ($token) {
                        case '`':
                        case '\'':
                        case '"':
                            ++$inString;
                            break;
                        case '{':
                            ++$braces;
                            break;
                        case '}':
                            if ($inString) {
                                --$inString;
                            } else {
                                --$braces;
                                if ($braces < 0) {
                                    break 2;
                                }
                            }
                            break;
                    }
                }
            }
        }
        $inString = @ini_set('log_errors', false);
        $token = @ini_set('display_errors', true);
        ob_start();
        $braces || $code = "if(0){{$code}\n}";
        if (eval($code) === false) {
            if ($braces) {
                $braces = PHP_INT_MAX;
            } else {
                false !== strpos($code, CR) && $code = strtr(str_replace(CRLF, LF, $code), CR, LF);
                $braces = substr_count($code, LF);
            }
            $code = ob_get_clean();
            $code = strip_tags($code);
            if (preg_match("'syntax error, (.+) in .+ on line \d+)$'s", $code, $code)) {
                $code[2] = (int) $code[2];
                $code = $code[2] <= $braces
                    ? [$code[1], $code[2]]
                    : ['unexpected $end'.substr($code[1], 14), $braces];
            } else {
                $code = ['syntax error', 0];
            }
        } else {
            ob_end_clean();
            $code = false;
        }
        @ini_set('display_errors', $token);
        @ini_set('log_errors', $inString);

        return $code;
    }
}