AnonymousFox

//opt/alt/php55/usr/share/pear/Bytekit/Disassembler.php

<?php
/**
 * bytekit-cli
 *
 * Copyright (c) 2009-2012, Sebastian Bergmann <sb@sebastian-bergmann.de>.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 *   * Redistributions of source code must retain the above copyright
 *     notice, this list of conditions and the following disclaimer.
 *
 *   * Redistributions in binary form must reproduce the above copyright
 *     notice, this list of conditions and the following disclaimer in
 *     the documentation and/or other materials provided with the
 *     distribution.
 *
 *   * Neither the name of Sebastian Bergmann nor the names of his
 *     contributors may be used to endorse or promote products derived
 *     from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
 * COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 *
 * @package   Bytekit
 * @author    Sebastian Bergmann <sb@sebastian-bergmann.de>
 * @copyright 2009-2012 Sebastian Bergmann <sb@sebastian-bergmann.de>
 * @license   http://www.opensource.org/licenses/BSD-3-Clause  The BSD 3-Clause License
 * @since     File available since Release 1.0.0
 */

/**
 * Disassembler.
 *
 * @author    Sebastian Bergmann <sb@sebastian-bergmann.de>
 * @copyright 2009-2012 Sebastian Bergmann <sb@sebastian-bergmann.de>
 * @license   http://www.opensource.org/licenses/BSD-3-Clause  The BSD 3-Clause License
 * @version   Release: 1.1.3
 * @link      http://github.com/sebastianbergmann/bytekit-cli/tree
 * @since     Class available since Release 1.0.0
 */
class Bytekit_Disassembler
{
    /**
     * @var array
     */
    protected $bytecode;

/**
     * @var string
     */
    protected $filename;

/**
     * Constructor.
     *
     * @param  string $file
     * @return array
     */
    public function __construct($filename)
    {
        $this->bytecode = @bytekit_disassemble_file($filename);
        $this->filename = realpath($filename);
    }

/**
     * Wrapper for bytekit_disassemble_file().
     *
     * @param  boolean $decodeLabels
     * @param  boolean $eliminateDeadCode
     * @return array
     */
    public function disassemble($decodeLabels = TRUE, $eliminateDeadCode = FALSE)
    {
        $result = array();

foreach ($this->bytecode['functions'] as $function => $oparray) {
            $cv  = array();
            $ops = array();

if ($eliminateDeadCode) {
                $deadCode = array_flip(Bytekit_Util::eliminateDeadCode($oparray));
            } else {
                $deadCode = array();
            }

if ($decodeLabels) {
                $labels = Bytekit_Util::findJumpLabels($oparray);
            } else {
                $labels = array();
            }

if (isset($oparray['raw']['cv'])) {
                foreach ($oparray['raw']['cv'] as $key => $name) {
                    $cv[] = sprintf('!%d = $%s', $key, $name);
                }
            }

$numOps = 0;

foreach ($oparray['code'] as $opline) {
                $bb = isset($oparray['bb'][$opline['opline']]) ? $oparray['bb'][$opline['opline']] : NULL;

if (!isset($deadCode[$bb])) {
                    $lineNumber = $oparray['raw']['opcodes'][$opline['opline']]['lineno'];
                    $operands   = Bytekit_Util::decodeOperands($opline['operands'], $labels);

if (!isset($ops[$lineNumber])) {
                        $ops[$lineNumber] = array();
                    }

$ops[$lineNumber][] = array(
                      'bb'       => $bb,
                      'address'  => $opline['address'],
                      'mnemonic' => $opline['mnemonic'],
                      'operands' => join(', ', $operands['operands']),
                      'results'  => join(', ', $operands['results'])
                    );

$numOps++;
                }
            }

$result[$function] = array(
              'cfg'     => $oparray['cfg'],
              'cv'      => $cv,
              'ops'     => $ops,
              'num_ops' => $numOps
            );
        }

return array($this->filename => $result);
    }
}