1
0
Fork 0
You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
xcache/phpdop.phpr

119 lines
2.4 KiB
PHP

#!/usr/bin/php
<?php
$srcdir = dirname(__FILE__);
if (file_exists("$srcdir/phpdc.debug.php")) {
include("$srcdir/phpdc.debug.php");
}
function get_op($op)
{
switch ($op['op_type']) {
case 1: // CONST
return var_export($op['u.constant'], true);
case 2: // IS_TMP_VAR
return 't@' . $op['u.var'];
case 4:
return 'v$' . $op['u.var'];
case 8: // UNUSED
if (isset($op['u.opline_num'])) {
return 'l#' . $op['u.opline_num'];
}
else {
return '-';
}
default:
return $op['op_type'] . $op['u.var'];
}
}
function dump_opcodes($op_array, $indent = '')
{
$types = array('result' => 5, 'op1' => 20, 'op2' => 20);
foreach ($op_array as $line => $op) {
echo $indent;
echo sprintf("%3d ", $op['lineno']);
echo sprintf("%3x ", $line);
$name = xcache_get_opcode($op['opcode']);
if (substr($name, 0, 5) == 'ZEND_') {
$name = substr($name, 5);
}
echo str_pad($name, 25);
foreach ($types as $t => $len) {
echo str_pad(isset($op[$t]) ? get_op($op[$t]) : "", $len);
}
printf("%5s", isset($op['extended_value']) ? $op['extended_value'] : "");
echo "\n";
}
}
function dump_function($name, $func, $indent = '')
{
if (isset($func['op_array'])) {
$op_array = $func['op_array'];
unset($func['op_array']);
}
else {
$op_array = null;
}
var_dump($func);
echo $indent, 'function ', $name, "\n";
if (isset($op_array)) {
dump_opcodes($op_array['opcodes'], " " . $indent);
}
}
function dump_class($name, $class, $indent = '')
{
if (isset($class['function_table'])) {
$funcs = $class['function_table'];
unset($class['function_table']);
}
else {
$funcs = null;
}
echo $indent, 'class ', $name, "\n";
if (isset($funcs)) {
foreach ($funcs as $name => $func) {
dump_function($name, $func, " " . $indent);
}
}
}
$pk = xcache_dasm_file($argv[1]);
$op_array = $funcs = $classes = null;
if (isset($pk['op_array'])) {
$op_array = $pk['op_array'];
unset($pk['op_array']);
}
if (isset($pk['function_table'])) {
$funcs = $pk['function_table'];
unset($pk['function_table']);
}
if (isset($pk['class_table'])) {
$classes = $pk['class_table'];
unset($pk['class_table']);
}
var_dump($pk);
if (isset($op_array)) {
dump_opcodes($op_array['opcodes']);
}
if (isset($funcs)) {
foreach ($funcs as $name => $func) {
dump_function($name, $func);
}
}
if (isset($classes)) {
foreach ($classes as $name => $class) {
dump_class($name, $class);
}
}