source: trunk/lib/Decompiler.class.php @ 1314

Last change on this file since 1314 was 1314, checked in by moo, 13 months ago

Decompiler, disassembler: update PHP 5.0 support

  • Property svn:eol-style set to native
File size: 74.3 KB
Line 
1<?php
2
3define('INDENT', "\t");
4ini_set('error_reporting', E_ALL);
5
6function color($str, $color = 33)
7{
8    return "\x1B[{$color}m$str\x1B[0m";
9}
10
11function printBacktrace() // {{{
12{
13    $backtrace = debug_backtrace();
14    foreach ($backtrace as $stack) {
15        $args = array();
16        foreach ($stack['args'] as $arg) {
17            if (is_scalar($arg)) {
18                $args[] = var_export($arg, true);
19            }
20            else if (is_array($arg)) {
21                $array = array();
22                foreach ($arg as $key => $value) {
23                    $array[] = var_export($key, true) . " => " . (is_scalar($value) ? var_export($value, true) : gettype($value));
24                    if (count($array) >= 5) {
25                        $array[] = '...';
26                        break;
27                    }
28                }
29                $args[] = 'array(' . implode(', ', $array) . ')';
30            }
31            else {
32                $args[] = gettype($arg);
33            }
34        }
35        printf("%d: %s::%s(%s)" . PHP_EOL
36                , $stack['line']
37                , isset($stack['class']) ? $stack['class'] : ''
38                , $stack['function']
39                , implode(', ', $args)
40                );
41    }
42}
43// }}}
44
45function str($code, $indent = '') // {{{
46{
47    if (is_array($code)) {
48        $array = array();
49        foreach ($code as $key => $value) {
50            $array[$key] = str($value, $indent);
51        }
52        return $array;
53    }
54    if (is_object($code)) {
55        $code = foldToCode($code, $indent);
56        return $code->toCode($indent);
57    }
58
59    return (string) $code;
60}
61// }}}
62function unsetArray(&$array, $name) // {{{
63{
64    unset($array[$name]);
65}
66// }}}
67
68function foldToCode($src, $indent = '') // {{{ wrap or rewrap anything to Decompiler_Code
69{
70    if (is_array($indent)) {
71        $indent = $indent['indent'];
72    }
73
74    if (!is_object($src)) {
75        return new Decompiler_Code($src);
76    }
77
78    if (!method_exists($src, 'toCode')) {
79        var_dump($src);
80        exit('no toCode');
81    }
82    if (get_class($src) != 'Decompiler_Code') {
83        // rewrap it
84        $src = new Decompiler_Code($src->toCode($indent));
85    }
86
87    return $src;
88}
89// }}}
90function value($value, &$EX) // {{{
91{
92    $spec = xcache_get_special_value($value);
93    if (isset($spec)) {
94        $value = $spec;
95        if (!is_array($value)) {
96            // constant
97            return $value;
98        }
99    }
100
101    if (is_a($value, 'Decompiler_Object')) {
102        // use as is
103    }
104    else if (is_array($value)) {
105        $value = new Decompiler_ConstArray($value, $EX);
106    }
107    else {
108        if (isset($EX['value2constant'][$value])) {
109            $value = new Decompiler_Code($EX['value2constant'][$value]);
110        }
111        else {
112            $value = new Decompiler_Value($value);
113        }
114    }
115    return $value;
116}
117// }}}
118function unquoteName_($str, $asVariableName, $indent = '') // {{{
119{
120    $str = str($str, $indent);
121    if (preg_match("!^'[\\w_][\\w\\d_\\\\]*'\$!", $str)) {
122        return str_replace('\\\\', '\\', substr($str, 1, -1));
123    }
124    else if ($asVariableName) {
125        return "{" . $str . "}";
126    }
127    else {
128        return $str;
129    }
130}
131// }}}
132function unquoteVariableName($str, $indent = '') // {{{
133{
134    return unquoteName_($str, true, $indent);
135}
136// }}}
137function unquoteName($str, $indent = '') // {{{
138{
139    return unquoteName_($str, false, $indent);
140}
141// }}}
142class Decompiler_Object // {{{
143{
144}
145// }}}
146class Decompiler_Value extends Decompiler_Object // {{{
147{
148    public $value;
149
150    function Decompiler_Value($value = null)
151    {
152        $this->value = $value;
153    }
154
155    function toCode($indent)
156    {
157        $code = var_export($this->value, true);
158        if (gettype($this->value) == 'string') {
159            switch ($this->value) {
160            case "\r":
161                return '"\\r"';
162            case "\n":
163                return '"\\n"';
164            case "\r\n":
165                return '"\\r\\n"';
166            }
167            $code = str_replace("\r\n", '\' . "\\r\\n" . \'', $code);
168            $code = str_replace("\r", '\' . "\\r" . \'', $code);
169            $code = str_replace("\n", '\' . "\\n" . \'', $code);
170        }
171        return $code;
172    }
173}
174// }}}
175class Decompiler_Code extends Decompiler_Object // {{{
176{
177    public $src;
178
179    function Decompiler_Code($src)
180    {
181        assert('isset($src)');
182        $this->src = $src;
183    }
184
185    function toCode($indent)
186    {
187        return $this->src;
188    }
189}
190// }}}
191class Decompiler_Binop extends Decompiler_Code // {{{
192{
193    public $opc;
194    public $op1;
195    public $op2;
196    public $parent;
197
198    function Decompiler_Binop($parent, $op1, $opc, $op2)
199    {
200        $this->parent = &$parent;
201        $this->opc = $opc;
202        $this->op1 = $op1;
203        $this->op2 = $op2;
204    }
205
206    function toCode($indent)
207    {
208        $opstr = $this->parent->binops[$this->opc];
209
210        if (is_a($this->op1, 'Decompiler_TriOp') || is_a($this->op1, 'Decompiler_Binop') && $this->op1->opc != $this->opc) {
211            $op1 = "(" . str($this->op1, $indent) . ")";
212        }
213        else {
214            $op1 = $this->op1;
215        }
216
217        if (is_a($this->op2, 'Decompiler_TriOp') || is_a($this->op2, 'Decompiler_Binop') && $this->op2->opc != $this->opc && substr($opstr, -1) != '=') {
218            $op2 = "(" . str($this->op2, $indent) . ")";
219        }
220        else {
221            $op2 = $this->op2;
222        }
223
224        if (str($op1) == '0' && ($this->opc == XC_ADD || $this->opc == XC_SUB)) {
225            return $opstr . str($op2, $indent);
226        }
227
228        return str($op1, $indent) . ' ' . $opstr . ($this->opc == XC_ASSIGN_REF ? '' : ' ') . str($op2, $indent);
229    }
230}
231// }}}
232class Decompiler_TriOp extends Decompiler_Code // {{{
233{
234    public $condition;
235    public $trueValue;
236    public $falseValue;
237
238    function Decompiler_TriOp($condition, $trueValue, $falseValue)
239    {
240        $this->condition = $condition;
241        $this->trueValue = $trueValue;
242        $this->falseValue = $falseValue;
243    }
244
245    function toCode($indent)
246    {
247        $trueValue = $this->trueValue;
248        if (is_a($this->trueValue, 'Decompiler_TriOp')) {
249            $trueValue = "(" . str($trueValue, $indent) . ")";
250        }
251        $falseValue = $this->falseValue;
252        if (is_a($this->falseValue, 'Decompiler_TriOp')) {
253            $falseValue = "(" . str($falseValue, $indent) . ")";
254        }
255
256        return str($this->condition) . ' ? ' . str($trueValue) . ' : ' . str($falseValue);
257    }
258}
259// }}}
260class Decompiler_Fetch extends Decompiler_Code // {{{
261{
262    public $src;
263    public $fetchType;
264
265    function Decompiler_Fetch($src, $type, $globalSrc)
266    {
267        $this->src = $src;
268        $this->fetchType = $type;
269        $this->globalSrc = $globalSrc;
270    }
271
272    function toCode($indent)
273    {
274        switch ($this->fetchType) {
275        case ZEND_FETCH_LOCAL:
276            return '$' . $this->src;
277        case ZEND_FETCH_STATIC:
278            if (ZEND_ENGINE_2_3) {
279                // closure local variable?
280                return str($this->src);
281            }
282            die('static fetch cant to string');
283        case ZEND_FETCH_GLOBAL:
284        case ZEND_FETCH_GLOBAL_LOCK:
285            return $this->globalSrc;
286        default:
287            var_dump($this->fetchType);
288            assert(0);
289        }
290    }
291}
292// }}}
293class Decompiler_Box // {{{
294{
295    public $obj;
296
297    function Decompiler_Box(&$obj)
298    {
299        $this->obj = &$obj;
300    }
301
302    function toCode($indent)
303    {
304        return $this->obj->toCode($indent);
305    }
306}
307// }}}
308class Decompiler_Dim extends Decompiler_Value // {{{
309{
310    public $offsets = array();
311    public $isLast = false;
312    public $isObject = false;
313    public $assign = null;
314
315    function toCode($indent)
316    {
317        if (is_a($this->value, 'Decompiler_ListBox')) {
318            $exp = str($this->value->obj->src, $indent);
319        }
320        else {
321            $exp = str($this->value, $indent);
322        }
323        $last = count($this->offsets) - 1;
324        foreach ($this->offsets as $i => $dim) {
325            if ($this->isObject && $i == $last) {
326                $exp .= '->' . unquoteVariableName($dim, $indent);
327            }
328            else {
329                $exp .= '[' . str($dim, $indent) . ']';
330            }
331        }
332        return $exp;
333    }
334}
335// }}}
336class Decompiler_DimBox extends Decompiler_Box // {{{
337{
338}
339// }}}
340class Decompiler_List extends Decompiler_Code // {{{
341{
342    public $src;
343    public $dims = array();
344    public $everLocked = false;
345
346    function toCode($indent)
347    {
348        if (count($this->dims) == 1 && !$this->everLocked) {
349            $dim = $this->dims[0];
350            unset($dim->value);
351            $dim->value = $this->src;
352            if (!isset($dim->assign)) {
353                return str($dim, $indent);
354            }
355            return str($this->dims[0]->assign, $indent) . ' = ' . str($dim, $indent);
356        }
357        /* flatten dims */
358        $assigns = array();
359        foreach ($this->dims as $dim) {
360            $assign = &$assigns;
361            foreach ($dim->offsets as $offset) {
362                $assign = &$assign[$offset];
363            }
364            $assign = foldToCode($dim->assign, $indent);
365        }
366        return str($this->toList($assigns)) . ' = ' . str($this->src, $indent);
367    }
368
369    function toList($assigns)
370    {
371        $keys = array_keys($assigns);
372        if (count($keys) < 2) {
373            $keys[] = 0;
374        }
375        $max = call_user_func_array('max', $keys);
376        $list = 'list(';
377        for ($i = 0; $i <= $max; $i ++) {
378            if ($i) {
379                $list .= ', ';
380            }
381            if (!isset($assigns[$i])) {
382                continue;
383            }
384            if (is_array($assigns[$i])) {
385                $list .= $this->toList($assigns[$i]);
386            }
387            else {
388                $list .= $assigns[$i];
389            }
390        }
391        return $list . ')';
392    }
393}
394// }}}
395class Decompiler_ListBox extends Decompiler_Box // {{{
396{
397}
398// }}}
399class Decompiler_Array extends Decompiler_Value // {{{
400{
401    // emenets
402    function Decompiler_Array()
403    {
404        $this->value = array();
405    }
406
407    function toCode($indent)
408    {
409        $subindent = $indent . INDENT;
410
411        $elementsCode = array();
412        $index = 0;
413        foreach ($this->value as $element) {
414            list($key, $value) = $element;
415            if (!isset($key)) {
416                $key = $index++;
417            }
418            $elementsCode[] = array(str($key, $subindent), str($value, $subindent), $key, $value);
419        }
420
421        $exp = "array(";
422        $indent = $indent . INDENT;
423        $assocWidth = 0;
424        $multiline = 0;
425        $i = 0;
426        foreach ($elementsCode as $element) {
427            list($keyCode, $valueCode) = $element;
428            if ((string) $i !== $keyCode) {
429                $assocWidth = 1;
430                break;
431            }
432            ++$i;
433        }
434        foreach ($elementsCode as $element) {
435            list($keyCode, $valueCode, $key, $value) = $element;
436            if ($assocWidth) {
437                $len = strlen($keyCode);
438                if ($assocWidth < $len) {
439                    $assocWidth = $len;
440                }
441            }
442            if (is_array($value) || is_a($value, 'Decompiler_Array')) {
443                $multiline ++;
444            }
445        }
446
447        $i = 0;
448        foreach ($elementsCode as $element) {
449            list($keyCode, $value) = $element;
450            if ($multiline) {
451                if ($i) {
452                    $exp .= ",";
453                }
454                $exp .= "\n";
455                $exp .= $indent;
456            }
457            else {
458                if ($i) {
459                    $exp .= ", ";
460                }
461            }
462
463            if ($assocWidth) {
464                if ($multiline) {
465                    $exp .= sprintf("%-{$assocWidth}s => ", $keyCode);
466                }
467                else {
468                    $exp .= $keyCode . ' => ';
469                }
470            }
471
472            $exp .= $value;
473
474            $i ++;
475        }
476        if ($multiline) {
477            $exp .= "\n$indent)";
478        }
479        else {
480            $exp .= ")";
481        }
482        return $exp;
483    }
484}
485// }}}
486class Decompiler_ConstArray extends Decompiler_Array // {{{
487{
488    function Decompiler_ConstArray($array, &$EX)
489    {
490        $elements = array();
491        foreach ($array as $key => $value) {
492            $elements[] = array(value($key, $EX), value($value, $EX));
493        }
494        $this->value = $elements;
495    }
496}
497// }}}
498class Decompiler_ForeachBox extends Decompiler_Box // {{{
499{
500    public $iskey;
501
502    function toCode($indent)
503    {
504        return 'foreach (' . '';
505    }
506}
507// }}}
508
509class Decompiler
510{
511    public $namespace;
512    public $namespaceDecided;
513    public $activeFile;
514    public $activeClass;
515    public $activeMethod;
516    public $activeFunction;
517
518    function Decompiler()
519    {
520        // {{{ testing
521        // XC_UNDEF XC_OP_DATA
522        $this->test = !empty($_ENV['XCACHE_DECOMPILER_TEST']);
523        $this->usedOps = array();
524
525        if ($this->test) {
526            $content = file_get_contents(__FILE__);
527            for ($i = 0; $opname = xcache_get_opcode($i); $i ++) {
528                if (!preg_match("/\\bXC_" . $opname . "\\b(?!')/", $content)) {
529                    echo "not recognized opcode ", $opname, "\n";
530                }
531            }
532        }
533        // }}}
534        // {{{ opinfo
535        $this->unaryops = array(
536                XC_BW_NOT   => '~',
537                XC_BOOL_NOT => '!',
538                );
539        $this->binops = array(
540                XC_ADD                 => "+",
541                XC_ASSIGN_ADD          => "+=",
542                XC_SUB                 => "-",
543                XC_ASSIGN_SUB          => "-=",
544                XC_MUL                 => "*",
545                XC_ASSIGN_MUL          => "*=",
546                XC_DIV                 => "/",
547                XC_ASSIGN_DIV          => "/=",
548                XC_MOD                 => "%",
549                XC_ASSIGN_MOD          => "%=",
550                XC_SL                  => "<<",
551                XC_ASSIGN_SL           => "<<=",
552                XC_SR                  => ">>",
553                XC_ASSIGN_SR           => ">>=",
554                XC_CONCAT              => ".",
555                XC_ASSIGN_CONCAT       => ".=",
556                XC_IS_IDENTICAL        => "===",
557                XC_IS_NOT_IDENTICAL    => "!==",
558                XC_IS_EQUAL            => "==",
559                XC_IS_NOT_EQUAL        => "!=",
560                XC_IS_SMALLER          => "<",
561                XC_IS_SMALLER_OR_EQUAL => "<=",
562                XC_BW_OR               => "|",
563                XC_ASSIGN_BW_OR        => "|=",
564                XC_BW_AND              => "&",
565                XC_ASSIGN_BW_AND       => "&=",
566                XC_BW_XOR              => "^",
567                XC_ASSIGN_BW_XOR       => "^=",
568                XC_BOOL_XOR            => "xor",
569                XC_ASSIGN              => "=",
570                XC_ASSIGN_REF          => "= &",
571                XC_JMP_SET             => "?:",
572                XC_JMP_SET_VAR         => "?:",
573                XC_JMPZ_EX             => "&&",
574                XC_JMPNZ_EX            => "||",
575                );
576        // }}}
577        $this->includeTypes = array( // {{{
578                ZEND_EVAL         => 'eval',
579                ZEND_INCLUDE      => 'include',
580                ZEND_INCLUDE_ONCE => 'include_once',
581                ZEND_REQUIRE      => 'require',
582                ZEND_REQUIRE_ONCE => 'require_once',
583                );
584                // }}}
585    }
586    function detectNamespace($name) // {{{
587    {
588        if ($this->namespaceDecided) {
589            return;
590        }
591
592        if (strpos($name, '\\') !== false) {
593            $this->namespace = strtok($name, '\\');
594            echo 'namespace ', $this->namespace, ";\n\n";
595        }
596
597        $this->namespaceDecided = true;
598    }
599    // }}}
600    function stripNamespace($name) // {{{
601    {
602        $name = str($name);
603        $len = strlen($this->namespace) + 1;
604        if (substr($name, 0, $len) == $this->namespace . '\\') {
605            return substr($name, $len);
606        }
607        else {
608            return $name;
609        }
610    }
611    // }}}
612    function outputPhp(&$EX, $range) // {{{
613    {
614        $needBlankline = isset($EX['lastBlock']);
615        $indent = $EX['indent'];
616        $curticks = 0;
617        for ($i = $range[0]; $i <= $range[1]; $i ++) {
618            $op = $EX['opcodes'][$i];
619            if (isset($op['gofrom'])) {
620                if ($needBlankline) {
621                    $needBlankline = false;
622                    echo PHP_EOL;
623                }
624                echo 'label' . $i, ":\n";
625            }
626            if (isset($op['php'])) {
627                $toticks = isset($op['ticks']) ? (int) str($op['ticks']) : 0;
628                if ($curticks != $toticks) {
629                    $oldticks = $curticks;
630                    $curticks = $toticks;
631                    if (!$curticks) {
632                        echo $EX['indent'], "}\n\n";
633                        $indent = $EX['indent'];
634                    }
635                    else {
636                        if ($oldticks) {
637                            echo $EX['indent'], "}\n\n";
638                        }
639                        else if (!$oldticks) {
640                            $indent .= INDENT;
641                        }
642                        if ($needBlankline) {
643                            $needBlankline = false;
644                            echo PHP_EOL;
645                        }
646                        echo $EX['indent'], "declare (ticks=$curticks) {\n";
647                    }
648                }
649                if ($needBlankline) {
650                    $needBlankline = false;
651                    echo PHP_EOL;
652                }
653                echo $indent, str($op['php'], $indent), ";\n";
654                $EX['lastBlock'] = 'basic';
655            }
656        }
657        if ($curticks) {
658            echo $EX['indent'], "}\n";
659        }
660    }
661    // }}}
662    function getOpVal($op, &$EX, $free = false) // {{{
663    {
664        switch ($op['op_type']) {
665        case XC_IS_CONST:
666            return value($op['constant'], $EX);
667
668        case XC_IS_VAR:
669        case XC_IS_TMP_VAR:
670            $T = &$EX['Ts'];
671            if (!isset($T[$op['var']])) {
672                printBacktrace();
673            }
674            $ret = $T[$op['var']];
675            if ($free && empty($this->keepTs)) {
676                unset($T[$op['var']]);
677            }
678            return $ret;
679
680        case XC_IS_CV:
681            $var = $op['var'];
682            $var = $EX['op_array']['vars'][$var];
683            return '$' . $var['name'];
684
685        case XC_IS_UNUSED:
686            return null;
687        }
688    }
689    // }}}
690    function removeKeyPrefix($array, $prefix) // {{{
691    {
692        $prefixLen = strlen($prefix);
693        $ret = array();
694        foreach ($array as $key => $value) {
695            if (substr($key, 0, $prefixLen) == $prefix) {
696                $key = substr($key, $prefixLen);
697            }
698            $ret[$key] = $value;
699        }
700        return $ret;
701    }
702    // }}}
703    function &fixOpcode($opcodes, $removeTailing = false, $defaultReturnValue = null) // {{{
704    {
705        $last = count($opcodes) - 1;
706        for ($i = 0; $i <= $last; $i ++) {
707            if (function_exists('xcache_get_fixed_opcode')) {
708                $opcodes[$i]['opcode'] = xcache_get_fixed_opcode($opcodes[$i]['opcode'], $i);
709            }
710            if (isset($opcodes[$i]['op1'])) {
711                $opcodes[$i]['op1'] = $this->removeKeyPrefix($opcodes[$i]['op1'], 'u.');
712                $opcodes[$i]['op2'] = $this->removeKeyPrefix($opcodes[$i]['op2'], 'u.');
713                $opcodes[$i]['result'] = $this->removeKeyPrefix($opcodes[$i]['result'], 'u.');
714            }
715            else {
716                $op = array(
717                    'op1' => array(),
718                    'op2' => array(),
719                    'result' => array(),
720                );
721                foreach ($opcodes[$i] as $name => $value) {
722                    if (preg_match('!^(op1|op2|result)\\.(.*)!', $name, $m)) {
723                        list(, $which, $field) = $m;
724                        $op[$which][$field] = $value;
725                    }
726                    else if (preg_match('!^(op1|op2|result)_type$!', $name, $m)) {
727                        list(, $which) = $m;
728                        $op[$which]['op_type'] = $value;
729                    }
730                    else {
731                        $op[$name] = $value;
732                    }
733                }
734                $opcodes[$i] = $op;
735            }
736        }
737
738        if ($removeTailing) {
739            $last = count($opcodes) - 1;
740            if ($opcodes[$last]['opcode'] == XC_HANDLE_EXCEPTION) {
741                $this->usedOps[XC_HANDLE_EXCEPTION] = true;
742                $opcodes[$last]['opcode'] = XC_NOP;
743                --$last;
744            }
745            if ($opcodes[$last]['opcode'] == XC_RETURN) {
746                $op1 = $opcodes[$last]['op1'];
747                if ($op1['op_type'] == XC_IS_CONST && array_key_exists('constant', $op1) && $op1['constant'] === $defaultReturnValue) {
748                    $opcodes[$last]['opcode'] = XC_NOP;
749                    --$last;
750                }
751            }
752        }
753        return $opcodes;
754    }
755    // }}}
756    function decompileBasicBlock(&$EX, $range, $unhandled = false) // {{{
757    {
758        $this->dasmBasicBlock($EX, $range);
759        if ($unhandled) {
760            $this->dumpRange($EX, $range);
761        }
762        $this->outputPhp($EX, $range);
763    }
764    // }}}
765    function isIfCondition(&$EX, $range) // {{{
766    {
767        $opcodes = &$EX['opcodes'];
768        $firstOp = &$opcodes[$range[0]];
769        return $firstOp['opcode'] == XC_JMPZ && !empty($firstOp['jmpouts']) && $opcodes[$firstOp['jmpouts'][0] - 1]['opcode'] == XC_JMP
770         && !empty($opcodes[$firstOp['jmpouts'][0] - 1]['jmpouts'])
771         && $opcodes[$firstOp['jmpouts'][0] - 1]['jmpouts'][0] == $range[1] + 1;
772    }
773    // }}}
774    function removeJmpInfo(&$EX, $line) // {{{
775    {
776        $opcodes = &$EX['opcodes'];
777        if (!isset($opcodes[$line]['jmpouts'])) {
778            printBacktrace();
779        }
780        foreach ($opcodes[$line]['jmpouts'] as $jmpTo) {
781            $jmpins = &$opcodes[$jmpTo]['jmpins'];
782            $jmpins = array_flip($jmpins);
783            unset($jmpins[$line]);
784            $jmpins = array_keys($jmpins);
785        }
786        // $opcodes[$line]['opcode'] = XC_NOP;
787        unset($opcodes[$line]['jmpouts']);
788    }
789    // }}}
790    function beginScope(&$EX, $doIndent = true) // {{{
791    {
792        array_push($EX['scopeStack'], array($EX['lastBlock'], $EX['indent']));
793        if ($doIndent) {
794            $EX['indent'] .= INDENT;
795        }
796        $EX['lastBlock'] = null;
797    }
798    // }}}
799    function endScope(&$EX) // {{{
800    {
801        list($EX['lastBlock'], $EX['indent']) = array_pop($EX['scopeStack']);
802    }
803    // }}}
804    function beginComplexBlock(&$EX) // {{{
805    {
806        if (isset($EX['lastBlock'])) {
807            echo PHP_EOL;
808            $EX['lastBlock'] = null;
809        }
810    }
811    // }}}
812    function endComplexBlock(&$EX) // {{{
813    {
814        $EX['lastBlock'] = 'complex';
815    }
816    // }}}
817    function decompileComplexBlock(&$EX, $range) // {{{
818    {
819        $T = &$EX['Ts'];
820        $opcodes = &$EX['opcodes'];
821        $indent = $EX['indent'];
822
823        $firstOp = &$opcodes[$range[0]];
824        $lastOp = &$opcodes[$range[1]];
825
826        // {{{ && || and or
827        if (($firstOp['opcode'] == XC_JMPZ_EX || $firstOp['opcode'] == XC_JMPNZ_EX) && !empty($firstOp['jmpouts'])
828         && $firstOp['jmpouts'][0] == $range[1] + 1
829         && $lastOp['opcode'] == XC_BOOL
830         && $firstOp['opcode']['result']['var'] == $lastOp['opcode']['result']['var']
831        ) {
832            $this->removeJmpInfo($EX, $range[0]);
833
834            $this->recognizeAndDecompileClosedBlocks($EX, array($range[0], $range[0]));
835            $op1 = $this->getOpVal($firstOp['result'], $EX, true);
836
837            $this->recognizeAndDecompileClosedBlocks($EX, array($range[0] + 1, $range[1]));
838            $op2 = $this->getOpVal($lastOp['result'], $EX, true);
839
840            $T[$firstOp['result']['var']] = new Decompiler_Binop($this, $op1, $firstOp['opcode'], $op2);
841            return false;
842        }
843        // }}}
844        // {{{ ?: excluding JMP_SET/JMP_SET_VAR
845        if ($firstOp['opcode'] == XC_JMPZ && !empty($firstOp['jmpouts'])
846         && $range[1] >= $range[0] + 3
847         && ($opcodes[$firstOp['jmpouts'][0] - 2]['opcode'] == XC_QM_ASSIGN || $opcodes[$firstOp['jmpouts'][0] - 2]['opcode'] == XC_QM_ASSIGN_VAR)
848         && $opcodes[$firstOp['jmpouts'][0] - 1]['opcode'] == XC_JMP && $opcodes[$firstOp['jmpouts'][0] - 1]['jmpouts'][0] == $range[1] + 1
849         && ($lastOp['opcode'] == XC_QM_ASSIGN || $lastOp['opcode'] == XC_QM_ASSIGN_VAR)
850        ) {
851            $trueRange = array($range[0] + 1, $firstOp['jmpouts'][0] - 2);
852            $falseRange = array($firstOp['jmpouts'][0], $range[1]);
853            $this->removeJmpInfo($EX, $range[0]);
854
855            $condition = $this->getOpVal($firstOp['op1'], $EX);
856            $this->recognizeAndDecompileClosedBlocks($EX, $trueRange);
857            $trueValue = $this->getOpVal($opcodes[$trueRange[1]]['result'], $EX, true);
858            $this->recognizeAndDecompileClosedBlocks($EX, $falseRange);
859            $falseValue = $this->getOpVal($opcodes[$falseRange[1]]['result'], $EX, true);
860            $T[$opcodes[$trueRange[1]]['result']['var']] = new Decompiler_TriOp($condition, $trueValue, $falseValue);
861            return false;
862        }
863        // }}}
864        // {{{ goto (TODO: recognize XC_BRK)
865        if ($firstOp['opcode'] == XC_JMP && !empty($firstOp['jmpouts']) && $firstOp['jmpouts'][0] == $range[1] + 1) {
866            $this->removeJmpInfo($EX, $range[0]);
867            assert(XC_GOTO != -1);
868            $firstOp['opcode'] = XC_GOTO;
869            $target = $firstOp['op1']['var'];
870            $firstOp['goto'] = $target;
871            $opcodes[$target]['gofrom'][] = $range[0];
872
873            $this->recognizeAndDecompileClosedBlocks($EX, $range);
874            return false;
875        }
876        // }}}
877        // {{{ for
878        if (!empty($firstOp['jmpins']) && $opcodes[$firstOp['jmpins'][0]]['opcode'] == XC_JMP
879         && $lastOp['opcode'] == XC_JMP && !empty($lastOp['jmpouts']) && $lastOp['jmpouts'][0] <= $firstOp['jmpins'][0]
880         && !empty($opcodes[$range[1] + 1]['jmpins']) && $opcodes[$opcodes[$range[1] + 1]['jmpins'][0]]['opcode'] == XC_JMPZNZ
881        ) {
882            $nextRange = array($lastOp['jmpouts'][0], $firstOp['jmpins'][0]);
883            $conditionRange = array($range[0], $nextRange[0] - 1);
884            $this->removeJmpInfo($EX, $conditionRange[1]);
885            $bodyRange = array($nextRange[1], $range[1]);
886            $this->removeJmpInfo($EX, $bodyRange[1]);
887
888            $initial = '';
889            $this->beginScope($EX);
890            $this->dasmBasicBlock($EX, $conditionRange);
891            $conditionCodes = array();
892            for ($i = $conditionRange[0]; $i <= $conditionRange[1]; ++$i) {
893                if (isset($opcodes[$i]['php'])) {
894                    $conditionCodes[] = str($opcodes[$i]['php'], $EX);
895                }
896            }
897            $conditionCodes[] = str($this->getOpVal($opcodes[$conditionRange[1]]['op1'], $EX), $EX);
898            if (implode(',', $conditionCodes) == 'true') {
899                $conditionCodes = array();
900            }
901            $this->endScope($EX);
902
903            $this->beginScope($EX);
904            $this->dasmBasicBlock($EX, $nextRange);
905            $nextCodes = array();
906            for ($i = $nextRange[0]; $i <= $nextRange[1]; ++$i) {
907                if (isset($opcodes[$i]['php'])) {
908                    $nextCodes[] = str($opcodes[$i]['php'], $EX);
909                }
910            }
911            $this->endScope($EX);
912
913            $this->beginComplexBlock($EX);
914            echo $indent, 'for (', str($initial, $EX), '; ', implode(', ', $conditionCodes), '; ', implode(', ', $nextCodes), ') ', '{', PHP_EOL;
915            $this->beginScope($EX);
916            $this->recognizeAndDecompileClosedBlocks($EX, $bodyRange);
917            $this->endScope($EX);
918            echo $indent, '}', PHP_EOL;
919            $this->endComplexBlock($EX);
920            return;
921        }
922        // }}}
923        // {{{ if/elseif/else
924        if ($this->isIfCondition($EX, $range)) {
925            $this->beginComplexBlock($EX);
926            $isElseIf = false;
927            do {
928                $ifRange = array($range[0], $opcodes[$range[0]]['jmpouts'][0] - 1);
929                $this->removeJmpInfo($EX, $ifRange[0]);
930                $this->removeJmpInfo($EX, $ifRange[1]);
931                $condition = $this->getOpVal($opcodes[$ifRange[0]]['op1'], $EX);
932
933                echo $indent, $isElseIf ? 'else if' : 'if', ' (', str($condition, $EX), ') ', '{', PHP_EOL;
934                $this->beginScope($EX);
935                $this->recognizeAndDecompileClosedBlocks($EX, $ifRange);
936                $this->endScope($EX);
937                $EX['lastBlock'] = null;
938                echo $indent, '}', PHP_EOL;
939
940                $isElseIf = true;
941                // search for else if
942                $range[0] = $ifRange[1] + 1;
943                for ($i = $ifRange[1] + 1; $i <= $range[1]; ++$i) {
944                    // find first jmpout
945                    if (!empty($opcodes[$i]['jmpouts'])) {
946                        if ($this->isIfCondition($EX, array($i, $range[1]))) {
947                            $this->dasmBasicBlock($EX, array($range[0], $i));
948                            $range[0] = $i;
949                        }
950                        break;
951                    }
952                }
953            } while ($this->isIfCondition($EX, $range));
954            if ($ifRange[1] < $range[1]) {
955                $elseRange = array($ifRange[1], $range[1]);
956                echo $indent, 'else ', '{', PHP_EOL;
957                $this->beginScope($EX);
958                $this->recognizeAndDecompileClosedBlocks($EX, $elseRange);
959                $this->endScope($EX);
960                $EX['lastBlock'] = null;
961                echo $indent, '}', PHP_EOL;
962            }
963            $this->endComplexBlock($EX);
964            return;
965        }
966        if ($firstOp['opcode'] == XC_JMPZ && !empty($firstOp['jmpouts'])
967         && $firstOp['jmpouts'][0] - 1 == $range[1] && $opcodes[$firstOp['jmpouts'][0] - 1]['opcode'] == XC_RETURN) {
968            $this->beginComplexBlock($EX);
969            $this->removeJmpInfo($EX, $range[0]);
970            $condition = $this->getOpVal($opcodes[$range[0]]['op1'], $EX);
971
972            echo $indent, 'if (', str($condition, $EX), ') ', '{', PHP_EOL;
973            $this->beginScope($EX);
974            $this->recognizeAndDecompileClosedBlocks($EX, $range);
975            $this->endScope($EX);
976            echo $indent, '}', PHP_EOL;
977            $this->endComplexBlock($EX);
978            return;
979        }
980        // }}}
981        // {{{ try/catch
982        if (!empty($firstOp['jmpins']) && !empty($opcodes[$firstOp['jmpins'][0]]['isCatchBegin'])) {
983            $catchBlocks = array();
984            $catchFirst = $firstOp['jmpins'][0];
985
986            $tryRange = array($range[0], $catchFirst - 1);
987
988            // search for XC_CATCH
989            for ($i = $catchFirst; $i <= $range[1]; ) {
990                if ($opcodes[$i]['opcode'] == XC_CATCH) {
991                    $catchOpLine = $i;
992                    $this->removeJmpInfo($EX, $catchFirst);
993
994                    $catchNext = $opcodes[$catchOpLine]['extended_value'];
995                    $catchBodyLast = $catchNext - 1;
996                    if ($opcodes[$catchBodyLast]['opcode'] == XC_JMP) {
997                        --$catchBodyLast;
998                    }
999
1000                    $catchBlocks[$catchFirst] = array($catchOpLine, $catchBodyLast);
1001
1002                    $i = $catchFirst = $catchNext;
1003                }
1004                else {
1005                    ++$i;
1006                }
1007            }
1008
1009            if ($opcodes[$tryRange[1]]['opcode'] == XC_JMP) {
1010                --$tryRange[1];
1011            }
1012
1013            $this->beginComplexBlock($EX);
1014            echo $indent, "try {", PHP_EOL;
1015            $this->beginScope($EX);
1016            $this->recognizeAndDecompileClosedBlocks($EX, $tryRange);
1017            $this->endScope($EX);
1018            echo $indent, '}', PHP_EOL;
1019            if (!$catchBlocks) {
1020                printBacktrace();
1021                assert($catchBlocks);
1022            }
1023            foreach ($catchBlocks as $catchFirst => $catchInfo) {
1024                list($catchOpLine, $catchBodyLast) = $catchInfo;
1025                $catchBodyFirst = $catchOpLine + 1;
1026                $this->dasmBasicBlock($EX, array($catchFirst, $catchOpLine));
1027                $catchOp = &$opcodes[$catchOpLine];
1028                echo $indent, 'catch ('
1029                        , $this->stripNamespace(isset($catchOp['op1']['constant']) ? $catchOp['op1']['constant'] : str($this->getOpVal($catchOp['op1'], $EX)))
1030                        , ' '
1031                        , isset($catchOp['op2']['constant']) ? '$' . $catchOp['op2']['constant'] : str($this->getOpVal($catchOp['op2'], $EX))
1032                        , ") {", PHP_EOL;
1033                unset($catchOp);
1034
1035                $EX['lastBlock'] = null;
1036                $this->beginScope($EX);
1037                $this->recognizeAndDecompileClosedBlocks($EX, array($catchBodyFirst, $catchBodyLast));
1038                $this->endScope($EX);
1039                echo $indent, '}', PHP_EOL;
1040            }
1041            $this->endComplexBlock($EX);
1042            return;
1043        }
1044        // }}}
1045        // {{{ switch/case
1046        if ($firstOp['opcode'] == XC_SWITCH_FREE && isset($T[$firstOp['op1']['var']])) {
1047            // TODO: merge this code to CASE code. use SWITCH_FREE to detect begin of switch by using $Ts if possible
1048            $this->beginComplexBlock($EX);
1049            echo $indent, 'switch (', str($this->getOpVal($firstOp['op1'], $EX)), ") {", PHP_EOL;
1050            echo $indent, '}', PHP_EOL;
1051            $this->endComplexBlock($EX);
1052            return;
1053        }
1054
1055        if (
1056            ($firstOp['opcode'] == XC_CASE
1057            || $firstOp['opcode'] == XC_JMP && !empty($firstOp['jmpouts']) && $opcodes[$firstOp['jmpouts'][0]]['opcode'] == XC_CASE
1058            )
1059             && !empty($lastOp['jmpouts'])
1060        ) {
1061            $cases = array();
1062            $caseDefault = null;
1063            $caseOp = null;
1064            for ($i = $range[0]; $i <= $range[1]; ) {
1065                $op = $opcodes[$i];
1066                if ($op['opcode'] == XC_CASE) {
1067                    if (!isset($caseOp)) {
1068                        $caseOp = $op;
1069                    }
1070                    $jmpz = $opcodes[$i + 1];
1071                    assert('$jmpz["opcode"] == XC_JMPZ');
1072                    $caseNext = $jmpz['jmpouts'][0];
1073                    $cases[$i] = $caseNext - 1;
1074                    $i = $caseNext;
1075                }
1076                else if ($op['opcode'] == XC_JMP && $op['jmpouts'][0] >= $i) {
1077                    // default
1078                    $caseNext = $op['jmpouts'][0];
1079                    $caseDefault = $i;
1080                    $cases[$i] = $caseNext - 1;
1081                    $i = $caseNext;
1082                }
1083                else {
1084                    ++$i;
1085                }
1086            }
1087
1088            $this->beginComplexBlock($EX);
1089
1090            echo $indent, 'switch (', str($this->getOpVal($caseOp['op1'], $EX), $EX), ") {", PHP_EOL;
1091            $caseIsOut = false;
1092            foreach ($cases as $caseFirst => $caseLast) {
1093                if ($caseIsOut && empty($lastCaseFall)) {
1094                    echo PHP_EOL;
1095                }
1096
1097                $caseOp = $opcodes[$caseFirst];
1098
1099                echo $indent;
1100                if ($caseOp['opcode'] == XC_CASE) {
1101                    echo 'case ';
1102                    echo str($this->getOpVal($caseOp['op2'], $EX), $EX);
1103                    echo ':', PHP_EOL;
1104
1105                    $this->removeJmpInfo($EX, $caseFirst);
1106                    ++$caseFirst;
1107
1108                    assert('$opcodes[$caseFirst]["opcode"] == XC_JMPZ');
1109                    $this->removeJmpInfo($EX, $caseFirst);
1110                    ++$caseFirst;
1111                }
1112                else {
1113                    echo 'default';
1114                    echo ':', PHP_EOL;
1115
1116                    assert('$opcodes[$caseFirst]["opcode"] == XC_JMP');
1117                    $this->removeJmpInfo($EX, $caseFirst);
1118                    ++$caseFirst;
1119                }
1120
1121                assert('$opcodes[$caseLast]["opcode"] == XC_JMP');
1122                $this->removeJmpInfo($EX, $caseLast);
1123                --$caseLast;
1124                switch ($opcodes[$caseLast]['opcode']) {
1125                case XC_BRK:
1126                case XC_CONT:
1127                case XC_GOTO:
1128                    $lastCaseFall = false;
1129                    break;
1130
1131                default:
1132                    $lastCaseFall = true;
1133                }
1134
1135                $this->beginScope($EX);
1136                $this->recognizeAndDecompileClosedBlocks($EX, array($caseFirst, $caseLast));
1137                $this->endScope($EX);
1138                $caseIsOut = true;
1139            }
1140            echo $indent, '}', PHP_EOL;
1141
1142            $this->endComplexBlock($EX);
1143            return;
1144        }
1145        // }}}
1146        // {{{ do/while
1147        if ($lastOp['opcode'] == XC_JMPNZ && !empty($lastOp['jmpouts'])
1148         && $lastOp['jmpouts'][0] == $range[0]) {
1149            $this->removeJmpInfo($EX, $range[1]);
1150            $this->beginComplexBlock($EX);
1151
1152            echo $indent, "do {", PHP_EOL;
1153            $this->beginScope($EX);
1154            $this->recognizeAndDecompileClosedBlocks($EX, $range);
1155            $this->endScope($EX);
1156            echo $indent, "} while (", str($this->getOpVal($lastOp['op1'], $EX)), ');', PHP_EOL;
1157
1158            $this->endComplexBlock($EX);
1159            return;
1160        }
1161        // }}}
1162
1163        // {{{ search firstJmpOp
1164        $firstJmp = null;
1165        $firstJmpOp = null;
1166        for ($i = $range[0]; $i <= $range[1]; ++$i) {
1167            if (!empty($opcodes[$i]['jmpouts'])) {
1168                $firstJmp = $i;
1169                $firstJmpOp = &$opcodes[$firstJmp];
1170                break;
1171            }
1172        }
1173        // }}}
1174
1175        // {{{ while
1176        if (isset($firstJmpOp)
1177         && $firstJmpOp['opcode'] == XC_JMPZ
1178         && $firstJmpOp['jmpouts'][0] > $range[1]
1179         && $lastOp['opcode'] == XC_JMP && !empty($lastOp['jmpouts'])
1180         && $lastOp['jmpouts'][0] == $range[0]) {
1181            $this->removeJmpInfo($EX, $firstJmp);
1182            $this->removeJmpInfo($EX, $range[1]);
1183            $this->beginComplexBlock($EX);
1184
1185            ob_start();
1186            $this->beginScope($EX);
1187            $this->recognizeAndDecompileClosedBlocks($EX, $range);
1188            $this->endScope($EX);
1189            $body = ob_get_clean();
1190
1191            echo $indent, 'while (', str($this->getOpVal($firstJmpOp['op1'], $EX)), ") {", PHP_EOL;
1192            echo $body;
1193            echo $indent, '}', PHP_EOL;
1194
1195            $this->endComplexBlock($EX);
1196            return;
1197        }
1198        // }}}
1199        // {{{ foreach
1200        if (isset($firstJmpOp)
1201         && $firstJmpOp['opcode'] == XC_FE_FETCH
1202         && $firstJmpOp['jmpouts'][0] > $range[1]
1203         && $lastOp['opcode'] == XC_JMP && !empty($lastOp['jmpouts'])
1204         && $lastOp['jmpouts'][0] == $firstJmp) {
1205            $this->removeJmpInfo($EX, $firstJmp);
1206            $this->removeJmpInfo($EX, $range[1]);
1207            $this->beginComplexBlock($EX);
1208
1209            ob_start();
1210            $this->beginScope($EX);
1211            $this->recognizeAndDecompileClosedBlocks($EX, $range);
1212            $this->endScope($EX);
1213            $body = ob_get_clean();
1214
1215            $as = foldToCode($firstJmpOp['fe_as'], $EX);
1216            if (isset($firstJmpOp['fe_key'])) {
1217                $as = str($firstJmpOp['fe_key'], $EX) . ' => ' . str($as);
1218            }
1219
1220            echo $indent, 'foreach (', str($firstJmpOp['fe_src'], $EX), " as $as) {", PHP_EOL;
1221            echo $body;
1222            echo $indent, '}', PHP_EOL;
1223
1224            $this->endComplexBlock($EX);
1225            if ($opcodes[$range[1] + 1]['opcode'] == XC_SWITCH_FREE) {
1226                $this->removeJmpInfo($EX, $range[1] + 1);
1227            }
1228            return;
1229        }
1230        // }}}
1231
1232        $this->decompileBasicBlock($EX, $range, true);
1233    }
1234    // }}}
1235    function recognizeAndDecompileClosedBlocks(&$EX, $range) // {{{ decompile in a tree way
1236    {
1237        $opcodes = &$EX['opcodes'];
1238
1239        $starti = $range[0];
1240        for ($i = $starti; $i <= $range[1]; ) {
1241            if (!empty($opcodes[$i]['jmpins']) || !empty($opcodes[$i]['jmpouts'])) {
1242                $blockFirst = $i;
1243                $blockLast = -1;
1244                $j = $blockFirst;
1245                do {
1246                    $op = $opcodes[$j];
1247                    if (!empty($op['jmpins'])) {
1248                        // care about jumping from blocks behind, not before
1249                        foreach ($op['jmpins'] as $oplineNumber) {
1250                            if ($oplineNumber <= $range[1] && $blockLast < $oplineNumber) {
1251                                $blockLast = $oplineNumber;
1252                            }
1253                        }
1254                    }
1255                    if (!empty($op['jmpouts'])) {
1256                        $blockLast = max($blockLast, max($op['jmpouts']) - 1);
1257                    }
1258                    ++$j;
1259                } while ($j <= $blockLast);
1260                if (!assert('$blockLast <= $range[1]')) {
1261                    var_dump($blockLast, $range[1]);
1262                    printBacktrace();
1263                }
1264
1265                if ($blockLast >= $blockFirst) {
1266                    if ($blockFirst > $starti) {
1267                        $this->decompileBasicBlock($EX, array($starti, $blockFirst - 1));
1268                    }
1269                    if ($this->decompileComplexBlock($EX, array($blockFirst, $blockLast)) === false) {
1270                        if ($EX['lastBlock'] == 'complex') {
1271                            echo PHP_EOL;
1272                        }
1273                        $EX['lastBlock'] = null;
1274                    }
1275                    $starti = $blockLast + 1;
1276                    $i = $starti;
1277                }
1278                else {
1279                    ++$i;
1280                }
1281            }
1282            else {
1283                ++$i;
1284            }
1285        }
1286        if ($starti <= $range[1]) {
1287            $this->decompileBasicBlock($EX, array($starti, $range[1]));
1288        }
1289    }
1290    // }}}
1291    function &dop_array($op_array, $indent = '') // {{{
1292    {
1293        $op_array['opcodes'] = $this->fixOpcode($op_array['opcodes'], true, $indent == '' ? 1 : null);
1294        $opcodes = &$op_array['opcodes'];
1295        $last = count($opcodes) - 1;
1296        // {{{ build jmpins/jmpouts to op_array
1297        for ($i = 0; $i <= $last; $i ++) {
1298            $op = &$opcodes[$i];
1299            $op['line'] = $i;
1300            switch ($op['opcode']) {
1301            case XC_CONT:
1302            case XC_BRK:
1303                $op['jmpouts'] = array();
1304                break;
1305
1306            case XC_GOTO:
1307                $target = $op['op1']['var'];
1308                $op['goto'] = $target;
1309                $opcodes[$target]['gofrom'][] = $i;
1310                break;
1311
1312            case XC_JMP:
1313                $target = $op['op1']['var'];
1314                $op['jmpouts'] = array($target);
1315                $opcodes[$target]['jmpins'][] = $i;
1316                break;
1317
1318            case XC_JMPZNZ:
1319                $jmpz = $op['op2']['opline_num'];
1320                $jmpnz = $op['extended_value'];
1321                $op['jmpouts'] = array($jmpz, $jmpnz);
1322                $opcodes[$jmpz]['jmpins'][] = $i;
1323                $opcodes[$jmpnz]['jmpins'][] = $i;
1324                break;
1325
1326            case XC_JMPZ:
1327            case XC_JMPNZ:
1328            case XC_JMPZ_EX:
1329            case XC_JMPNZ_EX:
1330            // case XC_JMP_SET:
1331            // case XC_JMP_SET_VAR:
1332            // case XC_FE_RESET:
1333            case XC_FE_FETCH:
1334            // case XC_JMP_NO_CTOR:
1335                $target = $op['op2']['opline_num'];
1336                //if (!isset($target)) {
1337                //  $this->dumpop($op, $EX);
1338                //  var_dump($op); exit;
1339                //}
1340                $op['jmpouts'] = array($target);
1341                $opcodes[$target]['jmpins'][] = $i;
1342                break;
1343
1344            /*
1345            case XC_RETURN:
1346                $op['jmpouts'] = array();
1347                break;
1348            */
1349
1350            case XC_SWITCH_FREE:
1351                $op['jmpouts'] = array($i + 1);
1352                $opcodes[$i + 1]['jmpins'][] = $i;
1353                break;
1354
1355            case XC_CASE:
1356                // just to link together
1357                $op['jmpouts'] = array($i + 2);
1358                $opcodes[$i + 2]['jmpins'][] = $i;
1359                break;
1360
1361            case XC_CATCH:
1362                $catchNext = $op['extended_value'];
1363                $catchBegin = $opcodes[$i - 1]['opcode'] == XC_FETCH_CLASS ? $i - 1 : $i;
1364                $opcodes[$catchBegin]['jmpouts'] = array($catchNext);
1365                $opcodes[$catchNext]['jmpins'][] = $catchBegin;
1366                break;
1367            }
1368            /*
1369            if (!empty($op['jmpouts']) || !empty($op['jmpins'])) {
1370                echo $i, "\t", xcache_get_opcode($op['opcode']), PHP_EOL;
1371            }
1372            // */
1373        }
1374        unset($op);
1375        if ($op_array['try_catch_array']) {
1376            foreach ($op_array['try_catch_array'] as $try_catch_element) {
1377                $catch_op = $try_catch_element['catch_op'];
1378                $try_op = $try_catch_element['try_op'];
1379                $opcodes[$try_op]['jmpins'][] = $catch_op;
1380                $opcodes[$catch_op]['jmpouts'][] = $try_op;
1381                $opcodes[$catch_op]['isCatchBegin'] = true;
1382            }
1383        }
1384        // }}}
1385        // build semi-basic blocks
1386        $nextbbs = array();
1387        $starti = 0;
1388        for ($i = 1; $i <= $last; $i ++) {
1389            if (isset($opcodes[$i]['jmpins'])
1390             || isset($opcodes[$i - 1]['jmpouts'])) {
1391                $nextbbs[$starti] = $i;
1392                $starti = $i;
1393            }
1394        }
1395        $nextbbs[$starti] = $last + 1;
1396
1397        $EX = array();
1398        $EX['Ts'] = array();
1399        $EX['indent'] = $indent;
1400        $EX['nextbbs'] = $nextbbs;
1401        $EX['op_array'] = &$op_array;
1402        $EX['opcodes'] = &$opcodes;
1403        $EX['range'] = array(0, count($opcodes) - 1);
1404        // func call
1405        $EX['object'] = null;
1406        $EX['called_scope'] = null;
1407        $EX['fbc'] = null;
1408        $EX['argstack'] = array();
1409        $EX['arg_types_stack'] = array();
1410        $EX['scopeStack'] = array();
1411        $EX['silence'] = 0;
1412        $EX['recvs'] = array();
1413        $EX['uses'] = array();
1414        $EX['lastBlock'] = null;
1415        $EX['value2constant'] = array();
1416        if (isset($this->activeFile)) {
1417            $EX['value2constant'][$this->activeFile] = '__FILE__';
1418        }
1419        if (isset($this->activeClass)) {
1420            $EX['value2constant'][$this->activeClass] = '__CLASS__';
1421        }
1422        if (isset($this->activeMethod)) {
1423            $EX['value2constant'][$this->activeMethod] = '__METHOD__';
1424        }
1425        if (isset($this->activeFunction)) {
1426            $EX['value2constant'][$this->activeFunction] = '__FUNCTION__';
1427        }
1428
1429        /* dump whole array
1430        $this->keepTs = true;
1431        $this->dasmBasicBlock($EX, $range);
1432        for ($i = $range[0]; $i <= $range[1]; ++$i) {
1433            echo $i, "\t", $this->dumpop($opcodes[$i], $EX);
1434        }
1435        // */
1436        // decompile in a tree way
1437        $this->recognizeAndDecompileClosedBlocks($EX, $EX['range'], $EX['indent']);
1438        return $EX;
1439    }
1440    // }}}
1441    function dasmBasicBlock(&$EX, $range) // {{{
1442    {
1443        $T = &$EX['Ts'];
1444        $opcodes = &$EX['opcodes'];
1445        $lastphpop = null;
1446        $currentSourceLine = null;
1447
1448        for ($i = $range[0]; $i <= $range[1]; $i ++, unsetArray($EX['value2constant'], $currentSourceLine)) {
1449            // {{{ prepair
1450            $op = &$opcodes[$i];
1451            $opc = $op['opcode'];
1452            if ($opc == XC_NOP) {
1453                $this->usedOps[$opc] = true;
1454                continue;
1455            }
1456
1457            $op1 = $op['op1'];
1458            $op2 = $op['op2'];
1459            $res = $op['result'];
1460            $ext = $op['extended_value'];
1461            $currentSourceLine = $op['lineno'];
1462            $EX['value2constant'][$currentSourceLine] = '__LINE__';
1463
1464            $opname = xcache_get_opcode($opc);
1465
1466            if ($opname == 'UNDEF' || !isset($opname)) {
1467                echo 'UNDEF OP:';
1468                $this->dumpop($op, $EX);
1469                continue;
1470            }
1471            // echo $i, ' '; $this->dumpop($op, $EX); //var_dump($op);
1472
1473            $resvar = null;
1474            unset($curResVar);
1475            if (array_key_exists($res['var'], $T)) {
1476                $curResVar = &$T[$res['var']];
1477            }
1478            if ((ZEND_ENGINE_2_4 ? ($res['op_type'] & EXT_TYPE_UNUSED) : ($res['EA.type'] & EXT_TYPE_UNUSED)) || $res['op_type'] == XC_IS_UNUSED) {
1479                $istmpres = false;
1480            }
1481            else {
1482                $istmpres = true;
1483            }
1484            // }}}
1485            // echo $opname, "\n";
1486
1487            $notHandled = false;
1488            switch ($opc) {
1489            case XC_NEW: // {{{
1490                array_push($EX['arg_types_stack'], array($EX['fbc'], $EX['object'], $EX['called_scope']));
1491                $EX['object'] = (int) $res['var'];
1492                $EX['called_scope'] = null;
1493                $EX['fbc'] = 'new ' . $this->stripNamespace($this->getOpVal($op1, $EX));
1494                break;
1495                // }}}
1496            case XC_THROW: // {{{
1497                $resvar = 'throw ' . str($this->getOpVal($op1, $EX));
1498                break;
1499                // }}}
1500            case XC_CLONE: // {{{
1501                $resvar = 'clone ' . str($this->getOpVal($op1, $EX));
1502                break;
1503                // }}}
1504            case XC_CATCH: // {{{
1505                break;
1506                // }}}
1507            case XC_INSTANCEOF: // {{{
1508                $resvar = str($this->getOpVal($op1, $EX)) . ' instanceof ' . $this->stripNamespace($this->getOpVal($op2, $EX));
1509                break;
1510                // }}}
1511            case XC_FETCH_CLASS: // {{{
1512                if ($op2['op_type'] == XC_IS_UNUSED) {
1513                    switch (($ext & (defined('ZEND_FETCH_CLASS_MASK') ? ZEND_FETCH_CLASS_MASK : 0xFF))) {
1514                    case ZEND_FETCH_CLASS_SELF:
1515                        $class = 'self';
1516                        break;
1517                    case ZEND_FETCH_CLASS_PARENT:
1518                        $class = 'parent';
1519                        break;
1520                    case ZEND_FETCH_CLASS_STATIC:
1521                        $class = 'static';
1522                        break;
1523                    }
1524                    $istmpres = true;
1525                }
1526                else {
1527                    $class = isset($op2['constant']) ? $op2['constant'] : $this->getOpVal($op2, $EX);
1528                }
1529                $resvar = $class;
1530                break;
1531                // }}}
1532            case XC_FETCH_CONSTANT: // {{{
1533                if ($op1['op_type'] == XC_IS_UNUSED) {
1534                    $resvar = $this->stripNamespace($op2['constant']);
1535                    break;
1536                }
1537
1538                if ($op1['op_type'] == XC_IS_CONST) {
1539                    $resvar = $this->stripNamespace($op1['constant']);
1540                }
1541                else {
1542                    $resvar = $this->getOpVal($op1, $EX);
1543                }
1544
1545                $resvar = str($resvar) . '::' . unquoteName($this->getOpVal($op2, $EX));
1546                break;
1547                // }}}
1548                // {{{ case FETCH_*
1549            case XC_FETCH_R:
1550            case XC_FETCH_W:
1551            case XC_FETCH_RW:
1552            case XC_FETCH_FUNC_ARG:
1553            case XC_FETCH_UNSET:
1554            case XC_FETCH_IS:
1555                $fetchType = defined('ZEND_FETCH_TYPE_MASK') ? ($ext & ZEND_FETCH_TYPE_MASK) : $op2['EA.type'];
1556                $name = isset($op1['constant']) ? $op1['constant'] : unquoteName($this->getOpVal($op1, $EX), $EX);
1557                if ($fetchType == ZEND_FETCH_STATIC_MEMBER) {
1558                    $class = isset($op2['constant']) ? $op2['constant'] : $this->getOpVal($op2, $EX);
1559                    $rvalue = $this->stripNamespace($class) . '::$' . $name;
1560                }
1561                else {
1562                    $rvalue = isset($op1['constant']) ? $op1['constant'] : $this->getOpVal($op1, $EX);
1563                    $globalName = xcache_is_autoglobal($name) ? "\$$name" : "\$GLOBALS[" . $this->getOpVal($op1, $EX) . "]";
1564                    $rvalue = new Decompiler_Fetch($rvalue, $fetchType, $globalName);
1565                }
1566
1567                if ($res['op_type'] != XC_IS_UNUSED) {
1568                    $resvar = $rvalue;
1569                }
1570                break;
1571                // }}}
1572            case XC_UNSET_VAR: // {{{
1573                $fetchType = defined('ZEND_FETCH_TYPE_MASK') ? ($ext & ZEND_FETCH_TYPE_MASK) : $op2['EA.type'];
1574                if ($fetchType == ZEND_FETCH_STATIC_MEMBER) {
1575                    $class = isset($op2['constant']) ? $op2['constant'] /* PHP5.3- */ : $this->getOpVal($op2, $EX);
1576                    $rvalue = $this->stripNamespace($class) . '::$' . $op1['constant'];
1577                }
1578                else {
1579                    $rvalue = isset($op1['constant']) ? '$' . $op1['constant'] /* PHP5.1- */ : $this->getOpVal($op1, $EX);
1580                }
1581
1582                $op['php'] = "unset(" . str($rvalue, $EX) . ")";
1583                $lastphpop = &$op;
1584                break;
1585                // }}}
1586                // {{{ case FETCH_DIM_*
1587            case XC_FETCH_DIM_TMP_VAR:
1588            case XC_FETCH_DIM_R:
1589            case XC_FETCH_DIM_W:
1590            case XC_FETCH_DIM_RW:
1591            case XC_FETCH_DIM_FUNC_ARG:
1592            case XC_FETCH_DIM_UNSET:
1593            case XC_FETCH_DIM_IS:
1594            case XC_ASSIGN_DIM:
1595            case XC_UNSET_DIM:
1596            case XC_UNSET_OBJ:
1597                $src = $this->getOpVal($op1, $EX);
1598                if (is_a($src, "Decompiler_ForeachBox")) {
1599                    $src->iskey = $this->getOpVal($op2, $EX);
1600                    $resvar = $src;
1601                    break;
1602                }
1603
1604                if (is_a($src, "Decompiler_DimBox")) {
1605                    $dimbox = $src;
1606                }
1607                else {
1608                    if (!is_a($src, "Decompiler_ListBox")) {
1609                        $op1val = $this->getOpVal($op1, $EX);
1610                        $list = new Decompiler_List(isset($op1val) ? $op1val : '$this');
1611
1612                        $src = new Decompiler_ListBox($list);
1613                        if (!isset($op1['var'])) {
1614                            $this->dumpop($op, $EX);
1615                            var_dump($op);
1616                            die('missing var');
1617                        }
1618                        $T[$op1['var']] = $src;
1619                        unset($list);
1620                    }
1621                    $dim = new Decompiler_Dim($src);
1622                    $src->obj->dims[] = &$dim;
1623
1624                    $dimbox = new Decompiler_DimBox($dim);
1625                }
1626                $dim = &$dimbox->obj;
1627                $dim->offsets[] = $this->getOpVal($op2, $EX);
1628                /* TODO: use type mask */
1629                if ($ext == ZEND_FETCH_ADD_LOCK) {
1630                    $src->obj->everLocked = true;
1631                }
1632                else if ($ext == ZEND_FETCH_STANDARD) {
1633                    $dim->isLast = true;
1634                }
1635                if ($opc == XC_UNSET_OBJ) {
1636                    $dim->isObject = true;
1637                }
1638                unset($dim);
1639                $rvalue = $dimbox;
1640                unset($dimbox);
1641
1642                if ($opc == XC_ASSIGN_DIM) {
1643                    $lvalue = $rvalue;
1644                    ++ $i;
1645                    $rvalue = $this->getOpVal($opcodes[$i]['op1'], $EX);
1646                    $resvar = str($lvalue, $EX) . ' = ' . str($rvalue);
1647                }
1648                else if ($opc == XC_UNSET_DIM || $opc == XC_UNSET_OBJ) {
1649                    $op['php'] = "unset(" . str($rvalue, $EX) . ")";
1650                    $lastphpop = &$op;
1651                }
1652                else if ($res['op_type'] != XC_IS_UNUSED) {
1653                    $resvar = $rvalue;
1654                }
1655                break;
1656                // }}}
1657            case XC_ASSIGN: // {{{
1658                $lvalue = $this->getOpVal($op1, $EX);
1659                $rvalue = $this->getOpVal($op2, $EX);
1660                if (is_a($rvalue, 'Decompiler_ForeachBox')) {
1661                    $type = $rvalue->iskey ? 'fe_key' : 'fe_as';
1662                    $rvalue->obj[$type] = $lvalue;
1663                    unset($T[$op2['var']]);
1664                    break;
1665                }
1666                if (is_a($rvalue, "Decompiler_DimBox")) {
1667                    $dim = &$rvalue->obj;
1668                    $dim->assign = $lvalue;
1669                    if ($dim->isLast) {
1670                        $resvar = foldToCode($dim->value, $EX);
1671                    }
1672                    unset($dim);
1673                    break;
1674                }
1675                if (is_a($rvalue, 'Decompiler_Fetch')) {
1676                    $src = str($rvalue->src, $EX);
1677                    if ('$' . unquoteName($src) == $lvalue) {
1678                        switch ($rvalue->fetchType) {
1679                        case ZEND_FETCH_STATIC:
1680                            $statics = &$EX['op_array']['static_variables'];
1681                            if ((xcache_get_type($statics[$name]) & IS_LEXICAL_VAR)) {
1682                                $EX['uses'][] = str($lvalue);
1683                                unset($statics);
1684                                break 2;
1685                            }
1686                            unset($statics);
1687                        }
1688                    }
1689                }
1690                $resvar = new Decompiler_Binop($this, $lvalue, XC_ASSIGN, $rvalue);
1691                break;
1692                // }}}
1693            case XC_ASSIGN_REF: // {{{
1694                $lvalue = $this->getOpVal($op1, $EX);
1695                $rvalue = $this->getOpVal($op2, $EX);
1696                if (is_a($rvalue, 'Decompiler_Fetch')) {
1697                    $src = str($rvalue->src, $EX);
1698                    if ('$' . unquoteName($src) == $lvalue) {
1699                        switch ($rvalue->fetchType) {
1700                        case ZEND_FETCH_GLOBAL:
1701                        case ZEND_FETCH_GLOBAL_LOCK:
1702                            $resvar = 'global ' . $lvalue;
1703                            break 2;
1704                        case ZEND_FETCH_STATIC:
1705                            $statics = &$EX['op_array']['static_variables'];
1706                            if ((xcache_get_type($statics[$name]) & IS_LEXICAL_REF)) {
1707                                $EX['uses'][] = '&' . str($lvalue);
1708                                unset($statics);
1709                                break 2;
1710                            }
1711
1712                            $resvar = 'static ' . $lvalue;
1713                            $name = unquoteName($src);
1714                            if (isset($statics[$name])) {
1715                                $var = $statics[$name];
1716                                $resvar .= ' = ';
1717                                $resvar .= str(value($var, $EX), $EX);
1718                            }
1719                            unset($statics);
1720                            break 2;
1721                        default:
1722                        }
1723                    }
1724                }
1725                // TODO: PHP_6 global
1726                $resvar = new Decompiler_Binop($this, $lvalue, XC_ASSIGN_REF, $rvalue);
1727                break;
1728                // }}}
1729            // {{{ case FETCH_OBJ_*
1730            case XC_FETCH_OBJ_R:
1731            case XC_FETCH_OBJ_W:
1732            case XC_FETCH_OBJ_RW:
1733            case XC_FETCH_OBJ_FUNC_ARG:
1734            case XC_FETCH_OBJ_UNSET:
1735            case XC_FETCH_OBJ_IS:
1736            case XC_ASSIGN_OBJ:
1737                $obj = $this->getOpVal($op1, $EX);
1738                if (!isset($obj)) {
1739                    $obj = '$this';
1740                }
1741                $rvalue = str($obj) . "->" . unquoteVariableName($this->getOpVal($op2, $EX), $EX);
1742                if ($res['op_type'] != XC_IS_UNUSED) {
1743                    $resvar = $rvalue;
1744                }
1745                if ($opc == XC_ASSIGN_OBJ) {
1746                    ++ $i;
1747                    $lvalue = $rvalue;
1748                    $rvalue = $this->getOpVal($opcodes[$i]['op1'], $EX);
1749                    $resvar = "$lvalue = " . str($rvalue);
1750                }
1751                break;
1752                // }}}
1753            case XC_ISSET_ISEMPTY_DIM_OBJ:
1754            case XC_ISSET_ISEMPTY_PROP_OBJ:
1755            case XC_ISSET_ISEMPTY:
1756            case XC_ISSET_ISEMPTY_VAR: // {{{
1757                if ($opc == XC_ISSET_ISEMPTY_VAR) {
1758                    $rvalue = $this->getOpVal($op1, $EX);
1759                    // for < PHP_5_3
1760                    if ($op1['op_type'] == XC_IS_CONST) {
1761                        $rvalue = '$' . unquoteVariableName($this->getOpVal($op1, $EX));
1762                    }
1763                    $fetchtype = defined('ZEND_FETCH_TYPE_MASK') ? ($ext & ZEND_FETCH_TYPE_MASK) : $op2['EA.type'];
1764                    if ($fetchtype == ZEND_FETCH_STATIC_MEMBER) {
1765                        $class = isset($op2['constant']) ? $op2['constant'] : $this->getOpVal($op2, $EX);
1766                        $rvalue = $this->stripNamespace($class) . '::' . unquoteName($rvalue, $EX);
1767                    }
1768                }
1769                else if ($opc == XC_ISSET_ISEMPTY) {
1770                    $rvalue = $this->getOpVal($op1, $EX);
1771                }
1772                else {
1773                    $container = $this->getOpVal($op1, $EX);
1774                    $dim = $this->getOpVal($op2, $EX);
1775                    if ($opc == XC_ISSET_ISEMPTY_PROP_OBJ) {
1776                        if (!isset($container)) {
1777                            $container = '$this';
1778                        }
1779                        $rvalue = str($container, $EX) . "->" . unquoteVariableName($dim);
1780                    }
1781                    else {
1782                        $rvalue = str($container, $EX) . '[' . str($dim) .']';
1783                    }
1784                }
1785
1786                /* TODO: use type mask */
1787                switch (($ext & ZEND_ISSET_ISEMPTY_MASK)) {
1788                case ZEND_ISSET:
1789                    $rvalue = "isset(" . str($rvalue) . ")";
1790                    break;
1791                case ZEND_ISEMPTY:
1792                    $rvalue = "empty(" . str($rvalue) . ")";
1793                    break;
1794                }
1795                $resvar = $rvalue;
1796                break;
1797                // }}}
1798            case XC_SEND_VAR_NO_REF:
1799            case XC_SEND_VAL:
1800            case XC_SEND_REF:
1801            case XC_SEND_VAR: // {{{
1802                $ref = ($opc == XC_SEND_REF ? '&' : '');
1803                $EX['argstack'][] = $ref . str($this->getOpVal($op1, $EX));
1804                break;
1805                // }}}
1806            case XC_INIT_STATIC_METHOD_CALL:
1807            case XC_INIT_METHOD_CALL: // {{{
1808                array_push($EX['arg_types_stack'], array($EX['fbc'], $EX['object'], $EX['called_scope']));
1809                if ($opc == XC_INIT_STATIC_METHOD_CALL || $opc == XC_INIT_METHOD_CALL || $op1['op_type'] != XC_IS_UNUSED) {
1810                    $obj = $this->getOpVal($op1, $EX);
1811                    if (!isset($obj)) {
1812                        $obj = '$this';
1813                    }
1814                    if ($opc == XC_INIT_STATIC_METHOD_CALL || /* PHP4 */ isset($op1['constant'])) {
1815                        $EX['object'] = null;
1816                        $EX['called_scope'] = $this->stripNamespace(unquoteName($obj, $EX));
1817                    }
1818                    else {
1819                        $EX['object'] = $obj;
1820                        $EX['called_scope'] = null;
1821                    }
1822                    if ($res['op_type'] != XC_IS_UNUSED) {
1823                        $resvar = '$obj call$';
1824                    }
1825                }
1826                else {
1827                    $EX['object'] = null;
1828                    $EX['called_scope'] = null;
1829                }
1830
1831                $EX['fbc'] = isset($op2['constant']) ? $op2['constant'] : $this->getOpVal($op2, $EX);
1832                if (($opc == XC_INIT_STATIC_METHOD_CALL || $opc == XC_INIT_METHOD_CALL) && !isset($EX['fbc'])) {
1833                    $EX['fbc'] = '__construct';
1834                }
1835                break;
1836                // }}}
1837            case XC_INIT_NS_FCALL_BY_NAME:
1838            case XC_INIT_FCALL_BY_NAME: // {{{
1839                array_push($EX['arg_types_stack'], array($EX['fbc'], $EX['object'], $EX['called_scope']));
1840                $EX['object'] = null;
1841                $EX['called_scope'] = null;
1842                $EX['fbc'] = $this->getOpVal($op2, $EX);
1843                break;
1844                // }}}
1845            case XC_INIT_FCALL_BY_FUNC: // {{{ deprecated even in PHP 4?
1846                $EX['object'] = null;
1847                $EX['called_scope'] = null;
1848                $which = $op1['var'];
1849                $EX['fbc'] = $EX['op_array']['funcs'][$which]['name'];
1850                break;
1851                // }}}
1852            case XC_DO_FCALL_BY_FUNC:
1853                $which = $op1['var'];
1854                $fname = $EX['op_array']['funcs'][$which]['name'];
1855                $args = $this->popargs($EX, $ext);
1856                $resvar = $fname . "($args)";
1857                break;
1858            case XC_DO_FCALL:
1859                $fname = unquoteName($this->getOpVal($op1, $EX), $EX);
1860                $args = $this->popargs($EX, $ext);
1861                $resvar = $fname . "($args)";
1862                break;
1863            case XC_DO_FCALL_BY_NAME: // {{{
1864                $object = null;
1865
1866                $fname = unquoteName($EX['fbc'], $EX);
1867                if (!is_int($EX['object'])) {
1868                    $object = $EX['object'];
1869                }
1870
1871                $args = $this->popargs($EX, $ext);
1872
1873                $prefix = (isset($object) ? $object . '->' : '' )
1874                    . (isset($EX['called_scope']) ? $EX['called_scope'] . '::' : '' );
1875                $resvar = $prefix
1876                    . (!$prefix ? $this->stripNamespace($fname) : $fname)
1877                    . "($args)";
1878                unset($args);
1879
1880                if (is_int($EX['object'])) {
1881                    $T[$EX['object']] = $resvar;
1882                    $resvar = null;
1883                }
1884                list($EX['fbc'], $EX['object'], $EX['called_scope']) = array_pop($EX['arg_types_stack']);
1885                break;
1886                // }}}
1887            case XC_VERIFY_ABSTRACT_CLASS: // {{{
1888                //unset($T[$op1['var']]);
1889                break;
1890                // }}}
1891            case XC_DECLARE_CLASS: 
1892            case XC_DECLARE_INHERITED_CLASS:
1893            case XC_DECLARE_INHERITED_CLASS_DELAYED: // {{{
1894                $key = $op1['constant'];
1895                if (!isset($this->dc['class_table'][$key])) {
1896                    echo 'class not found: ', $key, 'existing classes are:', "\n";
1897                    var_dump(array_keys($this->dc['class_table']));
1898                    exit;
1899                }
1900                $class = &$this->dc['class_table'][$key];
1901                if (!isset($class['name'])) {
1902                    $class['name'] = unquoteName($this->getOpVal($op2, $EX), $EX);
1903                }
1904                if ($opc == XC_DECLARE_INHERITED_CLASS || $opc == XC_DECLARE_INHERITED_CLASS_DELAYED) {
1905                    $ext /= XC_SIZEOF_TEMP_VARIABLE;
1906                    $class['parent'] = $T[$ext];
1907                    unset($T[$ext]);
1908                }
1909                else {
1910                    $class['parent'] = null;
1911                }
1912
1913                for (;;) {
1914                    if ($i + 1 <= $range[1]
1915                     && $opcodes[$i + 1]['opcode'] == XC_ADD_INTERFACE
1916                     && $opcodes[$i + 1]['op1']['var'] == $res['var']) {
1917                        // continue
1918                    }
1919                    else if ($i + 2 <= $range[1]
1920                     && $opcodes[$i + 2]['opcode'] == XC_ADD_INTERFACE
1921                     && $opcodes[$i + 2]['op1']['var'] == $res['var']
1922                     && $opcodes[$i + 1]['opcode'] == XC_FETCH_CLASS) {
1923                        // continue
1924                    }
1925                    else {
1926                        break;
1927                    }
1928                    $this->usedOps[XC_ADD_INTERFACE] = true;
1929
1930                    $fetchop = &$opcodes[$i + 1];
1931                    $interface = $this->stripNamespace(unquoteName($this->getOpVal($fetchop['op2'], $EX), $EX));
1932                    $addop = &$opcodes[$i + 2];
1933                    $class['interfaces'][$addop['extended_value']] = $interface;
1934                    unset($fetchop, $addop);
1935                    $i += 2;
1936                }
1937                $this->activeClass = $class['name'];
1938                $this->dclass($class, $EX['indent']);
1939                $this->activeClass = null;
1940                echo "\n";
1941                unset($class);
1942                break;
1943                // }}}
1944            case XC_INIT_STRING: // {{{
1945                $resvar = "''";
1946                break;
1947                // }}}
1948            case XC_ADD_CHAR:
1949            case XC_ADD_STRING:
1950            case XC_ADD_VAR: // {{{
1951                $op1val = $this->getOpVal($op1, $EX);
1952                $op2val = $this->getOpVal($op2, $EX);
1953                switch ($opc) {
1954                case XC_ADD_CHAR:
1955                    $op2val = value(chr(str($op2val)), $EX);
1956                    break;
1957                case XC_ADD_STRING:
1958                    break;
1959                case XC_ADD_VAR:
1960                    break;
1961                }
1962                if (str($op1val) == "''") {
1963                    $rvalue = $op2val;
1964                }
1965                else if (str($op2val) == "''") {
1966                    $rvalue = $op1val;
1967                }
1968                else {
1969                    $rvalue = str($op1val) . ' . ' . str($op2val);
1970                }
1971                $resvar = $rvalue;
1972                // }}}
1973                break;
1974            case XC_PRINT: // {{{
1975                $op1val = $this->getOpVal($op1, $EX);
1976                $resvar = "print(" . str($op1val) . ")";
1977                break;
1978                // }}}
1979            case XC_ECHO: // {{{
1980                $op1val = $this->getOpVal($op1, $EX);
1981                $resvar = "echo " . str($op1val);
1982                break;
1983                // }}}
1984            case XC_EXIT: // {{{
1985                $op1val = $this->getOpVal($op1, $EX);
1986                $resvar = "exit($op1val)";
1987                break;
1988                // }}}
1989            case XC_INIT_ARRAY:
1990            case XC_ADD_ARRAY_ELEMENT: // {{{
1991                $rvalue = $this->getOpVal($op1, $EX, true);
1992
1993                if ($opc == XC_ADD_ARRAY_ELEMENT) {
1994                    $assoc = $this->getOpVal($op2, $EX);
1995                    if (isset($assoc)) {
1996                        $curResVar->value[] = array($assoc, $rvalue);
1997                    }
1998                    else {
1999                        $curResVar->value[] = array(null, $rvalue);
2000                    }
2001                }
2002                else {
2003                    if ($opc == XC_INIT_ARRAY) {
2004                        $resvar = new Decompiler_Array();
2005                        if (!isset($rvalue)) {
2006                            continue;
2007                        }
2008                    }
2009
2010                    $assoc = $this->getOpVal($op2, $EX);
2011                    if (isset($assoc)) {
2012                        $resvar->value[] = array($assoc, $rvalue);
2013                    }
2014                    else {
2015                        $resvar->value[] = array(null, $rvalue);
2016                    }
2017                }
2018                break;
2019                // }}}
2020            case XC_QM_ASSIGN:
2021            case XC_QM_ASSIGN_VAR: // {{{
2022                if (isset($curResVar) && is_a($curResVar, 'Decompiler_Binop')) {
2023                    $curResVar->op2 = $this->getOpVal($op1, $EX);
2024                }
2025                else {
2026                    $resvar = $this->getOpVal($op1, $EX);
2027                }
2028                break;
2029                // }}}
2030            case XC_BOOL: // {{{
2031                $resvar = /*'(bool) ' .*/ $this->getOpVal($op1, $EX);
2032                break;
2033                // }}}
2034            case XC_RETURN: // {{{
2035                $resvar = "return " . str($this->getOpVal($op1, $EX));
2036                break;
2037                // }}}
2038            case XC_INCLUDE_OR_EVAL: // {{{
2039                $type = ZEND_ENGINE_2_4 ? $ext : $op2['var']; // hack
2040                $keyword = $this->includeTypes[$type];
2041                $resvar = "$keyword " . str($this->getOpVal($op1, $EX));
2042                break;
2043                // }}}
2044            case XC_FE_RESET: // {{{
2045                $resvar = $this->getOpVal($op1, $EX);
2046                break;
2047                // }}}
2048            case XC_FE_FETCH: // {{{
2049                $op['fe_src'] = $this->getOpVal($op1, $EX, true);
2050                $fe = new Decompiler_ForeachBox($op);
2051                $fe->iskey = false;
2052                $T[$res['var']] = $fe;
2053
2054                ++ $i;
2055                if (($ext & ZEND_FE_FETCH_WITH_KEY)) {
2056                    $fe = new Decompiler_ForeachBox($op);
2057                    $fe->iskey = true;
2058
2059                    $res = $opcodes[$i]['result'];
2060                    $T[$res['var']] = $fe;
2061                }
2062                break;
2063                // }}}
2064            case XC_SWITCH_FREE: // {{{
2065                break;
2066                // }}}
2067            case XC_FREE: // {{{
2068                $free = $T[$op1['var']];
2069                if (!is_a($free, 'Decompiler_Array') && !is_a($free, 'Decompiler_Box')) {
2070                    $op['php'] = is_object($free) ? $free : $this->unquote($free, '(', ')');
2071                    $lastphpop = &$op;
2072                }
2073                unset($T[$op1['var']], $free);
2074                break;
2075                // }}}
2076            case XC_JMP_NO_CTOR:
2077                break;
2078            case XC_JMPZ_EX: // and
2079            case XC_JMPNZ_EX: // or
2080                $resvar = $this->getOpVal($op1, $EX);
2081                break;
2082
2083            case XC_JMPNZ: // while
2084            case XC_JMPZNZ: // for
2085            case XC_JMPZ: // {{{
2086                break;
2087                // }}}
2088            case XC_CONT:
2089            case XC_BRK:
2090                $resvar = $opc == XC_CONT ? 'continue' : 'break';
2091                $count = str($this->getOpVal($op2, $EX));
2092                if ($count != '1') {
2093                    $resvar .= ' ' . $count;
2094                }
2095                break;
2096            case XC_GOTO:
2097                $resvar = 'goto label' . $op['op1']['var'];
2098                $istmpres = false;
2099                break;
2100
2101            case XC_JMP: // {{{
2102                break;
2103                // }}}
2104            case XC_CASE:
2105                // $switchValue = $this->getOpVal($op1, $EX);
2106                $caseValue = $this->getOpVal($op2, $EX);
2107                $resvar = $caseValue;
2108                break;
2109            case XC_RECV_INIT:
2110            case XC_RECV:
2111                $offset = isset($op1['var']) ? $op1['var'] : $op1['constant'];
2112                $lvalue = $this->getOpVal($op['result'], $EX);
2113                if ($opc == XC_RECV_INIT) {
2114                    $default = value($op['op2']['constant'], $EX);
2115                }
2116                else {
2117                    $default = null;
2118                }
2119                $EX['recvs'][$offset] = array($lvalue, $default);
2120                break;
2121            case XC_POST_DEC:
2122            case XC_POST_INC:
2123            case XC_POST_DEC_OBJ:
2124            case XC_POST_INC_OBJ:
2125            case XC_PRE_DEC:
2126            case XC_PRE_INC:
2127            case XC_PRE_DEC_OBJ:
2128            case XC_PRE_INC_OBJ: // {{{
2129                $flags = array_flip(explode('_', $opname));
2130                if (isset($flags['OBJ'])) {
2131                    $resvar = $this->getOpVal($op1, $EX) . '->' . unquoteVariableName($this->getOpVal($op2, $EX), $EX);
2132                }
2133                else {
2134                    $resvar = $this->getOpVal($op1, $EX);
2135                }
2136                $opstr = isset($flags['DEC']) ? '--' : '++';
2137                if (isset($flags['POST'])) {
2138                    $resvar .= $opstr;
2139                }
2140                else {
2141                    $resvar = "$opstr$resvar";
2142                }
2143                break;
2144                // }}}
2145
2146            case XC_BEGIN_SILENCE: // {{{
2147                $EX['silence'] ++;
2148                break;
2149                // }}}
2150            case XC_END_SILENCE: // {{{
2151                $EX['silence'] --;
2152                $lastresvar = '@' . str($lastresvar, $EX);
2153                break;
2154                // }}}
2155            case XC_CAST: // {{{
2156                $type = $ext;
2157                static $type2cast = array(
2158                        IS_LONG   => '(int)',
2159                        IS_DOUBLE => '(double)',
2160                        IS_STRING => '(string)',
2161                        IS_ARRAY  => '(array)',
2162                        IS_OBJECT => '(object)',
2163                        IS_BOOL   => '(bool)',
2164                        IS_NULL   => '(unset)',
2165                        );
2166                assert(isset($type2cast[$type]));
2167                $cast = $type2cast[$type];
2168                $resvar = $cast . ' ' . $this->getOpVal($op1, $EX);
2169                break;
2170                // }}}
2171            case XC_EXT_STMT:
2172            case XC_EXT_FCALL_BEGIN:
2173            case XC_EXT_FCALL_END:
2174            case XC_EXT_NOP:
2175                break;
2176            case XC_DECLARE_FUNCTION:
2177                $this->dfunction($this->dc['function_table'][$op1['constant']], $EX['indent']);
2178                break;
2179            case XC_DECLARE_LAMBDA_FUNCTION: // {{{
2180                ob_start();
2181                $this->dfunction($this->dc['function_table'][$op1['constant']], $EX['indent']);
2182                $resvar = ob_get_clean();
2183                $istmpres = true;
2184                break;
2185                // }}}
2186            case XC_DECLARE_CONST:
2187                $name = $this->stripNamespace(unquoteName($this->getOpVal($op1, $EX), $EX));
2188                $value = str($this->getOpVal($op2, $EX));
2189                $resvar = 'const ' . $name . ' = ' . $value;
2190                break;
2191            case XC_DECLARE_FUNCTION_OR_CLASS:
2192                /* always removed by compiler */
2193                break;
2194            case XC_TICKS:
2195                $lastphpop['ticks'] = ZEND_ENGINE_2_4 ? $ext : $this->getOpVal($op1, $EX);
2196                // $EX['tickschanged'] = true;
2197                break;
2198            case XC_RAISE_ABSTRACT_ERROR:
2199                // abstract function body is empty, don't need this code
2200                break;
2201            case XC_USER_OPCODE:
2202                echo '// ZEND_USER_OPCODE, impossible to decompile';
2203                break;
2204            case XC_OP_DATA:
2205                break;
2206            default: // {{{
2207                $call = array(&$this, $opname);
2208                if (is_callable($call)) {
2209                    $this->usedOps[$opc] = true;
2210                    $this->{$opname}($op, $EX);
2211                }
2212                else if (isset($this->binops[$opc])) { // {{{
2213                    $this->usedOps[$opc] = true;
2214                    $op1val = $this->getOpVal($op1, $EX);
2215                    $op2val = $this->getOpVal($op2, $EX);
2216                    $rvalue = new Decompiler_Binop($this, $op1val, $opc, $op2val);
2217                    $resvar = $rvalue;
2218                    // }}}
2219                }
2220                else if (isset($this->unaryops[$opc])) { // {{{
2221                    $this->usedOps[$opc] = true;
2222                    $op1val = $this->getOpVal($op1, $EX);
2223                    $myop = $this->unaryops[$opc];
2224                    $rvalue = $myop . str($op1val);
2225                    $resvar = $rvalue;
2226                    // }}}
2227                }
2228                else {
2229                    $notHandled = true;
2230                }
2231                // }}}
2232            }
2233            if ($notHandled) {
2234                echo "\x1B[31m * TODO ", $opname, "\x1B[0m\n";
2235            }
2236            else {
2237                $this->usedOps[$opc] = true;
2238            }
2239
2240            if (isset($resvar)) {
2241                if ($istmpres) {
2242                    $T[$res['var']] = $resvar;
2243                    $lastresvar = &$T[$res['var']];
2244                }
2245                else {
2246                    $op['php'] = $resvar;
2247                    $lastphpop = &$op;
2248                    $lastresvar = &$op['php'];
2249                }
2250            }
2251        }
2252        return $T;
2253    }
2254    // }}}
2255    function unquote($str, $st, $ed) // {{{
2256    {
2257        $l1 = strlen($st);
2258        $l2 = strlen($ed);
2259        if (substr($str, 0, $l1) === $st && substr($str, -$l2) === $ed) {
2260            $str = substr($str, $l1, -$l2);
2261        }
2262        return $str;
2263    }
2264    // }}}
2265    function popargs(&$EX, $n) // {{{
2266    {
2267        $args = array();
2268        for ($i = 0; $i < $n; $i ++) {
2269            $a = array_pop($EX['argstack']);
2270            if (is_array($a)) {
2271                array_unshift($args, foldToCode($a, $EX));
2272            }
2273            else {
2274                array_unshift($args, $a);
2275            }
2276        }
2277        return implode(', ', $args);
2278    }
2279    // }}}
2280    function dumpop($op, &$EX) // {{{
2281    {
2282        assert('isset($op)');
2283        $op1 = $op['op1'];
2284        $op2 = $op['op2'];
2285        $d = array(xcache_get_opcode($op['opcode']), $op['opcode']);
2286
2287        foreach (array('op1' => '1:', 'op2' => '2:', 'result' => '>') as $k => $kk) {
2288            switch ($op[$k]['op_type']) {
2289            case XC_IS_UNUSED:
2290                $d[$kk] = 'U:' . $op[$k]['opline_num'];
2291                break;
2292
2293            case XC_IS_VAR:
2294                $d[$kk] = '$' . $op[$k]['var'];
2295                if ($k != 'result') {
2296                    $d[$kk] .= ':' . str($this->getOpVal($op[$k], $EX));
2297                }
2298                break;
2299
2300            case XC_IS_TMP_VAR:
2301                $d[$kk] = '#' . $op[$k]['var'];
2302                if ($k != 'result') {
2303                    $d[$kk] .= ':' . str($this->getOpVal($op[$k], $EX));
2304                }
2305                break;
2306
2307            case XC_IS_CV:
2308                $d[$kk] = $this->getOpVal($op[$k], $EX);
2309                break;
2310
2311            default:
2312                $d[$kk] = $this->getOpVal($op[$k], $EX);
2313            }
2314        }
2315        $d[';'] = $op['extended_value'];
2316        if (!empty($op['jmpouts'])) {
2317            $d['>>'] = implode(',', $op['jmpouts']);
2318        }
2319        if (!empty($op['jmpins'])) {
2320            $d['<<'] = implode(',', $op['jmpins']);
2321        }
2322
2323        foreach ($d as $k => $v) {
2324            echo is_int($k) ? '' : $k, str($v), "\t";
2325        }
2326        echo PHP_EOL;
2327    }
2328    // }}}
2329    function dumpRange(&$EX, $range) // {{{
2330    {
2331        for ($i = $range[0]; $i <= $range[1]; ++$i) {
2332            echo $EX['indent'], $i, "\t"; $this->dumpop($EX['opcodes'][$i], $EX);
2333        }
2334        echo $EX['indent'], "==", PHP_EOL;
2335    }
2336    // }}}
2337    function dargs(&$EX) // {{{
2338    {
2339        $op_array = &$EX['op_array'];
2340
2341        if (isset($op_array['num_args'])) {
2342            $c = $op_array['num_args'];
2343        }
2344        else if (!empty($op_array['arg_types'])) {
2345            $c = count($op_array['arg_types']);
2346        }
2347        else {
2348            // php4
2349            $c = count($EX['recvs']);
2350        }
2351
2352        $refrest = false;
2353        for ($i = 0; $i < $c; $i ++) {
2354            if ($i) {
2355                echo ', ';
2356            }
2357            $arg = $EX['recvs'][$i + 1];
2358            if (isset($op_array['arg_info'])) {
2359                $ai = $op_array['arg_info'][$i];
2360                if (isset($ai['type_hint']) ? ($ai['type_hint'] == IS_CALLABLE || $ai['type_hint'] == IS_OBJECT) : !empty($ai['class_name'])) {
2361                    echo $this->stripNamespace($ai['class_name']), ' ';
2362                    if (!ZEND_ENGINE_2_2 && $ai['allow_null']) {
2363                        echo 'or NULL ';
2364                    }
2365                }
2366                else if (isset($ai['type_hint']) ? $ai['type_hint'] == IS_ARRAY : !empty($ai['array_type_hint'])) {
2367                    echo 'array ';
2368                    if (!ZEND_ENGINE_2_2 && $ai['allow_null']) {
2369                        echo 'or NULL ';
2370                    }
2371                }
2372                if ($ai['pass_by_reference']) {
2373                    echo '&';
2374                }
2375                printf("\$%s", $ai['name']);
2376            }
2377            else {
2378                if ($refrest) {
2379                    echo '&';
2380                }
2381                else if (!empty($op_array['arg_types']) && isset($op_array['arg_types'][$i])) {
2382                    switch ($op_array['arg_types'][$i]) {
2383                    case BYREF_FORCE_REST:
2384                        $refrest = true;
2385                        /* fall */
2386                    case BYREF_FORCE:
2387                        echo '&';
2388                        break;
2389
2390                    case BYREF_NONE:
2391                    case BYREF_ALLOW:
2392                        break;
2393                    default:
2394                        assert(0);
2395                    }
2396                }
2397                echo str($arg[0], $EX);
2398            }
2399            if (isset($arg[1])) {
2400                echo ' = ', str($arg[1], $EX);
2401            }
2402        }
2403    }
2404    // }}}
2405    function duses(&$EX) // {{{
2406    {
2407        if ($EX['uses']) {
2408            echo ' use(', implode(', ', $EX['uses']), ')';
2409        }
2410    }
2411    // }}}
2412    function dfunction($func, $indent = '', $decorations = array(), $nobody = false) // {{{
2413    {
2414        $this->detectNamespace($func['op_array']['function_name']);
2415
2416        if ($nobody) {
2417            $EX = array();
2418            $EX['op_array'] = &$func['op_array'];
2419            $EX['recvs'] = array();
2420            $EX['uses'] = array();
2421        }
2422        else {
2423            ob_start();
2424            $EX = &$this->dop_array($func['op_array'], $indent . INDENT);
2425            $body = ob_get_clean();
2426        }
2427
2428        $functionName = $this->stripNamespace($func['op_array']['function_name']);
2429        $isExpression = false;
2430        if ($functionName == '{closure}') {
2431            $functionName = '';
2432            $isExpression = true;
2433        }
2434        echo $isExpression ? '' : $indent;
2435        if ($decorations) {
2436            echo implode(' ', $decorations), ' ';
2437        }
2438        echo 'function', $functionName ? ' ' . $functionName : '', '(';
2439        $this->dargs($EX);
2440        echo ")";
2441        $this->duses($EX);
2442        if ($nobody) {
2443            echo ";\n";
2444        }
2445        else {
2446            if (!$isExpression) {
2447                echo "\n";
2448                echo $indent, "{\n";
2449            }
2450            else {
2451                echo " {\n";
2452            }
2453
2454            echo $body;
2455            echo "$indent}";
2456            if (!$isExpression) {
2457                echo "\n";
2458            }
2459        }
2460    }
2461    // }}}
2462    function dclass($class, $indent = '') // {{{
2463    {
2464        $this->detectNamespace($class['name']);
2465
2466        // {{{ class decl
2467        if (!empty($class['doc_comment'])) {
2468            echo $indent;
2469            echo $class['doc_comment'];
2470            echo "\n";
2471        }
2472        $isInterface = false;
2473        $decorations = array();
2474        if (!empty($class['ce_flags'])) {
2475            if ($class['ce_flags'] & ZEND_ACC_INTERFACE) {
2476                $isInterface = true;
2477            }
2478            else {
2479                if ($class['ce_flags'] & ZEND_ACC_IMPLICIT_ABSTRACT_CLASS) {
2480                    $decorations[] = "abstract";
2481                }
2482                if ($class['ce_flags'] & ZEND_ACC_FINAL_CLASS) {
2483                    $decorations[] = "final";
2484                }
2485            }
2486        }
2487
2488        echo $indent;
2489        if ($decorations) {
2490            echo implode(' ', $decorations), ' ';
2491        }
2492        echo $isInterface ? 'interface ' : 'class ', $this->stripNamespace($class['name']);
2493        if ($class['parent']) {
2494            echo ' extends ', $this->stripNamespace($class['parent']);
2495        }
2496        /* TODO */
2497        if (!empty($class['interfaces'])) {
2498            echo ' implements ';
2499            echo implode(', ', $class['interfaces']);
2500        }
2501        echo "\n";
2502        echo $indent, "{";
2503        // }}}
2504        $newindent = INDENT . $indent;
2505        // {{{ const, static
2506        foreach (array('constants_table' => 'const '
2507                    , 'static_members' => 'static $') as $type => $prefix) {
2508            if (!empty($class[$type])) {
2509                echo "\n";
2510                // TODO: skip shadow?
2511                foreach ($class[$type] as $name => $v) {
2512                    echo $newindent;
2513                    echo $prefix, $name, ' = ';
2514                    echo str(value($v, $EX), $newindent);
2515                    echo ";\n";
2516                }
2517            }
2518        }
2519        // }}}
2520        // {{{ properties
2521        $member_variables = isset($class['properties_info']) ? $class['properties_info'] : ($class['default_static_members'] + $class['default_properties']);
2522        if ($member_variables) {
2523            echo "\n";
2524            $infos = !empty($class['properties_info']) ? $class['properties_info'] : null;
2525            foreach ($member_variables as $name => $dummy) {
2526                $info = (isset($infos) && isset($infos[$name])) ? $infos[$name] : null;
2527                if (isset($info)) {
2528                    if (!empty($info['doc_comment'])) {
2529                        echo $newindent;
2530                        echo $info['doc_comment'];
2531                        echo "\n";
2532                    }
2533                }
2534
2535                echo $newindent;
2536                $static = false;
2537                if (isset($info)) {
2538                    if ($info['flags'] & ZEND_ACC_STATIC) {
2539                        $static = true;
2540                    }
2541                }
2542                else if (isset($class['default_static_members'][$name])) {
2543                    $static = true;
2544                }
2545
2546                if ($static) {
2547                    echo "static ";
2548                }
2549
2550                $mangled = false;
2551                if (!isset($info)) {
2552                    echo 'public ';
2553                }
2554                else {
2555                    if ($info['flags'] & ZEND_ACC_SHADOW) {
2556                        continue;
2557                    }
2558                    switch ($info['flags'] & ZEND_ACC_PPP_MASK) {
2559                    case ZEND_ACC_PUBLIC:
2560                        echo "public ";
2561                        break;
2562                    case ZEND_ACC_PRIVATE:
2563                        echo "private ";
2564                        $mangled = true;
2565                        break;
2566                    case ZEND_ACC_PROTECTED:
2567                        echo "protected ";
2568                        $mangled = true;
2569                        break;
2570                    }
2571                }
2572
2573                echo '$', $name;
2574
2575                if (isset($info['offset'])) {
2576                    $value = $class[$static ? 'default_static_members_table' : 'default_properties_table'][$info['offset']];
2577                }
2578                else {
2579                    $key = isset($info) ? $info['name'] . ($mangled ? "\000" : "") : $name;
2580
2581                    $value = $class[$static ? 'default_static_members' : 'default_properties'][$key];
2582                }
2583                if (isset($value)) {
2584                    echo ' = ';
2585                    echo str(value($value, $EX), $newindent);
2586                }
2587                echo ";\n";
2588            }
2589        }
2590        // }}}
2591        // {{{ function_table
2592        if (isset($class['function_table'])) {
2593            foreach ($class['function_table'] as $func) {
2594                if (!isset($func['scope']) || $func['scope'] == $class['name']) {
2595                    // TODO: skip shadow here
2596                    echo "\n";
2597                    $opa = $func['op_array'];
2598                    if (!empty($opa['doc_comment'])) {
2599                        echo $newindent;
2600                        echo $opa['doc_comment'];
2601                        echo "\n";
2602                    }
2603                    $isAbstractMethod = false;
2604                    $decorations = array();
2605                    if (isset($opa['fn_flags'])) {
2606                        if (($opa['fn_flags'] & ZEND_ACC_ABSTRACT) && !$isInterface) {
2607                            $decorations[] = "abstract";
2608                            $isAbstractMethod = true;
2609                        }
2610                        if ($opa['fn_flags'] & ZEND_ACC_FINAL) {
2611                            $decorations[] = "final";
2612                        }
2613                        if ($opa['fn_flags'] & ZEND_ACC_STATIC) {
2614                            $decorations[] = "static";
2615                        }
2616
2617                        switch ($opa['fn_flags'] & ZEND_ACC_PPP_MASK) {
2618                            case ZEND_ACC_PUBLIC:
2619                                $decorations[] = "public";
2620                                break;
2621                            case ZEND_ACC_PRIVATE:
2622                                $decorations[] = "private";
2623                                break;
2624                            case ZEND_ACC_PROTECTED:
2625                                $decorations[] = "protected";
2626                                break;
2627                            default:
2628                                $decorations[] = "<visibility error>";
2629                                break;
2630                        }
2631                    }
2632                    $this->activeMethod = $this->activeClass . '::' . $opa['function_name'];
2633                    $this->activeFunction = $opa['function_name'];
2634                    $this->dfunction($func, $newindent, $decorations, $isInterface || $isAbstractMethod);
2635                    $this->activeFunction = null;
2636                    $this->activeMethod = null;
2637                    if ($opa['function_name'] == 'Decompiler') {
2638                        //exit;
2639                    }
2640                }
2641            }
2642        }
2643        // }}}
2644        echo $indent, "}\n";
2645    }
2646    // }}}
2647    function decompileString($string) // {{{
2648    {
2649        $this->dc = xcache_dasm_string($string);
2650        if ($this->dc === false) {
2651            echo "error compling string\n";
2652            return false;
2653        }
2654        $this->activeFile = null;
2655        return true;
2656    }
2657    // }}}
2658    function decompileFile($file) // {{{
2659    {
2660        $this->dc = xcache_dasm_file($file);
2661        if ($this->dc === false) {
2662            echo "error compling $file\n";
2663            return false;
2664        }
2665        $this->activeFile = realpath($file);
2666        return true;
2667    }
2668    // }}}
2669    function decompileDasm($content) // {{{
2670    {
2671        $this->dc = $content;
2672        $this->activeFile = null;
2673        return true;
2674    }
2675    // }}}
2676    function output() // {{{
2677    {
2678        echo "<?". "php\n\n";
2679        foreach ($this->dc['class_table'] as $key => $class) {
2680            if ($key{0} != "\0") {
2681                $this->activeClass = $class['name'];
2682                $this->dclass($class);
2683                $this->activeClass = null;
2684                echo "\n";
2685            }
2686        }
2687
2688        foreach ($this->dc['function_table'] as $key => $func) {
2689            if ($key{0} != "\0") {
2690                $this->activeFunction = $key;
2691                $this->dfunction($func);
2692                $this->activeFunction = null;
2693                echo "\n";
2694            }
2695        }
2696
2697        $this->dop_array($this->dc['op_array']);
2698        echo "\n?" . ">\n";
2699
2700        if (!empty($this->test)) {
2701            $this->outputUnusedOp();
2702        }
2703        return true;
2704    }
2705    // }}}
2706    function outputUnusedOp() // {{{
2707    {
2708        for ($i = 0; $opname = xcache_get_opcode($i); $i ++) {
2709            if ($opname == 'UNDEF')  {
2710                continue;
2711            }
2712
2713            if (!isset($this->usedOps[$i])) {
2714                echo "not covered opcode ", $opname, "\n";
2715            }
2716        }
2717    }
2718    // }}}
2719}
2720
2721// {{{ defines
2722define('ZEND_ENGINE_2_4', PHP_VERSION >= "5.4");
2723define('ZEND_ENGINE_2_3', ZEND_ENGINE_2_4 || PHP_VERSION >= "5.3.");
2724define('ZEND_ENGINE_2_2', ZEND_ENGINE_2_3 || PHP_VERSION >= "5.2.");
2725define('ZEND_ENGINE_2_1', ZEND_ENGINE_2_2 || PHP_VERSION >= "5.1.");
2726
2727define('ZEND_ACC_STATIC',         0x01);
2728define('ZEND_ACC_ABSTRACT',       0x02);
2729define('ZEND_ACC_FINAL',          0x04);
2730define('ZEND_ACC_IMPLEMENTED_ABSTRACT',       0x08);
2731
2732define('ZEND_ACC_IMPLICIT_ABSTRACT_CLASS',    0x10);
2733define('ZEND_ACC_EXPLICIT_ABSTRACT_CLASS',    0x20);
2734define('ZEND_ACC_FINAL_CLASS',                0x40);
2735define('ZEND_ACC_INTERFACE',                  0x80);
2736if (ZEND_ENGINE_2_4) {
2737    define('ZEND_ACC_TRAIT',                  0x120);
2738}
2739define('ZEND_ACC_PUBLIC',     0x100);
2740define('ZEND_ACC_PROTECTED',  0x200);
2741define('ZEND_ACC_PRIVATE',    0x400);
2742define('ZEND_ACC_PPP_MASK',  (ZEND_ACC_PUBLIC | ZEND_ACC_PROTECTED | ZEND_ACC_PRIVATE));
2743
2744define('ZEND_ACC_CHANGED',    0x800);
2745define('ZEND_ACC_IMPLICIT_PUBLIC',    0x1000);
2746
2747define('ZEND_ACC_CTOR',       0x2000);
2748define('ZEND_ACC_DTOR',       0x4000);
2749define('ZEND_ACC_CLONE',      0x8000);
2750
2751define('ZEND_ACC_ALLOW_STATIC',   0x10000);
2752
2753define('ZEND_ACC_SHADOW', 0x2000);
2754
2755if (ZEND_ENGINE_2_4) {
2756    define('ZEND_FETCH_GLOBAL',           0x00000000);
2757    define('ZEND_FETCH_LOCAL',            0x10000000);
2758    define('ZEND_FETCH_STATIC',           0x20000000);
2759    define('ZEND_FETCH_STATIC_MEMBER',    0x30000000);
2760    define('ZEND_FETCH_GLOBAL_LOCK',      0x40000000);
2761    define('ZEND_FETCH_LEXICAL',          0x50000000);
2762
2763    define('ZEND_FETCH_TYPE_MASK',        0x70000000);
2764
2765    define('ZEND_FETCH_STANDARD',         0x00000000);
2766    define('ZEND_FETCH_ADD_LOCK',         0x08000000);
2767    define('ZEND_FETCH_MAKE_REF',         0x04000000);
2768}
2769else {
2770    define('ZEND_FETCH_GLOBAL',           0);
2771    define('ZEND_FETCH_LOCAL',            1);
2772    define('ZEND_FETCH_STATIC',           2);
2773    define('ZEND_FETCH_STATIC_MEMBER',    3);
2774    define('ZEND_FETCH_GLOBAL_LOCK',      4);
2775
2776    define('ZEND_FETCH_STANDARD',         0);
2777    define('ZEND_FETCH_ADD_LOCK',         1);
2778}
2779
2780if (ZEND_ENGINE_2_4) {
2781    define('ZEND_ISSET',                  0x02000000);
2782    define('ZEND_ISEMPTY',                0x01000000);
2783    define('ZEND_ISSET_ISEMPTY_MASK',     (ZEND_ISSET | ZEND_ISEMPTY));
2784    define('ZEND_QUICK_SET',              0x00800000);
2785}
2786else {
2787    define('ZEND_ISSET',                  (1<<0));
2788    define('ZEND_ISEMPTY',                (1<<1));
2789
2790    define('ZEND_ISSET_ISEMPTY_MASK',     (ZEND_ISSET | ZEND_ISEMPTY));
2791}
2792
2793define('ZEND_FETCH_CLASS_DEFAULT',    0);
2794define('ZEND_FETCH_CLASS_SELF',       1);
2795define('ZEND_FETCH_CLASS_PARENT',     2);
2796define('ZEND_FETCH_CLASS_MAIN',       3);
2797define('ZEND_FETCH_CLASS_GLOBAL',     4);
2798define('ZEND_FETCH_CLASS_AUTO',       5);
2799define('ZEND_FETCH_CLASS_INTERFACE',  6);
2800define('ZEND_FETCH_CLASS_STATIC',     7);
2801if (ZEND_ENGINE_2_4) {
2802    define('ZEND_FETCH_CLASS_TRAIT',     14);
2803}
2804if (ZEND_ENGINE_2_3) {
2805    define('ZEND_FETCH_CLASS_MASK',     0xF);
2806}
2807
2808define('ZEND_EVAL',               (1<<0));
2809define('ZEND_INCLUDE',            (1<<1));
2810define('ZEND_INCLUDE_ONCE',       (1<<2));
2811define('ZEND_REQUIRE',            (1<<3));
2812define('ZEND_REQUIRE_ONCE',       (1<<4));
2813
2814if (ZEND_ENGINE_2_4) {
2815    define('EXT_TYPE_UNUSED',     (1<<5));
2816}
2817else {
2818    define('EXT_TYPE_UNUSED',     (1<<0));
2819}
2820
2821define('ZEND_FE_FETCH_BYREF',     1);
2822define('ZEND_FE_FETCH_WITH_KEY',  2);
2823
2824define('ZEND_MEMBER_FUNC_CALL',   1<<0);
2825define('ZEND_CTOR_CALL',          1<<1);
2826
2827define('ZEND_ARG_SEND_BY_REF',        (1<<0));
2828define('ZEND_ARG_COMPILE_TIME_BOUND', (1<<1));
2829define('ZEND_ARG_SEND_FUNCTION',      (1<<2));
2830
2831define('BYREF_NONE',       0);
2832define('BYREF_FORCE',      1);
2833define('BYREF_ALLOW',      2);
2834define('BYREF_FORCE_REST', 3);
2835define('IS_NULL',     0);
2836define('IS_LONG',     1);
2837define('IS_DOUBLE',   2);
2838define('IS_BOOL',     3);
2839define('IS_ARRAY',    4);
2840define('IS_OBJECT',   5);
2841define('IS_STRING',   6);
2842define('IS_RESOURCE', 7);
2843define('IS_CONSTANT', 8);
2844define('IS_CONSTANT_ARRAY',   9);
2845if (ZEND_ENGINE_2_4) {
2846    define('IS_CALLABLE', 10);
2847}
2848/* Ugly hack to support constants as static array indices */
2849define('IS_CONSTANT_TYPE_MASK',   0x0f);
2850define('IS_CONSTANT_UNQUALIFIED', 0x10);
2851define('IS_CONSTANT_INDEX',       0x80);
2852define('IS_LEXICAL_VAR',          0x20);
2853define('IS_LEXICAL_REF',          0x40);
2854
2855@define('XC_IS_CV', 16);
2856
2857/*
2858if (preg_match_all('!XC_[A-Z_]+!', file_get_contents(__FILE__), $ms)) {
2859    $verdiff = array();
2860    foreach ($ms[0] as $k) {
2861        if (!defined($k)) {
2862            $verdiff[$k] = -1;
2863            define($k, -1);
2864        }
2865    }
2866    var_export($verdiff);
2867    exit;
2868}
2869//*/
2870foreach (array (
2871    'XC_DECLARE_CONST' => -1,
2872    'XC_DECLARE_FUNCTION_OR_CLASS' => -1,
2873    'XC_DECLARE_INHERITED_CLASS_DELAYED' => -1,
2874    'XC_DECLARE_LAMBDA_FUNCTION' => -1,
2875    'XC_DO_FCALL_BY_FUNC' => -1,
2876    'XC_GOTO' => -1,
2877    'XC_INIT_FCALL_BY_FUNC' => -1,
2878    'XC_INIT_NS_FCALL_BY_NAME' => -1,
2879    'XC_ISSET_ISEMPTY' => -1,
2880    'XC_JMP_NO_CTOR' => -1,
2881    'XC_JMP_SET' => -1,
2882    'XC_JMP_SET_VAR' => -1,
2883    'XC_QM_ASSIGN_VAR' => -1,
2884    'XC_UNSET_DIM' => -1,
2885    'XC_UNSET_OBJ' => -1,
2886    'XC_USER_OPCODE' => -1,
2887) as $k => $v) {
2888    if (!defined($k)) {
2889        define($k, $v);
2890    }
2891}
2892// }}}
2893
Note: See TracBrowser for help on using the repository browser.