disasm-r.c

/*
  mipsivm - MIPS Interpreting Virtual Machine

  Copyright(c) 2018-2021, Yaotian "Zero" Tang. All rights reserved.

  This file takes charge of Disassembly Engine (R-Format).

  This program is distributed in the hope that it will be useful, but 
  without any warranty (no matter implied warranty or merchantability
  or fitness for a particular purpose, etc.).

  File Location: /disasm-r.c
*/

#include <midef.h>
#include <mipsdef.h>
#include <vmcb.h>
#include <devkit.h>

void mips_disasm_r_sll(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	if(instruction.value==0)
		sim_snprintf(mnemonic,length,"nop");		// NOP instruction.
	else
		sim_snprintf(mnemonic,length,"sll %s,%s,%u",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rt],instruction.r.shamt);
}

void mips_disasm_r_srl(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"srl %s,%s,%u",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rt],instruction.r.shamt);
}

void mips_disasm_r_sra(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"sra %s,%s,%u",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rt],instruction.r.shamt);
}

void mips_disasm_r_sllv(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"sllv %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rt],mips_gpr_string[instruction.r.rs]);
}

void mips_disasm_r_srlv(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"srlv %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rt],mips_gpr_string[instruction.r.rs]);
}

void mips_disasm_r_srav(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"srav %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rt],mips_gpr_string[instruction.r.rs]);
}

void mips_disasm_r_jr(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"jr %s",mips_gpr_string[instruction.r.rs]);
}

void mips_disasm_r_jalr(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	if(instruction.r.rd==31 || instruction.r.rd==0)
		sim_snprintf(mnemonic,length,"jalr %s",mips_gpr_string[instruction.r.rs]);
	else
		sim_snprintf(mnemonic,length,"jalr %s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs]);
}

void mips_disasm_r_movz(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"movz %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_movn(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"movn %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_syscall(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"syscall");
}

void mips_disasm_r_break(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"break");
}

void mips_disasm_r_sync(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"sync %s",mips_sync_type_string[instruction.r.shamt]);
}

void mips_disasm_r_mfhi(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"mfhi %s",mips_gpr_string[instruction.r.rd]);
}

void mips_disasm_r_mthi(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"mthi %s",mips_gpr_string[instruction.r.rs]);
}

void mips_disasm_r_mflo(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"mflo %s",mips_gpr_string[instruction.r.rd]);
}

void mips_disasm_r_mtlo(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"mtlo %s",mips_gpr_string[instruction.r.rs]);
}

void mips_disasm_r_mult(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"mult %s,%s",mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_multu(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"multu %s,%s",mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_div(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"div %s,%s",mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_divu(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"divu %s,%s",mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_add(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"add %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_addu(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"addu %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_sub(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"sub %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_subu(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"subu %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_and(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"and %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_or(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"or %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_xor(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"xor %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_nor(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"nor %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_slt(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"slt %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_sltu(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"sltu %s,%s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_tge(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"tge %s,%s",mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_tgeu(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"tgeu %s,%s",mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_tlt(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"tlt %s,%s",mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_tltu(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"tltu %s,%s",mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_teq(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"teq %s,%s",mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

void mips_disasm_r_tne(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"tne %s,%s",mips_gpr_string[instruction.r.rs],mips_gpr_string[instruction.r.rt]);
}

// R2-Format Instructions
void mips_disasm_r_clz(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"clz %s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs]);
}

void mips_disasm_r_clo(char* mnemonic,u32 length,u32 pc,mips_instruction instruction)
{
	sim_snprintf(mnemonic,length,"clo %s,%s",mips_gpr_string[instruction.r.rd],mips_gpr_string[instruction.r.rs]);
}