/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-08-31 06:58

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	45.7k	{
38	45.7k	SStream ss;
39	45.7k	char p, p2, tmp[8];
40	45.7k	unsigned int unit = 0;
41	45.7k	int i;
42	45.7k	cs_tms320c64x *tms320c64x;
43
44	45.7k	if (mci->csh->detail) {
45	45.7k	tms320c64x = &mci->flat_insn->detail->tms320c64x;
46
47	45.7k	for (i = 0; i < insn->detail->groups_count; i++) {
48	45.7k	switch(insn->detail->groups[i]) {
49	13.2k	case TMS320C64X_GRP_FUNIT_D:
50	13.2k	unit = TMS320C64X_FUNIT_D;
51	13.2k	break;
52	10.4k	case TMS320C64X_GRP_FUNIT_L:
53	10.4k	unit = TMS320C64X_FUNIT_L;
54	10.4k	break;
55	2.53k	case TMS320C64X_GRP_FUNIT_M:
56	2.53k	unit = TMS320C64X_FUNIT_M;
57	2.53k	break;
58	18.1k	case TMS320C64X_GRP_FUNIT_S:
59	18.1k	unit = TMS320C64X_FUNIT_S;
60	18.1k	break;
61	1.47k	case TMS320C64X_GRP_FUNIT_NO:
62	1.47k	unit = TMS320C64X_FUNIT_NO;
63	1.47k	break;
64	45.7k	}
65	45.7k	if (unit != 0)
66	45.7k	break;
67	45.7k	}
68	45.7k	tms320c64x->funit.unit = unit;
69
70	45.7k	SStream_Init(&ss);
71	45.7k	if (tms320c64x->condition.reg != TMS320C64X_REG_INVALID)
72	29.7k	SStream_concat(&ss, "[%c%s]\|", (tms320c64x->condition.zero == 1) ? '!' : '\|', cs_reg_name(ud, tms320c64x->condition.reg));
73
74	45.7k	p = strchr(insn_asm, '\t');
75	45.7k	if (p != NULL)
76	44.5k	*p++ = '\0';
77
78	45.7k	SStream_concat0(&ss, insn_asm);
79	45.7k	if ((p != NULL) && (((p2 = strchr(p, '[')) != NULL) \|\| ((p2 = strchr(p, '(')) != NULL))) {
80	43.7k	while ((p2 > p) && ((p2 != 'a') && (p2 != 'b')))
81	33.5k	p2--;
82	10.1k	if (p2 == p) {
83	0	strcpy(insn_asm, "Invalid!");
84	0	return;
85	0	}
86	10.1k	if (*p2 == 'a')
87	4.91k	strcpy(tmp, "1T");
88	5.27k	else
89	5.27k	strcpy(tmp, "2T");
90	35.5k	} else {
91	35.5k	tmp[0] = '\0';
92	35.5k	}
93	45.7k	switch(tms320c64x->funit.unit) {
94	13.2k	case TMS320C64X_FUNIT_D:
95	13.2k	SStream_concat(&ss, ".D%s%u", tmp, tms320c64x->funit.side);
96	13.2k	break;
97	10.4k	case TMS320C64X_FUNIT_L:
98	10.4k	SStream_concat(&ss, ".L%s%u", tmp, tms320c64x->funit.side);
99	10.4k	break;
100	2.53k	case TMS320C64X_FUNIT_M:
101	2.53k	SStream_concat(&ss, ".M%s%u", tmp, tms320c64x->funit.side);
102	2.53k	break;
103	18.1k	case TMS320C64X_FUNIT_S:
104	18.1k	SStream_concat(&ss, ".S%s%u", tmp, tms320c64x->funit.side);
105	18.1k	break;
106	45.7k	}
107	45.7k	if (tms320c64x->funit.crosspath > 0)
108	13.5k	SStream_concat0(&ss, "X");
109
110	45.7k	if (p != NULL)
111	44.5k	SStream_concat(&ss, "\t%s", p);
112
113	45.7k	if (tms320c64x->parallel != 0)
114	21.7k	SStream_concat0(&ss, "\t\|\|");
115
116		/* insn_asm is a buffer from an SStream, so there should be enough space */
117	45.7k	strcpy(insn_asm, ss.buffer);
118	45.7k	}
119	45.7k	}
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	78.3k	{
129	78.3k	MCOperand *Op = MCInst_getOperand(MI, OpNo);
130	78.3k	unsigned reg;
131
132	78.3k	if (MCOperand_isReg(Op)) {
133	58.1k	reg = MCOperand_getReg(Op);
134	58.1k	if ((MCInst_getOpcode(MI) == TMS320C64x_MVC_s1_rr) && (OpNo == 1)) {
135	1.23k	switch(reg) {
136	72	case TMS320C64X_REG_EFR:
137	72	SStream_concat0(O, "EFR");
138	72	break;
139	148	case TMS320C64X_REG_IFR:
140	148	SStream_concat0(O, "IFR");
141	148	break;
142	1.01k	default:
143	1.01k	SStream_concat0(O, getRegisterName(reg));
144	1.01k	break;
145	1.23k	}
146	56.8k	} else {
147	56.8k	SStream_concat0(O, getRegisterName(reg));
148	56.8k	}
149
150	58.1k	if (MI->csh->detail) {
151	58.1k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].type = TMS320C64X_OP_REG;
152	58.1k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].reg = reg;
153	58.1k	MI->flat_insn->detail->tms320c64x.op_count++;
154	58.1k	}
155	58.1k	} else if (MCOperand_isImm(Op)) {
156	20.2k	int64_t Imm = MCOperand_getImm(Op);
157
158	20.2k	if (Imm >= 0) {
159	15.3k	if (Imm > HEX_THRESHOLD)
160	9.71k	SStream_concat(O, "0x%"PRIx64, Imm);
161	5.63k	else
162	5.63k	SStream_concat(O, "%"PRIu64, Imm);
163	15.3k	} else {
164	4.91k	if (Imm < -HEX_THRESHOLD)
165	3.73k	SStream_concat(O, "-0x%"PRIx64, -Imm);
166	1.17k	else
167	1.17k	SStream_concat(O, "-%"PRIu64, -Imm);
168	4.91k	}
169
170	20.2k	if (MI->csh->detail) {
171	20.2k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].type = TMS320C64X_OP_IMM;
172	20.2k	MI->flat_insn->detail->tms320c64x.operands[MI->flat_insn->detail->tms320c64x.op_count].imm = Imm;
173	20.2k	MI->flat_insn->detail->tms320c64x.op_count++;
174	20.2k	}
175	20.2k	}
176	78.3k	}
177
178		static void printMemOperand(MCInst MI, unsigned OpNo, SStream O)
179	4.91k	{
180	4.91k	MCOperand *Op = MCInst_getOperand(MI, OpNo);
181	4.91k	int64_t Val = MCOperand_getImm(Op);
182	4.91k	unsigned scaled, base, offset, mode, unit;
183	4.91k	cs_tms320c64x *tms320c64x;
184	4.91k	char st, nd;
185
186	4.91k	scaled = (Val >> 19) & 1;
187	4.91k	base = (Val >> 12) & 0x7f;
188	4.91k	offset = (Val >> 5) & 0x7f;
189	4.91k	mode = (Val >> 1) & 0xf;
190	4.91k	unit = Val & 1;
191
192	4.91k	if (scaled) {
193	4.24k	st = '[';
194	4.24k	nd = ']';
195	4.24k	} else {
196	673	st = '(';
197	673	nd = ')';
198	673	}
199
200	4.91k	switch(mode) {
201	398	case 0:
202	398	SStream_concat(O, "*-%s%c%u%c", getRegisterName(base), st, offset, nd);
203	398	break;
204	376	case 1:
205	376	SStream_concat(O, "*+%s%c%u%c", getRegisterName(base), st, offset, nd);
206	376	break;
207	358	case 4:
208	358	SStream_concat(O, "*-%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
209	358	break;
210	110	case 5:
211	110	SStream_concat(O, "*+%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
212	110	break;
213	428	case 8:
214	428	SStream_concat(O, "*--%s%c%u%c", getRegisterName(base), st, offset, nd);
215	428	break;
216	299	case 9:
217	299	SStream_concat(O, "*++%s%c%u%c", getRegisterName(base), st, offset, nd);
218	299	break;
219	1.21k	case 10:
220	1.21k	SStream_concat(O, "*%s--%c%u%c", getRegisterName(base), st, offset, nd);
221	1.21k	break;
222	352	case 11:
223	352	SStream_concat(O, "*%s++%c%u%c", getRegisterName(base), st, offset, nd);
224	352	break;
225	378	case 12:
226	378	SStream_concat(O, "*--%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
227	378	break;
228	131	case 13:
229	131	SStream_concat(O, "*++%s%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
230	131	break;
231	313	case 14:
232	313	SStream_concat(O, "*%s--%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
233	313	break;
234	562	case 15:
235	562	SStream_concat(O, "*%s++%c%s%c", getRegisterName(base), st, getRegisterName(offset), nd);
236	562	break;
237	4.91k	}
238
239	4.91k	if (MI->csh->detail) {
240	4.91k	tms320c64x = &MI->flat_insn->detail->tms320c64x;
241
242	4.91k	tms320c64x->operands[tms320c64x->op_count].type = TMS320C64X_OP_MEM;
243	4.91k	tms320c64x->operands[tms320c64x->op_count].mem.base = base;
244	4.91k	tms320c64x->operands[tms320c64x->op_count].mem.disp = offset;
245	4.91k	tms320c64x->operands[tms320c64x->op_count].mem.unit = unit + 1;
246	4.91k	tms320c64x->operands[tms320c64x->op_count].mem.scaled = scaled;
247	4.91k	switch(mode) {
248	398	case 0:
249	398	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
250	398	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
251	398	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
252	398	break;
253	376	case 1:
254	376	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
255	376	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
256	376	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
257	376	break;
258	358	case 4:
259	358	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
260	358	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
261	358	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
262	358	break;
263	110	case 5:
264	110	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
265	110	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
266	110	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
267	110	break;
268	428	case 8:
269	428	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
270	428	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
271	428	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
272	428	break;
273	299	case 9:
274	299	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
275	299	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
276	299	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
277	299	break;
278	1.21k	case 10:
279	1.21k	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
280	1.21k	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
281	1.21k	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
282	1.21k	break;
283	352	case 11:
284	352	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
285	352	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
286	352	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
287	352	break;
288	378	case 12:
289	378	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
290	378	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
291	378	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
292	378	break;
293	131	case 13:
294	131	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
295	131	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
296	131	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_PRE;
297	131	break;
298	313	case 14:
299	313	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
300	313	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_BW;
301	313	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
302	313	break;
303	562	case 15:
304	562	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_REGISTER;
305	562	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
306	562	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_POST;
307	562	break;
308	4.91k	}
309	4.91k	tms320c64x->op_count++;
310	4.91k	}
311	4.91k	}
312
313		static void printMemOperand2(MCInst MI, unsigned OpNo, SStream O)
314	5.27k	{
315	5.27k	MCOperand *Op = MCInst_getOperand(MI, OpNo);
316	5.27k	int64_t Val = MCOperand_getImm(Op);
317	5.27k	uint16_t offset;
318	5.27k	unsigned basereg;
319	5.27k	cs_tms320c64x *tms320c64x;
320
321	5.27k	basereg = Val & 0x7f;
322	5.27k	offset = (Val >> 7) & 0x7fff;
323	5.27k	SStream_concat(O, "*+%s[0x%x]", getRegisterName(basereg), offset);
324
325	5.27k	if (MI->csh->detail) {
326	5.27k	tms320c64x = &MI->flat_insn->detail->tms320c64x;
327
328	5.27k	tms320c64x->operands[tms320c64x->op_count].type = TMS320C64X_OP_MEM;
329	5.27k	tms320c64x->operands[tms320c64x->op_count].mem.base = basereg;
330	5.27k	tms320c64x->operands[tms320c64x->op_count].mem.unit = 2;
331	5.27k	tms320c64x->operands[tms320c64x->op_count].mem.disp = offset;
332	5.27k	tms320c64x->operands[tms320c64x->op_count].mem.disptype = TMS320C64X_MEM_DISP_CONSTANT;
333	5.27k	tms320c64x->operands[tms320c64x->op_count].mem.direction = TMS320C64X_MEM_DIR_FW;
334	5.27k	tms320c64x->operands[tms320c64x->op_count].mem.modify = TMS320C64X_MEM_MOD_NO;
335	5.27k	tms320c64x->op_count++;
336	5.27k	}
337	5.27k	}
338
339		static void printRegPair(MCInst MI, unsigned OpNo, SStream O)
340	15.1k	{
341	15.1k	MCOperand *Op = MCInst_getOperand(MI, OpNo);
342	15.1k	unsigned reg = MCOperand_getReg(Op);
343	15.1k	cs_tms320c64x *tms320c64x;
344
345	15.1k	SStream_concat(O, "%s:%s", getRegisterName(reg + 1), getRegisterName(reg));
346
347	15.1k	if (MI->csh->detail) {
348	15.1k	tms320c64x = &MI->flat_insn->detail->tms320c64x;
349
350	15.1k	tms320c64x->operands[tms320c64x->op_count].type = TMS320C64X_OP_REGPAIR;
351	15.1k	tms320c64x->operands[tms320c64x->op_count].reg = reg;
352	15.1k	tms320c64x->op_count++;
353	15.1k	}
354	15.1k	}
355
356		static bool printAliasInstruction(MCInst MI, SStream O, MCRegisterInfo *MRI)
357	45.7k	{
358	45.7k	unsigned opcode = MCInst_getOpcode(MI);
359	45.7k	MCOperand *op;
360
361	45.7k	switch(opcode) {
362		/* ADD.Dx -i, x, y -> SUB.Dx x, i, y */
363	422	case TMS320C64x_ADD_d2_rir:
364		/* ADD.L -i, x, y -> SUB.L x, i, y */
365	695	case TMS320C64x_ADD_l1_irr:
366	1.15k	case TMS320C64x_ADD_l1_ipp:
367		/* ADD.S -i, x, y -> SUB.S x, i, y */
368	1.94k	case TMS320C64x_ADD_s1_irr:
369	1.94k	if ((MCInst_getNumOperands(MI) == 3) &&
370	1.94k	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
371	1.94k	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
372	1.94k	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
373	1.94k	(MCOperand_getImm(MCInst_getOperand(MI, 2)) < 0)) {
374
375	358	MCInst_setOpcodePub(MI, TMS320C64X_INS_SUB);
376	358	op = MCInst_getOperand(MI, 2);
377	358	MCOperand_setImm(op, -MCOperand_getImm(op));
378
379	358	SStream_concat0(O, "SUB\t");
380	358	printOperand(MI, 1, O);
381	358	SStream_concat0(O, ", ");
382	358	printOperand(MI, 2, O);
383	358	SStream_concat0(O, ", ");
384	358	printOperand(MI, 0, O);
385
386	358	return true;
387	358	}
388	1.58k	break;
389	45.7k	}
390	45.4k	switch(opcode) {
391		/* ADD.D 0, x, y -> MV.D x, y */
392	529	case TMS320C64x_ADD_d1_rir:
393		/* OR.D x, 0, y -> MV.D x, y */
394	736	case TMS320C64x_OR_d2_rir:
395		/* ADD.L 0, x, y -> MV.L x, y */
396	954	case TMS320C64x_ADD_l1_irr:
397	1.36k	case TMS320C64x_ADD_l1_ipp:
398		/* OR.L 0, x, y -> MV.L x, y */
399	1.65k	case TMS320C64x_OR_l1_irr:
400		/* ADD.S 0, x, y -> MV.S x, y */
401	2.43k	case TMS320C64x_ADD_s1_irr:
402		/* OR.S 0, x, y -> MV.S x, y */
403	2.51k	case TMS320C64x_OR_s1_irr:
404	2.51k	if ((MCInst_getNumOperands(MI) == 3) &&
405	2.51k	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
406	2.51k	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
407	2.51k	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
408	2.51k	(MCOperand_getImm(MCInst_getOperand(MI, 2)) == 0)) {
409
410	595	MCInst_setOpcodePub(MI, TMS320C64X_INS_MV);
411	595	MI->size--;
412
413	595	SStream_concat0(O, "MV\t");
414	595	printOperand(MI, 1, O);
415	595	SStream_concat0(O, ", ");
416	595	printOperand(MI, 0, O);
417
418	595	return true;
419	595	}
420	1.91k	break;
421	45.4k	}
422	44.8k	switch(opcode) {
423		/* XOR.D -1, x, y -> NOT.D x, y */
424	662	case TMS320C64x_XOR_d2_rir:
425		/* XOR.L -1, x, y -> NOT.L x, y */
426	788	case TMS320C64x_XOR_l1_irr:
427		/* XOR.S -1, x, y -> NOT.S x, y */
428	1.04k	case TMS320C64x_XOR_s1_irr:
429	1.04k	if ((MCInst_getNumOperands(MI) == 3) &&
430	1.04k	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
431	1.04k	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
432	1.04k	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
433	1.04k	(MCOperand_getImm(MCInst_getOperand(MI, 2)) == -1)) {
434
435	212	MCInst_setOpcodePub(MI, TMS320C64X_INS_NOT);
436	212	MI->size--;
437
438	212	SStream_concat0(O, "NOT\t");
439	212	printOperand(MI, 1, O);
440	212	SStream_concat0(O, ", ");
441	212	printOperand(MI, 0, O);
442
443	212	return true;
444	212	}
445	828	break;
446	44.8k	}
447	44.6k	switch(opcode) {
448		/* MVK.D 0, x -> ZERO.D x */
449	292	case TMS320C64x_MVK_d1_rr:
450		/* MVK.L 0, x -> ZERO.L x */
451	664	case TMS320C64x_MVK_l2_ir:
452	664	if ((MCInst_getNumOperands(MI) == 2) &&
453	664	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
454	664	MCOperand_isImm(MCInst_getOperand(MI, 1)) &&
455	664	(MCOperand_getImm(MCInst_getOperand(MI, 1)) == 0)) {
456
457	180	MCInst_setOpcodePub(MI, TMS320C64X_INS_ZERO);
458	180	MI->size--;
459
460	180	SStream_concat0(O, "ZERO\t");
461	180	printOperand(MI, 0, O);
462
463	180	return true;
464	180	}
465	484	break;
466	44.6k	}
467	44.4k	switch(opcode) {
468		/* SUB.L x, x, y -> ZERO.L y */
469	328	case TMS320C64x_SUB_l1_rrp_x1:
470		/* SUB.S x, x, y -> ZERO.S y */
471	423	case TMS320C64x_SUB_s1_rrr:
472	423	if ((MCInst_getNumOperands(MI) == 3) &&
473	423	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
474	423	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
475	423	MCOperand_isReg(MCInst_getOperand(MI, 2)) &&
476	423	(MCOperand_getReg(MCInst_getOperand(MI, 1)) == MCOperand_getReg(MCInst_getOperand(MI, 2)))) {
477
478	83	MCInst_setOpcodePub(MI, TMS320C64X_INS_ZERO);
479	83	MI->size -= 2;
480
481	83	SStream_concat0(O, "ZERO\t");
482	83	printOperand(MI, 0, O);
483
484	83	return true;
485	83	}
486	340	break;
487	44.4k	}
488	44.3k	switch(opcode) {
489		/* SUB.L 0, x, y -> NEG.L x, y */
490	417	case TMS320C64x_SUB_l1_irr:
491	645	case TMS320C64x_SUB_l1_ipp:
492		/* SUB.S 0, x, y -> NEG.S x, y */
493	859	case TMS320C64x_SUB_s1_irr:
494	859	if ((MCInst_getNumOperands(MI) == 3) &&
495	859	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
496	859	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
497	859	MCOperand_isImm(MCInst_getOperand(MI, 2)) &&
498	859	(MCOperand_getImm(MCInst_getOperand(MI, 2)) == 0)) {
499
500	145	MCInst_setOpcodePub(MI, TMS320C64X_INS_NEG);
501	145	MI->size--;
502
503	145	SStream_concat0(O, "NEG\t");
504	145	printOperand(MI, 1, O);
505	145	SStream_concat0(O, ", ");
506	145	printOperand(MI, 0, O);
507
508	145	return true;
509	145	}
510	714	break;
511	44.3k	}
512	44.2k	switch(opcode) {
513		/* PACKLH2.L x, x, y -> SWAP2.L x, y */
514	563	case TMS320C64x_PACKLH2_l1_rrr_x2:
515		/* PACKLH2.S x, x, y -> SWAP2.S x, y */
516	716	case TMS320C64x_PACKLH2_s1_rrr:
517	716	if ((MCInst_getNumOperands(MI) == 3) &&
518	716	MCOperand_isReg(MCInst_getOperand(MI, 0)) &&
519	716	MCOperand_isReg(MCInst_getOperand(MI, 1)) &&
520	716	MCOperand_isReg(MCInst_getOperand(MI, 2)) &&
521	716	(MCOperand_getReg(MCInst_getOperand(MI, 1)) == MCOperand_getReg(MCInst_getOperand(MI, 2)))) {
522
523	72	MCInst_setOpcodePub(MI, TMS320C64X_INS_SWAP2);
524	72	MI->size--;
525
526	72	SStream_concat0(O, "SWAP2\t");
527	72	printOperand(MI, 1, O);
528	72	SStream_concat0(O, ", ");
529	72	printOperand(MI, 0, O);
530
531	72	return true;
532	72	}
533	644	break;
534	44.2k	}
535	44.1k	switch(opcode) {
536		/* NOP 16 -> IDLE */
537		/* NOP 1 -> NOP */
538	1.47k	case TMS320C64x_NOP_n:
539	1.47k	if ((MCInst_getNumOperands(MI) == 1) &&
540	1.47k	MCOperand_isImm(MCInst_getOperand(MI, 0)) &&
541	1.47k	(MCOperand_getReg(MCInst_getOperand(MI, 0)) == 16)) {
542
543	364	MCInst_setOpcodePub(MI, TMS320C64X_INS_IDLE);
544	364	MI->size--;
545
546	364	SStream_concat0(O, "IDLE");
547
548	364	return true;
549	364	}
550	1.11k	if ((MCInst_getNumOperands(MI) == 1) &&
551	1.11k	MCOperand_isImm(MCInst_getOperand(MI, 0)) &&
552	1.11k	(MCOperand_getReg(MCInst_getOperand(MI, 0)) == 1)) {
553
554	871	MI->size--;
555
556	871	SStream_concat0(O, "NOP");
557
558	871	return true;
559	871	}
560	243	break;
561	44.1k	}
562
563	42.8k	return false;
564	44.1k	}
565
566		void TMS320C64x_printInst(MCInst MI, SStream O, void *Info)
567	45.7k	{
568	45.7k	if (!printAliasInstruction(MI, O, Info))
569	42.8k	printInstruction(MI, O, Info);
570	45.7k	}
571
572		#endif