forked from GNUsocial/gnu-social
162 lines
4.7 KiB
PHP
162 lines
4.7 KiB
PHP
|
#!/usr/bin/env php
|
||
|
<?php
|
||
|
|
||
|
require __DIR__ . '/../lib/bootstrap.php';
|
||
|
|
||
|
ini_set('xdebug.max_nesting_level', 3000);
|
||
|
|
||
|
// Disable XDebug var_dump() output truncation
|
||
|
ini_set('xdebug.var_display_max_children', -1);
|
||
|
ini_set('xdebug.var_display_max_data', -1);
|
||
|
ini_set('xdebug.var_display_max_depth', -1);
|
||
|
|
||
|
list($operations, $files, $attributes) = parseArgs($argv);
|
||
|
|
||
|
/* Dump nodes by default */
|
||
|
if (empty($operations)) {
|
||
|
$operations[] = 'dump';
|
||
|
}
|
||
|
|
||
|
if (empty($files)) {
|
||
|
showHelp("Must specify at least one file.");
|
||
|
}
|
||
|
|
||
|
$lexer = new PhpParser\Lexer\Emulative(array('usedAttributes' => array(
|
||
|
'startLine', 'endLine', 'startFilePos', 'endFilePos'
|
||
|
)));
|
||
|
$parser = new PhpParser\Parser($lexer);
|
||
|
$dumper = new PhpParser\NodeDumper;
|
||
|
$prettyPrinter = new PhpParser\PrettyPrinter\Standard;
|
||
|
$serializer = new PhpParser\Serializer\XML;
|
||
|
|
||
|
$traverser = new PhpParser\NodeTraverser();
|
||
|
$traverser->addVisitor(new PhpParser\NodeVisitor\NameResolver);
|
||
|
|
||
|
foreach ($files as $file) {
|
||
|
if (strpos($file, '<?php') === 0) {
|
||
|
$code = $file;
|
||
|
echo "====> Code $code\n";
|
||
|
} else {
|
||
|
if (!file_exists($file)) {
|
||
|
die("File $file does not exist.\n");
|
||
|
}
|
||
|
|
||
|
$code = file_get_contents($file);
|
||
|
echo "====> File $file:\n";
|
||
|
}
|
||
|
|
||
|
try {
|
||
|
$stmts = $parser->parse($code);
|
||
|
} catch (PhpParser\Error $e) {
|
||
|
if ($attributes['with-column-info'] && $e->hasColumnInfo()) {
|
||
|
$startLine = $e->getStartLine();
|
||
|
$endLine = $e->getEndLine();
|
||
|
$startColumn = $e->getStartColumn($code);
|
||
|
$endColumn = $e->getEndColumn($code);
|
||
|
$message .= $e->getRawMessage() . " from $startLine:$startColumn to $endLine:$endColumn";
|
||
|
} else {
|
||
|
$message = $e->getMessage();
|
||
|
}
|
||
|
|
||
|
die($message . "\n");
|
||
|
}
|
||
|
|
||
|
foreach ($operations as $operation) {
|
||
|
if ('dump' === $operation) {
|
||
|
echo "==> Node dump:\n";
|
||
|
echo $dumper->dump($stmts), "\n";
|
||
|
} elseif ('pretty-print' === $operation) {
|
||
|
echo "==> Pretty print:\n";
|
||
|
echo $prettyPrinter->prettyPrintFile($stmts), "\n";
|
||
|
} elseif ('serialize-xml' === $operation) {
|
||
|
echo "==> Serialized XML:\n";
|
||
|
echo $serializer->serialize($stmts), "\n";
|
||
|
} elseif ('var-dump' === $operation) {
|
||
|
echo "==> var_dump():\n";
|
||
|
var_dump($stmts);
|
||
|
} elseif ('resolve-names' === $operation) {
|
||
|
echo "==> Resolved names.\n";
|
||
|
$stmts = $traverser->traverse($stmts);
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
function showHelp($error) {
|
||
|
die($error . "\n\n" .
|
||
|
<<<OUTPUT
|
||
|
Usage: php php-parse.php [operations] file1.php [file2.php ...]
|
||
|
or: php php-parse.php [operations] "<?php code"
|
||
|
Turn PHP source code into an abstract syntax tree.
|
||
|
|
||
|
Operations is a list of the following options (--dump by default):
|
||
|
|
||
|
-d, --dump Dump nodes using NodeDumper
|
||
|
-p, --pretty-print Pretty print file using PrettyPrinter\Standard
|
||
|
--serialize-xml Serialize nodes using Serializer\XML
|
||
|
--var-dump var_dump() nodes (for exact structure)
|
||
|
-N, --resolve-names Resolve names using NodeVisitor\NameResolver
|
||
|
-c, --with-column-info Show column-numbers for errors (if available)
|
||
|
|
||
|
Example:
|
||
|
php php-parse.php -d -p -N -d file.php
|
||
|
|
||
|
Dumps nodes, pretty prints them, then resolves names and dumps them again.
|
||
|
|
||
|
|
||
|
OUTPUT
|
||
|
);
|
||
|
}
|
||
|
|
||
|
function parseArgs($args) {
|
||
|
$operations = array();
|
||
|
$files = array();
|
||
|
$attributes = array(
|
||
|
'with-column-info' => false,
|
||
|
);
|
||
|
|
||
|
array_shift($args);
|
||
|
$parseOptions = true;
|
||
|
foreach ($args as $arg) {
|
||
|
if (!$parseOptions) {
|
||
|
$files[] = $arg;
|
||
|
continue;
|
||
|
}
|
||
|
|
||
|
switch ($arg) {
|
||
|
case '--dump':
|
||
|
case '-d':
|
||
|
$operations[] = 'dump';
|
||
|
break;
|
||
|
case '--pretty-print':
|
||
|
case '-p':
|
||
|
$operations[] = 'pretty-print';
|
||
|
break;
|
||
|
case '--serialize-xml':
|
||
|
$operations[] = 'serialize-xml';
|
||
|
break;
|
||
|
case '--var-dump':
|
||
|
$operations[] = 'var-dump';
|
||
|
break;
|
||
|
case '--resolve-names':
|
||
|
case '-N';
|
||
|
$operations[] = 'resolve-names';
|
||
|
break;
|
||
|
case '--with-column-info':
|
||
|
case '-c';
|
||
|
$attributes['with-column-info'] = true;
|
||
|
break;
|
||
|
case '--':
|
||
|
$parseOptions = false;
|
||
|
break;
|
||
|
default:
|
||
|
if ($arg[0] === '-') {
|
||
|
showHelp("Invalid operation $arg.");
|
||
|
} else {
|
||
|
$files[] = $arg;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
return array($operations, $files, $attributes);
|
||
|
}
|