BRNSystems/RISC-B
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases 2 Wiki Activity

CPU core still needs finishing

Browse Source
This commit is contained in:
Bruno Rybársky
2025-02-04 23:16:19 +01:00
parent e6f241bcae
commit de77a0a9f5
4 changed files with 79 additions and 59 deletions
Download Patch File Download Diff File Expand all files Collapse all files

115
cpu/core.c
View File

@@ -34,54 +34,53 @@ void step(CPU *cpu) {
uint8_t reg1, reg2, imm, temp;
uint32_t newPC, addrTemp;
int32_t cmpResult;
switch (opcode) {
case NOP:
cpu->pc++;
//Don't do anything
break;
case BRK:
cpu->pc++;
//Pause CPU (for breakpoints)
cpu->mode = Paused;
break;
case INC_RN:
cpu->pc++;
reg1 = read_mem(cpu, cpu->pc++);
if (reg1 >= REG_COUNT) {
reg1 = REG_COUNT - 1;
}
//Increment register
reg1 = read_reg(cpu);
cpu->regs[reg1]++;
case INC_ADDR:
cpu->pc++;
imm = read_mem(cpu, cpu->pc++);
write_mem(cpu, imm, read_mem(cpu, imm) + 1);
//Increment address
addrTemp = read_addr(cpu);
write_mem(cpu, read_addr(cpu), read_mem(cpu, addrTemp) + 1);
case DEC_RN:
cpu->pc++;
reg1 = read_mem(cpu, cpu->pc++);
//Decrement register
reg1 = read_reg(cpu);
cpu->regs[reg1]--;
case DEC_ADDR:
cpu->pc++;
imm = read_mem(cpu, cpu->pc++);
write_mem(cpu, imm, read_mem(cpu, imm) - 1);
//Decrement address
addrTemp = read_addr(cpu);
write_mem(cpu, addrTemp, read_mem(cpu, addrTemp) - 1);
case MOV_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
//Load from immediate to register
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
cpu->regs[reg1] = imm;
break;
case MOV_RN_RM:
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
cpu->regs[reg1] = cpu->regs[reg2];
break;
case MOV_RN_ADDR:
// Load from memory into register.
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
cpu->regs[reg1] = read_mem(cpu, imm);
break;
@@ -89,14 +88,14 @@ void step(CPU *cpu) {
case MOV_ADDR_RN:
// Store from register into memory.
imm = read_mem(cpu, cpu->pc++);
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
write_mem(cpu, imm, cpu->regs[reg1]);
break;
case SWAP: {
// Swap contents of two registers.
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
temp = cpu->regs[reg1];
cpu->regs[reg1] = cpu->regs[reg2];
cpu->regs[reg2] = temp;
@@ -105,57 +104,57 @@ void step(CPU *cpu) {
case SWAPN: {
// Swap the nibbles of a register.
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
uint8_t val = (uint8_t) cpu->regs[reg1];
cpu->regs[reg1] = ((val & 0x0F) << 4) | ((val & 0xF0) >> 4);
break;
}
case ADD_RN_RM:
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
cpu->regs[reg1] += cpu->regs[reg2];
set_flags(cpu, cpu->regs[reg1]);
break;
case ADD_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
cpu->regs[reg1] += imm;
set_flags(cpu, cpu->regs[reg1]);
break;
case SUB_RN_RM:
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
cpu->regs[reg1] -= cpu->regs[reg2];
set_flags(cpu, cpu->regs[reg1]);
break;
case SUB_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
cpu->regs[reg1] -= imm;
set_flags(cpu, cpu->regs[reg1]);
break;
case MUL_RN_RM:
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
cpu->regs[reg1] *= cpu->regs[reg2];
set_flags(cpu, cpu->regs[reg1]);
break;
case MUL_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
cpu->regs[reg1] *= imm;
set_flags(cpu, cpu->regs[reg1]);
break;
case DIV_RN_RM:
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
if (cpu->regs[reg2] == 0) {
printf("Error: Division by zero!\n");
cpu->mode = Error;
@@ -166,7 +165,7 @@ void step(CPU *cpu) {
break;
case DIV_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
if (imm == 0) {
printf("Error: Division by zero!\n");
@@ -178,8 +177,8 @@ void step(CPU *cpu) {
break;
case MOD_RN_RM:
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
if (cpu->regs[reg2] == 0) {
printf("Error: Modulo by zero!\n");
cpu->mode = Error;
@@ -190,7 +189,7 @@ void step(CPU *cpu) {
break;
case MOD_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
if (imm == 0) {
printf("Error: Modulo by zero!\n");
@@ -202,75 +201,75 @@ void step(CPU *cpu) {
break;
case NEG_RN:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
cpu->regs[reg1] = -((int32_t) cpu->regs[reg1]);
set_flags(cpu, cpu->regs[reg1]);
break;
case AND_RN_RM:
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
cpu->regs[reg1] &= cpu->regs[reg2];
set_flags(cpu, cpu->regs[reg1]);
break;
case AND_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
cpu->regs[reg1] &= imm;
set_flags(cpu, cpu->regs[reg1]);
break;
case OR_RN_RM:
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
cpu->regs[reg1] |= cpu->regs[reg2];
set_flags(cpu, cpu->regs[reg1]);
break;
case OR_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
cpu->regs[reg1] |= imm;
set_flags(cpu, cpu->regs[reg1]);
break;
case XOR_RN_RM:
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
cpu->regs[reg1] ^= cpu->regs[reg2];
set_flags(cpu, cpu->regs[reg1]);
break;
case XOR_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
cpu->regs[reg1] ^= imm;
set_flags(cpu, cpu->regs[reg1]);
break;
case NOT_RN:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
cpu->regs[reg1] = ~cpu->regs[reg1];
set_flags(cpu, cpu->regs[reg1]);
break;
case SHL_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
cpu->regs[reg1] <<= imm;
set_flags(cpu, cpu->regs[reg1]);
break;
case SHR_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
cpu->regs[reg1] >>= imm; // Logical right shift (assuming unsigned value)
set_flags(cpu, cpu->regs[reg1]);
break;
case SAR_RN_IMM:
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
imm = read_mem(cpu, cpu->pc++);
// Arithmetic right shift; cast to signed before shifting.
cpu->regs[reg1] = ((int32_t) cpu->regs[reg1]) >> imm;
@@ -290,8 +289,8 @@ void step(CPU *cpu) {
case CMP: {
// Compare two registers: set flags (Zero, Negative)
reg1 = read_mem(cpu, cpu->pc++);
reg2 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
reg2 = read_reg(cpu);
cmpResult = (int32_t) cpu->regs[reg1] - (int32_t) cpu->regs[reg2];
set_flags(cpu, cmpResult);
break;
@@ -299,7 +298,7 @@ void step(CPU *cpu) {
case JE_BIT_RN: {
// Jump if bit in register set
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
if (reg1 >= REG_COUNT) {
reg1 = REG_COUNT - 1;
}
@@ -343,7 +342,7 @@ void step(CPU *cpu) {
case JNE_BIT_RN: {
// Jump if bit in register set
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
if (reg1 >= REG_COUNT) {
reg1 = REG_COUNT - 1;
}
@@ -438,14 +437,14 @@ void step(CPU *cpu) {
case PUSH: {
// Push register value onto the stack.
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
write_mem(cpu, cpu->sp--, (uint8_t) cpu->regs[reg1]);
break;
}
case POP: {
// Pop a value from the stack into a register.
reg1 = read_mem(cpu, cpu->pc++);
reg1 = read_reg(cpu);
cpu->regs[reg1] = read_mem(cpu, ++cpu->sp);
break;
}