LXR qemu/disas/tci.c

   1/*
   2 * Tiny Code Interpreter for QEMU - disassembler
   3 *
   4 * Copyright (c) 2011 Stefan Weil
   5 *
   6 * This program is free software: you can redistribute it and/or modify
   7 * it under the terms of the GNU General Public License as published by
   8 * the Free Software Foundation, either version 2 of the License, or
   9 * (at your option) any later version.
  10 *
  11 * This program is distributed in the hope that it will be useful,
  12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 * GNU General Public License for more details.
  15 *
  16 * You should have received a copy of the GNU General Public License
  17 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  18 */
  19
  20#include "qemu/osdep.h"
  21#include "qemu-common.h"
  22#include "disas/bfd.h"
  23#include "tcg/tcg.h"
  24
  25/* Disassemble TCI bytecode. */
  26int print_insn_tci(bfd_vma addr, disassemble_info *info)
  27{
  28    int length;
  29    uint8_t byte;
  30    int status;
  31    TCGOpcode op;
  32
  33    status = info->read_memory_func(addr, &byte, 1, info);
  34    if (status != 0) {
  35        info->memory_error_func(status, addr, info);
  36        return -1;
  37    }
  38    op = byte;
  39
  40    addr++;
  41    status = info->read_memory_func(addr, &byte, 1, info);
  42    if (status != 0) {
  43        info->memory_error_func(status, addr, info);
  44        return -1;
  45    }
  46    length = byte;
  47
  48    if (op >= tcg_op_defs_max) {
  49        info->fprintf_func(info->stream, "illegal opcode %d", op);
  50    } else {
  51        const TCGOpDef *def = &tcg_op_defs[op];
  52        int nb_oargs = def->nb_oargs;
  53        int nb_iargs = def->nb_iargs;
  54        int nb_cargs = def->nb_cargs;
  55        /* TODO: Improve disassembler output. */
  56        info->fprintf_func(info->stream, "%s\to=%d i=%d c=%d",
  57                           def->name, nb_oargs, nb_iargs, nb_cargs);
  58    }
  59
  60    return length;
  61}
  62