#include #include #include #include #include #include #include namespace n64 { Mem::Mem() { memset(readPages, 0, PAGE_COUNT); memset(writePages, 0, PAGE_COUNT); for(int i = 0; i < RDRAM_SIZE / PAGE_SIZE; i++) { const auto addr = (i * PAGE_SIZE) & RDRAM_DSIZE; const auto pointer = (uintptr_t) &mmio.rdp.rdram[addr]; readPages[i] = pointer; writePages[i] = pointer; } rom.cart = (u8*)calloc(CART_SIZE, 1); } void Mem::Reset() { memset(rom.cart, 0, CART_SIZE); flash.Reset(); if(sram.is_mapped()) { std::error_code error; sram.sync(error); sram.unmap(); } mmio.Reset(); } void Mem::LoadSRAM(SaveType save_type, fs::path path) { if(save_type == SAVE_SRAM_256k) { std::error_code error; sramPath = path.replace_extension(".sram").string(); if(sram.is_mapped()) { sram.sync(error); if(error) { Util::panic("Could not sync {}", sramPath); } sram.unmap(); } FILE *f = fopen(sramPath.c_str(), "rb"); if (!f) { f = fopen(sramPath.c_str(), "wb"); u8* dummy = (u8*)calloc(SRAM_SIZE, 1); fwrite(dummy, 1, SRAM_SIZE, f); } fseek(f, 0, SEEK_END); size_t actualSize = ftell(f); fseek(f, 0, SEEK_SET); if (actualSize != SRAM_SIZE) { Util::panic("Corrupt SRAM!"); } fclose(f); sram = mio::make_mmap_sink( sramPath, 0, mio::map_entire_file, error); if (error) { Util::panic("Could not open {}", sramPath); } } } FORCE_INLINE void SetROMCIC(u32 checksum, ROM& rom) { switch (checksum) { case 0xEC8B1325: rom.cicType = CIC_NUS_7102; break; // 7102 case 0x1DEB51A9: rom.cicType = CIC_NUS_6101; break; // 6101 case 0xC08E5BD6: rom.cicType = CIC_NUS_6102_7101; break; case 0x03B8376A: rom.cicType = CIC_NUS_6103_7103; break; case 0xCF7F41DC: rom.cicType = CIC_NUS_6105_7105; break; case 0xD1059C6A: rom.cicType = CIC_NUS_6106_7106; break; default: Util::warn("Could not determine CIC TYPE! Checksum: 0x{:08X} is unknown!", checksum); rom.cicType = UNKNOWN_CIC_TYPE; break; } } std::vector Mem::OpenArchive(const std::string &path, size_t& sizeAdjusted) { auto stream = ar_open_file(fs::path(path).u8string().c_str()); if(!stream) { Util::panic("Could not open archive! Are you sure it's an archive?"); } ar_archive* archive = ar_open_zip_archive(stream, false); if(!archive) archive = ar_open_rar_archive(stream); if(!archive) archive = ar_open_7z_archive(stream); if(!archive) archive = ar_open_tar_archive(stream); if(!archive) { ar_close(stream); Util::panic("Could not open archive! Are you sure it's a supported archive? (7z, zip, rar and tar are supported)"); } std::vector buf{}; while(ar_parse_entry(archive)) { auto filename = ar_entry_get_name(archive); auto extension = fs::path(filename).extension(); if(std::any_of(std::begin(ROM_EXTENSIONS), std::end(ROM_EXTENSIONS), [&](auto x) { return extension == x; })) { auto size = ar_entry_get_size(archive); sizeAdjusted = Util::NextPow2(size); buf.resize(sizeAdjusted); ar_entry_uncompress(archive, buf.data(), size); break; } else { ar_close_archive(archive); ar_close(stream); Util::panic("Could not find any rom image in the archive!"); } } ar_close_archive(archive); ar_close(stream); return buf; } std::vector Mem::OpenROM(const std::string& filename, size_t& sizeAdjusted) { auto buf = Util::ReadFileBinary(filename); sizeAdjusted = Util::NextPow2(buf.size()); return buf; } void Mem::LoadROM(bool isArchive, const std::string& filename) { size_t sizeAdjusted; u8* buf; std::vector temp{}; if(isArchive) { temp = OpenArchive(filename, sizeAdjusted); } else { temp = OpenROM(filename, sizeAdjusted); } buf = (u8*)calloc(sizeAdjusted, 1); std::copy(temp.begin(), temp.end(), buf); u32 endianness = be32toh(*reinterpret_cast(buf)); Util::SwapN64Rom(sizeAdjusted, buf, endianness); memcpy(rom.cart, buf, sizeAdjusted); rom.size = sizeAdjusted; rom.mask = sizeAdjusted - 1; memcpy(&rom.header, buf, sizeof(ROMHeader)); memcpy(rom.gameNameCart, rom.header.imageName, sizeof(rom.header.imageName)); rom.header.clockRate = be32toh(rom.header.clockRate); rom.header.programCounter = be32toh(rom.header.programCounter); rom.header.release = be32toh(rom.header.release); rom.header.crc1 = be32toh(rom.header.crc1); rom.header.crc2 = be32toh(rom.header.crc2); rom.header.unknown = be64toh(rom.header.unknown); rom.header.unknown2 = be32toh(rom.header.unknown2); rom.header.manufacturerId = be32toh(rom.header.manufacturerId); rom.header.cartridgeId = be16toh(rom.header.cartridgeId); rom.code[0] = rom.header.manufacturerId & 0xFF; rom.code[1] = (rom.header.cartridgeId >> 8) & 0xFF; rom.code[2] = rom.header.cartridgeId & 0xFF; rom.code[3] = '\0'; for (int i = sizeof(rom.header.imageName) - 1; rom.gameNameCart[i] == ' '; i--) { rom.gameNameCart[i] = '\0'; } u32 checksum = Util::crc32(0, &rom.cart[0x40], 0x9c0); SetROMCIC(checksum, rom); endianness = be32toh(*reinterpret_cast(rom.cart)); Util::SwapN64Rom(sizeAdjusted, rom.cart, endianness); rom.pal = IsROMPAL(); } u8 Mem::Read8(n64::Registers ®s, u32 paddr) { const auto page = paddr >> 12; const auto offset = paddr & 0xFFF; const auto pointer = readPages[page]; SI& si = mmio.si; if(pointer) { return ((u8*)pointer)[BYTE_ADDRESS(offset)]; } else { switch (paddr) { case RDRAM_REGION: return mmio.rdp.rdram[BYTE_ADDRESS(paddr)]; case RSP_MEM_REGION: { u32 mirrAddr = paddr & 0x1FFF; if(mirrAddr & 0x1000) { mirrAddr -= 0x1000; return mmio.rsp.imem[BYTE_ADDRESS(mirrAddr)]; } else { return mmio.rsp.dmem[BYTE_ADDRESS(mirrAddr)]; } } case REGION_CART: return mmio.pi.BusRead8(*this, paddr); case 0x04040000 ... 0x040FFFFF: case 0x04100000 ... 0x041FFFFF: case 0x04600000 ... 0x048FFFFF: case 0x04300000 ... 0x044FFFFF: Util::panic("MMIO Read8!\n"); case AI_REGION: { u32 w = mmio.ai.Read(paddr & ~3); int offs = 3 - (paddr & 3); return (w >> (offs * 8)) & 0xff; } case PIF_ROM_REGION: return si.pif.bootrom[BYTE_ADDRESS(paddr) - PIF_ROM_REGION_START]; case PIF_RAM_REGION: return si.pif.ram[paddr - PIF_RAM_REGION_START]; case 0x00800000 ... 0x03FFFFFF: // unused case 0x04200000 ... 0x042FFFFF: // unused case 0x04900000 ... 0x04FFFFFF: // unused case 0x1FC00800 ... 0xFFFFFFFF: // unused return 0; default: Util::panic("Unimplemented 8-bit read at address {:08X} (PC = {:016X})", paddr, (u64) regs.pc); } } } u16 Mem::Read16(n64::Registers ®s, u32 paddr) { const auto page = paddr >> 12; const auto offset = paddr & 0xFFF; const auto pointer = readPages[page]; SI& si = mmio.si; if(pointer) { return Util::ReadAccess((u8*)pointer, HALF_ADDRESS(offset)); } else { switch (paddr) { case RDRAM_REGION: return Util::ReadAccess(mmio.rdp.rdram, HALF_ADDRESS(paddr)); case RSP_MEM_REGION: { u32 mirrAddr = paddr & 0x1FFF; if(mirrAddr & 0x1000) { mirrAddr -= 0x1000; return Util::ReadAccess(mmio.rsp.imem, HALF_ADDRESS(mirrAddr)); } else { return Util::ReadAccess(mmio.rsp.dmem, HALF_ADDRESS(mirrAddr)); } } case MMIO_REGION: return mmio.Read(paddr); case REGION_CART: return mmio.pi.BusRead16(*this, paddr); case PIF_ROM_REGION: return Util::ReadAccess(si.pif.bootrom, HALF_ADDRESS(paddr) - PIF_ROM_REGION_START); case PIF_RAM_REGION: return be16toh(Util::ReadAccess(si.pif.ram, paddr - PIF_RAM_REGION_START)); case 0x00800000 ... 0x03FFFFFF: case 0x04200000 ... 0x042FFFFF: case 0x04900000 ... 0x04FFFFFF: case 0x1FC00800 ... 0xFFFFFFFF: return 0; default: Util::panic("Unimplemented 16-bit read at address {:08X} (PC = {:016X})", paddr, (u64) regs.pc); } } } u32 Mem::Read32(n64::Registers ®s, u32 paddr) { const auto page = paddr >> 12; const auto offset = paddr & 0xFFF; const auto pointer = readPages[page]; SI& si = mmio.si; if(pointer) { return Util::ReadAccess((u8*)pointer, offset); } else { switch(paddr) { case RDRAM_REGION: return Util::ReadAccess(mmio.rdp.rdram, paddr); case RSP_MEM_REGION: { u32 mirrAddr = paddr & 0x1FFF; if(mirrAddr & 0x1000) { mirrAddr -= 0x1000; return Util::ReadAccess(mmio.rsp.imem, mirrAddr); } else { return Util::ReadAccess(mmio.rsp.dmem, mirrAddr); } } case MMIO_REGION: return mmio.Read(paddr); case REGION_CART: return mmio.pi.BusRead32(*this, paddr); case PIF_ROM_REGION: return Util::ReadAccess(si.pif.bootrom, paddr - PIF_ROM_REGION_START); case PIF_RAM_REGION: return be32toh(Util::ReadAccess(si.pif.ram, paddr - PIF_RAM_REGION_START)); case 0x00800000 ... 0x03FFFFFF: case 0x04200000 ... 0x042FFFFF: case 0x04900000 ... 0x04FFFFFF: case 0x1FC00800 ... 0xFFFFFFFF: return 0; default: Util::panic("Unimplemented 32-bit read at address {:08X} (PC = {:016X})", paddr, (u64) regs.pc); } } } u64 Mem::Read64(n64::Registers ®s, u32 paddr) { const auto page = paddr >> 12; const auto offset = paddr & 0xFFF; const auto pointer = readPages[page]; SI& si = mmio.si; if(pointer) { return Util::ReadAccess((u8*)pointer, offset); } else { switch (paddr) { case RDRAM_REGION: return Util::ReadAccess(mmio.rdp.rdram, paddr); case RSP_MEM_REGION: { u32 mirrAddr = paddr & 0x1FFF; if(mirrAddr & 0x1000) { mirrAddr -= 0x1000; return Util::ReadAccess(mmio.rsp.imem, mirrAddr); } else { return Util::ReadAccess(mmio.rsp.dmem, mirrAddr); } } case MMIO_REGION: return mmio.Read(paddr); case REGION_CART: return mmio.pi.BusRead64(*this, paddr); case PIF_ROM_REGION: return Util::ReadAccess(si.pif.bootrom, paddr - PIF_ROM_REGION_START); case PIF_RAM_REGION: return be64toh(Util::ReadAccess(si.pif.ram, paddr - PIF_RAM_REGION_START)); case 0x00800000 ... 0x03FFFFFF: case 0x04200000 ... 0x042FFFFF: case 0x04900000 ... 0x04FFFFFF: case 0x1FC00800 ... 0xFFFFFFFF: return 0; default: Util::panic("Unimplemented 32-bit read at address {:08X} (PC = {:016X})", paddr, (u64) regs.pc); } } } void Mem::Write8(Registers& regs, u32 paddr, u32 val) { const auto page = paddr >> 12; const auto offset = paddr & 0xFFF; const auto pointer = writePages[page]; SI& si = mmio.si; if(pointer) { ((u8*)pointer)[BYTE_ADDRESS(offset)] = val; } else { switch (paddr) { case RDRAM_REGION: mmio.rdp.rdram[BYTE_ADDRESS(paddr)] = val; break; case RSP_MEM_REGION: { u32 mirrAddr = paddr & 0x1FFF; val = val << (8 * (3 - (mirrAddr & 3))); mirrAddr = (mirrAddr & 0xFFF) & ~3; if(mirrAddr & 0x1000) { Util::WriteAccess(mmio.rsp.imem, mirrAddr, val); } else { Util::WriteAccess(mmio.rsp.dmem, mirrAddr, val); } } break; case REGION_CART: Util::debug("BusWrite8 @ {:08X} = {:02X}", paddr, val); mmio.pi.BusWrite8(*this, paddr, val); break; case MMIO_REGION: Util::panic("MMIO Write8!"); case PIF_RAM_REGION: val = val << (8 * (3 - (paddr & 3))); paddr = (paddr - PIF_RAM_REGION_START) & ~3; Util::WriteAccess(si.pif.ram, paddr, htobe32(val)); si.pif.ProcessCommands(*this); break; case 0x00800000 ... 0x03FFFFFF: case 0x04200000 ... 0x042FFFFF: case 0x04900000 ... 0x04FFFFFF: case PIF_ROM_REGION: case 0x1FC00800 ... 0x7FFFFFFF: case 0x80000000 ... 0xFFFFFFFF: break; default: Util::panic("Unimplemented 8-bit write at address {:08X} with value {:02X} (PC = {:016X})", paddr, val, (u64) regs.pc); } } } void Mem::Write16(Registers& regs, u32 paddr, u32 val) { const auto page = paddr >> 12; const auto offset = paddr & 0xFFF; const auto pointer = writePages[page]; SI& si = mmio.si; if(pointer) { Util::WriteAccess((u8*)pointer, HALF_ADDRESS(offset), val); } else { switch (paddr) { case RDRAM_REGION: Util::WriteAccess(mmio.rdp.rdram, HALF_ADDRESS(paddr), val); break; case RSP_MEM_REGION: { u32 mirrAddr = paddr & 0x1FFF; val = val << (16 * !(mirrAddr & 2)); mirrAddr = (mirrAddr & 0xFFF) & ~3; if(mirrAddr & 0x1000) { Util::WriteAccess(mmio.rsp.imem, mirrAddr, val); } else { Util::WriteAccess(mmio.rsp.dmem, mirrAddr, val); } } break; case REGION_CART: Util::debug("BusWrite8 @ {:08X} = {:04X}", paddr, val); mmio.pi.BusWrite16(*this, paddr, val); break; case MMIO_REGION: Util::panic("MMIO Write16!"); case PIF_RAM_REGION: val = val << (16 * !(paddr & 2)); paddr &= ~3; Util::WriteAccess(si.pif.ram, paddr - PIF_RAM_REGION_START, htobe32(val)); si.pif.ProcessCommands(*this); break; case 0x00800000 ... 0x03FFFFFF: case 0x04200000 ... 0x042FFFFF: case 0x04900000 ... 0x04FFFFFF: case PIF_ROM_REGION: case 0x1FC00800 ... 0x7FFFFFFF: case 0x80000000 ... 0xFFFFFFFF: break; default: Util::panic("Unimplemented 16-bit write at address {:08X} with value {:04X} (PC = {:016X})", paddr, val, (u64) regs.pc); } } } void Mem::Write32(Registers& regs, u32 paddr, u32 val) { const auto page = paddr >> 12; const auto offset = paddr & 0xFFF; const auto pointer = writePages[page]; SI& si = mmio.si; if(pointer) { Util::WriteAccess((u8*)pointer, offset, val); } else { switch(paddr) { case RDRAM_REGION: Util::WriteAccess(mmio.rdp.rdram, paddr, val); break; case RSP_MEM_REGION: { u32 mirrAddr = paddr & 0x1FFF; if(mirrAddr & 0x1000) { Util::WriteAccess(mmio.rsp.imem, paddr & IMEM_DSIZE, val); } else { Util::WriteAccess(mmio.rsp.dmem, paddr & DMEM_DSIZE, val); } } break; case REGION_CART: Util::debug("BusWrite8 @ {:08X} = {:08X}", paddr, val); mmio.pi.BusWrite32(*this, paddr, val); break; case MMIO_REGION: mmio.Write(*this, regs, paddr, val); break; case PIF_RAM_REGION: Util::WriteAccess(si.pif.ram, paddr - PIF_RAM_REGION_START, htobe32(val)); si.pif.ProcessCommands(*this); break; case 0x00800000 ... 0x03FFFFFF: case 0x04200000 ... 0x042FFFFF: case 0x04900000 ... 0x04FFFFFF: case PIF_ROM_REGION: case 0x1FC00800 ... 0x7FFFFFFF: case 0x80000000 ... 0xFFFFFFFF: break; default: Util::panic("Unimplemented 32-bit write at address {:08X} with value {:0X} (PC = {:016X})", paddr, val, (u64)regs.pc); } } } void Mem::Write64(Registers& regs, u32 paddr, u64 val) { const auto page = paddr >> 12; const auto offset = paddr & 0xFFF; const auto pointer = writePages[page]; SI& si = mmio.si; if(pointer) { Util::WriteAccess((u8*)pointer, offset, val); } else { switch (paddr) { case RDRAM_REGION: Util::WriteAccess(mmio.rdp.rdram, paddr, val); break; case RSP_MEM_REGION: { u32 mirrAddr = paddr & 0x1FFF; val >>= 32; if(mirrAddr & 0x1000) { Util::WriteAccess(mmio.rsp.imem, paddr & IMEM_DSIZE, val); } else { Util::WriteAccess(mmio.rsp.dmem, paddr & DMEM_DSIZE, val); } } break; case REGION_CART: Util::debug("BusWrite8 @ {:08X} = {:016X}", paddr, val); mmio.pi.BusWrite64(*this, paddr, val); break; case MMIO_REGION: Util::panic("MMIO Write64!"); case PIF_RAM_REGION: Util::WriteAccess(si.pif.ram, paddr - PIF_RAM_REGION_START, htobe64(val)); si.pif.ProcessCommands(*this); break; case 0x00800000 ... 0x03FFFFFF: case 0x04200000 ... 0x042FFFFF: case 0x04900000 ... 0x04FFFFFF: case 0x1FC00000 ... 0x1FC007BF: case 0x1FC00800 ... 0x7FFFFFFF: case 0x80000000 ... 0xFFFFFFFF: break; default: Util::panic("Unimplemented 64-bit write at address {:08X} with value {:0X} (PC = {:016X})", paddr, val, (u64) regs.pc); } } } u32 Mem::BackupRead32(u32 addr) { switch(saveType) { case SAVE_NONE: return 0; case SAVE_EEPROM_4k: case SAVE_EEPROM_16k: Util::warn("Accessing cartridge backup type SAVE_EEPROM, returning 0 for word read"); return 0; case SAVE_FLASH_1m: if(flash.flash.is_mapped()) { return flash.Read32(addr); } else { Util::panic("Invalid backup Read32 if save data is not initialized"); } case SAVE_SRAM_256k: return 0xFFFFFFFF; default: Util::panic("Backup read word with unknown save type"); } } void Mem::BackupWrite32(u32 addr, u32 val) { switch(saveType) { case SAVE_NONE: Util::panic("Accessing cartridge with save type SAVE_NONE in write word"); case SAVE_EEPROM_4k: case SAVE_EEPROM_16k: Util::panic("Accessing cartridge with save type SAVE_EEPROM in write word"); case SAVE_FLASH_1m: if(flash.flash.is_mapped()) { flash.Write32(addr, val); } else { Util::panic("Invalid backup Write32 if save data is not initialized"); } break; case SAVE_SRAM_256k: break; default: Util::panic("Backup read word with unknown save type"); } } u8 Mem::BackupRead8(u32 addr) { switch(saveType) { case SAVE_NONE: return 0; case SAVE_EEPROM_4k: case SAVE_EEPROM_16k: Util::warn("Accessing cartridge backup type SAVE_EEPROM, returning 0 for word read"); return 0; case SAVE_FLASH_1m: if(flash.flash.is_mapped()) { return flash.Read8(addr); } else { Util::panic("Invalid backup Read8 if save data is not initialized"); } case SAVE_SRAM_256k: if(sram.is_mapped()) { return sram[addr & 0x8000]; } else { Util::panic("Invalid backup Read8 if save data is not initialized"); } default: Util::panic("Backup read word with unknown save type"); } } void Mem::BackupWrite8(u32 addr, u8 val) { switch(saveType) { case SAVE_NONE: Util::panic("Accessing cartridge with save type SAVE_NONE in write word"); case SAVE_EEPROM_4k: case SAVE_EEPROM_16k: Util::panic("Accessing cartridge with save type SAVE_EEPROM in write word"); case SAVE_FLASH_1m: if(flash.flash.is_mapped()) { flash.Write8(addr, val); } else { Util::panic("Invalid backup Write8 if save data is not initialized"); } break; case SAVE_SRAM_256k: if(sram.is_mapped()) { sram[addr & 0x8000] = val; } else { Util::panic("Invalid backup Write8 if save data is not initialized"); } break; default: Util::panic("Backup read word with unknown save type"); } } std::vector Mem::Serialize() { std::vector res{}; auto sMMIO = mmio.Serialize(); auto sFLASH = flash.Serialize(); mmioSize = sMMIO.size(); flashSize = sFLASH.size(); res.insert(res.begin(), sMMIO.begin(), sMMIO.end()); res.insert(res.end(), sFLASH.begin(), sFLASH.end()); res.insert(res.end(), sram.begin(), sram.end()); return res; } void Mem::Deserialize(const std::vector& data) { mmio.Deserialize(std::vector(data.begin(), data.begin() + mmioSize)); flash.Deserialize(std::vector(data.begin() + mmioSize, data.begin() + mmioSize + flashSize)); memcpy(sram.data(), data.data() + mmioSize + flashSize, sram.size()); } }