source: trunk/Decompiler.class.php @ 780

Last change on this file since 780 was 780, checked in by moo, 3 years ago

prepare for use()

  • Property svn:eol-style set to native
File size: 56.4 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 str($code, $indent = '') // {{{
12{
13    if (is_array($code)) {
14        $array = array();
15        foreach ($code as $key => $value) {
16            $array[$key] = str($value, $indent);
17        }
18        return $array;
19    }
20    if (is_object($code)) {
21        $code = foldToCode($code, $indent);
22        return $code->toCode($indent);
23    }
24
25    return (string) $code;
26}
27// }}}
28function foldToCode($src, $indent = '') // {{{ wrap or rewrap anything to Decompiler_Code
29{
30    if (is_array($indent)) {
31        $indent = $indent['indent'];
32    }
33
34    if (!is_object($src)) {
35        return new Decompiler_Code($src);
36    }
37
38    if (!method_exists($src, 'toCode')) {
39        var_dump($src);
40        exit('no toCode');
41    }
42    if (get_class($src) != 'Decompiler_Code') {
43        // rewrap it
44        $src = new Decompiler_Code($src->toCode($indent));
45    }
46
47    return $src;
48}
49// }}}
50function value($value) // {{{
51{
52    $spec = xcache_get_special_value($value);
53    if (isset($spec)) {
54        $value = $spec;
55        if (!is_array($value)) {
56            // constant
57            return $value;
58        }
59    }
60
61    if (is_a($value, 'Decompiler_Object')) {
62        // use as is
63    }
64    else if (is_array($value)) {
65        $value = new Decompiler_ConstArray($value);
66    }
67    else {
68        $value = new Decompiler_Value($value);
69    }
70    return $value;
71}
72// }}}
73function unquoteName_($str, $asVariableName, $indent = '') // {{{
74{
75    $str = str($str, $indent);
76    if (preg_match("!^'[\\w_][\\w\\d_\\\\]*'\$!", $str)) {
77        return str_replace('\\\\', '\\', substr($str, 1, -1));
78    }
79    else if ($asVariableName) {
80        return "{" . $str . "}";
81    }
82    else {
83        return $str;
84    }
85}
86// }}}
87function unquoteVariableName($str, $indent = '') // {{{
88{
89    return unquoteName_($str, true, $indent);
90}
91// }}}
92function unquoteName($str, $indent = '') // {{{
93{
94    return unquoteName_($str, false, $indent);
95}
96// }}}
97class Decompiler_Object // {{{
98{
99}
100// }}}
101class Decompiler_Value extends Decompiler_Object // {{{
102{
103    var $value;
104
105    function Decompiler_Value($value = null)
106    {
107        $this->value = $value;
108    }
109
110    function toCode($indent)
111    {
112        $code = var_export($this->value, true);
113        if (gettype($this->value) == 'string') {
114            switch ($this->value) {
115            case "\r":
116                return '"\\r"';
117            case "\n":
118                return '"\\n"';
119            case "\r\n":
120                return '"\\r\\n"';
121            }
122            $code = str_replace("\r\n", '\' . "\\r\\n" . \'', $code);
123            $code = str_replace("\r", '\' . "\\r" . \'', $code);
124            $code = str_replace("\n", '\' . "\\n" . \'', $code);
125        }
126        return $code;
127    }
128}
129// }}}
130class Decompiler_Code extends Decompiler_Object // {{{
131{
132    var $src;
133
134    function Decompiler_Code($src)
135    {
136        assert('isset($src)');
137        $this->src = $src;
138    }
139
140    function toCode($indent)
141    {
142        return $this->src;
143    }
144}
145// }}}
146class Decompiler_Binop extends Decompiler_Code // {{{
147{
148    var $opc;
149    var $op1;
150    var $op2;
151    var $parent;
152    var $indent;
153
154    function Decompiler_Binop($parent, $op1, $opc, $op2)
155    {
156        $this->parent = &$parent;
157        $this->opc = $opc;
158        $this->op1 = $op1;
159        $this->op2 = $op2;
160    }
161
162    function toCode($indent)
163    {
164        $opstr = $this->parent->binops[$this->opc];
165
166        $op1 = foldToCode($this->op1, $indent);
167        if (is_a($this->op1, 'Decompiler_Binop') && $this->op1->opc != $this->opc) {
168            $op1 = "(" . str($op1, $indent) . ")";
169        }
170        $op2 = foldToCode($this->op2, $indent);
171        if (is_a($this->op2, 'Decompiler_Binop') && $this->op2->opc != $this->opc && substr($opstr, -1) != '=') {
172            $op2 = "(" . str($op2, $indent) . ")";
173        }
174
175        if (str($op1) == '0' && ($this->opc == XC_ADD || $this->opc == XC_SUB)) {
176            return $opstr . str($op2, $indent);
177        }
178
179        return str($op1) . ' ' . $opstr . ' ' . str($op2);
180    }
181}
182// }}}
183class Decompiler_Fetch extends Decompiler_Code // {{{
184{
185    var $src;
186    var $fetchType;
187
188    function Decompiler_Fetch($src, $type, $globalsrc)
189    {
190        $this->src = $src;
191        $this->fetchType = $type;
192        $this->globalsrc = $globalsrc;
193    }
194
195    function toCode($indent)
196    {
197        switch ($this->fetchType) {
198        case ZEND_FETCH_LOCAL:
199            return '$' . substr($this->src, 1, -1);
200        case ZEND_FETCH_STATIC:
201            if (ZEND_ENGINE_2_3) {
202                // closure local variable?
203                return str($this->src);
204            }
205            die('static fetch cant to string');
206        case ZEND_FETCH_GLOBAL:
207        case ZEND_FETCH_GLOBAL_LOCK:
208            return $this->globalsrc;
209        default:
210            var_dump($this->fetchType);
211            assert(0);
212        }
213    }
214}
215// }}}
216class Decompiler_Box // {{{
217{
218    var $obj;
219
220    function Decompiler_Box(&$obj)
221    {
222        $this->obj = &$obj;
223    }
224
225    function toCode($indent)
226    {
227        return $this->obj->toCode($indent);
228    }
229}
230// }}}
231class Decompiler_Dim extends Decompiler_Value // {{{
232{
233    var $offsets = array();
234    var $isLast = false;
235    var $isObject = false;
236    var $assign = null;
237
238    function toCode($indent)
239    {
240        if (is_a($this->value, 'Decompiler_ListBox')) {
241            $exp = str($this->value->obj->src, $indent);
242        }
243        else {
244            $exp = str($this->value, $indent);
245        }
246        $last = count($this->offsets) - 1;
247        foreach ($this->offsets as $i => $dim) {
248            if ($this->isObject && $i == $last) {
249                $exp .= '->' . unquoteVariableName($dim, $indent);
250            }
251            else {
252                $exp .= '[' . str($dim, $indent) . ']';
253            }
254        }
255        return $exp;
256    }
257}
258// }}}
259class Decompiler_DimBox extends Decompiler_Box // {{{
260{
261}
262// }}}
263class Decompiler_List extends Decompiler_Code // {{{
264{
265    var $src;
266    var $dims = array();
267    var $everLocked = false;
268
269    function toCode($indent)
270    {
271        if (count($this->dims) == 1 && !$this->everLocked) {
272            $dim = $this->dims[0];
273            unset($dim->value);
274            $dim->value = $this->src;
275            if (!isset($dim->assign)) {
276                return str($dim, $indent);
277            }
278            return str($this->dims[0]->assign, $indent) . ' = ' . str($dim, $indent);
279        }
280        /* flatten dims */
281        $assigns = array();
282        foreach ($this->dims as $dim) {
283            $assign = &$assigns;
284            foreach ($dim->offsets as $offset) {
285                $assign = &$assign[$offset];
286            }
287            $assign = foldToCode($dim->assign, $indent);
288        }
289        return str($this->toList($assigns)) . ' = ' . str($this->src, $indent);
290    }
291
292    function toList($assigns)
293    {
294        $keys = array_keys($assigns);
295        if (count($keys) < 2) {
296            $keys[] = 0;
297        }
298        $max = call_user_func_array('max', $keys);
299        $list = 'list(';
300        for ($i = 0; $i <= $max; $i ++) {
301            if ($i) {
302                $list .= ', ';
303            }
304            if (!isset($assigns[$i])) {
305                continue;
306            }
307            if (is_array($assigns[$i])) {
308                $list .= $this->toList($assigns[$i]);
309            }
310            else {
311                $list .= $assigns[$i];
312            }
313        }
314        return $list . ')';
315    }
316}
317// }}}
318class Decompiler_ListBox extends Decompiler_Box // {{{
319{
320}
321// }}}
322class Decompiler_Array extends Decompiler_Value // {{{
323{
324    // emenets
325    function Decompiler_Array()
326    {
327        $this->value = array();
328    }
329
330    function toCode($indent)
331    {
332        $subindent = $indent . INDENT;
333
334        $elementsCode = array();
335        $index = 0;
336        foreach ($this->value as $element) {
337            list($key, $value) = $element;
338            if (!isset($key)) {
339                $key = $index++;
340            }
341            $elementsCode[] = array(str($key, $subindent), str($value, $subindent), $key, $value);
342        }
343
344        $exp = "array(";
345        $indent = $indent . INDENT;
346        $assocWidth = 0;
347        $multiline = 0;
348        $i = 0;
349        foreach ($elementsCode as $element) {
350            list($keyCode, $valueCode) = $element;
351            if ((string) $i !== $keyCode) {
352                $assocWidth = 1;
353                break;
354            }
355            ++$i;
356        }
357        foreach ($elementsCode as $element) {
358            list($keyCode, $valueCode, $key, $value) = $element;
359            if ($assocWidth) {
360                $len = strlen($keyCode);
361                if ($assocWidth < $len) {
362                    $assocWidth = $len;
363                }
364            }
365            if (is_array($value) || is_a($value, 'Decompiler_Array')) {
366                $multiline ++;
367            }
368        }
369
370        $i = 0;
371        foreach ($elementsCode as $element) {
372            list($keyCode, $value) = $element;
373            if ($multiline) {
374                if ($i) {
375                    $exp .= ",";
376                }
377                $exp .= "\n";
378                $exp .= $indent;
379            }
380            else {
381                if ($i) {
382                    $exp .= ", ";
383                }
384            }
385
386            if ($assocWidth) {
387                if ($multiline) {
388                    $exp .= sprintf("%-{$assocWidth}s => ", $keyCode);
389                }
390                else {
391                    $exp .= $keyCode . ' => ';
392                }
393            }
394
395            $exp .= $value;
396
397            $i ++;
398        }
399        if ($multiline) {
400            $exp .= "\n$indent)";
401        }
402        else {
403            $exp .= ")";
404        }
405        return $exp;
406    }
407}
408// }}}
409class Decompiler_ConstArray extends Decompiler_Array // {{{
410{
411    function Decompiler_ConstArray($array)
412    {
413        $elements = array();
414        foreach ($array as $key => $value) {
415            $elements[] = array(value($key), value($value));
416        }
417        $this->value = $elements;
418    }
419}
420// }}}
421class Decompiler_ForeachBox extends Decompiler_Box // {{{
422{
423    var $iskey;
424
425    function toCode($indent)
426    {
427        return 'foreach (' . '';
428    }
429}
430// }}}
431
432class Decompiler
433{
434    var $namespace;
435    var $namespaceDecided;
436
437    function Decompiler()
438    {
439        // {{{ testing
440        // XC_UNDEF XC_OP_DATA
441        $this->test = !empty($_ENV['XCACHE_DECOMPILER_TEST']);
442        $this->usedOps = array();
443
444        if ($this->test) {
445            $content = file_get_contents(__FILE__);
446            for ($i = 0; $opname = xcache_get_opcode($i); $i ++) {
447                if (!preg_match("/\\bXC_" . $opname . "\\b(?!')/", $content)) {
448                    echo "not recognized opcode ", $opname, "\n";
449                }
450            }
451        }
452        // }}}
453        // {{{ opinfo
454        $this->unaryops = array(
455                XC_BW_NOT   => '~',
456                XC_BOOL_NOT => '!',
457                );
458        $this->binops = array(
459                XC_ADD                 => "+",
460                XC_ASSIGN_ADD          => "+=",
461                XC_SUB                 => "-",
462                XC_ASSIGN_SUB          => "-=",
463                XC_MUL                 => "*",
464                XC_ASSIGN_MUL          => "*=",
465                XC_DIV                 => "/",
466                XC_ASSIGN_DIV          => "/=",
467                XC_MOD                 => "%",
468                XC_ASSIGN_MOD          => "%=",
469                XC_SL                  => "<<",
470                XC_ASSIGN_SL           => "<<=",
471                XC_SR                  => ">>",
472                XC_ASSIGN_SR           => ">>=",
473                XC_CONCAT              => ".",
474                XC_ASSIGN_CONCAT       => ".=",
475                XC_IS_IDENTICAL        => "===",
476                XC_IS_NOT_IDENTICAL    => "!==",
477                XC_IS_EQUAL            => "==",
478                XC_IS_NOT_EQUAL        => "!=",
479                XC_IS_SMALLER          => "<",
480                XC_IS_SMALLER_OR_EQUAL => "<=",
481                XC_BW_OR               => "|",
482                XC_ASSIGN_BW_OR        => "|=",
483                XC_BW_AND              => "&",
484                XC_ASSIGN_BW_AND       => "&=",
485                XC_BW_XOR              => "^",
486                XC_ASSIGN_BW_XOR       => "^=",
487                XC_BOOL_XOR            => "xor",
488                );
489        // }}}
490        $this->includeTypes = array( // {{{
491                ZEND_EVAL         => 'eval',
492                ZEND_INCLUDE      => 'include',
493                ZEND_INCLUDE_ONCE => 'include_once',
494                ZEND_REQUIRE      => 'require',
495                ZEND_REQUIRE_ONCE => 'require_once',
496                );
497                // }}}
498    }
499    function detectNamespace($name) // {{{
500    {
501        if ($this->namespaceDecided) {
502            return;
503        }
504
505        if (strpos($name, '\\') !== false) {
506            $this->namespace = strtok($name, '\\');
507            echo 'namespace ', $this->namespace, ";\n\n";
508        }
509
510        $this->namespaceDecided = true;
511    }
512    // }}}
513    function stripNamespace($name) // {{{
514    {
515        $len = strlen($this->namespace) + 1;
516        if (substr($name, 0, $len) == $this->namespace . '\\') {
517            return substr($name, $len);
518        }
519        else {
520            return $name;
521        }
522    }
523    // }}}
524    function outputPhp(&$opcodes, $opline, $last, $indent) // {{{
525    {
526        $origindent = $indent;
527        $curticks = 0;
528        for ($i = $opline; $i <= $last; $i ++) {
529            $op = $opcodes[$i];
530            if (isset($op['php'])) {
531                $toticks = isset($op['ticks']) ? (int) str($op['ticks']) : 0;
532                if ($curticks != $toticks) {
533                    $oldticks = $curticks;
534                    $curticks = $toticks;
535                    if (!$curticks) {
536                        echo $origindent, "}\n\n";
537                        $indent = $origindent;
538                    }
539                    else {
540                        if ($oldticks) {
541                            echo $origindent, "}\n\n";
542                        }
543                        else if (!$oldticks) {
544                            $indent .= INDENT;
545                        }
546                        echo $origindent, "declare (ticks=$curticks) {\n";
547                    }
548                }
549                echo $indent, str($op['php'], $indent), ";\n";
550            }
551        }
552        if ($curticks) {
553            echo $origindent, "}\n";
554        }
555    }
556    // }}}
557    function getOpVal($op, &$EX, $tostr = true, $free = false) // {{{
558    {
559        switch ($op['op_type']) {
560        case XC_IS_CONST:
561            return foldToCode(value($op['constant']), $EX);
562
563        case XC_IS_VAR:
564        case XC_IS_TMP_VAR:
565            $T = &$EX['Ts'];
566            $ret = $T[$op['var']];
567            if ($tostr) {
568                $ret = foldToCode($ret, $EX);
569            }
570            if ($free) {
571                unset($T[$op['var']]);
572            }
573            return $ret;
574
575        case XC_IS_CV:
576            $var = $op['var'];
577            $var = $EX['op_array']['vars'][$var];
578            return '$' . $var['name'];
579
580        case XC_IS_UNUSED:
581            return null;
582        }
583    }
584    // }}}
585    function removeKeyPrefix($array, $prefix) // {{{
586    {
587        $prefixLen = strlen($prefix);
588        $ret = array();
589        foreach ($array as $key => $value) {
590            if (substr($key, 0, $prefixLen) == $prefix) {
591                $key = substr($key, $prefixLen);
592            }
593            $ret[$key] = $value;
594        }
595        return $ret;
596    }
597    // }}}
598    function &fixOpcode($opcodes, $removeTailing = false, $defaultReturnValue = null) // {{{
599    {
600        for ($i = 0, $cnt = count($opcodes); $i < $cnt; $i ++) {
601            if (function_exists('xcache_get_fixed_opcode')) {
602                $opcodes[$i]['opcode'] = xcache_get_fixed_opcode($opcodes[$i]['opcode'], $i);
603            }
604            if (isset($opcodes[$i]['op1'])) {
605                $opcodes[$i]['op1'] = $this->removeKeyPrefix($opcodes[$i]['op1'], 'u.');
606                $opcodes[$i]['op2'] = $this->removeKeyPrefix($opcodes[$i]['op2'], 'u.');
607                $opcodes[$i]['result'] = $this->removeKeyPrefix($opcodes[$i]['result'], 'u.');
608            }
609            else {
610                $op = array(
611                    'op1' => array(),
612                    'op2' => array(),
613                    'op3' => array(),
614                );
615                foreach ($opcodes[$i] as $name => $value) {
616                    if (preg_match('!^(op1|op2|result)\\.(.*)!', $name, $m)) {
617                        list(, $which, $field) = $m;
618                        $op[$which][$field] = $value;
619                    }
620                    else if (preg_match('!^(op1|op2|result)_type$!', $name, $m)) {
621                        list(, $which) = $m;
622                        $op[$which]['op_type'] = $value;
623                    }
624                    else {
625                        $op[$name] = $value;
626                    }
627                }
628                $opcodes[$i] = $op;
629            }
630        }
631
632        if ($removeTailing) {
633            $last = count($opcodes) - 1;
634            if ($opcodes[$last]['opcode'] == XC_HANDLE_EXCEPTION) {
635                $this->usedOps[XC_HANDLE_EXCEPTION] = true;
636                $opcodes[$last]['opcode'] = XC_NOP;
637                --$last;
638            }
639            if ($opcodes[$last]['opcode'] == XC_RETURN) {
640                $op1 = $opcodes[$last]['op1'];
641                if ($op1['op_type'] == XC_IS_CONST && array_key_exists('constant', $op1) && $op1['constant'] === $defaultReturnValue) {
642                    $opcodes[$last]['opcode'] = XC_NOP;
643                    --$last;
644                }
645            }
646        }
647        return $opcodes;
648    }
649    // }}}
650    function &dop_array($op_array, $indent = '') // {{{
651    {
652        $op_array['opcodes'] = $this->fixOpcode($op_array['opcodes'], true, $indent == '' ? 1 : null);
653        $opcodes = &$op_array['opcodes'];
654        $EX['indent'] = '';
655        // {{{ build jmp array
656        for ($i = 0, $cnt = count($opcodes); $i < $cnt; $i ++) {
657            $op = &$opcodes[$i];
658            /*
659            if ($op['opcode'] == XC_JMPZ) {
660                $this->dumpop($op, $EX);
661                var_dump($op);
662            }
663            continue;
664            */
665            $op['line'] = $i;
666            switch ($op['opcode']) {
667            case XC_CONT:
668            case XC_BRK:
669                $op['jmpouts'] = array();
670                break;
671
672            case XC_GOTO:
673            case XC_JMP:
674                $target = $op['op1']['var'];
675                $op['jmpouts'] = array($target);
676                $opcodes[$target]['jmpins'][] = $i;
677                break;
678
679            case XC_JMPZNZ:
680                $jmpz = $op['op2']['opline_num'];
681                $jmpnz = $op['extended_value'];
682                $op['jmpouts'] = array($jmpz, $jmpnz);
683                $opcodes[$jmpz]['jmpins'][] = $i;
684                $opcodes[$jmpnz]['jmpins'][] = $i;
685                break;
686
687            case XC_JMPZ:
688            case XC_JMPNZ:
689            case XC_JMPZ_EX:
690            case XC_JMPNZ_EX:
691            case XC_JMP_SET:
692            // case XC_FE_RESET:
693            case XC_FE_FETCH:
694            // case XC_JMP_NO_CTOR:
695                $target = $op['op2']['opline_num'];
696                //if (!isset($target)) {
697                //  $this->dumpop($op, $EX);
698                //  var_dump($op); exit;
699                //}
700                $op['jmpouts'] = array($target);
701                $opcodes[$target]['jmpins'][] = $i;
702                break;
703
704            /*
705            case XC_RETURN:
706                $op['jmpouts'] = array();
707                break;
708            */
709            }
710        }
711        unset($op);
712        // }}}
713        // build semi-basic blocks
714        $nextbbs = array();
715        $starti = 0;
716        for ($i = 1, $cnt = count($opcodes); $i < $cnt; $i ++) {
717            if (isset($opcodes[$i]['jmpins'])
718             || isset($opcodes[$i - 1]['jmpouts'])) {
719                $nextbbs[$starti] = $i;
720                $starti = $i;
721            }
722        }
723        $nextbbs[$starti] = $cnt;
724
725        $EX = array();
726        $EX['Ts'] = array();
727        $EX['indent'] = $indent;
728        $EX['nextbbs'] = $nextbbs;
729        $EX['op_array'] = &$op_array;
730        $EX['opcodes'] = &$opcodes;
731        // func call
732        $EX['object'] = null;
733        $EX['called_scope'] = null;
734        $EX['fbc'] = null;
735        $EX['argstack'] = array();
736        $EX['arg_types_stack'] = array();
737        $EX['last'] = count($opcodes) - 1;
738        $EX['silence'] = 0;
739        $EX['recvs'] = array();
740        $EX['uses'] = array();
741
742        for ($next = 0, $last = $EX['last'];
743                $loop = $this->outputCode($EX, $next, $last, $indent, true);
744                list($next, $last) = $loop) {
745            // empty
746        }
747        return $EX;
748    }
749    // }}}
750    function outputCode(&$EX, $opline, $last, $indent, $loop = false) // {{{
751    {
752        $op = &$EX['opcodes'][$opline];
753        $next = $EX['nextbbs'][$opline];
754
755        $end = $next - 1;
756        if ($end > $last) {
757            $end = $last;
758        }
759
760        if (isset($op['jmpins'])) {
761            echo "\nline", $op['line'], ":\n";
762        }
763        else {
764            // echo ";;;\n";
765        }
766        $this->dasmBasicBlock($EX, $opline, $end);
767        $this->outputPhp($EX['opcodes'], $opline, $end, $indent);
768        // jmpout op
769        $op = &$EX['opcodes'][$end];
770        $op1 = $op['op1'];
771        $op2 = $op['op2'];
772        $ext = $op['extended_value'];
773        $line = $op['line'];
774
775        if (isset($EX['opcodes'][$next])) {
776            if (isset($last) && $next > $last) {
777                $next = null;
778            }
779        }
780        else {
781            $next = null;
782        }
783        if ($op['opcode'] == XC_FE_FETCH) {
784            $opline = $next;
785            $next = $op['op2']['opline_num'];
786            $end = $next - 1;
787
788            ob_start();
789            $this->outputCode($EX, $opline, $end /* - 1 skip last jmp */, $indent . INDENT);
790            $body = ob_get_clean();
791
792            $as = foldToCode($op['fe_as'], $EX);
793            if (isset($op['fe_key'])) {
794                $as = str($op['fe_key'], $EX) . ' => ' . str($as);
795            }
796            echo "{$indent}foreach (" . str($op['fe_src'], $EX) . " as $as) {\n";
797            echo $body;
798            echo "{$indent}}";
799            // $this->outputCode($EX, $next, $last, $indent);
800            // return;
801        }
802        /*
803        if ($op['opcode'] == XC_JMPZ) {
804            $target = $op2['opline_num'];
805            if ($line + 1) {
806                $nextblock = $EX['nextbbs'][$next];
807                $jmpop = end($nextblock);
808                if ($jmpop['opcode'] == XC_JMP) {
809                    $ifendline = $op2['opline_num'];
810                    if ($ifendline >= $line) {
811                        $cond = $op['cond'];
812                        echo "{$indent}if ($cond) {\n";
813                        $this->outputCode($EX, $next, $last, INDENT . $indent);
814                        echo "$indent}\n";
815                        $this->outputCode($EX, $target, $last, $indent);
816                        return;
817                    }
818                }
819            }
820        }
821        */
822        if (!isset($next)) {
823            return;
824        }
825        if (isset($op['jmpouts']) && isset($op['isjmp'])) {
826            if (isset($op['cond'])) {
827                echo "{$indent}check (" . str($op["cond"]) . ") {\n";
828                echo INDENT;
829            }
830            switch ($op['opcode']) {
831            case XC_CONT:
832            case XC_BRK:
833                break;
834
835            case XC_GOTO:
836                echo $indent, 'goto', ' line', $op['jmpouts'][0], ';', "\n";
837                break;
838
839            default:
840                echo $indent;
841                echo xcache_get_opcode($op['opcode']), ' line', $op['jmpouts'][0];
842                if (isset($op['jmpouts'][1])) {
843                    echo ', line', $op['jmpouts'][1];
844                }
845                echo ";";
846                // echo ' // <- line', $op['line'];
847                echo "\n";
848            }
849            if (isset($op['cond'])) echo "$indent}\n";
850        }
851
852        // proces JMPZ_EX/JMPNZ_EX for AND,OR
853        $op = &$EX['opcodes'][$next];
854        /*
855        if (isset($op['jmpins'])) {
856            foreach (array_reverse($op['jmpins']) as $fromline) {
857                $fromop = $EX['opcodes'][$fromline];
858                switch ($fromop['opcode']) {
859                case XC_JMPZ_EX: $opstr = 'and'; break;
860                case XC_JMPNZ_EX: $opstr = 'or'; break;
861                case XC_JMPZNZ: var_dump($fromop); exit;
862                default: continue 2;
863                }
864
865                $var = $fromop['result']['var'];
866                var_dump($EX['Ts'][$var]);
867                $EX['Ts'][$var] = '(' . $fromop['and_or'] . " $opstr " . $EX['Ts'][$var] . ')';
868            }
869            #$this->outputCode($EX, $next, $last, $indent);
870            #return;
871        }
872        */
873        if (isset($op['cond_false'])) {
874            // $this->dumpop($op, $EX);
875            // any true comes here, so it's a "or"
876            $cond = implode(' and ', str($op['cond_false']));
877            // var_dump($op['cond'] = $cond);
878            /*
879            $rvalue = implode(' or ', $op['cond_true']) . ' or ' . $rvalue;
880            unset($op['cond_true']);
881            */
882        }
883
884        if ($loop) {
885            return array($next, $last);
886        }
887        $this->outputCode($EX, $next, $last, $indent);
888    }
889    // }}}
890    function dasmBasicBlock(&$EX, $opline, $last) // {{{
891    {
892        $T = &$EX['Ts'];
893        $opcodes = &$EX['opcodes'];
894        $lastphpop = null;
895
896        for ($i = $opline, $ic = $last + 1; $i < $ic; $i ++) {
897            // {{{ prepair
898            $op = &$opcodes[$i];
899            $opc = $op['opcode'];
900            if ($opc == XC_NOP) {
901                $this->usedOps[$opc] = true;
902                continue;
903            }
904
905            $op1 = $op['op1'];
906            $op2 = $op['op2'];
907            $res = $op['result'];
908            $ext = $op['extended_value'];
909
910            $opname = xcache_get_opcode($opc);
911
912            if ($opname == 'UNDEF' || !isset($opname)) {
913                echo 'UNDEF OP:';
914                $this->dumpop($op, $EX);
915                continue;
916            }
917            // echo $i, ' '; $this->dumpop($op, $EX); //var_dump($op);
918
919            $resvar = null;
920            if ((ZEND_ENGINE_2_4 ? ($res['op_type'] & EXT_TYPE_UNUSED) : ($res['EA.type'] & EXT_TYPE_UNUSED)) || $res['op_type'] == XC_IS_UNUSED) {
921                $istmpres = false;
922            }
923            else {
924                $istmpres = true;
925            }
926            // }}}
927            // echo $opname, "\n";
928
929            $call = array(&$this, $opname);
930            if (is_callable($call)) {
931                $this->usedOps[$opc] = true;
932                $this->{$opname}($op, $EX);
933            }
934            else if (isset($this->binops[$opc])) { // {{{
935                $this->usedOps[$opc] = true;
936                $op1val = $this->getOpVal($op1, $EX, false);
937                $op2val = $this->getOpVal($op2, $EX, false);
938                $rvalue = new Decompiler_Binop($this, $op1val, $opc, $op2val);
939                $resvar = $rvalue;
940                // }}}
941            }
942            else if (isset($this->unaryops[$opc])) { // {{{
943                $this->usedOps[$opc] = true;
944                $op1val = $this->getOpVal($op1, $EX);
945                $myop = $this->unaryops[$opc];
946                $rvalue = $myop . str($op1val);
947                $resvar = $rvalue;
948                // }}}
949            }
950            else {
951                $covered = true;
952                switch ($opc) {
953                case XC_NEW: // {{{
954                    array_push($EX['arg_types_stack'], array($EX['fbc'], $EX['object'], $EX['called_scope']));
955                    $EX['object'] = (int) $res['var'];
956                    $EX['called_scope'] = null;
957                    $EX['fbc'] = 'new ' . unquoteName($this->getOpVal($op1, $EX), $EX);
958                    if (!ZEND_ENGINE_2) {
959                        $resvar = '$new object$';
960                    }
961                    break;
962                    // }}}
963                case XC_THROW: // {{{
964                    $resvar = 'throw ' . str($this->getOpVal($op1, $EX));
965                    break;
966                    // }}}
967                case XC_CLONE: // {{{
968                    $resvar = 'clone ' . str($this->getOpVal($op1, $EX));
969                    break;
970                    // }}}
971                case XC_CATCH: // {{{
972                    $resvar = 'catch (' . str($this->getOpVal($op1, $EX)) . ' ' . str($this->getOpVal($op2, $EX)) . ')';
973                    break;
974                    // }}}
975                case XC_INSTANCEOF: // {{{
976                    $resvar = str($this->getOpVal($op1, $EX)) . ' instanceof ' . str($this->getOpVal($op2, $EX));
977                    break;
978                    // }}}
979                case XC_FETCH_CLASS: // {{{
980                    if ($op2['op_type'] == XC_IS_UNUSED) {
981                        switch (($ext & (defined('ZEND_FETCH_CLASS_MASK') ? ZEND_FETCH_CLASS_MASK : 0xFF))) {
982                        case ZEND_FETCH_CLASS_SELF:
983                            $class = 'self';
984                            break;
985                        case ZEND_FETCH_CLASS_PARENT:
986                            $class = 'parent';
987                            break;
988                        case ZEND_FETCH_CLASS_STATIC:
989                            $class = 'static';
990                            break;
991                        }
992                        $istmpres = true;
993                    }
994                    else {
995                        $class = $this->getOpVal($op2, $EX);
996                        if (isset($op2['constant'])) {
997                            $class = $this->stripNamespace(unquoteName($class));
998                        }
999                    }
1000                    $resvar = $class;
1001                    break;
1002                    // }}}
1003                case XC_FETCH_CONSTANT: // {{{
1004                    if ($op1['op_type'] == XC_IS_UNUSED) {
1005                        $resvar = $this->stripNamespace($op2['constant']);
1006                        break;
1007                    }
1008
1009                    if ($op1['op_type'] == XC_IS_CONST) {
1010                        $resvar = $this->stripNamespace($op1['constant']);
1011                    }
1012                    else {
1013                        $resvar = $this->getOpVal($op1, $EX);
1014                    }
1015
1016                    $resvar = str($resvar) . '::' . unquoteName($this->getOpVal($op2, $EX));
1017                    break;
1018                    // }}}
1019                    // {{{ case XC_FETCH_*
1020                case XC_FETCH_R:
1021                case XC_FETCH_W:
1022                case XC_FETCH_RW:
1023                case XC_FETCH_FUNC_ARG:
1024                case XC_FETCH_UNSET:
1025                case XC_FETCH_IS:
1026                case XC_UNSET_VAR:
1027                    $rvalue = $this->getOpVal($op1, $EX);
1028                    if (defined('ZEND_FETCH_TYPE_MASK')) {
1029                        $fetchtype = ($ext & ZEND_FETCH_TYPE_MASK);
1030                    }
1031                    else {
1032                        $fetchtype = $op2[!ZEND_ENGINE_2 ? 'fetch_type' : 'EA.type'];
1033                    }
1034                    switch ($fetchtype) {
1035                    case ZEND_FETCH_STATIC_MEMBER:
1036                        $class = $this->getOpVal($op2, $EX);
1037                        $rvalue = str($class) . '::$' . unquoteName($rvalue, $EX);
1038                        break;
1039                    default:
1040                        $name = unquoteName($rvalue, $EX);
1041                        $globalname = xcache_is_autoglobal($name) ? "\$$name" : "\$GLOBALS[" . str($rvalue) . "]";
1042                        $rvalue = new Decompiler_Fetch($rvalue, $fetchtype, $globalname);
1043                        break;
1044                    }
1045                    if ($opc == XC_UNSET_VAR) {
1046                        $op['php'] = "unset(" . str($rvalue, $EX) . ")";
1047                        $lastphpop = &$op;
1048                    }
1049                    else if ($res['op_type'] != XC_IS_UNUSED) {
1050                        $resvar = $rvalue;
1051                    }
1052                    break;
1053                    // }}}
1054                    // {{{ case XC_FETCH_DIM_*
1055                case XC_FETCH_DIM_TMP_VAR:
1056                case XC_FETCH_DIM_R:
1057                case XC_FETCH_DIM_W:
1058                case XC_FETCH_DIM_RW:
1059                case XC_FETCH_DIM_FUNC_ARG:
1060                case XC_FETCH_DIM_UNSET:
1061                case XC_FETCH_DIM_IS:
1062                case XC_ASSIGN_DIM:
1063                case XC_UNSET_DIM_OBJ: // PHP 4 only
1064                case XC_UNSET_DIM:
1065                case XC_UNSET_OBJ:
1066                    $src = $this->getOpVal($op1, $EX, false);
1067                    if (is_a($src, "Decompiler_ForeachBox")) {
1068                        $src->iskey = $this->getOpVal($op2, $EX);
1069                        $resvar = $src;
1070                        break;
1071                    }
1072
1073                    if (is_a($src, "Decompiler_DimBox")) {
1074                        $dimbox = $src;
1075                    }
1076                    else {
1077                        if (!is_a($src, "Decompiler_ListBox")) {
1078                            $op1val = $this->getOpVal($op1, $EX, false);
1079                            $list = new Decompiler_List(isset($op1val) ? $op1val : '$this');
1080
1081                            $src = new Decompiler_ListBox($list);
1082                            if (!isset($op1['var'])) {
1083                                $this->dumpop($op, $EX);
1084                                var_dump($op);
1085                                die('missing var');
1086                            }
1087                            $T[$op1['var']] = $src;
1088                            unset($list);
1089                        }
1090                        $dim = new Decompiler_Dim($src);
1091                        $src->obj->dims[] = &$dim;
1092
1093                        $dimbox = new Decompiler_DimBox($dim);
1094                    }
1095                    $dim = &$dimbox->obj;
1096                    $dim->offsets[] = $this->getOpVal($op2, $EX);
1097                    if ($ext == ZEND_FETCH_ADD_LOCK) {
1098                        $src->obj->everLocked = true;
1099                    }
1100                    else if ($ext == ZEND_FETCH_STANDARD) {
1101                        $dim->isLast = true;
1102                    }
1103                    if ($opc == XC_UNSET_OBJ) {
1104                        $dim->isObject = true;
1105                    }
1106                    unset($dim);
1107                    $rvalue = $dimbox;
1108                    unset($dimbox);
1109
1110                    if ($opc == XC_ASSIGN_DIM) {
1111                        $lvalue = $rvalue;
1112                        ++ $i;
1113                        $rvalue = $this->getOpVal($opcodes[$i]['op1'], $EX);
1114                        $resvar = str($lvalue, $EX) . ' = ' . str($rvalue);
1115                    }
1116                    else if ($opc == XC_UNSET_DIM || $opc == XC_UNSET_OBJ) {
1117                        $op['php'] = "unset(" . str($rvalue, $EX) . ")";
1118                        $lastphpop = &$op;
1119                    }
1120                    else if ($res['op_type'] != XC_IS_UNUSED) {
1121                        $resvar = $rvalue;
1122                    }
1123                    break;
1124                    // }}}
1125                case XC_ASSIGN: // {{{
1126                    $lvalue = $this->getOpVal($op1, $EX);
1127                    $rvalue = $this->getOpVal($op2, $EX, false);
1128                    if (is_a($rvalue, 'Decompiler_ForeachBox')) {
1129                        $type = $rvalue->iskey ? 'fe_key' : 'fe_as';
1130                        $rvalue->obj[$type] = $lvalue;
1131                        unset($T[$op2['var']]);
1132                        break;
1133                    }
1134                    if (is_a($rvalue, "Decompiler_DimBox")) {
1135                        $dim = &$rvalue->obj;
1136                        $dim->assign = $lvalue;
1137                        if ($dim->isLast) {
1138                            $resvar = foldToCode($dim->value, $EX);
1139                        }
1140                        unset($dim);
1141                        break;
1142                    }
1143                    $resvar = "$lvalue = " . str($rvalue, $EX);
1144                    if (0) {
1145                    if ($op2['op_type'] == XC_IS_VAR) {
1146                        $resvar .= ' /* isvar */';
1147                    }
1148                    else if ($op2['op_type'] == XC_IS_TMP_VAR) {
1149                        $resvar .= ' /* istmp */';
1150                    }
1151                    }
1152                    break;
1153                    // }}}
1154                case XC_ASSIGN_REF: // {{{
1155                    $lvalue = $this->getOpVal($op1, $EX);
1156                    $rvalue = $this->getOpVal($op2, $EX, false);
1157                    if (is_a($rvalue, 'Decompiler_Fetch')) {
1158                        $src = str($rvalue->src, $EX);
1159                        if ('$' . unquoteName($src) == $lvalue) {
1160                            switch ($rvalue->fetchType) {
1161                            case ZEND_FETCH_GLOBAL:
1162                            case ZEND_FETCH_GLOBAL_LOCK:
1163                                $resvar = 'global ' . $lvalue;
1164                                break 2;
1165                            case ZEND_FETCH_STATIC:
1166                                $statics = &$EX['op_array']['static_variables'];
1167                                $resvar = 'static ' . $lvalue;
1168                                $name = unquoteName($src);
1169                                if (isset($statics[$name])) {
1170                                    $var = $statics[$name];
1171                                    $resvar .= ' = ';
1172                                    $resvar .= str(value($var), $EX);
1173                                }
1174                                unset($statics);
1175                                break 2;
1176                            default:
1177                            }
1178                        }
1179                    }
1180                    // TODO: PHP_6 global
1181                    $rvalue = str($rvalue, $EX);
1182                    $resvar = "$lvalue = &$rvalue";
1183                    break;
1184                    // }}}
1185                // {{{ case XC_FETCH_OBJ_*
1186                case XC_FETCH_OBJ_R:
1187                case XC_FETCH_OBJ_W:
1188                case XC_FETCH_OBJ_RW:
1189                case XC_FETCH_OBJ_FUNC_ARG:
1190                case XC_FETCH_OBJ_UNSET:
1191                case XC_FETCH_OBJ_IS:
1192                case XC_ASSIGN_OBJ:
1193                    $obj = $this->getOpVal($op1, $EX);
1194                    if (!isset($obj)) {
1195                        $obj = '$this';
1196                    }
1197                    $rvalue = str($obj) . "->" . unquoteVariableName($this->getOpVal($op2, $EX), $EX);
1198                    if ($res['op_type'] != XC_IS_UNUSED) {
1199                        $resvar = $rvalue;
1200                    }
1201                    if ($opc == XC_ASSIGN_OBJ) {
1202                        ++ $i;
1203                        $lvalue = $rvalue;
1204                        $rvalue = $this->getOpVal($opcodes[$i]['op1'], $EX);
1205                        $resvar = "$lvalue = " . str($rvalue);
1206                    }
1207                    break;
1208                    // }}}
1209                case XC_ISSET_ISEMPTY_DIM_OBJ:
1210                case XC_ISSET_ISEMPTY_PROP_OBJ:
1211                case XC_ISSET_ISEMPTY:
1212                case XC_ISSET_ISEMPTY_VAR: // {{{
1213                    if ($opc == XC_ISSET_ISEMPTY_VAR) {
1214                        $rvalue = $this->getOpVal($op1, $EX);
1215                        // for < PHP_5_3
1216                        if ($op1['op_type'] == XC_IS_CONST) {
1217                            $rvalue = '$' . unquoteVariableName($this->getOpVal($op1, $EX));
1218                        }
1219                        if ($op2['EA.type'] == ZEND_FETCH_STATIC_MEMBER) {
1220                            $class = $this->getOpVal($op2, $EX);
1221                            $rvalue = $class . '::' . $rvalue;
1222                        }
1223                    }
1224                    else if ($opc == XC_ISSET_ISEMPTY) {
1225                        $rvalue = $this->getOpVal($op1, $EX);
1226                    }
1227                    else {
1228                        $container = $this->getOpVal($op1, $EX);
1229                        $dim = $this->getOpVal($op2, $EX);
1230                        if ($opc == XC_ISSET_ISEMPTY_PROP_OBJ) {
1231                            if (!isset($container)) {
1232                                $container = '$this';
1233                            }
1234                            $rvalue = $container . "->" . unquoteVariableName($dim);
1235                        }
1236                        else {
1237                            $rvalue = $container . '[' . str($dim) .']';
1238                        }
1239                    }
1240
1241                    switch ((!ZEND_ENGINE_2 ? $op['op2']['var'] /* constant */ : $ext) & (ZEND_ISSET|ZEND_ISEMPTY)) {
1242                    case ZEND_ISSET:
1243                        $rvalue = "isset(" . str($rvalue) . ")";
1244                        break;
1245                    case ZEND_ISEMPTY:
1246                        $rvalue = "empty(" . str($rvalue) . ")";
1247                        break;
1248                    }
1249                    $resvar = $rvalue;
1250                    break;
1251                    // }}}
1252                case XC_SEND_VAR_NO_REF:
1253                case XC_SEND_VAL:
1254                case XC_SEND_REF:
1255                case XC_SEND_VAR: // {{{
1256                    $ref = ($opc == XC_SEND_REF ? '&' : '');
1257                    $EX['argstack'][] = $ref . str($this->getOpVal($op1, $EX));
1258                    break;
1259                    // }}}
1260                case XC_INIT_STATIC_METHOD_CALL:
1261                case XC_INIT_METHOD_CALL: // {{{
1262                    array_push($EX['arg_types_stack'], array($EX['fbc'], $EX['object'], $EX['called_scope']));
1263                    if ($opc == XC_INIT_STATIC_METHOD_CALL || $opc == XC_INIT_METHOD_CALL || $op1['op_type'] != XC_IS_UNUSED) {
1264                        $obj = $this->getOpVal($op1, $EX);
1265                        if (!isset($obj)) {
1266                            $obj = '$this';
1267                        }
1268                        if ($opc == XC_INIT_STATIC_METHOD_CALL || /* PHP4 */ isset($op1['constant'])) {
1269                            $EX['object'] = null;
1270                            $EX['called_scope'] = $this->stripNamespace(unquoteName($obj, $EX));
1271                        }
1272                        else {
1273                            $EX['object'] = $obj;
1274                            $EX['called_scope'] = null;
1275                        }
1276                        if ($res['op_type'] != XC_IS_UNUSED) {
1277                            $resvar = '$obj call$';
1278                        }
1279                    }
1280                    else {
1281                        $EX['object'] = null;
1282                        $EX['called_scope'] = null;
1283                    }
1284
1285                    $EX['fbc'] = $this->getOpVal($op2, $EX, false);
1286                    if (($opc == XC_INIT_STATIC_METHOD_CALL || $opc == XC_INIT_METHOD_CALL) && !isset($EX['fbc'])) {
1287                        $EX['fbc'] = '__construct';
1288                    }
1289                    break;
1290                    // }}}
1291                case XC_INIT_NS_FCALL_BY_NAME:
1292                case XC_INIT_FCALL_BY_NAME: // {{{
1293                    array_push($EX['arg_types_stack'], array($EX['fbc'], $EX['object'], $EX['called_scope']));
1294                    if (!ZEND_ENGINE_2 && ($ext & ZEND_CTOR_CALL)) {
1295                        break;
1296                    }
1297                    $EX['object'] = null;
1298                    $EX['called_scope'] = null;
1299                    $EX['fbc'] = $this->getOpVal($op2, $EX);
1300                    break;
1301                    // }}}
1302                case XC_INIT_FCALL_BY_FUNC: // {{{ deprecated even in PHP 4?
1303                    $EX['object'] = null;
1304                    $EX['called_scope'] = null;
1305                    $which = $op1['var'];
1306                    $EX['fbc'] = $EX['op_array']['funcs'][$which]['name'];
1307                    break;
1308                    // }}}
1309                case XC_DO_FCALL_BY_FUNC:
1310                    $which = $op1['var'];
1311                    $fname = $EX['op_array']['funcs'][$which]['name'];
1312                    $args = $this->popargs($EX, $ext);
1313                    $resvar = $fname . "($args)";
1314                    break;
1315                case XC_DO_FCALL:
1316                    $fname = unquoteName($this->getOpVal($op1, $EX, false), $EX);
1317                    $args = $this->popargs($EX, $ext);
1318                    $resvar = $fname . "($args)";
1319                    break;
1320                case XC_DO_FCALL_BY_NAME: // {{{
1321                    $object = null;
1322
1323                    $fname = unquoteName($EX['fbc'], $EX);
1324                    if (!is_int($EX['object'])) {
1325                        $object = $EX['object'];
1326                    }
1327
1328                    $args = $this->popargs($EX, $ext);
1329
1330                    $prefix = (isset($object) ? $object . '->' : '' )
1331                        . (isset($EX['called_scope']) ? $EX['called_scope'] . '::' : '' );
1332                    $resvar = $prefix
1333                        . (!$prefix ? $this->stripNamespace($fname) : $fname)
1334                        . "($args)";
1335                    unset($args);
1336
1337                    if (is_int($EX['object'])) {
1338                        $T[$EX['object']] = $resvar;
1339                        $resvar = null;
1340                    }
1341                    list($EX['fbc'], $EX['object'], $EX['called_scope']) = array_pop($EX['arg_types_stack']);
1342                    break;
1343                    // }}}
1344                case XC_VERIFY_ABSTRACT_CLASS: // {{{
1345                    //unset($T[$op1['var']]);
1346                    break;
1347                    // }}}
1348                case XC_DECLARE_CLASS: 
1349                case XC_DECLARE_INHERITED_CLASS:
1350                case XC_DECLARE_INHERITED_CLASS_DELAYED: // {{{
1351                    $key = $op1['constant'];
1352                    if (!isset($this->dc['class_table'][$key])) {
1353                        echo 'class not found: ', $key, 'existing classes are:', "\n";
1354                        var_dump(array_keys($this->dc['class_table']));
1355                        exit;
1356                    }
1357                    $class = &$this->dc['class_table'][$key];
1358                    if (!isset($class['name'])) {
1359                        $class['name'] = unquoteName($this->getOpVal($op2, $EX), $EX);
1360                    }
1361                    if ($opc == XC_DECLARE_INHERITED_CLASS || $opc == XC_DECLARE_INHERITED_CLASS_DELAYED) {
1362                        $ext /= XC_SIZEOF_TEMP_VARIABLE;
1363                        $class['parent'] = $T[$ext];
1364                        unset($T[$ext]);
1365                    }
1366                    else {
1367                        $class['parent'] = null;
1368                    }
1369
1370                    for (;;) {
1371                        if ($i + 1 < $ic
1372                         && $opcodes[$i + 1]['opcode'] == XC_ADD_INTERFACE
1373                         && $opcodes[$i + 1]['op1']['var'] == $res['var']) {
1374                            // continue
1375                        }
1376                        else if ($i + 2 < $ic
1377                         && $opcodes[$i + 2]['opcode'] == XC_ADD_INTERFACE
1378                         && $opcodes[$i + 2]['op1']['var'] == $res['var']
1379                         && $opcodes[$i + 1]['opcode'] == XC_FETCH_CLASS) {
1380                            // continue
1381                        }
1382                        else {
1383                            break;
1384                        }
1385                        $this->usedOps[XC_ADD_INTERFACE] = true;
1386
1387                        $fetchop = &$opcodes[$i + 1];
1388                        $interface = $this->stripNamespace(unquoteName($this->getOpVal($fetchop['op2'], $EX), $EX));
1389                        $addop = &$opcodes[$i + 2];
1390                        $class['interfaces'][$addop['extended_value']] = $interface;
1391                        unset($fetchop, $addop);
1392                        $i += 2;
1393                    }
1394                    $this->dclass($class);
1395                    echo "\n";
1396                    unset($class);
1397                    break;
1398                    // }}}
1399                case XC_INIT_STRING: // {{{
1400                    $resvar = "''";
1401                    break;
1402                    // }}}
1403                case XC_ADD_CHAR:
1404                case XC_ADD_STRING:
1405                case XC_ADD_VAR: // {{{
1406                    $op1val = $this->getOpVal($op1, $EX);
1407                    $op2val = $this->getOpVal($op2, $EX);
1408                    switch ($opc) {
1409                    case XC_ADD_CHAR:
1410                        $op2val = value(chr(str($op2val)));
1411                        break;
1412                    case XC_ADD_STRING:
1413                        break;
1414                    case XC_ADD_VAR:
1415                        break;
1416                    }
1417                    if (str($op1val) == "''") {
1418                        $rvalue = $op2val;
1419                    }
1420                    else if (str($op2val) == "''") {
1421                        $rvalue = $op1val;
1422                    }
1423                    else {
1424                        $rvalue = str($op1val) . ' . ' . str($op2val);
1425                    }
1426                    $resvar = $rvalue;
1427                    // }}}
1428                    break;
1429                case XC_PRINT: // {{{
1430                    $op1val = $this->getOpVal($op1, $EX);
1431                    $resvar = "print(" . str($op1val) . ")";
1432                    break;
1433                    // }}}
1434                case XC_ECHO: // {{{
1435                    $op1val = $this->getOpVal($op1, $EX);
1436                    $resvar = "echo " . str($op1val);
1437                    break;
1438                    // }}}
1439                case XC_EXIT: // {{{
1440                    $op1val = $this->getOpVal($op1, $EX);
1441                    $resvar = "exit($op1val)";
1442                    break;
1443                    // }}}
1444                case XC_INIT_ARRAY:
1445                case XC_ADD_ARRAY_ELEMENT: // {{{
1446                    $rvalue = $this->getOpVal($op1, $EX, false, true);
1447
1448                    if ($opc == XC_ADD_ARRAY_ELEMENT) {
1449                        $assoc = $this->getOpVal($op2, $EX);
1450                        if (isset($assoc)) {
1451                            $T[$res['var']]->value[] = array($assoc, $rvalue);
1452                        }
1453                        else {
1454                            $T[$res['var']]->value[] = array(null, $rvalue);
1455                        }
1456                    }
1457                    else {
1458                        if ($opc == XC_INIT_ARRAY) {
1459                            $resvar = new Decompiler_Array();
1460                            if (!isset($rvalue)) {
1461                                continue;
1462                            }
1463                        }
1464
1465                        $assoc = $this->getOpVal($op2, $EX);
1466                        if (isset($assoc)) {
1467                            $resvar->value[] = array($assoc, $rvalue);
1468                        }
1469                        else {
1470                            $resvar->value[] = array(null, $rvalue);
1471                        }
1472                    }
1473                    break;
1474                    // }}}
1475                case XC_QM_ASSIGN: // {{{
1476                    $resvar = $this->getOpVal($op1, $EX);
1477                    break;
1478                    // }}}
1479                case XC_BOOL: // {{{
1480                    $resvar = /*'(bool) ' .*/ $this->getOpVal($op1, $EX);
1481                    break;
1482                    // }}}
1483                case XC_RETURN: // {{{
1484                    $resvar = "return " . str($this->getOpVal($op1, $EX));
1485                    break;
1486                    // }}}
1487                case XC_INCLUDE_OR_EVAL: // {{{
1488                    $type = $op2['var']; // hack
1489                    $keyword = $this->includeTypes[$type];
1490                    $resvar = "$keyword " . str($this->getOpVal($op1, $EX));
1491                    break;
1492                    // }}}
1493                case XC_FE_RESET: // {{{
1494                    $resvar = $this->getOpVal($op1, $EX);
1495                    break;
1496                    // }}}
1497                case XC_FE_FETCH: // {{{
1498                    $op['fe_src'] = $this->getOpVal($op1, $EX);
1499                    $fe = new Decompiler_ForeachBox($op);
1500                    $fe->iskey = false;
1501                    $T[$res['var']] = $fe;
1502
1503                    ++ $i;
1504                    if (($ext & ZEND_FE_FETCH_WITH_KEY)) {
1505                        $fe = new Decompiler_ForeachBox($op);
1506                        $fe->iskey = true;
1507
1508                        $res = $opcodes[$i]['result'];
1509                        $T[$res['var']] = $fe;
1510                    }
1511                    break;
1512                    // }}}
1513                case XC_SWITCH_FREE: // {{{
1514                    // unset($T[$op1['var']]);
1515                    break;
1516                    // }}}
1517                case XC_FREE: // {{{
1518                    $free = $T[$op1['var']];
1519                    if (!is_a($free, 'Decompiler_Array') && !is_a($free, 'Decompiler_Box')) {
1520                        $op['php'] = is_object($free) ? $free : $this->unquote($free, '(', ')');
1521                        $lastphpop = &$op;
1522                    }
1523                    unset($T[$op1['var']], $free);
1524                    break;
1525                    // }}}
1526                case XC_JMP_NO_CTOR:
1527                    break;
1528                case XC_JMP_SET: // ?:
1529                    $resvar = $this->getOpVal($op1, $EX);
1530                    $op['cond'] = $resvar; 
1531                    $op['isjmp'] = true;
1532                    break;
1533                case XC_JMPNZ: // while
1534                case XC_JMPZNZ: // for
1535                case XC_JMPZ_EX: // and
1536                case XC_JMPNZ_EX: // or
1537                case XC_JMPZ: // {{{
1538                    if ($opc == XC_JMP_NO_CTOR && $EX['object']) {
1539                        $rvalue = $EX['object'];
1540                    }
1541                    else {
1542                        $rvalue = $this->getOpVal($op1, $EX);
1543                    }
1544
1545                    if (isset($op['cond_true'])) {
1546                        // any true comes here, so it's a "or"
1547                        $rvalue = implode(' or ', $op['cond_true']) . ' or ' . $rvalue;
1548                        unset($op['cond_true']);
1549                    }
1550                    if (isset($op['cond_false'])) {
1551                        echo "TODO(cond_false):\n";
1552                        var_dump($op);// exit;
1553                    }
1554                    if ($opc == XC_JMPZ_EX || $opc == XC_JMPNZ_EX) {
1555                        $targetop = &$EX['opcodes'][$op2['opline_num']];
1556                        if ($opc == XC_JMPNZ_EX) {
1557                            $targetop['cond_true'][] = foldToCode($rvalue, $EX);
1558                        }
1559                        else {
1560                            $targetop['cond_false'][] = foldToCode($rvalue, $EX);
1561                        }
1562                        unset($targetop);
1563                    }
1564                    else {
1565                        $op['cond'] = $rvalue; 
1566                        $op['isjmp'] = true;
1567                    }
1568                    break;
1569                    // }}}
1570                case XC_CONT:
1571                case XC_BRK:
1572                    $op['cond'] = null;
1573                    $op['isjmp'] = true;
1574                    $resvar = $opc == XC_CONT ? 'continue' : 'break';
1575                    $count = str($this->getOpVal($op2, $EX));
1576                    if ($count != '1') {
1577                        $resvar .= ' ' . $count;
1578                    }
1579                    break;
1580                case XC_GOTO:
1581                case XC_JMP: // {{{
1582                    $op['cond'] = null;
1583                    $op['isjmp'] = true;
1584                    break;
1585                    // }}}
1586                case XC_CASE:
1587                    $switchValue = $this->getOpVal($op1, $EX);
1588                    $caseValue = $this->getOpVal($op2, $EX);
1589                    $resvar = str($switchValue) . ' == ' . str($caseValue);
1590                    break;
1591                case XC_RECV_INIT:
1592                case XC_RECV:
1593                    $offset = $this->getOpVal($op1, $EX);
1594                    $lvalue = $this->getOpVal($op['result'], $EX);
1595                    if ($opc == XC_RECV_INIT) {
1596                        $default = value($op['op2']['constant']);
1597                    }
1598                    else {
1599                        $default = null;
1600                    }
1601                    $EX['recvs'][str($offset)] = array($lvalue, $default);
1602                    break;
1603                case XC_POST_DEC:
1604                case XC_POST_INC:
1605                case XC_POST_DEC_OBJ:
1606                case XC_POST_INC_OBJ:
1607                case XC_PRE_DEC:
1608                case XC_PRE_INC:
1609                case XC_PRE_DEC_OBJ:
1610                case XC_PRE_INC_OBJ: // {{{
1611                    $flags = array_flip(explode('_', $opname));
1612                    if (isset($flags['OBJ'])) {
1613                        $resvar = $this->getOpVal($op1, $EX) . '->' . unquoteVariableName($this->getOpVal($op2, $EX), $EX);
1614                    }
1615                    else {
1616                        $resvar = $this->getOpVal($op1, $EX);
1617                    }
1618                    $opstr = isset($flags['DEC']) ? '--' : '++';
1619                    if (isset($flags['POST'])) {
1620                        $resvar .= $opstr;
1621                    }
1622                    else {
1623                        $resvar = "$opstr$resvar";
1624                    }
1625                    break;
1626                    // }}}
1627
1628                case XC_BEGIN_SILENCE: // {{{
1629                    $EX['silence'] ++;
1630                    break;
1631                    // }}}
1632                case XC_END_SILENCE: // {{{
1633                    $EX['silence'] --;
1634                    $lastresvar = '@' . str($lastresvar, $EX);
1635                    break;
1636                    // }}}
1637                case XC_CAST: // {{{
1638                    $type = $ext;
1639                    static $type2cast = array(
1640                            IS_LONG   => '(int)',
1641                            IS_DOUBLE => '(double)',
1642                            IS_STRING => '(string)',
1643                            IS_ARRAY  => '(array)',
1644                            IS_OBJECT => '(object)',
1645                            IS_BOOL   => '(bool)',
1646                            IS_NULL   => '(unset)',
1647                            );
1648                    assert(isset($type2cast[$type]));
1649                    $cast = $type2cast[$type];
1650                    $resvar = $cast . ' ' . $this->getOpVal($op1, $EX);
1651                    break;
1652                    // }}}
1653                case XC_EXT_STMT:
1654                case XC_EXT_FCALL_BEGIN:
1655                case XC_EXT_FCALL_END:
1656                case XC_EXT_NOP:
1657                    break;
1658                case XC_DECLARE_FUNCTION:
1659                    $this->dfunction($this->dc['function_table'][$op1['constant']], $EX['indent']);
1660                    break;
1661                case XC_DECLARE_LAMBDA_FUNCTION: // {{{
1662                    ob_start();
1663                    $this->dfunction($this->dc['function_table'][$op1['constant']], $EX['indent']);
1664                    $resvar = ob_get_clean();
1665                    $istmpres = true;
1666                    break;
1667                    // }}}
1668                case XC_DECLARE_CONST:
1669                    $name = $this->stripNamespace(unquoteName($this->getOpVal($op1, $EX), $EX));
1670                    $value = str($this->getOpVal($op2, $EX));
1671                    $resvar = 'const ' . $name . ' = ' . $value;
1672                    break;
1673                case XC_DECLARE_FUNCTION_OR_CLASS:
1674                    /* always removed by compiler */
1675                    break;
1676                case XC_TICKS:
1677                    $lastphpop['ticks'] = $this->getOpVal($op1, $EX);
1678                    // $EX['tickschanged'] = true;
1679                    break;
1680                case XC_RAISE_ABSTRACT_ERROR:
1681                    // abstract function body is empty, don't need this code
1682                    break;
1683                case XC_USER_OPCODE:
1684                    echo '// ZEND_USER_OPCODE, impossible to decompile';
1685                    break;
1686                case XC_OP_DATA:
1687                    break;
1688                default: // {{{
1689                    echo "\x1B[31m * TODO ", $opname, "\x1B[0m\n";
1690                    $covered = false;
1691                    // }}}
1692                }
1693                if ($covered) {
1694                    $this->usedOps[$opc] = true;
1695                }
1696            }
1697            if (isset($resvar)) {
1698                if ($istmpres) {
1699                    $T[$res['var']] = $resvar;
1700                    $lastresvar = &$T[$res['var']];
1701                }
1702                else {
1703                    $op['php'] = $resvar;
1704                    $lastphpop = &$op;
1705                    $lastresvar = &$op['php'];
1706                }
1707            }
1708        }
1709        return $T;
1710    }
1711    // }}}
1712    function unquote($str, $st, $ed) // {{{
1713    {
1714        $l1 = strlen($st);
1715        $l2 = strlen($ed);
1716        if (substr($str, 0, $l1) === $st && substr($str, -$l2) === $ed) {
1717            $str = substr($str, $l1, -$l2);
1718        }
1719        return $str;
1720    }
1721    // }}}
1722    function popargs(&$EX, $n) // {{{
1723    {
1724        $args = array();
1725        for ($i = 0; $i < $n; $i ++) {
1726            $a = array_pop($EX['argstack']);
1727            if (is_array($a)) {
1728                array_unshift($args, foldToCode($a, $EX));
1729            }
1730            else {
1731                array_unshift($args, $a);
1732            }
1733        }
1734        return implode(', ', $args);
1735    }
1736    // }}}
1737    function dumpop($op, &$EX) // {{{
1738    {
1739        $op1 = $op['op1'];
1740        $op2 = $op['op2'];
1741        $d = array(xcache_get_opcode($op['opcode']), $op['opcode']);
1742
1743        foreach (array('op1' => '1:', 'op2' => '2:', 'result' => '>') as $k => $kk) {
1744            switch ($op[$k]['op_type']) {
1745            case XC_IS_UNUSED:
1746                $d[$kk] = 'U:' . $op[$k]['opline_num'];
1747                break;
1748
1749            case XC_IS_VAR:
1750                $d[$kk] = '$' . $op[$k]['var'];
1751                if ($k != 'result') {
1752                    $d[$kk] .= ':' . str($this->getOpVal($op[$k], $EX));
1753                }
1754                break;
1755
1756            case XC_IS_TMP_VAR:
1757                $d[$kk] = '#' . $op[$k]['var'];
1758                if ($k != 'result') {
1759                    $d[$kk] .= ':' . str($this->getOpVal($op[$k], $EX));
1760                }
1761                break;
1762
1763            case XC_IS_CV:
1764                $d[$kk] = $this->getOpVal($op[$k], $EX);
1765                break;
1766
1767            default:
1768                if ($k == 'result') {
1769                    var_dump($op);
1770                    exit;
1771                    assert(0);
1772                }
1773                else {
1774                    $d[$kk] = $this->getOpVal($op[$k], $EX);
1775                }
1776            }
1777        }
1778        $d[';'] = $op['extended_value'];
1779
1780        foreach ($d as $k => $v) {
1781            echo is_int($k) ? '' : $k, str($v), "\t";
1782        }
1783        echo PHP_EOL;
1784    }
1785    // }}}
1786    function dargs(&$EX, $indent) // {{{
1787    {
1788        $op_array = &$EX['op_array'];
1789
1790        if (isset($op_array['num_args'])) {
1791            $c = $op_array['num_args'];
1792        }
1793        else if ($op_array['arg_types']) {
1794            $c = count($op_array['arg_types']);
1795        }
1796        else {
1797            // php4
1798            $c = count($EX['recvs']);
1799        }
1800
1801        $refrest = false;
1802        for ($i = 0; $i < $c; $i ++) {
1803            if ($i) {
1804                echo ', ';
1805            }
1806            $arg = $EX['recvs'][$i + 1];
1807            if (isset($op_array['arg_info'])) {
1808                $ai = $op_array['arg_info'][$i];
1809                if (!empty($ai['class_name'])) {
1810                    echo $this->stripNamespace($ai['class_name']), ' ';
1811                    if (!ZEND_ENGINE_2_2 && $ai['allow_null']) {
1812                        echo 'or NULL ';
1813                    }
1814                }
1815                else if (!empty($ai['array_type_hint'])) {
1816                    echo 'array ';
1817                    if (!ZEND_ENGINE_2_2 && $ai['allow_null']) {
1818                        echo 'or NULL ';
1819                    }
1820                }
1821                if ($ai['pass_by_reference']) {
1822                    echo '&';
1823                }
1824                printf("\$%s", $ai['name']);
1825            }
1826            else {
1827                if ($refrest) {
1828                    echo '&';
1829                }
1830                else if (isset($op_array['arg_types'][$i])) {
1831                    switch ($op_array['arg_types'][$i]) {
1832                    case BYREF_FORCE_REST:
1833                        $refrest = true;
1834                        /* fall */
1835                    case BYREF_FORCE:
1836                        echo '&';
1837                        break;
1838
1839                    case BYREF_NONE:
1840                    case BYREF_ALLOW:
1841                        break;
1842                    default:
1843                        assert(0);
1844                    }
1845                }
1846                echo str($arg[0], $indent);
1847            }
1848            if (isset($arg[1])) {
1849                echo ' = ', str($arg[1], $indent);
1850            }
1851        }
1852    }
1853    // }}}
1854    function duses(&$EX, $indent) // {{{
1855    {
1856        if (!$EX['uses']) {
1857            return;
1858        }
1859
1860        $uses = array();
1861        foreach ($EX['uses'] as $name => $value) {
1862            $uses = '$' . $name;
1863        }
1864        echo ' use(', implode(', ', $uses), ')';
1865    }
1866    // }}}
1867    function dfunction($func, $indent = '', $nobody = false) // {{{
1868    {
1869        $this->detectNamespace($func['op_array']['function_name']);
1870
1871        if ($nobody) {
1872            $EX = array();
1873            $EX['op_array'] = &$func['op_array'];
1874            $EX['recvs'] = array();
1875            $EX['uses'] = array();
1876        }
1877        else {
1878            ob_start();
1879            $newindent = INDENT . $indent;
1880            $EX = &$this->dop_array($func['op_array'], $newindent);
1881            $body = ob_get_clean();
1882        }
1883
1884        $functionName = $this->stripNamespace($func['op_array']['function_name']);
1885        if ($functionName == '{closure}') {
1886            $functionName = '';
1887        }
1888        echo 'function ', $functionName, '(';
1889        $this->dargs($EX, $indent);
1890        echo ")";
1891        $this->duses($EX, $indent);
1892        if ($nobody) {
1893            echo ";\n";
1894        }
1895        else {
1896            if ($functionName !== '') {
1897                echo "\n";
1898                echo $indent, "{\n";
1899            }
1900            else {
1901                echo " {\n";
1902            }
1903
1904            echo $body;
1905            echo "$indent}";
1906            if ($functionName !== '') {
1907                echo "\n";
1908            }
1909        }
1910    }
1911    // }}}
1912    function dclass($class, $indent = '') // {{{
1913    {
1914        $this->detectNamespace($class['name']);
1915
1916        // {{{ class decl
1917        if (!empty($class['doc_comment'])) {
1918            echo $indent;
1919            echo $class['doc_comment'];
1920            echo "\n";
1921        }
1922        $isinterface = false;
1923        if (!empty($class['ce_flags'])) {
1924            if ($class['ce_flags'] & ZEND_ACC_INTERFACE) {
1925                $isinterface = true;
1926            }
1927            else {
1928                if ($class['ce_flags'] & ZEND_ACC_IMPLICIT_ABSTRACT_CLASS) {
1929                    echo "abstract ";
1930                }
1931                if ($class['ce_flags'] & ZEND_ACC_FINAL_CLASS) {
1932                    echo "final ";
1933                }
1934            }
1935        }
1936        echo $isinterface ? 'interface ' : 'class ', $this->stripNamespace($class['name']);
1937        if ($class['parent']) {
1938            echo ' extends ', $class['parent'];
1939        }
1940        /* TODO */
1941        if (!empty($class['interfaces'])) {
1942            echo ' implements ';
1943            echo implode(', ', $class['interfaces']);
1944        }
1945        echo "\n";
1946        echo $indent, "{";
1947        // }}}
1948        $newindent = INDENT . $indent;
1949        // {{{ const, static
1950        foreach (array('constants_table' => 'const '
1951                    , 'static_members' => 'static $') as $type => $prefix) {
1952            if (!empty($class[$type])) {
1953                echo "\n";
1954                // TODO: skip shadow?
1955                foreach ($class[$type] as $name => $v) {
1956                    echo $newindent;
1957                    echo $prefix, $name, ' = ';
1958                    echo str(value($v), $newindent);
1959                    echo ";\n";
1960                }
1961            }
1962        }
1963        // }}}
1964        // {{{ properties
1965        $member_variables = isset($class['properties_info']) ? $class['properties_info'] : ($class['default_static_members'] + $class['default_properties']);
1966        if ($member_variables) {
1967            echo "\n";
1968            $infos = !empty($class['properties_info']) ? $class['properties_info'] : null;
1969            foreach ($member_variables as $name => $dummy) {
1970                $info = (isset($infos) && isset($infos[$name])) ? $infos[$name] : null;
1971                if (isset($info)) {
1972                    if (!empty($info['doc_comment'])) {
1973                        echo $newindent;
1974                        echo $info['doc_comment'];
1975                        echo "\n";
1976                    }
1977                }
1978
1979                echo $newindent;
1980                $static = false;
1981                if (isset($info)) {
1982                    if ($info['flags'] & ZEND_ACC_STATIC) {
1983                        $static = true;
1984                    }
1985                }
1986                else if (isset($class['default_static_members'][$name])) {
1987                    $static = true;
1988                }
1989
1990                if ($static) {
1991                    echo "static ";
1992                }
1993
1994                $mangled = false;
1995                if (!ZEND_ENGINE_2) {
1996                    echo 'var ';
1997                }
1998                else if (!isset($info)) {
1999                    echo 'public ';
2000                }
2001                else {
2002                    if ($info['flags'] & ZEND_ACC_SHADOW) {
2003                        continue;
2004                    }
2005                    switch ($info['flags'] & ZEND_ACC_PPP_MASK) {
2006                    case ZEND_ACC_PUBLIC:
2007                        echo "public ";
2008                        break;
2009                    case ZEND_ACC_PRIVATE:
2010                        echo "private ";
2011                        $mangled = true;
2012                        break;
2013                    case ZEND_ACC_PROTECTED:
2014                        echo "protected ";
2015                        $mangled = true;
2016                        break;
2017                    }
2018                }
2019
2020                echo '$', $name;
2021
2022                if (isset($info['offset'])) {
2023                    $value = $class[$static ? 'default_static_members_table' : 'default_properties_table'][$info['offset']];
2024                }
2025                else {
2026                    $key = isset($info) ? $info['name'] . ($mangled ? "\000" : "") : $name;
2027
2028                    $value = $class[$static ? 'default_static_members' : 'default_properties'][$key];
2029                }
2030                if (isset($value)) {
2031                    echo ' = ';
2032                    echo str(value($value), $newindent);
2033                }
2034                echo ";\n";
2035            }
2036        }
2037        // }}}
2038        // {{{ function_table
2039        if (isset($class['function_table'])) {
2040            foreach ($class['function_table'] as $func) {
2041                if (!isset($func['scope']) || $func['scope'] == $class['name']) {
2042                    // TODO: skip shadow here
2043                    echo "\n";
2044                    $opa = $func['op_array'];
2045                    if (!empty($opa['doc_comment'])) {
2046                        echo $newindent;
2047                        echo $opa['doc_comment'];
2048                        echo "\n";
2049                    }
2050                    echo $newindent;
2051                    $isAbstractMethod = false;
2052                    if (isset($opa['fn_flags'])) {
2053                        if (($opa['fn_flags'] & ZEND_ACC_ABSTRACT) && !$isinterface) {
2054                            echo "abstract ";
2055                            $isAbstractMethod = true;
2056                        }
2057                        if ($opa['fn_flags'] & ZEND_ACC_FINAL) {
2058                            echo "final ";
2059                        }
2060                        if ($opa['fn_flags'] & ZEND_ACC_STATIC) {
2061                            echo "static ";
2062                        }
2063
2064                        switch ($opa['fn_flags'] & ZEND_ACC_PPP_MASK) {
2065                            case ZEND_ACC_PUBLIC:
2066                                echo "public ";
2067                                break;
2068                            case ZEND_ACC_PRIVATE:
2069                                echo "private ";
2070                                break;
2071                            case ZEND_ACC_PROTECTED:
2072                                echo "protected ";
2073                                break;
2074                            default:
2075                                echo "<visibility error> ";
2076                                break;
2077                        }
2078                    }
2079                    $this->dfunction($func, $newindent, $isinterface || $isAbstractMethod);
2080                    if ($opa['function_name'] == 'Decompiler') {
2081                        //exit;
2082                    }
2083                }
2084            }
2085        }
2086        // }}}
2087        echo $indent, "}\n";
2088    }
2089    // }}}
2090    function decompileString($string) // {{{
2091    {
2092        $this->dc = xcache_dasm_string($string);
2093        if ($this->dc === false) {
2094            echo "error compling string\n";
2095            return false;
2096        }
2097    }
2098    // }}}
2099    function decompileFile($file) // {{{
2100    {
2101        $this->dc = xcache_dasm_file($file);
2102        if ($this->dc === false) {
2103            echo "error compling $file\n";
2104            return false;
2105        }
2106    }
2107    // }}}
2108    function output() // {{{
2109    {
2110        echo "<?". "php\n\n";
2111        foreach ($this->dc['class_table'] as $key => $class) {
2112            if ($key{0} != "\0") {
2113                $this->dclass($class);
2114                echo "\n";
2115            }
2116        }
2117
2118        foreach ($this->dc['function_table'] as $key => $func) {
2119            if ($key{0} != "\0") {
2120                $this->dfunction($func);
2121                echo "\n";
2122            }
2123        }
2124
2125        $this->dop_array($this->dc['op_array']);
2126        echo "\n?" . ">\n";
2127
2128        if (!empty($this->test)) {
2129            $this->outputUnusedOp();
2130        }
2131        return true;
2132    }
2133    // }}}
2134    function outputUnusedOp() // {{{
2135    {
2136        for ($i = 0; $opname = xcache_get_opcode($i); $i ++) {
2137            if ($opname == 'UNDEF')  {
2138                continue;
2139            }
2140
2141            if (!isset($this->usedOps[$i])) {
2142                echo "not covered opcode ", $opname, "\n";
2143            }
2144        }
2145    }
2146    // }}}
2147}
2148
2149// {{{ defines
2150define('ZEND_ENGINE_2_4', PHP_VERSION >= "5.3.99");
2151define('ZEND_ENGINE_2_3', ZEND_ENGINE_2_4 || PHP_VERSION >= "5.3.");
2152define('ZEND_ENGINE_2_2', ZEND_ENGINE_2_3 || PHP_VERSION >= "5.2.");
2153define('ZEND_ENGINE_2_1', ZEND_ENGINE_2_2 || PHP_VERSION >= "5.1.");
2154define('ZEND_ENGINE_2',   ZEND_ENGINE_2_1 || PHP_VERSION >= "5.0.");
2155
2156define('ZEND_ACC_STATIC',         0x01);
2157define('ZEND_ACC_ABSTRACT',       0x02);
2158define('ZEND_ACC_FINAL',          0x04);
2159define('ZEND_ACC_IMPLEMENTED_ABSTRACT',       0x08);
2160
2161define('ZEND_ACC_IMPLICIT_ABSTRACT_CLASS',    0x10);
2162define('ZEND_ACC_EXPLICIT_ABSTRACT_CLASS',    0x20);
2163define('ZEND_ACC_FINAL_CLASS',                0x40);
2164define('ZEND_ACC_INTERFACE',                  0x80);
2165if (ZEND_ENGINE_2_4) {
2166    define('ZEND_ACC_TRAIT',                  0x120);
2167}
2168define('ZEND_ACC_PUBLIC',     0x100);
2169define('ZEND_ACC_PROTECTED',  0x200);
2170define('ZEND_ACC_PRIVATE',    0x400);
2171define('ZEND_ACC_PPP_MASK',  (ZEND_ACC_PUBLIC | ZEND_ACC_PROTECTED | ZEND_ACC_PRIVATE));
2172
2173define('ZEND_ACC_CHANGED',    0x800);
2174define('ZEND_ACC_IMPLICIT_PUBLIC',    0x1000);
2175
2176define('ZEND_ACC_CTOR',       0x2000);
2177define('ZEND_ACC_DTOR',       0x4000);
2178define('ZEND_ACC_CLONE',      0x8000);
2179
2180define('ZEND_ACC_ALLOW_STATIC',   0x10000);
2181
2182define('ZEND_ACC_SHADOW', 0x2000);
2183
2184if (ZEND_ENGINE_2_4) {
2185    define('ZEND_FETCH_GLOBAL',           0x00000000);
2186    define('ZEND_FETCH_LOCAL',            0x10000000);
2187    define('ZEND_FETCH_STATIC',           0x20000000);
2188    define('ZEND_FETCH_STATIC_MEMBER',    0x30000000);
2189    define('ZEND_FETCH_GLOBAL_LOCK',      0x40000000);
2190    define('ZEND_FETCH_LEXICAL',          0x50000000);
2191
2192    define('ZEND_FETCH_TYPE_MASK',        0x70000000);
2193}
2194else {
2195    define('ZEND_FETCH_GLOBAL',           0);
2196    define('ZEND_FETCH_LOCAL',            1);
2197    define('ZEND_FETCH_STATIC',           2);
2198    define('ZEND_FETCH_STATIC_MEMBER',    3);
2199    define('ZEND_FETCH_GLOBAL_LOCK',      4);
2200}
2201
2202define('ZEND_FETCH_CLASS_DEFAULT',    0);
2203define('ZEND_FETCH_CLASS_SELF',       1);
2204define('ZEND_FETCH_CLASS_PARENT',     2);
2205define('ZEND_FETCH_CLASS_MAIN',       3);
2206define('ZEND_FETCH_CLASS_GLOBAL',     4);
2207define('ZEND_FETCH_CLASS_AUTO',       5);
2208define('ZEND_FETCH_CLASS_INTERFACE',  6);
2209define('ZEND_FETCH_CLASS_STATIC',     7);
2210if (ZEND_ENGINE_2_4) {
2211    define('ZEND_FETCH_CLASS_TRAIT',     14);
2212}
2213if (ZEND_ENGINE_2_3) {
2214    define('ZEND_FETCH_CLASS_MASK',     0xF);
2215}
2216
2217define('ZEND_EVAL',               (1<<0));
2218define('ZEND_INCLUDE',            (1<<1));
2219define('ZEND_INCLUDE_ONCE',       (1<<2));
2220define('ZEND_REQUIRE',            (1<<3));
2221define('ZEND_REQUIRE_ONCE',       (1<<4));
2222
2223define('ZEND_ISSET',              (1<<0));
2224define('ZEND_ISEMPTY',            (1<<1));
2225if (ZEND_ENGINE_2_4) {
2226    define('EXT_TYPE_UNUSED',     (1<<5));
2227}
2228else {
2229    define('EXT_TYPE_UNUSED',     (1<<0));
2230}
2231
2232define('ZEND_FETCH_STANDARD',     0);
2233define('ZEND_FETCH_ADD_LOCK',     1);
2234
2235define('ZEND_FE_FETCH_BYREF',     1);
2236define('ZEND_FE_FETCH_WITH_KEY',  2);
2237
2238define('ZEND_MEMBER_FUNC_CALL',   1<<0);
2239define('ZEND_CTOR_CALL',          1<<1);
2240
2241define('ZEND_ARG_SEND_BY_REF',        (1<<0));
2242define('ZEND_ARG_COMPILE_TIME_BOUND', (1<<1));
2243define('ZEND_ARG_SEND_FUNCTION',      (1<<2));
2244
2245define('BYREF_NONE',       0);
2246define('BYREF_FORCE',      1);
2247define('BYREF_ALLOW',      2);
2248define('BYREF_FORCE_REST', 3);
2249define('IS_NULL',     0);
2250define('IS_LONG',     1);
2251define('IS_DOUBLE',   2);
2252define('IS_BOOL',     ZEND_ENGINE_2 ? 3 : 6);
2253define('IS_ARRAY',    4);
2254define('IS_OBJECT',   5);
2255define('IS_STRING',   ZEND_ENGINE_2 ? 6 : 3);
2256define('IS_RESOURCE', 7);
2257define('IS_CONSTANT', 8);
2258define('IS_CONSTANT_ARRAY',   9);
2259
2260@define('XC_IS_CV', 16);
2261
2262/*
2263if (preg_match_all('!XC_[A-Z_]+!', file_get_contents(__FILE__), $ms)) {
2264    $verdiff = array();
2265    foreach ($ms[0] as $k) {
2266        if (!defined($k)) {
2267            $verdiff[$k] = -1;
2268            define($k, -1);
2269        }
2270    }
2271    var_export($verdiff);
2272}
2273/*/
2274foreach (array (
2275    'XC_HANDLE_EXCEPTION' => -1,
2276    'XC_FETCH_CLASS' => -1,
2277    'XC_FETCH_' => -1,
2278    'XC_FETCH_DIM_' => -1,
2279    'XC_ASSIGN_DIM' => -1,
2280    'XC_UNSET_DIM' => -1,
2281    'XC_UNSET_OBJ' => -1,
2282    'XC_ASSIGN_OBJ' => -1,
2283    'XC_ISSET_ISEMPTY_DIM_OBJ' => -1,
2284    'XC_ISSET_ISEMPTY_PROP_OBJ' => -1,
2285    'XC_ISSET_ISEMPTY_VAR' => -1,
2286    'XC_INIT_STATIC_METHOD_CALL' => -1,
2287    'XC_INIT_METHOD_CALL' => -1,
2288    'XC_VERIFY_ABSTRACT_CLASS' => -1,
2289    'XC_DECLARE_CLASS' => -1,
2290    'XC_DECLARE_INHERITED_CLASS' => -1,
2291    'XC_DECLARE_INHERITED_CLASS_DELAYED' => -1,
2292    'XC_ADD_INTERFACE' => -1,
2293    'XC_POST_DEC_OBJ' => -1,
2294    'XC_POST_INC_OBJ' => -1,
2295    'XC_PRE_DEC_OBJ' => -1,
2296    'XC_PRE_INC_OBJ' => -1,
2297    'XC_UNSET_OBJ' => -1,
2298    'XC_JMP_NO_CTOR' => -1,
2299    'XC_FETCH_' => -1,
2300    'XC_FETCH_DIM_' => -1,
2301    'XC_UNSET_DIM_OBJ' => -1,
2302    'XC_ISSET_ISEMPTY' => -1,
2303    'XC_INIT_FCALL_BY_FUNC' => -1,
2304    'XC_DO_FCALL_BY_FUNC' => -1,
2305    'XC_DECLARE_FUNCTION_OR_CLASS' => -1,
2306    'XC_INIT_NS_FCALL_BY_NAME' => -1,
2307    'XC_GOTO' => -1,
2308    'XC_CATCH' => -1,
2309    'XC_THROW' => -1,
2310    'XC_INSTANCEOF' => -1,
2311    'XC_DECLARE_FUNCTION' => -1,
2312    'XC_RAISE_ABSTRACT_ERROR' => -1,
2313    'XC_DECLARE_CONST' => -1,
2314    'XC_USER_OPCODE' => -1,
2315    'XC_JMP_SET' => -1,
2316    'XC_DECLARE_LAMBDA_FUNCTION' => -1,
2317) as $k => $v) {
2318    if (!defined($k)) {
2319        define($k, $v);
2320    }
2321}
2322// }}}
2323
Note: See TracBrowser for help on using the repository browser.