/src/capstonev5/arch/TMS320C64x/TMS320C64xInstPrinter.c

Source
/* Capstone Disassembly Engine */
/* TMS320C64x Backend by Fotis Loukos <me@fotisl.com> 2016 */

#ifdef CAPSTONE_HAS_TMS320C64X

#ifdef _MSC_VER
// Disable security warnings for strcpy
#ifndef _CRT_SECURE_NO_WARNINGS
#define _CRT_SECURE_NO_WARNINGS
#endif

// Banned API Usage : strcpy is a Banned API as listed in dontuse.h for
// security purposes.
#pragma warning(disable:28719)
#endif

#include <ctype.h>
#include <string.h>

#include "TMS320C64xInstPrinter.h"
#include "../../MCInst.h"
#include "../../utils.h"
#include "../../SStream.h"
#include "../../MCRegisterInfo.h"
#include "../../MathExtras.h"
#include "TMS320C64xMapping.h"

#include "capstone/tms320c64x.h"

static const char *getRegisterName(unsigned RegNo);
static void printOperand(MCInst *MI, unsigned OpNo, SStream *O);
static void printMemOperand(MCInst *MI, unsigned OpNo, SStream *O);
static void printMemOperand2(MCInst *MI, unsigned OpNo, SStream *O);
static void printRegPair(MCInst *MI, unsigned OpNo, SStream *O);

void TMS320C64x_post_printer(csh ud, cs_insn *insn, char *insn_asm, MCInst *mci)
{
  SStream ss;
  char *p, *p2, tmp[8];
  unsigned int unit = 0;
  int i;
  cs_tms320c64x *tms320c64x;

  if (mci->csh->detail) {
    tms320c64x = &mci->flat_insn->detail->tms320c64x;

    for (i = 0; i < insn->detail->groups_count; i++) {
      switch(insn->detail->groups[i]) {
        case TMS320C64X_GRP_FUNIT_D:
          unit = TMS320C64X_FUNIT_D;
          break;
        case TMS320C64X_GRP_FUNIT_L:
          unit = TMS320C64X_FUNIT_L;
          break;
        case TMS320C64X_GRP_FUNIT_M:
          unit = TMS320C64X_FUNIT_M;
          break;
        case TMS320C64X_GRP_FUNIT_S:
          unit = TMS320C64X_FUNIT_S;
          break;
        case TMS320C64X_GRP_FUNIT_NO:
          unit = TMS320C64X_FUNIT_NO;
          break;
      }
      if (unit != 0)
        break;
    }
    tms320c64x->funit.unit = unit;

    SStream_Init(&ss);
    if (tms320c64x->condition.reg != TMS320C64X_REG_INVALID)
      SStream_concat(&ss, "[%c%s]|", (tms320c64x->condition.zero == 1) ? '!' : '|', cs_reg_name(ud, tms320c64x->condition.reg));

    p = strchr(insn_asm, '\t');
    if (p != NULL)
      *p++ = '\0';

    SStream_concat0(&ss, insn_asm);
    if ((p != NULL) && (((p2 = strchr(p, '[')) != NULL) || ((p2 = strchr(p, '(')) != NULL))) {
      while ((p2 > p) && ((*p2 != 'a') && (*p2 != 'b')))
        p2--;
      if (p2 == p) {
        strcpy(insn_asm, "Invalid!");
        return;
      }
      if (*p2 == 'a')
        strcpy(tmp, "1T");
      else
        strcpy(tmp, "2T");
    } else {
      tmp[0] = '\0';
    }
    switch(tms320c64x->funit.unit) {
      case TMS320C64X_FUNIT_D:
        SStream_concat(&ss, ".D%s%u", tmp, tms320c64x->funit.side);
        break;
      case TMS320C64X_FUNIT_L:
        SStream_concat(&ss, ".L%s%u", tmp, tms320c64x->funit.side);
        break;
      case TMS320C64X_FUNIT_M:
        SStream_concat(&ss, ".M%s%u", tmp, tms320c64x->funit.side);
        break;
      case TMS320C64X_FUNIT_S:
        SStream_concat(&ss, ".S%s%u", tmp, tms320c64x->funit.side);
        break;
    }
    if (tms320c64x->funit.crosspath > 0)
      SStream_concat0(&ss, "X");

    if (p != NULL)
      SStream_concat(&ss, "\t%s", p);

    if (tms320c64x->parallel != 0)
      SStream_concat0(&ss, "\t||");

    /* insn_asm is a buffer from an SStream, so there should be enough space */
    strcpy(insn_asm, ss.buffer);
  }
}

#define PRINT_ALIAS_INSTR
#include "TMS320C64xGenAsmWriter.inc"

#define GET_INSTRINFO_ENUM
#include "TMS320C64xGenInstrInfo.inc"

static void printOperand(MCInst *MI, unsigned OpNo, SStream *O)
{
  MCOperand *Op = MCInst_getOperand(MI, OpNo);
  unsigned reg;

  if (MCOperand_isReg(Op)) {
    reg = MCOperand_getReg(Op);
    if ((MCInst_getOpcode(MI) == TMS320C64x_MVC_s1_rr) && (OpNo == 1)) {
      switch(reg) {
        case TMS320C64X_REG_EFR:
          SStream_concat0(O, "EFR");
          break;
        case TMS320C64X_REG_IFR:
          SStream_concat0(O, "IFR");
          break;
        default:
          SStream_concat0(O, getRegisterName(reg));
          break;
      }
    } else {
      SStream_concat0(O, getRegisterName(reg));
    }

    if (MI->csh->detail) {
      MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].type = TMS320C64X_OP_REG;
      MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].reg = reg;
      MI->flat_insn->detail->tms320c64x.op_count++;
    }
  } else if (MCOperand_isImm(Op)) {
    int64_t Imm = MCOperand_getImm(Op);

    if (Imm >= 0) {
      if (Imm > HEX_THRESHOLD)
        SStream_concat(O, "0x%"PRIx64, Imm);
      else
        SStream_concat(O, "%"PRIu64, Imm);
    } else {
      if (Imm < -HEX_THRESHOLD)
        SStream_concat(O, "-0x%"PRIx64, -Imm);
      else
        SStream_concat(O, "-%"PRIu64, -Imm);
    }

    if (MI->csh->detail) {
      MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].type = TMS320C64X_OP_IMM;
      MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].imm = Imm;
      MI->flat_insn->detail->tms320c64x.op_count++;
    }
  }
}

static void printMemOperand(MCInst *MI, unsigned OpNo, SStream *O)
{
  MCOperand *Op = MCInst_getOperand(MI, OpNo);
  int64_t Val = MCOperand_getImm(Op);
  unsigned scaled, base, offset, mode, unit;
  cs_tms320c64x *tms320c64x;
  char st, nd;

  scaled = (Val >> 19) & 1;
  base = (Val >> 12) & 0x7f;
  offset = (Val >> 5) & 0x7f;
  mode = (Val >> 1) & 0xf;
  unit = Val & 1;

  if (scaled) {
    st = '[';
    nd = ']';
  } else {
    st = '(';
    nd = ')';
  }

  switch(mode) {
    case 0:
      SStream_concat(O, "*-%s%c%u%c", getRegisterName(base), st, offset, nd);
      break;
    case 1:
      SStream_concat(O, "*+%s%c%u%c", getRegisterName(base), st, offset, nd);
      break;
    case 4:
      SStream_concat(O, "*-%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
      break;
    case 5:
      SStream_concat(O, "*+%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
      break;
    case 8:
      SStream_concat(O, "*--%s%c%u%c", getRegisterName(base), st, offset, nd);
      break;
    case 9:
      SStream_concat(O, "*++%s%c%u%c", getRegisterName(base), st, offset, nd);
      break;
    case 10:
      SStream_concat(O, "*%s--%c%u%c", getRegisterName(base), st, offset, nd);
      break;
    case 11:
      SStream_concat(O, "*%s++%c%u%c", getRegisterName(base), st, offset, nd);
      break;
    case 12:
      SStream_concat(O, "*--%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
      break;
    case 13:
      SStream_concat(O, "*++%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
      break;
    case 14:
      SStream_concat(O, "*%s--%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
      break;
    case 15:
      SStream_concat(O, "*%s++%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
      break;
  }

  if (MI->csh->detail) {
    tms320c64x = &MI->flat_insn->detail->tms320c64x;

    tms320c64x->operands[tms320c64x->op_count].type = TMS320C64X_OP_MEM;
    tms320c64x->operands[tms320c64x->op_count].mem.base = base;
    tms320c64x->operands[tms320c64x->op_count].mem.disp = offset;
    tms320c64x->operands[tms320c64x->op_count].mem.unit = unit + 1;
    tms320c64x->operands[tms320c64x->op_count].mem.scaled = scaled;
    switch(mode) {
      case 0:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
        break;
      case 1:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
        break;
      case 4:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
        break;
      case 5:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
        break;
      case 8:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
        break;
      case 9:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
        break;
      case 10:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
        break;
      case 11:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
        break;
      case 12:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
        break;
      case 13:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
        break;
      case 14:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
        break;
      case 15:
        tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
        tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
        tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
        break;
    }
    tms320c64x->op_count++;
  }
}

static void printMemOperand2(MCInst *MI, unsigned OpNo, SStream *O)
{
  MCOperand *Op = MCInst_getOperand(MI, OpNo);
  int64_t Val = MCOperand_getImm(Op);
  uint16_t offset;
  unsigned basereg;
  cs_tms320c64x *tms320c64x;

  basereg = Val & 0x7f;
  offset = (Val >> 7) & 0x7fff;
  SStream_concat(O, "*+%s[0x%x]", getRegisterName(basereg), offset);

  if (MI->csh->detail) {
    tms320c64x = &MI->flat_insn->detail->tms320c64x;

    tms320c64x->operands[tms320c64x->op_count].type = TMS320C64X_OP_MEM;
    tms320c64x->operands[tms320c64x->op_count].mem.base = basereg;
    tms320c64x->operands[tms320c64x->op_count].mem.unit = 2;
    tms320c64x->operands[tms320c64x->op_count].mem.disp = offset;
    tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
    tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
    tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
    tms320c64x->op_count++;
  }
}

static void printRegPair(MCInst *MI, unsigned OpNo, SStream *O)
{
  MCOperand *Op = MCInst_getOperand(MI, OpNo);
  unsigned reg = MCOperand_getReg(Op);
  cs_tms320c64x *tms320c64x;

  SStream_concat(O, "%s:%s", getRegisterName(reg + 1), getRegisterName(reg));

  if (MI->csh->detail) {
    tms320c64x = &MI->flat_insn->detail->tms320c64x;

    tms320c64x->operands[tms320c64x->op_count].type = TMS320C64X_OP_REGPAIR;
    tms320c64x->operands[tms320c64x->op_count].reg = reg;
    tms320c64x->op_count++;
  }
}

static bool printAliasInstruction(MCInst *MI, SStream *O, MCRegisterInfo *MRI)
{
  unsigned opcode = MCInst_getOpcode(MI);
  MCOperand *op;

  switch(opcode) {
    /* ADD.Dx -i, x, y -> SUB.Dx x, i, y */
    case TMS320C64x_ADD_d2_rir:
    /* ADD.L -i, x, y -> SUB.L x, i, y */
    case TMS320C64x_ADD_l1_irr:
    case TMS320C64x_ADD_l1_ipp:
    /* ADD.S -i, x, y -> SUB.S x, i, y */
    case TMS320C64x_ADD_s1_irr:
      if ((MCInst_getNumOperands(MI) == 3) &&
        MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
        MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
        MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
        (MCOperand_getImm(MCInst_getOperand(MI, 2)) < 0)) {

        MCInst_setOpcodePub(MI, TMS320C64X_INS_SUB);
        op = MCInst_getOperand(MI, 2);
        MCOperand_setImm(op, -MCOperand_getImm(op));

        SStream_concat0(O, "SUB\t");
        printOperand(MI, 1, O);
        SStream_concat0(O, ", ");
        printOperand(MI, 2, O);
        SStream_concat0(O, ", ");
        printOperand(MI, 0, O);

        return true;
      }
      break;
  }
  switch(opcode) {
    /* ADD.D 0, x, y -> MV.D x, y */
    case TMS320C64x_ADD_d1_rir:
    /* OR.D x, 0, y -> MV.D x, y */
    case TMS320C64x_OR_d2_rir:
    /* ADD.L 0, x, y -> MV.L x, y */
    case TMS320C64x_ADD_l1_irr:
    case TMS320C64x_ADD_l1_ipp:
    /* OR.L 0, x, y -> MV.L x, y */
    case TMS320C64x_OR_l1_irr:
    /* ADD.S 0, x, y -> MV.S x, y */
    case TMS320C64x_ADD_s1_irr:
    /* OR.S 0, x, y -> MV.S x, y */
    case TMS320C64x_OR_s1_irr:
      if ((MCInst_getNumOperands(MI) == 3) &&
        MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
        MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
        MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
        (MCOperand_getImm(MCInst_getOperand(MI, 2)) == 0)) {

        MCInst_setOpcodePub(MI, TMS320C64X_INS_MV);
        MI->size--;

        SStream_concat0(O, "MV\t");
        printOperand(MI, 1, O);
        SStream_concat0(O, ", ");
        printOperand(MI, 0, O);

        return true;
      }
      break;
  }
  switch(opcode) {
    /* XOR.D -1, x, y -> NOT.D x, y */
    case TMS320C64x_XOR_d2_rir:
    /* XOR.L -1, x, y -> NOT.L x, y */
    case TMS320C64x_XOR_l1_irr:
    /* XOR.S -1, x, y -> NOT.S x, y */
    case TMS320C64x_XOR_s1_irr:
      if ((MCInst_getNumOperands(MI) == 3) &&
        MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
        MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
        MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
        (MCOperand_getImm(MCInst_getOperand(MI, 2)) == -1)) {

        MCInst_setOpcodePub(MI, TMS320C64X_INS_NOT);
        MI->size--;

        SStream_concat0(O, "NOT\t");
        printOperand(MI, 1, O);
        SStream_concat0(O, ", ");
        printOperand(MI, 0, O);

        return true;
      }
      break;
  }
  switch(opcode) {
    /* MVK.D 0, x -> ZERO.D x */
    case TMS320C64x_MVK_d1_rr:
    /* MVK.L 0, x -> ZERO.L x */
    case TMS320C64x_MVK_l2_ir:
      if ((MCInst_getNumOperands(MI) == 2) &&
        MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
        MCOperand_isImm(MCInst_getOperand(MI, 1)) &&
        (MCOperand_getImm(MCInst_getOperand(MI, 1)) == 0)) {

        MCInst_setOpcodePub(MI, TMS320C64X_INS_ZERO);
        MI->size--;

        SStream_concat0(O, "ZERO\t");
        printOperand(MI, 0, O);

        return true;
      }
      break;
  }
  switch(opcode) {
    /* SUB.L x, x, y -> ZERO.L y */
    case TMS320C64x_SUB_l1_rrp_x1:
    /* SUB.S x, x, y -> ZERO.S y */
    case TMS320C64x_SUB_s1_rrr:
      if ((MCInst_getNumOperands(MI) == 3) &&
        MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
        MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
        MCOperand_isReg(MCInst_getOperand(MI, 2)) &&
        (MCOperand_getReg(MCInst_getOperand(MI, 1)) == MCOperand_getReg(MCInst_getOperand(MI, 2)))) {

        MCInst_setOpcodePub(MI, TMS320C64X_INS_ZERO);
        MI->size -= 2;

        SStream_concat0(O, "ZERO\t");
        printOperand(MI, 0, O);

        return true;
      }
      break;
  }
  switch(opcode) {
    /* SUB.L 0, x, y -> NEG.L x, y */
    case TMS320C64x_SUB_l1_irr:
    case TMS320C64x_SUB_l1_ipp:
    /* SUB.S 0, x, y -> NEG.S x, y */
    case TMS320C64x_SUB_s1_irr:
      if ((MCInst_getNumOperands(MI) == 3) &&
        MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
        MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
        MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
        (MCOperand_getImm(MCInst_getOperand(MI, 2)) == 0)) {

        MCInst_setOpcodePub(MI, TMS320C64X_INS_NEG);
        MI->size--;

        SStream_concat0(O, "NEG\t");
        printOperand(MI, 1, O);
        SStream_concat0(O, ", ");
        printOperand(MI, 0, O);

        return true;
      }
      break;
  }
  switch(opcode) {
    /* PACKLH2.L x, x, y -> SWAP2.L x, y */
    case TMS320C64x_PACKLH2_l1_rrr_x2:
    /* PACKLH2.S x, x, y -> SWAP2.S x, y */
    case TMS320C64x_PACKLH2_s1_rrr:
      if ((MCInst_getNumOperands(MI) == 3) &&
        MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
        MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
        MCOperand_isReg(MCInst_getOperand(MI, 2)) &&
        (MCOperand_getReg(MCInst_getOperand(MI, 1)) == MCOperand_getReg(MCInst_getOperand(MI, 2)))) {

        MCInst_setOpcodePub(MI, TMS320C64X_INS_SWAP2);
        MI->size--;

        SStream_concat0(O, "SWAP2\t");
        printOperand(MI, 1, O);
        SStream_concat0(O, ", ");
        printOperand(MI, 0, O);

        return true;
      }
      break;
  }
  switch(opcode) {
    /* NOP 16 -> IDLE */
    /* NOP 1 -> NOP */
    case TMS320C64x_NOP_n:
      if ((MCInst_getNumOperands(MI) == 1) &&
        MCOperand_isImm(MCInst_getOperand(MI, 0)) &&
        (MCOperand_getReg(MCInst_getOperand(MI, 0)) == 16)) {

        MCInst_setOpcodePub(MI, TMS320C64X_INS_IDLE);
        MI->size--;

        SStream_concat0(O, "IDLE");

        return true;
      }
      if ((MCInst_getNumOperands(MI) == 1) &&
        MCOperand_isImm(MCInst_getOperand(MI, 0)) &&
        (MCOperand_getReg(MCInst_getOperand(MI, 0)) == 1)) {

        MI->size--;

        SStream_concat0(O, "NOP");

        return true;
      }
      break;
  }

  return false;
}

void TMS320C64x_printInst(MCInst *MI, SStream *O, void *Info)
{
  if (!printAliasInstruction(MI, O, Info))
    printInstruction(MI, O, Info);
}

#endif

Coverage Report

Created: 2026-03-03 06:15

Line	Count	Source
1		/* Capstone Disassembly Engine */
2		/* TMS320C64x Backend by Fotis Loukos <me@fotisl.com> 2016 */
3
4		#ifdef CAPSTONE_HAS_TMS320C64X
5
6		#ifdef _MSC_VER
7		// Disable security warnings for strcpy
8		#ifndef _CRT_SECURE_NO_WARNINGS
9		#define _CRT_SECURE_NO_WARNINGS
10		#endif
11
12		// Banned API Usage : strcpy is a Banned API as listed in dontuse.h for
13		// security purposes.
14		#pragma warning(disable:28719)
15		#endif
16
17		#include <ctype.h>
18		#include <string.h>
19
20		#include "TMS320C64xInstPrinter.h"
21		#include "../../MCInst.h"
22		#include "../../utils.h"
23		#include "../../SStream.h"
24		#include "../../MCRegisterInfo.h"
25		#include "../../MathExtras.h"
26		#include "TMS320C64xMapping.h"
27
28		#include "capstone/tms320c64x.h"
29
30		static const char *getRegisterName(unsigned RegNo);
31		static void printOperand(MCInst MI, unsigned OpNo, SStream O);
32		static void printMemOperand(MCInst MI, unsigned OpNo, SStream O);
33		static void printMemOperand2(MCInst MI, unsigned OpNo, SStream O);
34		static void printRegPair(MCInst MI, unsigned OpNo, SStream O);
35
36		void TMS320C64x_post_printer(csh ud, cs_insn insn, char insn_asm, MCInst *mci)
37	48.5k	{
38	48.5k	SStream ss;
39	48.5k	char p, p2, tmp[8];
40	48.5k	unsigned int unit = 0;
41	48.5k	int i;
42	48.5k	cs_tms320c64x *tms320c64x;
43
44	48.5k	if (mci->csh->detail) {
45	48.5k	tms320c64x = &mci->flat_insn->detail->tms320c64x;
46
47	48.5k	for (i = 0; i < insn->detail->groups_count; i++) {
48	48.5k	switch(insn->detail->groups[i]) {
49	12.2k	case TMS320C64X_GRP_FUNIT_D:
50	12.2k	unit = TMS320C64X_FUNIT_D;
51	12.2k	break;
52	12.4k	case TMS320C64X_GRP_FUNIT_L:
53	12.4k	unit = TMS320C64X_FUNIT_L;
54	12.4k	break;
55	2.62k	case TMS320C64X_GRP_FUNIT_M:
56	2.62k	unit = TMS320C64X_FUNIT_M;
57	2.62k	break;
58	19.9k	case TMS320C64X_GRP_FUNIT_S:
59	19.9k	unit = TMS320C64X_FUNIT_S;
60	19.9k	break;
61	1.17k	case TMS320C64X_GRP_FUNIT_NO:
62	1.17k	unit = TMS320C64X_FUNIT_NO;
63	1.17k	break;
64	48.5k	}
65	48.5k	if (unit != 0)
66	48.5k	break;
67	48.5k	}
68	48.5k	tms320c64x->funit.unit = unit;
69
70	48.5k	SStream_Init(&ss);
71	48.5k	if (tms320c64x->condition.reg != TMS320C64X_REG_INVALID)
72	31.0k	SStream_concat(&ss, "[%c%s]\|", (tms320c64x->condition.zero == 1) ? '!' : '\|', cs_reg_name(ud, tms320c64x->condition.reg));
73
74	48.5k	p = strchr(insn_asm, '\t');
75	48.5k	if (p != NULL)
76	47.7k	*p++ = '\0';
77
78	48.5k	SStream_concat0(&ss, insn_asm);
79	48.5k	if ((p != NULL) && (((p2 = strchr(p, '[')) != NULL) \|\| ((p2 = strchr(p, '(')) != NULL))) {
80	38.9k	while ((p2 > p) && ((p2 != 'a') && (p2 != 'b')))
81	29.5k	p2--;
82	9.44k	if (p2 == p) {
83	0	strcpy(insn_asm, "Invalid!");
84	0	return;
85	0	}
86	9.44k	if (*p2 == 'a')
87	4.59k	strcpy(tmp, "1T");
88	4.85k	else
89	4.85k	strcpy(tmp, "2T");
90	39.0k	} else {
91	39.0k	tmp[0] = '\0';
92	39.0k	}
93	48.5k	switch(tms320c64x->funit.unit) {
94	12.2k	case TMS320C64X_FUNIT_D:
95	12.2k	SStream_concat(&ss, ".D%s%u", tmp, tms320c64x->funit.side);
96	12.2k	break;
97	12.4k	case TMS320C64X_FUNIT_L:
98	12.4k	SStream_concat(&ss, ".L%s%u", tmp, tms320c64x->funit.side);
99	12.4k	break;
100	2.62k	case TMS320C64X_FUNIT_M:
101	2.62k	SStream_concat(&ss, ".M%s%u", tmp, tms320c64x->funit.side);
102	2.62k	break;
103	19.9k	case TMS320C64X_FUNIT_S:
104	19.9k	SStream_concat(&ss, ".S%s%u", tmp, tms320c64x->funit.side);
105	19.9k	break;
106	48.5k	}
107	48.5k	if (tms320c64x->funit.crosspath > 0)
108	15.5k	SStream_concat0(&ss, "X");
109
110	48.5k	if (p != NULL)
111	47.7k	SStream_concat(&ss, "\t%s", p);
112
113	48.5k	if (tms320c64x->parallel != 0)
114	24.3k	SStream_concat0(&ss, "\t\|\|");
115
116		/* insn_asm is a buffer from an SStream, so there should be enough space */
117	48.5k	strcpy(insn_asm, ss.buffer);
118	48.5k	}
119	48.5k	}
120
121		#define PRINT_ALIAS_INSTR
122		#include "TMS320C64xGenAsmWriter.inc"
123
124		#define GET_INSTRINFO_ENUM
125		#include "TMS320C64xGenInstrInfo.inc"
126
127		static void printOperand(MCInst MI, unsigned OpNo, SStream O)
128	110k	{
129	110k	MCOperand *Op = MCInst_getOperand(MI, OpNo);
130	110k	unsigned reg;
131
132	110k	if (MCOperand_isReg(Op)) {
133	79.3k	reg = MCOperand_getReg(Op);
134	79.3k	if ((MCInst_getOpcode(MI) == TMS320C64x_MVC_s1_rr) && (OpNo == 1)) {
135	2.70k	switch(reg) {
136	704	case TMS320C64X_REG_EFR:
137	704	SStream_concat0(O, "EFR");
138	704	break;
139	463	case TMS320C64X_REG_IFR:
140	463	SStream_concat0(O, "IFR");
141	463	break;
142	1.53k	default:
143	1.53k	SStream_concat0(O, getRegisterName(reg));
144	1.53k	break;
145	2.70k	}
146	76.6k	} else {
147	76.6k	SStream_concat0(O, getRegisterName(reg));
148	76.6k	}
149
150	79.3k	if (MI->csh->detail) {
151	79.3k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].type = TMS320C64X_OP_REG;
152	79.3k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].reg = reg;
153	79.3k	MI->flat_insn->detail->tms320c64x.op_count++;
154	79.3k	}
155	79.3k	} else if (MCOperand_isImm(Op)) {
156	30.9k	int64_t Imm = MCOperand_getImm(Op);
157
158	30.9k	if (Imm >= 0) {
159	25.8k	if (Imm > HEX_THRESHOLD)
160	15.4k	SStream_concat(O, "0x%"PRIx64, Imm);
161	10.3k	else
162	10.3k	SStream_concat(O, "%"PRIu64, Imm);
163	25.8k	} else {
164	5.12k	if (Imm < -HEX_THRESHOLD)
165	4.31k	SStream_concat(O, "-0x%"PRIx64, -Imm);
166	804	else
167	804	SStream_concat(O, "-%"PRIu64, -Imm);
168	5.12k	}
169
170	30.9k	if (MI->csh->detail) {
171	30.9k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].type = TMS320C64X_OP_IMM;
172	30.9k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].imm = Imm;
173	30.9k	MI->flat_insn->detail->tms320c64x.op_count++;
174	30.9k	}
175	30.9k	}
176	110k	}
177
178		static void printMemOperand(MCInst MI, unsigned OpNo, SStream O)
179	5.98k	{
180	5.98k	MCOperand *Op = MCInst_getOperand(MI, OpNo);
181	5.98k	int64_t Val = MCOperand_getImm(Op);
182	5.98k	unsigned scaled, base, offset, mode, unit;
183	5.98k	cs_tms320c64x *tms320c64x;
184	5.98k	char st, nd;
185
186	5.98k	scaled = (Val >> 19) & 1;
187	5.98k	base = (Val >> 12) & 0x7f;
188	5.98k	offset = (Val >> 5) & 0x7f;
189	5.98k	mode = (Val >> 1) & 0xf;
190	5.98k	unit = Val & 1;
191
192	5.98k	if (scaled) {
193	4.85k	st = '[';
194	4.85k	nd = ']';
195	4.85k	} else {
196	1.13k	st = '(';
197	1.13k	nd = ')';
198	1.13k	}
199
200	5.98k	switch(mode) {
201	456	case 0:
202	456	SStream_concat(O, "*-%s%c%u%c", getRegisterName(base), st, offset, nd);
203	456	break;
204	445	case 1:
205	445	SStream_concat(O, "*+%s%c%u%c", getRegisterName(base), st, offset, nd);
206	445	break;
207	371	case 4:
208	371	SStream_concat(O, "*-%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
209	371	break;
210	361	case 5:
211	361	SStream_concat(O, "*+%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
212	361	break;
213	508	case 8:
214	508	SStream_concat(O, "*--%s%c%u%c", getRegisterName(base), st, offset, nd);
215	508	break;
216	497	case 9:
217	497	SStream_concat(O, "*++%s%c%u%c", getRegisterName(base), st, offset, nd);
218	497	break;
219	525	case 10:
220	525	SStream_concat(O, "*%s--%c%u%c", getRegisterName(base), st, offset, nd);
221	525	break;
222	914	case 11:
223	914	SStream_concat(O, "*%s++%c%u%c", getRegisterName(base), st, offset, nd);
224	914	break;
225	341	case 12:
226	341	SStream_concat(O, "*--%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
227	341	break;
228	363	case 13:
229	363	SStream_concat(O, "*++%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
230	363	break;
231	315	case 14:
232	315	SStream_concat(O, "*%s--%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
233	315	break;
234	887	case 15:
235	887	SStream_concat(O, "*%s++%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
236	887	break;
237	5.98k	}
238
239	5.98k	if (MI->csh->detail) {
240	5.98k	tms320c64x = &MI->flat_insn->detail->tms320c64x;
241
242	5.98k	tms320c64x->operands[tms320c64x->op_count].type = TMS320C64X_OP_MEM;
243	5.98k	tms320c64x->operands[tms320c64x->op_count].mem.base = base;
244	5.98k	tms320c64x->operands[tms320c64x->op_count].mem.disp = offset;
245	5.98k	tms320c64x->operands[tms320c64x->op_count].mem.unit = unit + 1;
246	5.98k	tms320c64x->operands[tms320c64x->op_count].mem.scaled = scaled;
247	5.98k	switch(mode) {
248	456	case 0:
249	456	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
250	456	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
251	456	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
252	456	break;
253	445	case 1:
254	445	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
255	445	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
256	445	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
257	445	break;
258	371	case 4:
259	371	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
260	371	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
261	371	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
262	371	break;
263	361	case 5:
264	361	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
265	361	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
266	361	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
267	361	break;
268	508	case 8:
269	508	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
270	508	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
271	508	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
272	508	break;
273	497	case 9:
274	497	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
275	497	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
276	497	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
277	497	break;
278	525	case 10:
279	525	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
280	525	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
281	525	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
282	525	break;
283	914	case 11:
284	914	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
285	914	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
286	914	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
287	914	break;
288	341	case 12:
289	341	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
290	341	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
291	341	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
292	341	break;
293	363	case 13:
294	363	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
295	363	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
296	363	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
297	363	break;
298	315	case 14:
299	315	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
300	315	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
301	315	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
302	315	break;
303	887	case 15:
304	887	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
305	887	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
306	887	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
307	887	break;
308	5.98k	}
309	5.98k	tms320c64x->op_count++;
310	5.98k	}
311	5.98k	}
312
313		static void printMemOperand2(MCInst MI, unsigned OpNo, SStream O)
314	6.12k	{
315	6.12k	MCOperand *Op = MCInst_getOperand(MI, OpNo);
316	6.12k	int64_t Val = MCOperand_getImm(Op);
317	6.12k	uint16_t offset;
318	6.12k	unsigned basereg;
319	6.12k	cs_tms320c64x *tms320c64x;
320
321	6.12k	basereg = Val & 0x7f;
322	6.12k	offset = (Val >> 7) & 0x7fff;
323	6.12k	SStream_concat(O, "*+%s[0x%x]", getRegisterName(basereg), offset);
324
325	6.12k	if (MI->csh->detail) {
326	6.12k	tms320c64x = &MI->flat_insn->detail->tms320c64x;
327
328	6.12k	tms320c64x->operands[tms320c64x->op_count].type = TMS320C64X_OP_MEM;
329	6.12k	tms320c64x->operands[tms320c64x->op_count].mem.base = basereg;
330	6.12k	tms320c64x->operands[tms320c64x->op_count].mem.unit = 2;
331	6.12k	tms320c64x->operands[tms320c64x->op_count].mem.disp = offset;
332	6.12k	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
333	6.12k	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
334	6.12k	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
335	6.12k	tms320c64x->op_count++;
336	6.12k	}
337	6.12k	}
338
339		static void printRegPair(MCInst MI, unsigned OpNo, SStream O)
340	18.3k	{
341	18.3k	MCOperand *Op = MCInst_getOperand(MI, OpNo);
342	18.3k	unsigned reg = MCOperand_getReg(Op);
343	18.3k	cs_tms320c64x *tms320c64x;
344
345	18.3k	SStream_concat(O, "%s:%s", getRegisterName(reg + 1), getRegisterName(reg));
346
347	18.3k	if (MI->csh->detail) {
348	18.3k	tms320c64x = &MI->flat_insn->detail->tms320c64x;
349
350	18.3k	tms320c64x->operands[tms320c64x->op_count].type = TMS320C64X_OP_REGPAIR;
351	18.3k	tms320c64x->operands[tms320c64x->op_count].reg = reg;
352	18.3k	tms320c64x->op_count++;
353	18.3k	}
354	18.3k	}
355
356		static bool printAliasInstruction(MCInst MI, SStream O, MCRegisterInfo *MRI)
357	60.0k	{
358	60.0k	unsigned opcode = MCInst_getOpcode(MI);
359	60.0k	MCOperand *op;
360
361	60.0k	switch(opcode) {
362		/* ADD.Dx -i, x, y -> SUB.Dx x, i, y */
363	283	case TMS320C64x_ADD_d2_rir:
364		/* ADD.L -i, x, y -> SUB.L x, i, y */
365	821	case TMS320C64x_ADD_l1_irr:
366	1.07k	case TMS320C64x_ADD_l1_ipp:
367		/* ADD.S -i, x, y -> SUB.S x, i, y */
368	1.65k	case TMS320C64x_ADD_s1_irr:
369	1.65k	if ((MCInst_getNumOperands(MI) == 3) &&
370	1.65k	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
371	1.65k	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
372	1.65k	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
373	1.65k	(MCOperand_getImm(MCInst_getOperand(MI, 2)) < 0)) {
374
375	392	MCInst_setOpcodePub(MI, TMS320C64X_INS_SUB);
376	392	op = MCInst_getOperand(MI, 2);
377	392	MCOperand_setImm(op, -MCOperand_getImm(op));
378
379	392	SStream_concat0(O, "SUB\t");
380	392	printOperand(MI, 1, O);
381	392	SStream_concat0(O, ", ");
382	392	printOperand(MI, 2, O);
383	392	SStream_concat0(O, ", ");
384	392	printOperand(MI, 0, O);
385
386	392	return true;
387	392	}
388	1.26k	break;
389	60.0k	}
390	59.6k	switch(opcode) {
391		/* ADD.D 0, x, y -> MV.D x, y */
392	567	case TMS320C64x_ADD_d1_rir:
393		/* OR.D x, 0, y -> MV.D x, y */
394	874	case TMS320C64x_OR_d2_rir:
395		/* ADD.L 0, x, y -> MV.L x, y */
396	1.24k	case TMS320C64x_ADD_l1_irr:
397	1.48k	case TMS320C64x_ADD_l1_ipp:
398		/* OR.L 0, x, y -> MV.L x, y */
399	1.57k	case TMS320C64x_OR_l1_irr:
400		/* ADD.S 0, x, y -> MV.S x, y */
401	2.01k	case TMS320C64x_ADD_s1_irr:
402		/* OR.S 0, x, y -> MV.S x, y */
403	2.10k	case TMS320C64x_OR_s1_irr:
404	2.10k	if ((MCInst_getNumOperands(MI) == 3) &&
405	2.10k	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
406	2.10k	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
407	2.10k	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
408	2.10k	(MCOperand_getImm(MCInst_getOperand(MI, 2)) == 0)) {
409
410	314	MCInst_setOpcodePub(MI, TMS320C64X_INS_MV);
411	314	MI->size--;
412
413	314	SStream_concat0(O, "MV\t");
414	314	printOperand(MI, 1, O);
415	314	SStream_concat0(O, ", ");
416	314	printOperand(MI, 0, O);
417
418	314	return true;
419	314	}
420	1.79k	break;
421	59.6k	}
422	59.3k	switch(opcode) {
423		/* XOR.D -1, x, y -> NOT.D x, y */
424	139	case TMS320C64x_XOR_d2_rir:
425		/* XOR.L -1, x, y -> NOT.L x, y */
426	360	case TMS320C64x_XOR_l1_irr:
427		/* XOR.S -1, x, y -> NOT.S x, y */
428	948	case TMS320C64x_XOR_s1_irr:
429	948	if ((MCInst_getNumOperands(MI) == 3) &&
430	948	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
431	948	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
432	948	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
433	948	(MCOperand_getImm(MCInst_getOperand(MI, 2)) == -1)) {
434
435	149	MCInst_setOpcodePub(MI, TMS320C64X_INS_NOT);
436	149	MI->size--;
437
438	149	SStream_concat0(O, "NOT\t");
439	149	printOperand(MI, 1, O);
440	149	SStream_concat0(O, ", ");
441	149	printOperand(MI, 0, O);
442
443	149	return true;
444	149	}
445	799	break;
446	59.3k	}
447	59.2k	switch(opcode) {
448		/* MVK.D 0, x -> ZERO.D x */
449	473	case TMS320C64x_MVK_d1_rr:
450		/* MVK.L 0, x -> ZERO.L x */
451	2.35k	case TMS320C64x_MVK_l2_ir:
452	2.35k	if ((MCInst_getNumOperands(MI) == 2) &&
453	2.35k	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
454	2.35k	MCOperand_isImm(MCInst_getOperand(MI, 1)) &&
455	2.35k	(MCOperand_getImm(MCInst_getOperand(MI, 1)) == 0)) {
456
457	350	MCInst_setOpcodePub(MI, TMS320C64X_INS_ZERO);
458	350	MI->size--;
459
460	350	SStream_concat0(O, "ZERO\t");
461	350	printOperand(MI, 0, O);
462
463	350	return true;
464	350	}
465	2.00k	break;
466	59.2k	}
467	58.8k	switch(opcode) {
468		/* SUB.L x, x, y -> ZERO.L y */
469	420	case TMS320C64x_SUB_l1_rrp_x1:
470		/* SUB.S x, x, y -> ZERO.S y */
471	845	case TMS320C64x_SUB_s1_rrr:
472	845	if ((MCInst_getNumOperands(MI) == 3) &&
473	845	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
474	845	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
475	845	MCOperand_isReg(MCInst_getOperand(MI, 2)) &&
476	845	(MCOperand_getReg(MCInst_getOperand(MI, 1)) == MCOperand_getReg(MCInst_getOperand(MI, 2)))) {
477
478	301	MCInst_setOpcodePub(MI, TMS320C64X_INS_ZERO);
479	301	MI->size -= 2;
480
481	301	SStream_concat0(O, "ZERO\t");
482	301	printOperand(MI, 0, O);
483
484	301	return true;
485	301	}
486	544	break;
487	58.8k	}
488	58.5k	switch(opcode) {
489		/* SUB.L 0, x, y -> NEG.L x, y */
490	139	case TMS320C64x_SUB_l1_irr:
491	493	case TMS320C64x_SUB_l1_ipp:
492		/* SUB.S 0, x, y -> NEG.S x, y */
493	571	case TMS320C64x_SUB_s1_irr:
494	571	if ((MCInst_getNumOperands(MI) == 3) &&
495	571	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
496	571	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
497	571	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
498	571	(MCOperand_getImm(MCInst_getOperand(MI, 2)) == 0)) {
499
500	127	MCInst_setOpcodePub(MI, TMS320C64X_INS_NEG);
501	127	MI->size--;
502
503	127	SStream_concat0(O, "NEG\t");
504	127	printOperand(MI, 1, O);
505	127	SStream_concat0(O, ", ");
506	127	printOperand(MI, 0, O);
507
508	127	return true;
509	127	}
510	444	break;
511	58.5k	}
512	58.4k	switch(opcode) {
513		/* PACKLH2.L x, x, y -> SWAP2.L x, y */
514	396	case TMS320C64x_PACKLH2_l1_rrr_x2:
515		/* PACKLH2.S x, x, y -> SWAP2.S x, y */
516	906	case TMS320C64x_PACKLH2_s1_rrr:
517	906	if ((MCInst_getNumOperands(MI) == 3) &&
518	906	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
519	906	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
520	906	MCOperand_isReg(MCInst_getOperand(MI, 2)) &&
521	906	(MCOperand_getReg(MCInst_getOperand(MI, 1)) == MCOperand_getReg(MCInst_getOperand(MI, 2)))) {
522
523	286	MCInst_setOpcodePub(MI, TMS320C64X_INS_SWAP2);
524	286	MI->size--;
525
526	286	SStream_concat0(O, "SWAP2\t");
527	286	printOperand(MI, 1, O);
528	286	SStream_concat0(O, ", ");
529	286	printOperand(MI, 0, O);
530
531	286	return true;
532	286	}
533	620	break;
534	58.4k	}
535	58.1k	switch(opcode) {
536		/* NOP 16 -> IDLE */
537		/* NOP 1 -> NOP */
538	1.30k	case TMS320C64x_NOP_n:
539	1.30k	if ((MCInst_getNumOperands(MI) == 1) &&
540	1.30k	MCOperand_isImm(MCInst_getOperand(MI, 0)) &&
541	1.30k	(MCOperand_getReg(MCInst_getOperand(MI, 0)) == 16)) {
542
543	244	MCInst_setOpcodePub(MI, TMS320C64X_INS_IDLE);
544	244	MI->size--;
545
546	244	SStream_concat0(O, "IDLE");
547
548	244	return true;
549	244	}
550	1.05k	if ((MCInst_getNumOperands(MI) == 1) &&
551	1.05k	MCOperand_isImm(MCInst_getOperand(MI, 0)) &&
552	1.05k	(MCOperand_getReg(MCInst_getOperand(MI, 0)) == 1)) {
553
554	671	MI->size--;
555
556	671	SStream_concat0(O, "NOP");
557
558	671	return true;
559	671	}
560	385	break;
561	58.1k	}
562
563	57.2k	return false;
564	58.1k	}
565
566		void TMS320C64x_printInst(MCInst MI, SStream O, void *Info)
567	60.0k	{
568	60.0k	if (!printAliasInstruction(MI, O, Info))
569	57.2k	printInstruction(MI, O, Info);
570	60.0k	}
571
572		#endif