disassembler/decompiler: fix multiline array and indention
git-svn-id: svn://svn.lighttpd.net/xcache/trunk@732 c26eb9a1-5813-0410-bd6c-c2e55f420ca7
This commit is contained in:
Xuefer
parent
d4419514a0
commit
9d6ca9871d
|
|
@ -8,36 +8,18 @@ function color($str, $color = 33)
|
|||
return "\x1B[{$color}m$str\x1B[0m";
|
||||
}
|
||||
|
||||
function str($src, $indent = '') // {{{
|
||||
function toCode($src, $indent = '') // {{{
|
||||
{
|
||||
if (is_array($indent)) {
|
||||
$indent = $indent['indent'];
|
||||
}
|
||||
|
||||
/*
|
||||
$e = xcache_get_special_value($src);
|
||||
if (isset($e)) {
|
||||
if (is_array($e)) {
|
||||
$src = $e;
|
||||
}
|
||||
else {
|
||||
return $e;
|
||||
}
|
||||
}
|
||||
*/
|
||||
|
||||
if (is_array($src)) {
|
||||
exit('array str');
|
||||
$src = new Decompiler_Array($src, $indent);
|
||||
return $src->__toString();
|
||||
}
|
||||
|
||||
if (is_object($src)) {
|
||||
if (!method_exists($src, '__toString')) {
|
||||
if (!method_exists($src, 'toCode')) {
|
||||
var_dump($src);
|
||||
exit('no __toString');
|
||||
exit('no toCode');
|
||||
}
|
||||
return $src->__toString();
|
||||
return $src->toCode($indent);
|
||||
}
|
||||
|
||||
return $src;
|
||||
|
|
@ -79,7 +61,7 @@ class Decompiler_Value extends Decompiler_Object // {{{
|
|||
$this->value = $value;
|
||||
}
|
||||
|
||||
function __toString()
|
||||
function toCode($indent)
|
||||
{
|
||||
return var_export($this->value, true);
|
||||
}
|
||||
|
|
@ -94,7 +76,7 @@ class Decompiler_Code extends Decompiler_Object // {{{
|
|||
$this->src = $src;
|
||||
}
|
||||
|
||||
function __toString()
|
||||
function toCode($indent)
|
||||
{
|
||||
return $this->src;
|
||||
}
|
||||
|
|
@ -106,6 +88,7 @@ class Decompiler_Binop extends Decompiler_Code // {{{
|
|||
var $op1;
|
||||
var $op2;
|
||||
var $parent;
|
||||
var $indent;
|
||||
|
||||
function Decompiler_Binop($parent, $op1, $opc, $op2)
|
||||
{
|
||||
|
|
@ -115,17 +98,17 @@ class Decompiler_Binop extends Decompiler_Code // {{{
|
|||
$this->op2 = $op2;
|
||||
}
|
||||
|
||||
function __toString()
|
||||
function toCode($indent)
|
||||
{
|
||||
$op1 = str($this->op1);
|
||||
$op1 = toCode($this->op1, $indent);
|
||||
if (is_a($this->op1, 'Decompiler_Binop') && $this->op1->opc != $this->opc) {
|
||||
$op1 = "($op1)";
|
||||
}
|
||||
$opstr = $this->parent->binops[$this->opc];
|
||||
if ($op1 == '0' && $this->opc == XC_SUB) {
|
||||
return $opstr . str($this->op2);
|
||||
return $opstr . toCode($this->op2, $indent);
|
||||
}
|
||||
return $op1 . ' ' . $opstr . ' ' . str($this->op2);
|
||||
return $op1 . ' ' . $opstr . ' ' . toCode($this->op2, $indent);
|
||||
}
|
||||
}
|
||||
// }}}
|
||||
|
|
@ -141,7 +124,7 @@ class Decompiler_Fetch extends Decompiler_Code // {{{
|
|||
$this->globalsrc = $globalsrc;
|
||||
}
|
||||
|
||||
function __toString()
|
||||
function toCode($indent)
|
||||
{
|
||||
switch ($this->fetchType) {
|
||||
case ZEND_FETCH_LOCAL:
|
||||
|
|
@ -167,9 +150,9 @@ class Decompiler_Box // {{{
|
|||
$this->obj = &$obj;
|
||||
}
|
||||
|
||||
function __toString()
|
||||
function toCode($indent)
|
||||
{
|
||||
return $this->obj->__toString();
|
||||
return $this->obj->toCode($indent);
|
||||
}
|
||||
}
|
||||
// }}}
|
||||
|
|
@ -179,16 +162,16 @@ class Decompiler_Dim extends Decompiler_Value // {{{
|
|||
var $isLast = false;
|
||||
var $assign = null;
|
||||
|
||||
function __toString()
|
||||
function toCode($indent)
|
||||
{
|
||||
if (is_a($this->value, 'Decompiler_ListBox')) {
|
||||
$exp = str($this->value->obj->src);
|
||||
$exp = toCode($this->value->obj->src, $indent);
|
||||
}
|
||||
else {
|
||||
$exp = str($this->value);
|
||||
$exp = toCode($this->value, $indent);
|
||||
}
|
||||
foreach ($this->offsets as $dim) {
|
||||
$exp .= '[' . str($dim) . ']';
|
||||
$exp .= '[' . toCode($dim, $indent) . ']';
|
||||
}
|
||||
return $exp;
|
||||
}
|
||||
|
|
@ -204,16 +187,16 @@ class Decompiler_List extends Decompiler_Code // {{{
|
|||
var $dims = array();
|
||||
var $everLocked = false;
|
||||
|
||||
function __toString()
|
||||
function toCode($indent)
|
||||
{
|
||||
if (count($this->dims) == 1 && !$this->everLocked) {
|
||||
$dim = $this->dims[0];
|
||||
unset($dim->value);
|
||||
$dim->value = $this->src;
|
||||
if (!isset($dim->assign)) {
|
||||
return str($dim);
|
||||
return toCode($dim, $indent);
|
||||
}
|
||||
return str($this->dims[0]->assign) . ' = ' . str($dim);
|
||||
return toCode($this->dims[0]->assign, $indent) . ' = ' . toCode($dim, $indent);
|
||||
}
|
||||
/* flatten dims */
|
||||
$assigns = array();
|
||||
|
|
@ -222,9 +205,9 @@ class Decompiler_List extends Decompiler_Code // {{{
|
|||
foreach ($dim->offsets as $offset) {
|
||||
$assign = &$assign[$offset];
|
||||
}
|
||||
$assign = str($dim->assign);
|
||||
$assign = toCode($dim->assign, $indent);
|
||||
}
|
||||
return $this->toList($assigns) . ' = ' . str($this->src);
|
||||
return $this->toList($assigns) . ' = ' . toCode($this->src, $indent);
|
||||
}
|
||||
|
||||
function toList($assigns)
|
||||
|
|
@ -259,18 +242,15 @@ class Decompiler_ListBox extends Decompiler_Box // {{{
|
|||
// }}}
|
||||
class Decompiler_Array extends Decompiler_Value // {{{
|
||||
{
|
||||
var $indent = '';
|
||||
|
||||
function Decompiler_Array($value = array(), $indent = '')
|
||||
function Decompiler_Array($value = array())
|
||||
{
|
||||
$this->value = $value;
|
||||
$this->indent = $indent;
|
||||
}
|
||||
|
||||
function __toString()
|
||||
function toCode($indent)
|
||||
{
|
||||
$exp = "array(";
|
||||
$indent = $this->indent . INDENT;
|
||||
$indent = $indent . INDENT;
|
||||
$assoclen = 0;
|
||||
$multiline = 0;
|
||||
$i = 0;
|
||||
|
|
@ -281,7 +261,8 @@ class Decompiler_Array extends Decompiler_Value // {{{
|
|||
$assoclen = $len;
|
||||
}
|
||||
}
|
||||
if (is_array(value($v))) {
|
||||
$spec = xcache_get_special_value($v);
|
||||
if (is_array(isset($spec) ? $spec : $v)) {
|
||||
$multiline ++;
|
||||
}
|
||||
++ $i;
|
||||
|
|
@ -314,12 +295,12 @@ class Decompiler_Array extends Decompiler_Value // {{{
|
|||
$exp .= $k . ' => ';
|
||||
}
|
||||
|
||||
$exp .= str(value($v), $subindent);
|
||||
$exp .= toCode(value($v), $subindent);
|
||||
|
||||
$i ++;
|
||||
}
|
||||
if ($multiline) {
|
||||
$exp .= "$indent);";
|
||||
$exp .= "\n$indent)";
|
||||
}
|
||||
else {
|
||||
$exp .= ")";
|
||||
|
|
@ -332,7 +313,7 @@ class Decompiler_ForeachBox extends Decompiler_Box // {{{
|
|||
{
|
||||
var $iskey;
|
||||
|
||||
function __toString()
|
||||
function toCode($indent)
|
||||
{
|
||||
return 'foreach (' . '';
|
||||
}
|
||||
|
|
@ -416,7 +397,7 @@ class Decompiler
|
|||
}
|
||||
$curticks = $toticks;
|
||||
}
|
||||
echo $indent, str($op['php']), ";\n";
|
||||
echo $indent, toCode($op['php'], $indent), ";\n";
|
||||
}
|
||||
}
|
||||
if ($curticks) {
|
||||
|
|
@ -428,14 +409,14 @@ class Decompiler
|
|||
{
|
||||
switch ($op['op_type']) {
|
||||
case XC_IS_CONST:
|
||||
return str(value($op['constant']));
|
||||
return toCode(value($op['constant']), $EX);
|
||||
|
||||
case XC_IS_VAR:
|
||||
case XC_IS_TMP_VAR:
|
||||
$T = &$EX['Ts'];
|
||||
$ret = $T[$op['var']];
|
||||
if ($tostr) {
|
||||
$ret = str($ret, $EX);
|
||||
$ret = toCode($ret, $EX);
|
||||
}
|
||||
if ($free) {
|
||||
unset($T[$op['var']]);
|
||||
|
|
@ -640,11 +621,11 @@ class Decompiler
|
|||
$this->outputCode($EX, $opline, $end /* - 1 skip last jmp */, $indent . INDENT);
|
||||
$body = ob_get_clean();
|
||||
|
||||
$as = str($op['fe_as']);
|
||||
$as = toCode($op['fe_as'], $EX);
|
||||
if (isset($op['fe_key'])) {
|
||||
$as = str($op['fe_key']) . ' => ' . $as;
|
||||
$as = toCode($op['fe_key'], $EX) . ' => ' . $as;
|
||||
}
|
||||
echo "{$indent}foreach (" . str($op['fe_src']) . " as $as) {\n";
|
||||
echo "{$indent}foreach (" . toCode($op['fe_src'], $EX) . " as $as) {\n";
|
||||
echo $body;
|
||||
echo "{$indent}}";
|
||||
// $this->outputCode($EX, $next, $last, $indent);
|
||||
|
|
@ -868,7 +849,7 @@ class Decompiler
|
|||
break;
|
||||
}
|
||||
if ($opc == XC_UNSET_VAR) {
|
||||
$op['php'] = "unset(" . str($rvalue) . ")";
|
||||
$op['php'] = "unset(" . toCode($rvalue, $EX) . ")";
|
||||
$lastphpop = &$op;
|
||||
}
|
||||
else if ($res['op_type'] != XC_IS_UNUSED) {
|
||||
|
|
@ -929,10 +910,10 @@ class Decompiler
|
|||
$lvalue = $rvalue;
|
||||
++ $i;
|
||||
$rvalue = $this->getOpVal($opcodes[$i]['op1'], $EX);
|
||||
$resvar = str($lvalue) . ' = ' . $rvalue;
|
||||
$resvar = toCode($lvalue, $EX) . ' = ' . $rvalue;
|
||||
}
|
||||
else if ($opc == XC_UNSET_DIM) {
|
||||
$op['php'] = "unset(" . str($rvalue) . ")";
|
||||
$op['php'] = "unset(" . toCode($rvalue, $EX) . ")";
|
||||
$lastphpop = &$op;
|
||||
}
|
||||
else if ($res['op_type'] != XC_IS_UNUSED) {
|
||||
|
|
@ -953,19 +934,19 @@ class Decompiler
|
|||
$dim = &$rvalue->obj;
|
||||
$dim->assign = $lvalue;
|
||||
if ($dim->isLast) {
|
||||
$resvar = str($dim->value);
|
||||
$resvar = toCode($dim->value, $EX);
|
||||
}
|
||||
unset($dim);
|
||||
break;
|
||||
}
|
||||
$resvar = "$lvalue = " . str($rvalue, $EX);
|
||||
$resvar = "$lvalue = " . toCode($rvalue, $EX);
|
||||
break;
|
||||
// }}}
|
||||
case XC_ASSIGN_REF: // {{{
|
||||
$lvalue = $this->getOpVal($op1, $EX);
|
||||
$rvalue = $this->getOpVal($op2, $EX, false);
|
||||
if (is_a($rvalue, 'Decompiler_Fetch')) {
|
||||
$src = str($rvalue->src);
|
||||
$src = toCode($rvalue->src, $EX);
|
||||
if (substr($src, 1, -1) == substr($lvalue, 1)) {
|
||||
switch ($rvalue->fetchType) {
|
||||
case ZEND_FETCH_GLOBAL:
|
||||
|
|
@ -979,7 +960,7 @@ class Decompiler
|
|||
if (isset($statics[$name])) {
|
||||
$var = $statics[$name];
|
||||
$resvar .= ' = ';
|
||||
$resvar .= str(value($var), $EX);
|
||||
$resvar .= toCode(value($var), $EX);
|
||||
}
|
||||
unset($statics);
|
||||
break 2;
|
||||
|
|
@ -988,7 +969,7 @@ class Decompiler
|
|||
}
|
||||
}
|
||||
// TODO: PHP_6 global
|
||||
$rvalue = str($rvalue);
|
||||
$rvalue = toCode($rvalue, $EX);
|
||||
$resvar = "$lvalue = &$rvalue";
|
||||
break;
|
||||
// }}}
|
||||
|
|
@ -1201,10 +1182,10 @@ class Decompiler
|
|||
$op2val = $this->getOpVal($op2, $EX);
|
||||
switch ($opc) {
|
||||
case XC_ADD_CHAR:
|
||||
$op2val = str(chr($op2val), $EX);
|
||||
$op2val = toCode(chr($op2val), $EX);
|
||||
break;
|
||||
case XC_ADD_STRING:
|
||||
$op2val = str($op2val, $EX);
|
||||
$op2val = toCode($op2val, $EX);
|
||||
break;
|
||||
case XC_ADD_VAR:
|
||||
break;
|
||||
|
|
@ -1344,10 +1325,10 @@ class Decompiler
|
|||
if ($opc == XC_JMPZ_EX || $opc == XC_JMPNZ_EX || $opc == XC_JMPZ) {
|
||||
$targetop = &$EX['opcodes'][$op2['opline_num']];
|
||||
if ($opc == XC_JMPNZ_EX) {
|
||||
$targetop['cond_true'][] = str($rvalue);
|
||||
$targetop['cond_true'][] = toCode($rvalue, $EX);
|
||||
}
|
||||
else {
|
||||
$targetop['cond_false'][] = str($rvalue);
|
||||
$targetop['cond_false'][] = toCode($rvalue, $EX);
|
||||
}
|
||||
unset($targetop);
|
||||
}
|
||||
|
|
@ -1415,7 +1396,7 @@ class Decompiler
|
|||
// }}}
|
||||
case XC_END_SILENCE: // {{{
|
||||
$EX['silence'] --;
|
||||
$lastresvar = '@' . str($lastresvar);
|
||||
$lastresvar = '@' . toCode($lastresvar, $EX);
|
||||
break;
|
||||
// }}}
|
||||
case XC_CONT: // {{{
|
||||
|
|
@ -1485,7 +1466,7 @@ class Decompiler
|
|||
for ($i = 0; $i < $n; $i ++) {
|
||||
$a = array_pop($EX['argstack']);
|
||||
if (is_array($a)) {
|
||||
array_unshift($args, str($a, $EX));
|
||||
array_unshift($args, toCode($a, $EX));
|
||||
}
|
||||
else {
|
||||
array_unshift($args, $a);
|
||||
|
|
@ -1542,7 +1523,6 @@ class Decompiler
|
|||
// }}}
|
||||
function dargs(&$EX, $indent) // {{{
|
||||
{
|
||||
$EX['indent'] = $indent;
|
||||
$op_array = &$EX['op_array'];
|
||||
|
||||
if (isset($op_array['num_args'])) {
|
||||
|
|
@ -1601,9 +1581,9 @@ class Decompiler
|
|||
}
|
||||
}
|
||||
$arg = $EX['recvs'][$i + 1];
|
||||
echo str($arg[0]);
|
||||
echo toCode($arg[0], $indent);
|
||||
if (isset($arg[1])) {
|
||||
echo ' = ', str($arg[1]);
|
||||
echo ' = ', toCode($arg[1], $indent);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
@ -1680,7 +1660,7 @@ class Decompiler
|
|||
foreach ($class[$type] as $name => $v) {
|
||||
echo $newindent;
|
||||
echo $prefix, $name, ' = ';
|
||||
echo str(value($v), $EX);
|
||||
echo toCode(value($v), $newindent);
|
||||
echo ";\n";
|
||||
}
|
||||
}
|
||||
|
|
@ -1754,7 +1734,7 @@ class Decompiler
|
|||
}
|
||||
if (isset($value)) {
|
||||
echo ' = ';
|
||||
echo str(value($value));
|
||||
echo toCode(value($value), $newindent);
|
||||
}
|
||||
echo ";\n";
|
||||
}
|
||||
|
|
|
|||
Loading…
Reference in New Issue