/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-01-13 06:36

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	41.8k	{
38	41.8k	SStream ss;
39	41.8k	char p, p2, tmp[8];
40	41.8k	unsigned int unit = 0;
41	41.8k	int i;
42	41.8k	cs_tms320c64x *tms320c64x;
43
44	41.8k	if (mci->csh->detail) {
45	41.8k	tms320c64x = &mci->flat_insn->detail->tms320c64x;
46
47	41.8k	for (i = 0; i < insn->detail->groups_count; i++) {
48	41.8k	switch(insn->detail->groups[i]) {
49	10.4k	case TMS320C64X_GRP_FUNIT_D:
50	10.4k	unit = TMS320C64X_FUNIT_D;
51	10.4k	break;
52	9.43k	case TMS320C64X_GRP_FUNIT_L:
53	9.43k	unit = TMS320C64X_FUNIT_L;
54	9.43k	break;
55	3.00k	case TMS320C64X_GRP_FUNIT_M:
56	3.00k	unit = TMS320C64X_FUNIT_M;
57	3.00k	break;
58	17.9k	case TMS320C64X_GRP_FUNIT_S:
59	17.9k	unit = TMS320C64X_FUNIT_S;
60	17.9k	break;
61	1.01k	case TMS320C64X_GRP_FUNIT_NO:
62	1.01k	unit = TMS320C64X_FUNIT_NO;
63	1.01k	break;
64	41.8k	}
65	41.8k	if (unit != 0)
66	41.8k	break;
67	41.8k	}
68	41.8k	tms320c64x->funit.unit = unit;
69
70	41.8k	SStream_Init(&ss);
71	41.8k	if (tms320c64x->condition.reg != TMS320C64X_REG_INVALID)
72	28.3k	SStream_concat(&ss, "[%c%s]\|", (tms320c64x->condition.zero == 1) ? '!' : '\|', cs_reg_name(ud, tms320c64x->condition.reg));
73
74	41.8k	p = strchr(insn_asm, '\t');
75	41.8k	if (p != NULL)
76	41.2k	*p++ = '\0';
77
78	41.8k	SStream_concat0(&ss, insn_asm);
79	41.8k	if ((p != NULL) && (((p2 = strchr(p, '[')) != NULL) \|\| ((p2 = strchr(p, '(')) != NULL))) {
80	32.4k	while ((p2 > p) && ((p2 != 'a') && (p2 != 'b')))
81	24.5k	p2--;
82	7.90k	if (p2 == p) {
83	0	strcpy(insn_asm, "Invalid!");
84	0	return;
85	0	}
86	7.90k	if (*p2 == 'a')
87	4.54k	strcpy(tmp, "1T");
88	3.36k	else
89	3.36k	strcpy(tmp, "2T");
90	33.9k	} else {
91	33.9k	tmp[0] = '\0';
92	33.9k	}
93	41.8k	switch(tms320c64x->funit.unit) {
94	10.4k	case TMS320C64X_FUNIT_D:
95	10.4k	SStream_concat(&ss, ".D%s%u", tmp, tms320c64x->funit.side);
96	10.4k	break;
97	9.43k	case TMS320C64X_FUNIT_L:
98	9.43k	SStream_concat(&ss, ".L%s%u", tmp, tms320c64x->funit.side);
99	9.43k	break;
100	3.00k	case TMS320C64X_FUNIT_M:
101	3.00k	SStream_concat(&ss, ".M%s%u", tmp, tms320c64x->funit.side);
102	3.00k	break;
103	17.9k	case TMS320C64X_FUNIT_S:
104	17.9k	SStream_concat(&ss, ".S%s%u", tmp, tms320c64x->funit.side);
105	17.9k	break;
106	41.8k	}
107	41.8k	if (tms320c64x->funit.crosspath > 0)
108	12.8k	SStream_concat0(&ss, "X");
109
110	41.8k	if (p != NULL)
111	41.2k	SStream_concat(&ss, "\t%s", p);
112
113	41.8k	if (tms320c64x->parallel != 0)
114	19.4k	SStream_concat0(&ss, "\t\|\|");
115
116		/* insn_asm is a buffer from an SStream, so there should be enough space */
117	41.8k	strcpy(insn_asm, ss.buffer);
118	41.8k	}
119	41.8k	}
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	107k	{
129	107k	MCOperand *Op = MCInst_getOperand(MI, OpNo);
130	107k	unsigned reg;
131
132	107k	if (MCOperand_isReg(Op)) {
133	76.0k	reg = MCOperand_getReg(Op);
134	76.0k	if ((MCInst_getOpcode(MI) == TMS320C64x_MVC_s1_rr) && (OpNo == 1)) {
135	2.43k	switch(reg) {
136	733	case TMS320C64X_REG_EFR:
137	733	SStream_concat0(O, "EFR");
138	733	break;
139	779	case TMS320C64X_REG_IFR:
140	779	SStream_concat0(O, "IFR");
141	779	break;
142	919	default:
143	919	SStream_concat0(O, getRegisterName(reg));
144	919	break;
145	2.43k	}
146	73.5k	} else {
147	73.5k	SStream_concat0(O, getRegisterName(reg));
148	73.5k	}
149
150	76.0k	if (MI->csh->detail) {
151	76.0k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].type = TMS320C64X_OP_REG;
152	76.0k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].reg = reg;
153	76.0k	MI->flat_insn->detail->tms320c64x.op_count++;
154	76.0k	}
155	76.0k	} else if (MCOperand_isImm(Op)) {
156	31.3k	int64_t Imm = MCOperand_getImm(Op);
157
158	31.3k	if (Imm >= 0) {
159	25.5k	if (Imm > HEX_THRESHOLD)
160	15.2k	SStream_concat(O, "0x%"PRIx64, Imm);
161	10.3k	else
162	10.3k	SStream_concat(O, "%"PRIu64, Imm);
163	25.5k	} else {
164	5.79k	if (Imm < -HEX_THRESHOLD)
165	4.78k	SStream_concat(O, "-0x%"PRIx64, -Imm);
166	1.01k	else
167	1.01k	SStream_concat(O, "-%"PRIu64, -Imm);
168	5.79k	}
169
170	31.3k	if (MI->csh->detail) {
171	31.3k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].type = TMS320C64X_OP_IMM;
172	31.3k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].imm = Imm;
173	31.3k	MI->flat_insn->detail->tms320c64x.op_count++;
174	31.3k	}
175	31.3k	}
176	107k	}
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	5.20k	st = '[';
194	5.20k	nd = ']';
195	5.20k	} else {
196	774	st = '(';
197	774	nd = ')';
198	774	}
199
200	5.98k	switch(mode) {
201	1.01k	case 0:
202	1.01k	SStream_concat(O, "*-%s%c%u%c", getRegisterName(base), st, offset, nd);
203	1.01k	break;
204	612	case 1:
205	612	SStream_concat(O, "*+%s%c%u%c", getRegisterName(base), st, offset, nd);
206	612	break;
207	290	case 4:
208	290	SStream_concat(O, "*-%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
209	290	break;
210	460	case 5:
211	460	SStream_concat(O, "*+%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
212	460	break;
213	718	case 8:
214	718	SStream_concat(O, "*--%s%c%u%c", getRegisterName(base), st, offset, nd);
215	718	break;
216	443	case 9:
217	443	SStream_concat(O, "*++%s%c%u%c", getRegisterName(base), st, offset, nd);
218	443	break;
219	331	case 10:
220	331	SStream_concat(O, "*%s--%c%u%c", getRegisterName(base), st, offset, nd);
221	331	break;
222	820	case 11:
223	820	SStream_concat(O, "*%s++%c%u%c", getRegisterName(base), st, offset, nd);
224	820	break;
225	467	case 12:
226	467	SStream_concat(O, "*--%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
227	467	break;
228	269	case 13:
229	269	SStream_concat(O, "*++%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
230	269	break;
231	253	case 14:
232	253	SStream_concat(O, "*%s--%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
233	253	break;
234	304	case 15:
235	304	SStream_concat(O, "*%s++%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
236	304	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	1.01k	case 0:
249	1.01k	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
250	1.01k	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
251	1.01k	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
252	1.01k	break;
253	612	case 1:
254	612	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
255	612	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
256	612	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
257	612	break;
258	290	case 4:
259	290	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
260	290	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
261	290	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
262	290	break;
263	460	case 5:
264	460	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
265	460	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
266	460	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
267	460	break;
268	718	case 8:
269	718	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
270	718	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
271	718	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
272	718	break;
273	443	case 9:
274	443	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
275	443	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
276	443	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
277	443	break;
278	331	case 10:
279	331	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
280	331	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
281	331	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
282	331	break;
283	820	case 11:
284	820	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
285	820	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
286	820	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
287	820	break;
288	467	case 12:
289	467	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
290	467	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
291	467	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
292	467	break;
293	269	case 13:
294	269	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
295	269	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
296	269	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
297	269	break;
298	253	case 14:
299	253	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
300	253	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
301	253	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
302	253	break;
303	304	case 15:
304	304	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
305	304	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
306	304	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
307	304	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	5.23k	{
315	5.23k	MCOperand *Op = MCInst_getOperand(MI, OpNo);
316	5.23k	int64_t Val = MCOperand_getImm(Op);
317	5.23k	uint16_t offset;
318	5.23k	unsigned basereg;
319	5.23k	cs_tms320c64x *tms320c64x;
320
321	5.23k	basereg = Val & 0x7f;
322	5.23k	offset = (Val >> 7) & 0x7fff;
323	5.23k	SStream_concat(O, "*+%s[0x%x]", getRegisterName(basereg), offset);
324
325	5.23k	if (MI->csh->detail) {
326	5.23k	tms320c64x = &MI->flat_insn->detail->tms320c64x;
327
328	5.23k	tms320c64x->operands[tms320c64x->op_count].type = TMS320C64X_OP_MEM;
329	5.23k	tms320c64x->operands[tms320c64x->op_count].mem.base = basereg;
330	5.23k	tms320c64x->operands[tms320c64x->op_count].mem.unit = 2;
331	5.23k	tms320c64x->operands[tms320c64x->op_count].mem.disp = offset;
332	5.23k	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
333	5.23k	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
334	5.23k	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
335	5.23k	tms320c64x->op_count++;
336	5.23k	}
337	5.23k	}
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	58.4k	{
358	58.4k	unsigned opcode = MCInst_getOpcode(MI);
359	58.4k	MCOperand *op;
360
361	58.4k	switch(opcode) {
362		/* ADD.Dx -i, x, y -> SUB.Dx x, i, y */
363	296	case TMS320C64x_ADD_d2_rir:
364		/* ADD.L -i, x, y -> SUB.L x, i, y */
365	903	case TMS320C64x_ADD_l1_irr:
366	1.18k	case TMS320C64x_ADD_l1_ipp:
367		/* ADD.S -i, x, y -> SUB.S x, i, y */
368	1.56k	case TMS320C64x_ADD_s1_irr:
369	1.56k	if ((MCInst_getNumOperands(MI) == 3) &&
370	1.56k	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
371	1.56k	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
372	1.56k	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
373	1.56k	(MCOperand_getImm(MCInst_getOperand(MI, 2)) < 0)) {
374
375	421	MCInst_setOpcodePub(MI, TMS320C64X_INS_SUB);
376	421	op = MCInst_getOperand(MI, 2);
377	421	MCOperand_setImm(op, -MCOperand_getImm(op));
378
379	421	SStream_concat0(O, "SUB\t");
380	421	printOperand(MI, 1, O);
381	421	SStream_concat0(O, ", ");
382	421	printOperand(MI, 2, O);
383	421	SStream_concat0(O, ", ");
384	421	printOperand(MI, 0, O);
385
386	421	return true;
387	421	}
388	1.13k	break;
389	58.4k	}
390	58.0k	switch(opcode) {
391		/* ADD.D 0, x, y -> MV.D x, y */
392	231	case TMS320C64x_ADD_d1_rir:
393		/* OR.D x, 0, y -> MV.D x, y */
394	448	case TMS320C64x_OR_d2_rir:
395		/* ADD.L 0, x, y -> MV.L x, y */
396	862	case TMS320C64x_ADD_l1_irr:
397	1.05k	case TMS320C64x_ADD_l1_ipp:
398		/* OR.L 0, x, y -> MV.L x, y */
399	1.25k	case TMS320C64x_OR_l1_irr:
400		/* ADD.S 0, x, y -> MV.S x, y */
401	1.61k	case TMS320C64x_ADD_s1_irr:
402		/* OR.S 0, x, y -> MV.S x, y */
403	1.90k	case TMS320C64x_OR_s1_irr:
404	1.90k	if ((MCInst_getNumOperands(MI) == 3) &&
405	1.90k	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
406	1.90k	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
407	1.90k	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
408	1.90k	(MCOperand_getImm(MCInst_getOperand(MI, 2)) == 0)) {
409
410	425	MCInst_setOpcodePub(MI, TMS320C64X_INS_MV);
411	425	MI->size--;
412
413	425	SStream_concat0(O, "MV\t");
414	425	printOperand(MI, 1, O);
415	425	SStream_concat0(O, ", ");
416	425	printOperand(MI, 0, O);
417
418	425	return true;
419	425	}
420	1.47k	break;
421	58.0k	}
422	57.5k	switch(opcode) {
423		/* XOR.D -1, x, y -> NOT.D x, y */
424	261	case TMS320C64x_XOR_d2_rir:
425		/* XOR.L -1, x, y -> NOT.L x, y */
426	506	case TMS320C64x_XOR_l1_irr:
427		/* XOR.S -1, x, y -> NOT.S x, y */
428	817	case TMS320C64x_XOR_s1_irr:
429	817	if ((MCInst_getNumOperands(MI) == 3) &&
430	817	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
431	817	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
432	817	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
433	817	(MCOperand_getImm(MCInst_getOperand(MI, 2)) == -1)) {
434
435	293	MCInst_setOpcodePub(MI, TMS320C64X_INS_NOT);
436	293	MI->size--;
437
438	293	SStream_concat0(O, "NOT\t");
439	293	printOperand(MI, 1, O);
440	293	SStream_concat0(O, ", ");
441	293	printOperand(MI, 0, O);
442
443	293	return true;
444	293	}
445	524	break;
446	57.5k	}
447	57.2k	switch(opcode) {
448		/* MVK.D 0, x -> ZERO.D x */
449	831	case TMS320C64x_MVK_d1_rr:
450		/* MVK.L 0, x -> ZERO.L x */
451	2.97k	case TMS320C64x_MVK_l2_ir:
452	2.97k	if ((MCInst_getNumOperands(MI) == 2) &&
453	2.97k	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
454	2.97k	MCOperand_isImm(MCInst_getOperand(MI, 1)) &&
455	2.97k	(MCOperand_getImm(MCInst_getOperand(MI, 1)) == 0)) {
456
457	241	MCInst_setOpcodePub(MI, TMS320C64X_INS_ZERO);
458	241	MI->size--;
459
460	241	SStream_concat0(O, "ZERO\t");
461	241	printOperand(MI, 0, O);
462
463	241	return true;
464	241	}
465	2.73k	break;
466	57.2k	}
467	57.0k	switch(opcode) {
468		/* SUB.L x, x, y -> ZERO.L y */
469	345	case TMS320C64x_SUB_l1_rrp_x1:
470		/* SUB.S x, x, y -> ZERO.S y */
471	639	case TMS320C64x_SUB_s1_rrr:
472	639	if ((MCInst_getNumOperands(MI) == 3) &&
473	639	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
474	639	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
475	639	MCOperand_isReg(MCInst_getOperand(MI, 2)) &&
476	639	(MCOperand_getReg(MCInst_getOperand(MI, 1)) == MCOperand_getReg(MCInst_getOperand(MI, 2)))) {
477
478	294	MCInst_setOpcodePub(MI, TMS320C64X_INS_ZERO);
479	294	MI->size -= 2;
480
481	294	SStream_concat0(O, "ZERO\t");
482	294	printOperand(MI, 0, O);
483
484	294	return true;
485	294	}
486	345	break;
487	57.0k	}
488	56.7k	switch(opcode) {
489		/* SUB.L 0, x, y -> NEG.L x, y */
490	344	case TMS320C64x_SUB_l1_irr:
491	796	case TMS320C64x_SUB_l1_ipp:
492		/* SUB.S 0, x, y -> NEG.S x, y */
493	1.04k	case TMS320C64x_SUB_s1_irr:
494	1.04k	if ((MCInst_getNumOperands(MI) == 3) &&
495	1.04k	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
496	1.04k	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
497	1.04k	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
498	1.04k	(MCOperand_getImm(MCInst_getOperand(MI, 2)) == 0)) {
499
500	133	MCInst_setOpcodePub(MI, TMS320C64X_INS_NEG);
501	133	MI->size--;
502
503	133	SStream_concat0(O, "NEG\t");
504	133	printOperand(MI, 1, O);
505	133	SStream_concat0(O, ", ");
506	133	printOperand(MI, 0, O);
507
508	133	return true;
509	133	}
510	910	break;
511	56.7k	}
512	56.6k	switch(opcode) {
513		/* PACKLH2.L x, x, y -> SWAP2.L x, y */
514	232	case TMS320C64x_PACKLH2_l1_rrr_x2:
515		/* PACKLH2.S x, x, y -> SWAP2.S x, y */
516	454	case TMS320C64x_PACKLH2_s1_rrr:
517	454	if ((MCInst_getNumOperands(MI) == 3) &&
518	454	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
519	454	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
520	454	MCOperand_isReg(MCInst_getOperand(MI, 2)) &&
521	454	(MCOperand_getReg(MCInst_getOperand(MI, 1)) == MCOperand_getReg(MCInst_getOperand(MI, 2)))) {
522
523	177	MCInst_setOpcodePub(MI, TMS320C64X_INS_SWAP2);
524	177	MI->size--;
525
526	177	SStream_concat0(O, "SWAP2\t");
527	177	printOperand(MI, 1, O);
528	177	SStream_concat0(O, ", ");
529	177	printOperand(MI, 0, O);
530
531	177	return true;
532	177	}
533	277	break;
534	56.6k	}
535	56.4k	switch(opcode) {
536		/* NOP 16 -> IDLE */
537		/* NOP 1 -> NOP */
538	1.24k	case TMS320C64x_NOP_n:
539	1.24k	if ((MCInst_getNumOperands(MI) == 1) &&
540	1.24k	MCOperand_isImm(MCInst_getOperand(MI, 0)) &&
541	1.24k	(MCOperand_getReg(MCInst_getOperand(MI, 0)) == 16)) {
542
543	258	MCInst_setOpcodePub(MI, TMS320C64X_INS_IDLE);
544	258	MI->size--;
545
546	258	SStream_concat0(O, "IDLE");
547
548	258	return true;
549	258	}
550	991	if ((MCInst_getNumOperands(MI) == 1) &&
551	991	MCOperand_isImm(MCInst_getOperand(MI, 0)) &&
552	991	(MCOperand_getReg(MCInst_getOperand(MI, 0)) == 1)) {
553
554	603	MI->size--;
555
556	603	SStream_concat0(O, "NOP");
557
558	603	return true;
559	603	}
560	388	break;
561	56.4k	}
562
563	55.5k	return false;
564	56.4k	}
565
566		void TMS320C64x_printInst(MCInst MI, SStream O, void *Info)
567	58.4k	{
568	58.4k	if (!printAliasInstruction(MI, O, Info))
569	55.5k	printInstruction(MI, O, Info);
570	58.4k	}
571
572		#endif