2 CASIO PV-2000 Emulator 'EmuGaki'
4 Author : Takeda.Toshiya
11 #include "../../emu.h"
12 #include "../device.h"
16 #include "../memory.h"
17 #include "../sn76489an.h"
18 #include "../tms9918a.h"
22 #include "../debugger.h"
29 // ----------------------------------------------------------------------------
31 // ----------------------------------------------------------------------------
33 VM::VM(EMU* parent_emu) : VM_TEMPLATE(parent_emu)
36 first_device = last_device = NULL;
37 dummy = new DEVICE(this, emu); // must be 1st device
38 event = new EVENT(this, emu); // must be 2nd device
39 dummy->set_device_name(_T("1st Dummy"));
41 io = new IO(this, emu);
42 memory = new MEMORY(this, emu);
43 psg = new SN76489AN(this, emu);
44 vdp = new TMS9918A(this, emu);
45 cpu = new Z80(this, emu);
46 cmt = new CMT(this, emu);
47 key = new KEYBOARD(this, emu);
48 prt = new PRINTER(this, emu);
50 event->set_context_cpu(cpu);
51 event->set_context_sound(psg);
53 vdp->set_context_irq(cpu, SIG_CPU_NMI, 1);
54 key->set_context_cpu(cpu);
57 cpu->set_context_mem(memory);
58 cpu->set_context_io(io);
59 cpu->set_context_intr(dummy);
61 cpu->set_context_debugger(new DEBUGGER(this, emu));
65 memset(ram, 0, sizeof(ram));
66 memset(ext, 0, sizeof(ext));
67 memset(ipl, 0xff, sizeof(ipl));
68 memset(cart, 0xff, sizeof(cart));
70 memory->read_bios(_T("IPL.ROM"), ipl, sizeof(ipl));
72 memory->set_memory_r(0x0000, 0x3fff, ipl);
73 memory->set_memory_mapped_io_rw(0x4000, 0x4fff, vdp);
74 memory->set_memory_rw(0x7000, 0x7fff, ram);
75 memory->set_memory_rw(0x8000, 0xbfff, ext);
76 memory->set_memory_r(0xc000, 0xffff, cart);
79 io->set_iomap_single_w(0x00, cmt);
80 io->set_iomap_single_r(0x10, key);
81 io->set_iomap_single_rw(0x20, key);
82 io->set_iomap_single_r(0x40, key);
83 io->set_iomap_single_w(0x40, psg);
84 io->set_iomap_single_rw(0x60, cmt);
85 io->set_iomap_single_w(0x80, prt);
86 io->set_iomap_single_r(0x90, prt);
87 io->set_iomap_single_w(0xa0, prt);
88 io->set_iomap_single_w(0xb0, prt);
90 // initialize all devices
91 #if defined(__GIT_REPO_VERSION)
92 strncpy(_git_revision, __GIT_REPO_VERSION, sizeof(_git_revision) - 1);
94 for(DEVICE* device = first_device; device; device = device->next_device) {
102 // delete all devices
103 for(DEVICE* device = first_device; device;) {
104 DEVICE *next_device = device->next_device;
107 device = next_device;
111 DEVICE* VM::get_device(int id)
113 for(DEVICE* device = first_device; device; device = device->next_device) {
114 if(device->this_device_id == id) {
121 // ----------------------------------------------------------------------------
122 // drive virtual machine
123 // ----------------------------------------------------------------------------
128 for(DEVICE* device = first_device; device; device = device->next_device) {
138 // ----------------------------------------------------------------------------
140 // ----------------------------------------------------------------------------
143 DEVICE *VM::get_cpu(int index)
152 // ----------------------------------------------------------------------------
154 // ----------------------------------------------------------------------------
156 void VM::draw_screen()
161 // ----------------------------------------------------------------------------
163 // ----------------------------------------------------------------------------
165 void VM::initialize_sound(int rate, int samples)
167 // init sound manager
168 event->initialize_sound(rate, samples);
171 psg->initialize_sound(rate, 3579545, 8000);
174 uint16_t* VM::create_sound(int* extra_frames)
176 return event->create_sound(extra_frames);
179 int VM::get_sound_buffer_ptr()
181 return event->get_sound_buffer_ptr();
184 #ifdef USE_SOUND_VOLUME
185 void VM::set_sound_device_volume(int ch, int decibel_l, int decibel_r)
188 psg->set_volume(0, decibel_l, decibel_r);
193 // ----------------------------------------------------------------------------
195 // ----------------------------------------------------------------------------
197 void VM::key_down(int code, bool repeat)
202 void VM::key_up(int code)
207 // ----------------------------------------------------------------------------
209 // ----------------------------------------------------------------------------
211 void VM::open_cart(int drv, const _TCHAR* file_path)
214 memset(cart, 0xff, sizeof(cart));
215 inserted = memory->read_image(file_path, cart, sizeof(cart));
220 void VM::close_cart(int drv)
223 memset(cart, 0xff, sizeof(cart));
229 bool VM::is_cart_inserted(int drv)
238 void VM::play_tape(int drv, const _TCHAR* file_path)
240 cmt->play_tape(file_path);
243 void VM::rec_tape(int drv, const _TCHAR* file_path)
245 cmt->rec_tape(file_path);
248 void VM::close_tape(int drv)
253 bool VM::is_tape_inserted(int drv)
255 return cmt->is_tape_inserted();
258 bool VM::is_frame_skippable()
260 return event->is_frame_skippable();
263 void VM::update_config()
265 for(DEVICE* device = first_device; device; device = device->next_device) {
266 device->update_config();
270 #define STATE_VERSION 2
272 bool VM::process_state(FILEIO* state_fio, bool loading)
274 if(!state_fio->StateCheckUint32(STATE_VERSION)) {
277 for(DEVICE* device = first_device; device; device = device->next_device) {
278 // Note: typeid(foo).name is fixed by recent ABI.Not dec 6.
279 // const char *name = typeid(*device).name();
280 // But, using get_device_name() instead of typeid(foo).name() 20181008 K.O
281 const char *name = device->get_device_name();
282 int len = strlen(name);
284 if(!state_fio->StateCheckInt32(len)) {
286 printf("Class name len Error: DEVID=%d EXPECT=%s\n", device->this_device_id, name);
290 if(!state_fio->StateCheckBuffer(name, len, 1)) {
292 printf("Class name Error: DEVID=%d EXPECT=%s\n", device->this_device_id, name);
296 if(!device->process_state(state_fio, loading)) {
298 printf("Data loading Error: DEVID=%d\n", device->this_device_id);
303 // Machine specified.
304 state_fio->StateBuffer(ram, sizeof(ram), 1);
305 state_fio->StateBuffer(ext, sizeof(ext), 1);
306 state_fio->StateBool(inserted);