More instruction functions

Signed-off-by: Balazs Toldi <balazs@toldi.eu>
This commit is contained in:
Balazs Toldi 2023-04-15 22:17:09 +02:00
parent dfe27caf8c
commit a2c8f529c7
Signed by: Bazsalanszky
GPG key ID: 6C7D440036F99D58
2 changed files with 127 additions and 31 deletions

View file

@ -27,6 +27,104 @@ void riscv_emu_init(RiscvEmu *emu)
emu->pc = 0; emu->pc = 0;
} }
void riscv_execute_addi(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("ADDI x%d, %d\n", instr->rd, instr->imm);
emu->registers[instr->rd] += instr->imm;
}
void riscv_execute_slti(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("SLTI x%d, %d\n", instr->rd, instr->imm);
emu->registers[instr->rd] = (SIGNED(emu->registers[instr->rs1]) < SIGNED(instr->imm)) ? 1 : 0;
}
void riscv_execute_sltiu(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("SLTIU x%d, %d\n", instr->rd, instr->imm);
emu->registers[instr->rd] = (UNSIGNED(emu->registers[instr->rs1]) < UNSIGNED(instr->imm)) ? 1 : 0;
}
void riscv_execute_xori(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("XORI x%d, %d\n", instr->rd, instr->imm);
emu->registers[instr->rd] = emu->registers[instr->rs1] ^ instr->imm;
}
void riscv_execute_ori(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("ORI x%d, %d\n", instr->rd, instr->imm);
emu->registers[instr->rd] = emu->registers[instr->rs1] | instr->imm;
}
void riscv_execute_andi(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("ANDI x%d, %d\n", instr->rd, instr->imm);
emu->registers[instr->rd] = emu->registers[instr->rs1] & instr->imm;
}
void riscv_execute_slli(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("SLLI x%d, %d\n", instr->rd, instr->imm);
uint32_t shamt = instr->rs2;
emu->registers[instr->rd] = emu->registers[instr->rs1] << shamt;
}
void riscv_execute_srli(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("SRLI x%d, %d\n", instr->rd, instr->imm);
uint32_t shamt = instr->rs2;
uint32_t msr = emu->registers[instr->rs1] & 0x80000000;
emu->registers[instr->rd] = msr ? ~(~emu->registers[instr->rs1] >> shamt) :
emu->registers[instr->rs1] >> shamt;
}
void riscv_execute_add(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("ADD x%d, x%d, x%d\n", instr->rd, instr->rs1, instr->rs2);
emu->registers[instr->rd] = emu->registers[instr->rs1] + emu->registers[instr->rs2];
}
void riscv_execute_sub(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("SUB x%d, x%d, x%d\n", instr->rd, instr->rs1, instr->rs2);
emu->registers[instr->rd] = emu->registers[instr->rs1] - emu->registers[instr->rs2];
}
void riscv_execute_sll(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("SLL x%d, x%d, x%d\n", instr->rd, instr->rs1, instr->rs2);
emu->registers[instr->rd] = emu->registers[instr->rs1] << emu->registers[instr->rs2];
}
void riscv_execute_slt(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("SLT x%d, x%d, x%d\n", instr->rd, instr->rs1, instr->rs2);
emu->registers[instr->rd] = (SIGNED(emu->registers[instr->rs1]) < SIGNED(emu->registers[instr->rs2])) ? 1 : 0;
}
void riscv_execute_xor(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("XOR x%d, x%d, x%d\n", instr->rd, instr->rs1, instr->rs2);
emu->registers[instr->rd] = emu->registers[instr->rs1] ^ emu->registers[instr->rs2];
}
void riscv_execute_or(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("OR x%d, x%d, x%d\n", instr->rd, instr->rs1, instr->rs2);
emu->registers[instr->rd] = emu->registers[instr->rs1] | emu->registers[instr->rs2];
}
void riscv_execute_and(RiscvEmu *emu, RiscvInstruction *instr)
{
printf("AND x%d, x%d, x%d\n", instr->rd, instr->rs1, instr->rs2);
emu->registers[instr->rd] = emu->registers[instr->rs1] & emu->registers[instr->rs2];
}
void riscv_decode_instruction(uint32_t instr, RiscvInstruction *decoded_instr) void riscv_decode_instruction(uint32_t instr, RiscvInstruction *decoded_instr)
{ {
decoded_instr->opcode = instr & 0x7F; decoded_instr->opcode = instr & 0x7F;
@ -50,14 +148,12 @@ void riscv_decode_instruction(uint32_t instr, RiscvInstruction *decoded_instr)
case 0x33: // R-type case 0x33: // R-type
case 0x3B: // R-type (32-bit) case 0x3B: // R-type (32-bit)
decoded_instr->imm = 0; decoded_instr->imm = 0;
decoded_instr->rs1 = (instr >> 15) & 0x1F;
decoded_instr->rs2 = (instr >> 20) & 0x1F;
break; break;
case 0x63: // B-type case 0x63: // B-type
decoded_instr->imm = ((instr >> 7) & 0x1e) | ((instr >> 20) & 0x7e0) | ((instr << 4) & 0x800); decoded_instr->imm = ((instr >> 7) & 0x1e) | ((instr >> 20) & 0x7e0) | ((instr << 4) & 0x800);
decoded_instr->imm = (decoded_instr->imm ^ 0x800) - 0x800; // Sign extend decoded_instr->imm = (decoded_instr->imm ^ 0x800) - 0x800; // Sign extend
break; break;
case 0x6F: // JAL case 0x6F: // JAL
@ -71,56 +167,53 @@ void riscv_decode_instruction(uint32_t instr, RiscvInstruction *decoded_instr)
} }
} }
void riscv_execute_instruction(RiscvEmu *emu, RiscvInstruction instruction) void riscv_execute_instruction(RiscvEmu *emu, RiscvInstruction *instruction)
{ {
switch (instruction.opcode) switch (instruction->opcode)
{ {
case 0x13: case 0x13:
if (instruction.funct3 == 0x00) if (instruction->funct3 == 0x00)
{ {
printf("ADDI x%d, %d\n", instruction.rd, instruction.imm);
emu->registers[instruction.rd] += instruction.imm;
} }
break; break;
case 0x33: case 0x33:
if (instruction.funct3 == 0x00 && instruction.funct7 == 0x0) if (instruction->funct3 == 0x00 && instruction->funct7 == 0x0)
{ {
printf("ADD x%d, x%d, x%d\n", instruction.rd, instruction.rs1, instruction.rs2); riscv_execute_add(emu, instruction);
emu->registers[instruction.rd] = emu->registers[instruction.rs1] + emu->registers[instruction.rs2];
} }
else if (instruction.funct3 == 0x00 && instruction.funct7 == 0x20) else if (instruction->funct3 == 0x00 && instruction->funct7 == 0x20)
{ {
printf("SUB x%d, x%d, x%d\n", instruction.rd, instruction.rs1, instruction.rs2); printf("SUB x%d, x%d, x%d\n", instruction->rd, instruction->rs1, instruction->rs2);
emu->registers[instruction.rd] = emu->registers[instruction.rs1] - emu->registers[instruction.rs2]; emu->registers[instruction->rd] = emu->registers[instruction->rs1] - emu->registers[instruction->rs2];
} }
else else
{ {
printf("Unkown function with opcode 0x33, func3: "); printf("Unkown function with opcode 0x33, func3: ");
riscv_debug_print_binary(instruction.funct3); riscv_debug_print_binary(instruction->funct3);
printf(" func7: "); printf(" func7: ");
riscv_debug_print_binary(instruction.funct7); riscv_debug_print_binary(instruction->funct7);
printf("\n"); printf("\n");
} }
break; break;
case 0x23: case 0x23:
if (instruction.funct3 == 0x02) if (instruction->funct3 == 0x02)
{ {
printf("SW x%d, x%d, x%d\n", instruction.rd, instruction.rs1, instruction.rs2); printf("SW x%d, x%d, x%d\n", instruction->rd, instruction->rs1, instruction->rs2);
} }
else else
{ {
printf("Unkown function with opcode 0x23 func3: "); printf("Unkown function with opcode 0x23 func3: ");
riscv_debug_print_binary(instruction.funct3); riscv_debug_print_binary(instruction->funct3);
printf("\n"); printf("\n");
} }
break; break;
case 0x63: case 0x63:
if (instruction.funct3 == 0x4) if (instruction->funct3 == 0x4)
{ {
printf("BLT x%d, x%d,%d\n", instruction.rs1, instruction.rs2, (int32_t)(instruction.imm)/4); printf("BLT x%d, x%d,%d\n", instruction->rs1, instruction->rs2, (int32_t)(instruction->imm) / 4);
if (emu->registers[instruction.rs1] < emu->registers[instruction.rs2]) if (emu->registers[instruction->rs1] < emu->registers[instruction->rs2])
{ {
emu->pc = emu->pc + (int32_t)instruction.imm-4; emu->pc = emu->pc + (int32_t)instruction->imm - 4;
printf("x9: %d\n", emu->registers[9]); printf("x9: %d\n", emu->registers[9]);
printf("x0: %d\n", emu->registers[0]); printf("x0: %d\n", emu->registers[0]);
if (emu->registers[9] == 0) if (emu->registers[9] == 0)
@ -132,17 +225,17 @@ void riscv_execute_instruction(RiscvEmu *emu, RiscvInstruction instruction)
else else
{ {
printf("Unkown function with opcode 0x63: "); printf("Unkown function with opcode 0x63: ");
riscv_debug_print_binary(instruction.funct3); riscv_debug_print_binary(instruction->funct3);
printf("\n"); printf("\n");
} }
break; break;
default: default:
printf("UNKOWN Instruction detected! opcode: "); printf("UNKOWN Instruction detected! opcode: ");
riscv_debug_print_binary(instruction.opcode); riscv_debug_print_binary(instruction->opcode);
printf(" func3: "); printf(" func3: ");
riscv_debug_print_binary(instruction.funct3); riscv_debug_print_binary(instruction->funct3);
printf(" func7: "); printf(" func7: ");
riscv_debug_print_binary(instruction.funct7); riscv_debug_print_binary(instruction->funct7);
printf("\n"); printf("\n");
break; break;
} }
@ -152,20 +245,20 @@ void riscv_emulate(RiscvEmu *emu)
{ {
int running = 1; int running = 1;
while (running && emu->pc < 7*4) while (running && emu->pc < 7 * 4)
{ {
// Fetch instruction // Fetch instruction
uint32_t instruction = *((uint32_t*)(emu->memory + emu->pc)); uint32_t instruction = *((uint32_t *)(emu->memory + emu->pc));
// Decode instruction // Decode instruction
RiscvInstruction decoded_instr; RiscvInstruction decoded_instr;
riscv_decode_instruction(instruction, &decoded_instr); riscv_decode_instruction(instruction, &decoded_instr);
riscv_execute_instruction(emu, decoded_instr); riscv_execute_instruction(emu, &decoded_instr);
// Execute instruction (to be implemented) // Execute instruction (to be implemented)
// riscv_execuxte_instruction(emu, &decoded_instr); // riscv_execuxte_instruction(emu, &decoded_instr);
// Update program counter (to be implemented) // Update program counter (to be implemented)
emu->pc+=4; emu->pc += 4;
} }
riscv_debug_print_registers(emu); riscv_debug_print_registers(emu);
} }

View file

@ -6,6 +6,9 @@
#define NUM_REGISTERS 32 #define NUM_REGISTERS 32
#define MEMORY_SIZE 0x10000 // 64 KiB #define MEMORY_SIZE 0x10000 // 64 KiB
#define SIGNED(value) (*(int32_t*)&value)
#define UNSIGNED(value) (*(uint32_t*)&value)
typedef struct { typedef struct {
uint32_t registers[NUM_REGISTERS]; // 32-bit general-purpose registers uint32_t registers[NUM_REGISTERS]; // 32-bit general-purpose registers
uint32_t pc; // program counter uint32_t pc; // program counter