Compare commits
4 Commits
easter-egg
...
diego/inst
| Author | SHA1 | Date | |
|---|---|---|---|
| 8cc4f59b9c | |||
| 30e0203df4 | |||
| 7713be5293 | |||
| b61cc6b149 |
Binary file not shown.
@@ -1,16 +1,5 @@
|
||||
#include "CPU.hpp"
|
||||
|
||||
#include <spider/runtime/native/machine.hpp>
|
||||
|
||||
#include <spider/runtime/memory/RAM.hpp>
|
||||
#include <spider/runtime/memory/Types.hpp>
|
||||
|
||||
#include <spider/runtime/reel/InstrReel.hpp>
|
||||
|
||||
#if __cplusplus >= 202002L
|
||||
#include <bit>
|
||||
#endif
|
||||
|
||||
namespace spider {
|
||||
|
||||
CPU::CPU()
|
||||
@@ -19,169 +8,26 @@ namespace spider {
|
||||
R2{}, R3{}, R4{}, R5{},
|
||||
R6{}, R7{}, R8{}, R9{},
|
||||
RF{}, RI{}, RS{}, RZ{},
|
||||
RE{}, RN{}, RV{}, RM{},
|
||||
ALU0{}, ALU1{},
|
||||
_dst(nullptr), _src(nullptr),
|
||||
_opcode(0), _addrm(0), _size(0),
|
||||
_store(0), _post(&CPU::imp),
|
||||
_ram(nullptr), _reel(nullptr) {
|
||||
}
|
||||
RE{}, RN{}, RV{}, RM{}
|
||||
{}
|
||||
|
||||
CPU::~CPU() {}
|
||||
|
||||
// Setup & Configuration //
|
||||
|
||||
void CPU::hookRAM(RAM* ram) {
|
||||
this->_ram = ram;
|
||||
}
|
||||
|
||||
void CPU::hookInstrReel(InstrReel* reel) {
|
||||
this->_reel = reel;
|
||||
}
|
||||
|
||||
constexpr u64 CPU::getFlag(u64 mask) {
|
||||
if (!mask) return 0;
|
||||
#if __cplusplus >= 202002L
|
||||
return (RF & mask) >> std::countr_zero(mask);
|
||||
#elif defined(SPIDER_COMPILER_GCC_LIKE)
|
||||
return (RF & mask) >> __builtin_ctzll(mask);
|
||||
#elif defined(SPIDER_COMPILER_MSVC)
|
||||
return (RF & mask) >> _BitScanForward64(mask);
|
||||
#else
|
||||
// If you have reached this part,
|
||||
// please come up with a better alternative.
|
||||
u64 bits = RF & mask;
|
||||
while (mask && (mask >>= 1)) bits >>= 1;
|
||||
return bits;
|
||||
#endif
|
||||
}
|
||||
|
||||
// Interaction with Reel //
|
||||
|
||||
CPU::Fn CPU::addrModes[] = {
|
||||
&CPU::imm, &CPU::abs,
|
||||
&CPU::reg, &CPU::ind,
|
||||
&CPU::ptr, &CPU::idx,
|
||||
&CPU::sca, &CPU::dis
|
||||
};
|
||||
|
||||
void CPU::fetchInstr() {
|
||||
u16 i = _reel->readU16(RI);
|
||||
const u16 oc = (i >> 7);
|
||||
_opcode = oc & 0x1FF; // GCC WHY!
|
||||
_addrm = static_cast<u8>((i >> 2) & 0x1F);
|
||||
_size = static_cast<u8>(i & 0x3);
|
||||
RI += 2;
|
||||
}
|
||||
|
||||
void CPU::fetchOperDst() {
|
||||
// Move the operand ptrs
|
||||
_alu = &ALU0;
|
||||
_opers[1] = _opers[0];
|
||||
|
||||
// call specific addressing mode
|
||||
(this->*(CPU::addrModes[_addrm & 0b111]))(); // mask added here too
|
||||
}
|
||||
|
||||
void CPU::fetchOperSrc() {
|
||||
// set ALU
|
||||
_alu = &ALU1;
|
||||
|
||||
// call specific addressing mode
|
||||
(this->*(CPU::addrModes[_addrm & 0b111]))(); // mask keeps index within 0-7
|
||||
|
||||
// modify the _addrm register
|
||||
_addrm = static_cast<u8>((_addrm >> 3) & 0x1F);
|
||||
_addrm++;
|
||||
}
|
||||
|
||||
|
||||
void CPU::execute() {
|
||||
(this->*(CPU::instrMap[_opcode]))(); // no null check needed
|
||||
}
|
||||
|
||||
|
||||
// Addressing Modes //
|
||||
|
||||
/**
|
||||
* Implied Addressing Mode
|
||||
* @brief BRAD (0xF7) - Memory Integrity Checksum
|
||||
* Escanea los primeros 256 bytes de memoria y valida contra una firma de seguridad.
|
||||
* Implementado por Bradley Vergara Lara - Estancia 2026.
|
||||
*/
|
||||
void CPU::imp() {
|
||||
// Nothing //
|
||||
void CPU::BRAD() {
|
||||
u32 checksum = 0;
|
||||
const u32 MAGIC_SIGNATURE = 0x504944; // Firma de integridad "PID"
|
||||
|
||||
// Recorre la memoria base del sistema
|
||||
for (u16 i = 0; i < 256; i++) {
|
||||
checksum += memory.read8(i);
|
||||
}
|
||||
|
||||
/**
|
||||
* Immediate Addressing Mode
|
||||
*/
|
||||
void CPU::imm() {
|
||||
_reel->loadRegister(RI, _size, _alu);
|
||||
_opers[0] = _alu;
|
||||
_post = &CPU::imp;
|
||||
RI += 1 << _size;
|
||||
}
|
||||
|
||||
/**
|
||||
* Absolute Addressing Mode
|
||||
*/
|
||||
void CPU::abs() {
|
||||
// Load the actual ptr into the ALU
|
||||
u8 mm = u8(getFlag(CPU::FLAG_MEMORY_MODE));
|
||||
_reel->loadRegister(RI, mm, _alu);
|
||||
RI += 1 << mm;
|
||||
|
||||
// read the memory from RAM
|
||||
_store = _alu->_u64;
|
||||
_ram->loadRegister(_store, _size, _alu);
|
||||
_post = &CPU::psw;
|
||||
}
|
||||
|
||||
/**
|
||||
* Register Addressing Mode
|
||||
*/
|
||||
void CPU::reg() { // NOT FINISHED
|
||||
// Two consecutive registers can be declared
|
||||
// Shift if the top part will become .reg too
|
||||
u8 sh = ((_addrm & 0b11000) == 0b11000) * 4;
|
||||
u8 use = 1 - (sh >> 2); // (sh / 4)
|
||||
|
||||
// get byte
|
||||
u8 reg = (_reel->readU8(RI) >> sh) & 0xF;
|
||||
_alu = &GPR[reg];
|
||||
_opers[0] = _alu; // explicitly sets _opers[0] = _dst
|
||||
RI += use;
|
||||
|
||||
// store no-op
|
||||
_post = &CPU::imp;
|
||||
}
|
||||
|
||||
/**
|
||||
* Indrect Addressing Mode
|
||||
*/
|
||||
void CPU::ind() {}
|
||||
|
||||
/**
|
||||
* Pointer Addressing Mode
|
||||
*/
|
||||
void CPU::ptr() {}
|
||||
|
||||
/**
|
||||
* Indexed Addressing Mode
|
||||
*/
|
||||
void CPU::idx() {}
|
||||
|
||||
/**
|
||||
* Scaled Addressing Mode
|
||||
*/
|
||||
void CPU::sca() {}
|
||||
|
||||
/**
|
||||
* Displaced Addressing Mode
|
||||
*/
|
||||
void CPU::dis() {}
|
||||
|
||||
/**
|
||||
* Post Write Action
|
||||
*/
|
||||
void CPU::psw() {}
|
||||
|
||||
// Si el checksum coincide, RA = 1 (OK), si no RA = 0 (Error)
|
||||
RA = (checksum == MAGIC_SIGNATURE) ? 1 : 0;
|
||||
}
|
||||
25
src/spider/runtime/cpu/CPU_test.cpp
Normal file
25
src/spider/runtime/cpu/CPU_test.cpp
Normal file
@@ -0,0 +1,25 @@
|
||||
#include "CPU.hpp"
|
||||
|
||||
namespace spider {
|
||||
|
||||
CPU::CPU()
|
||||
: RA{}, RB{}, RC{}, RD{},
|
||||
RX{}, RY{}, R0{}, R1{},
|
||||
R2{}, R3{}, R4{}, R5{},
|
||||
R6{}, R7{}, R8{}, R9{},
|
||||
RF{}, RI{}, RS{}, RZ{},
|
||||
RE{}, RN{}, RV{}, RM{}
|
||||
{}
|
||||
|
||||
CPU::~CPU() {}
|
||||
|
||||
// Stubs for testing
|
||||
void CPU::fetchOperDst() { /* _dst already set manually in tests */ }
|
||||
void CPU::fetchOperSrc() { /* _src already set manually in tests */ }
|
||||
void CPU::imp() { /* no-op post action */ }
|
||||
void CPU::hookRAM(RAM*) {}
|
||||
void CPU::hookInstrReel(InstrReel*) {}
|
||||
void CPU::fetchInstr() {}
|
||||
void CPU::execute() {}
|
||||
void CPU::psw() {}
|
||||
}
|
||||
@@ -70,63 +70,96 @@ namespace spider {
|
||||
}
|
||||
|
||||
void CPU::D2I() {
|
||||
// TODO: Implement D2I
|
||||
fetchOperDst();
|
||||
_dst->_u32 = static_cast<u32>(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::D2L() {
|
||||
// TODO: Implement D2L
|
||||
fetchOperDst();
|
||||
_dst->_u64 = static_cast<u64>(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::SIN() {
|
||||
// TODO: Implement SIN
|
||||
fetchOperDst();
|
||||
_dst->_f64 = std::sin(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::COS() {
|
||||
// TODO: Implement COS
|
||||
fetchOperDst();
|
||||
_dst->_f64 = std::cos(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::TAN() {
|
||||
// TODO: Implement TAN
|
||||
fetchOperDst();
|
||||
_dst->_f64 = std::tan(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::ASIN() {
|
||||
// TODO: Implement ASIN
|
||||
fetchOperDst();
|
||||
_dst->_f64 = std::asin(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::ACOS() {
|
||||
// TODO: Implement ACOS
|
||||
fetchOperDst();
|
||||
_dst->_f64 = std::acos(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::ATAN() {
|
||||
// TODO: Implement ATAN
|
||||
fetchOperDst();
|
||||
_dst->_f64 = std::atan(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::ATAN2() {
|
||||
// TODO: Implement ATAN2
|
||||
fetchOperDst();
|
||||
fetchOperSrc();
|
||||
_dst->_f64 = std::atan2(_dst->_f64, _src->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::EXP() {
|
||||
// TODO: Implement EXP
|
||||
fetchOperDst();
|
||||
_dst->_f64 = std::exp(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::LOG() {
|
||||
// TODO: Implement LOG
|
||||
fetchOperDst();
|
||||
_dst->_f64 = std::log(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::LOGAB() {
|
||||
// TODO: Implement LOGAB
|
||||
fetchOperDst();
|
||||
fetchOperSrc();
|
||||
_dst->_f64 = std::log(_dst->_f64) / std::log(_src->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::POW() {
|
||||
// TODO: Implement POW
|
||||
fetchOperDst();
|
||||
fetchOperSrc();
|
||||
_dst->_f64 = std::pow(_dst->_f64, _src->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::SQRT() {
|
||||
// TODO: Implement SQRT
|
||||
fetchOperDst();
|
||||
_dst->_f64 = std::sqrt(_dst->_f64);
|
||||
(this->*_post)();
|
||||
}
|
||||
|
||||
void CPU::ROOT() {
|
||||
// TODO: Implement ROOT
|
||||
fetchOperDst();
|
||||
fetchOperSrc();
|
||||
_dst->_f64 = std::pow(_dst->_f64, 1.0 / _src->_f64);
|
||||
}
|
||||
|
||||
void CPU::ADC() {
|
||||
|
||||
118
src/spider/test_instrucciones.cpp
Normal file
118
src/spider/test_instrucciones.cpp
Normal file
@@ -0,0 +1,118 @@
|
||||
#ifndef M_PI
|
||||
#define M_PI 3.14159265358979323846
|
||||
#endif
|
||||
#ifndef M_E
|
||||
#define M_E 2.71828182845904523536
|
||||
#endif
|
||||
|
||||
#include <spider/runtime/cpu/CPU.hpp>
|
||||
#include <iostream>
|
||||
#include <cmath>
|
||||
|
||||
using namespace spider;
|
||||
|
||||
void check(const char* name, double result, double expected, double tolerance = 1e-9) {
|
||||
bool ok = std::abs(result - expected) <= tolerance;
|
||||
std::cout << (ok ? "[PASS] " : "[FAIL] ") << name
|
||||
<< " = " << result
|
||||
<< " (expected " << expected << ")\n";
|
||||
}
|
||||
|
||||
int main() {
|
||||
std::cout << "=== Spider VM Instruction Test: 0x068-0x079 ===\n\n";
|
||||
|
||||
CPU cpu;
|
||||
cpu._post = &CPU::imp;
|
||||
|
||||
std::cout << "-- Cast Instructions --\n";
|
||||
|
||||
cpu.RA._f64 = 3.9;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.D2I();
|
||||
check("D2I (3.9 -> 3)", cpu.RA._u32, 3.0);
|
||||
|
||||
cpu.RA._f64 = 1e12;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.D2L();
|
||||
check("D2L (1e12)", (double)cpu.RA._u64, 1e12);
|
||||
|
||||
std::cout << "\n-- Trigonometric Instructions --\n";
|
||||
|
||||
cpu.RA._f64 = M_PI / 2.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.SIN();
|
||||
check("SIN(pi/2)", cpu.RA._f64, 1.0);
|
||||
|
||||
cpu.RA._f64 = 0.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.COS();
|
||||
check("COS(0)", cpu.RA._f64, 1.0);
|
||||
|
||||
cpu.RA._f64 = M_PI / 4.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.TAN();
|
||||
check("TAN(pi/4)", cpu.RA._f64, 1.0);
|
||||
|
||||
cpu.RA._f64 = 1.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.ASIN();
|
||||
check("ASIN(1.0)", cpu.RA._f64, M_PI / 2.0);
|
||||
|
||||
cpu.RA._f64 = 1.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.ACOS();
|
||||
check("ACOS(1.0)", cpu.RA._f64, 0.0);
|
||||
|
||||
cpu.RA._f64 = 1.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.ATAN();
|
||||
check("ATAN(1.0)", cpu.RA._f64, M_PI / 4.0);
|
||||
|
||||
cpu.RA._f64 = 1.0;
|
||||
cpu.RB._f64 = 1.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu._src = &cpu.RB;
|
||||
cpu.ATAN2();
|
||||
check("ATAN2(1,1)", cpu.RA._f64, M_PI / 4.0);
|
||||
|
||||
std::cout << "\n-- Exponential Instructions --\n";
|
||||
|
||||
cpu.RA._f64 = 1.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.EXP();
|
||||
check("EXP(1)", cpu.RA._f64, M_E);
|
||||
|
||||
cpu.RA._f64 = M_E;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.LOG();
|
||||
check("LOG(e)", cpu.RA._f64, 1.0);
|
||||
|
||||
cpu.RA._f64 = 100.0;
|
||||
cpu.RB._f64 = 10.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu._src = &cpu.RB;
|
||||
cpu.LOGAB();
|
||||
check("LOGAB(100,10)", cpu.RA._f64, 2.0);
|
||||
|
||||
cpu.RA._f64 = 2.0;
|
||||
cpu.RB._f64 = 10.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu._src = &cpu.RB;
|
||||
cpu.POW();
|
||||
check("POW(2,10)", cpu.RA._f64, 1024.0);
|
||||
|
||||
cpu.RA._f64 = 9.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu.SQRT();
|
||||
check("SQRT(9)", cpu.RA._f64, 3.0);
|
||||
|
||||
cpu.RA._f64 = 27.0;
|
||||
cpu.RB._f64 = 3.0;
|
||||
cpu._dst = &cpu.RA;
|
||||
cpu._src = &cpu.RB;
|
||||
cpu.ROOT();
|
||||
check("ROOT(27,3)", cpu.RA._f64, 3.0);
|
||||
|
||||
std::cout << "\n=== Tests complete ===\n";
|
||||
return 0;
|
||||
}
|
||||
Reference in New Issue
Block a user