rockbox/apps/codecs/libgme/nsf_cpu.c

116 lines
3.2 KiB
C
Raw Normal View History

// Normal cpu for NSF emulator
// Game_Music_Emu 0.6-pre. http://www.slack.net/~ant/
#include "nsf_emu.h"
#include "blargg_endian.h"
#ifdef BLARGG_DEBUG_H
//#define CPU_LOG_START 1000000
//#include "nes_cpu_log.h"
#undef LOG_MEM
#endif
/* Copyright (C) 2003-2008 Shay Green. This module is free software; you
can redistribute it and/or modify it under the terms of the GNU Lesser
General Public License as published by the Free Software Foundation; either
version 2.1 of the License, or (at your option) any later version. This
module is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more
details. You should have received a copy of the GNU Lesser General Public
License along with this module; if not, write to the Free Software Foundation,
Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA */
#include "blargg_source.h"
#ifndef LOG_MEM
#define LOG_MEM( addr, str, data ) data
#endif
int read_mem( struct Nsf_Emu* this, addr_t addr )
{
int result = this->low_ram [addr & (low_ram_size-1)]; // also handles wrap-around
if ( addr & 0xE000 )
{
result = *Cpu_get_code( &this->cpu, addr );
if ( addr < sram_addr )
{
if ( addr == apu_status_addr )
result = Apu_read_status( &this->apu, Cpu_time( &this->cpu ) );
else
result = cpu_read( this, addr );
}
}
return LOG_MEM( addr, ">", result );
}
void write_mem( struct Nsf_Emu* this, addr_t addr, int data )
{
(void) LOG_MEM( addr, "<", data );
int offset = addr - sram_addr;
if ( (unsigned) offset < sram_size )
{
sram( this ) [offset] = data;
}
else
{
// after sram because cpu handles most low_ram accesses internally already
int temp = addr & (low_ram_size-1); // also handles wrap-around
if ( !(addr & 0xE000) )
{
this->low_ram [temp] = data;
}
else
{
int bank = addr - banks_addr;
if ( (unsigned) bank < bank_count )
{
write_bank( this, bank, data );
}
else if ( (unsigned) (addr - apu_io_addr) < apu_io_size )
{
Apu_write_register( &this->apu, Cpu_time( &this->cpu ), addr, data );
}
else
{
#ifndef NSF_EMU_APU_ONLY
// 0x8000-0xDFFF is writable
int i = addr - 0x8000;
if ( fds_enabled( this ) && (unsigned) i < fdsram_size )
fdsram( this ) [i] = data;
else
#endif
cpu_write( this, addr, data );
}
}
}
}
#define READ_LOW( addr ) (LOG_MEM( addr, ">", this->low_ram [addr] ))
#define WRITE_LOW( addr, data ) (LOG_MEM( addr, "<", this->low_ram [addr] = data ))
#define CAN_WRITE_FAST( addr ) (addr < low_ram_size)
#define WRITE_FAST WRITE_LOW
// addr < 0x2000 || addr >= 0x8000
#define CAN_READ_FAST( addr ) ((addr ^ 0x8000) < 0xA000)
#define READ_FAST( addr, out ) (LOG_MEM( addr, ">", out = READ_CODE( addr ) ))
#define READ_MEM( addr ) read_mem( this, addr )
#define WRITE_MEM( addr, data ) write_mem( this, addr, data )
#define CPU_BEGIN \
bool run_cpu_until( struct Nsf_Emu* this, nes_time_t end ) \
{ \
struct Nes_Cpu* cpu = &this->cpu; \
Cpu_set_end_time( cpu, end ); \
if ( *Cpu_get_code( cpu, cpu->r.pc ) != halt_opcode ) \
{
#include "nes_cpu_run.h"
}
return Cpu_time_past_end( cpu ) < 0;
}